C    Copyright(C) 1999-2020 National Technology & Engineering Solutions
C    of Sandia, LLC (NTESS).  Under the terms of Contract DE-NA0003525 with
C    NTESS, the U.S. Government retains certain rights in this software.
C
C    See packages/seacas/LICENSE for details

      COMMON /DBNUMG/ NUMNPS, LNPSNL, NUMESS, LESSEL, LESSNL, LNPSDF
C   --   NUMNPS - the number of node sets
C   --   LNPSNL - the length of the node sets node list
C   --   NUMESS - the number of side sets
C   --   LESSEL - the length of the side sets element list
C   --   LESSNL - the length of the side sets node list
C   --   LNPSDF - the length of the side set distribution list

      COMMON /DBNUMQ/ EXODUS, NQAREC, NINFO
      LOGICAL EXODUS
C   --   EXODUS - true iff EXODUS versus GENESIS database
C   --   NQAREC - the number of QA records
C   --   NINFO - the number of information records