
C     INCLUDE 'Zcofr.inc' used only for COFRED (< DDSTART)

C MAXX > MAXX
      PARAMETER (M200 = 321)
      PARAMETER (MAXX = 123)
      COMMON /CFCOM/  IBOND(M200,2), NBATOM(MAXX), IBON2(MAXX,11,2),
     *                IATYP(MAXX), IBTYP(M200), IHTYP(MAXX),
     *                BONDIS(M200), TM(3,3), NATSAV, NHADD(MAXX),
     *                XYZSAV(3,MAXX), IZTSAV(MAXX), NDEL(11), NRING,
     *                NBONDS, RINGAT(8,100), 
     *                SCALED, RINGED, METAED
      LOGICAL         SCALED, RINGED, METAED
 
      COMMON /CFCOMC/ EDOPT,   ANSWER,  AL(19), ATNSAV(MAXX), AT2, AT3,
     *                AT4, TEMPAT
      CHARACTER       EDOPT*3, ANSWER*1, AL*78, ATNSAV*6, AT2*6, AT3*6,
     *                AT4*6, TEMPAT*6

C end of 'Zcofr.inc' 
 