C
C---vital parameters
C
C
      INTEGER NA,NV,NVTMTX,NDIS,NPLN,NCHR,NVDW,NHBD,NOCC,
     &        NTOR,ITEMP,NBIS,NANISO_ATOMS
      REAL RANGE
      COMMON /VITALS/ NA,NV,NVTMTX,NDIS,NPLN,NCHR,NVDW,NHBD,
     +     NOCC,NTOR,ITEMP,
     +     NBIS,RANGE,NANISO_ATOMS
      INTEGER NAS,NVS,NVTEMPS,NDISS,NPLNS,NCHRS,NVDWS,NHBDS,NOCCS,
     &        NTORS,ITEMPS,NANISO_ATOMS_SAVE
      COMMON /V_STOR/ NAS,NVS,NVTEMPS,NDISS,NPLNS,NCHRS,NVDWS,NHBDS,
     +           NOCCS,NTORS,ITEMPS,
     +           NANISO_ATOMS_SAVE
      INTEGER NBET,IBET1,IBETN,IATMN,LATMN
      COMMON /LIMITS/ NBET,IATMN,IBET1,IBETN,LATMN
      INTEGER NVPOS,NMPOS,NVTMP,NVOCC,NVALL,NMALL,NMTMP,NMOCC,NREF_PARS
      COMMON /VAR_SIZE/NVPOS,NMPOS,NVTMP,NMTMP,NVOCC,NMOCC,NVALL,NMALL,
     &        NREF_PARS
C