C  Header file for nbmode.fcm .  See that file for
C  explanation.

      integer, parameter:: N = 64
      real, array(1:3, 1:N) :: X0, X1, V0, V1, M, GM
CMPF  ONDPU X0, X1, V0, V1, M, GM
CMF$  LAYOUT X0(,), X1(,), V0(,), V1(,), M(,), GM(,)
      COMMON /NBODYPE/ X0, X1, V0, V1, M, GM
      integer, array(1:3, 1:N) :: c, i
CMPF  ONDPU c, i
CMF$  LAYOUT c(,), i(,)
      COMMON /NBODYPE/ c, i
      integer NB
      COMMON /NBODYFE/ NB
      real G
      COMMON /NBODYFE/ G