CIPRIME CNLSMB                                                          CNLSMB      1
*IF -MI2                                                                CNLSMB      2
      INTEGER*2 NLFLMB,NLFSMB                                           CNLSMB      3
*ENDIF                                                                  CNLSMB      4
      COMMON /NLFCLM/NLFLMB(NB),NLFSMB(NB)                              CNLSMB      5
