CIPRIME CNCPT2                                                          CNCPT2      1
      CHARACTER*8 EXCMOD,EVCMOD,GENMOD,GOVMOD,STBMOD,SVCMOD             CNCPT2      2
      COMMON /CPT2C/ EXCMOD(NMODEX),EVCMOD(NMODVC),GENMOD(NMODGN)       CNCPT2      3
     1,GOVMOD(NMODGV),STBMOD(NMODST),SVCMOD(NMODSV)                     CNCPT2      4
C      COMMON /CPT2/ IGNNUM(NMODGN),IEXNUM(NMODEX),IVCNUM(NMODVC)       CNCPT2      5
C     1,ISTNUM(NMODST),IGVNUM(NMODGV),ISVNUM(NMODSV),IGNICO(NMODGN)     CNCPT2      6
C     2,IEXICO(NMODEX),IVCICO(NMODVC),ISTICO(NMODST),IGVICO(NMODGV)     CNCPT2      7
C     3,ISVICO(NMODSV)                                                  CNCPT2      8
