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 /MASS/ IM, IR, IX, IS, ID, IV, IC, IZ, IXXX, IXG,
     *    IXINI, IAJ, IECEN, IW

C POINTERS USED IN MASS PROPERTIES CALCULATION:

C     IM       Material block array
C     IR       Coordinate array
C     IX       Connectivity array
C     IS       Element block Mass array
C     ID       Element block Density array
C     IV       Element block Volume array
C     IC       Location of centroid
C     IZ       Moments of inertia
C     IXXX     Shape function array
C     IXG      Global quadrature point locations
C     IXINI    Sum of shape function functions
C     IAJ      Jacobian matrix
C     IECEN    Element Centroid location
C     IW       Element Wave Speed Array