CIPRIME GRACSY                                                          GRACSY      1
C                                                                       GRACSY      2
      DATA              IBUSS  /1/,    ICRXS  /2/,    ICSCRS /3/,       GRACSY      3
     1                  IRXLFS /4/,    IRXLVS /5/,    IRXFS  /6/,       GRACSY      4
     2                  IRXVS  /7/,    ISCRLF /8/,    ISCRLV /9/,       GRACSY      5
     3                  ISCRFS/10/,    ISCRVS/11/,    IVMONS/12/,       GRACSY      6
     4                  IRXLFD/13/,    IRXLVD/14/,    JSCRLF/15/,       GRACSY      7
     5                  JSCRLV/16/,    ICRXLS/17/,    ICSCRL/18/        GRACSY      8
C                                                                       GRACSY      9
