CIPRIME CNCPT1                                                          CNCPT1      1
      COMMON /CPT1/ JDREC(NB/3),ITYPE(NB/3)                             CNCPT1      2
     *,IEX(NB/3),ISTAB(NB/3),IGV(NB/3),IEVC(NB/3),NGEN                  CNCPT1      3
