CIPRIME CNB9                                                            CNB9        1
      COMMON /B9/ STOL,STOLMX,KSBINT,A2,A3                              CNB9        2
     1,A1,B1,C1,IR,INTMTH,NSLMTH,INDIV,JNDIV,XNDIV,KNDIV,LNDIV,YNDIV    CNB9        3
      LOGICAL LINTEG,LIR1,LIR4,LSDAMP,LDISC                             CNB9        4
      COMMON /LOGV/ LINTEG,LIR1,LIR4,LSDAMP,LDISC                       CNB9        5
