      INTEGER KEYWRD(1031), KEYLEN(0:13)
      DATA KEYLEN /  12,  0,  0, 57,101,311,563,766,934,988,1018,1018,
     &              1018,1031/
      INTEGER KEYW1(228),KEYW2(228),KEYW3(228),KEYW4(228),KEYW5(119)
      EQUIVALENCE   (KEYWRD(1),KEYW1),(KEYWRD(229),KEYW2),
     &              (KEYWRD(457),KEYW3),(KEYWRD(685),KEYW4),
     &              (KEYWRD(913),KEYW5)
      DATA KEYW1  / 1RB,1RA,120,1RB,1RY, 43,1RD,1RA,117,1RD,1RE,122,
     &              1RD,1RO, 84,1RE,1RX,115,1RI,1RF, 81,1RI,1RN, 43,
     &              1RL,1RI,114,1RM,1RO,111,1RN,1RA,112,1RO,1RN, 43,
     &              1RO,1RR,  2,1RO,1RU,121,1RR,1RE,116,1RS,1RO,119,
     &              1RT,1RO, 43,1RT,1RY,113,1RW,1RH,118,1RA,1RN,1RD,
     &                1,1RB,1RI,1RT, 51,1RD,1RC,1RB, 53,1RD,1RC,1RL,
     &               86,1RE,1RN,1RD, 85,1RE,1RX,1RT, 72,1RM,1RO,1RD,
     &               41,1RN,1RI,1RL, 61,1RN,1RO,1RT,  3,1RO,1RF,1RF,
     &               43,1RP,1RT,1RR, 56,1R$,1RL,1RS,1R0, 91,1R$,1RL,
     &              1RS,1R1, 91,1R$,1RL,1RS,1R2, 91,1R$,1RL,1RS,1R3,
     &               91,1R$,1RL,1RS,1R4, 91,1R$,1RL,1RS,1R5, 91,1R$,
     &              1RL,1RS,1R6, 91,1R$,1RL,1RS,1R7, 91,1R$,1RL,1RS,
     &              1R8, 91,1R$,1RL,1RS,1R9, 91,1R$,1RP,1RS,1R0, 91,
     &              1R$,1RP,1RS,1R1, 91,1R$,1RP,1RS,1R2, 91,1R$,1RP,
     &              1RS,1R3, 91,1R$,1RP,1RS,1R4, 91,1R$,1RP,1RS,1R5,
     &               91,1R$,1RP,1RS,1R6, 91,1R$,1RP,1RS,1R7, 91,1R$,
     &              1RP,1RS,1R8, 91,1RA,1RD,1RD,1RR, 41,1RA,1RU,1RT,
     &              1RO, 21,1RB,1RY,1RT,1RE, 59,1RC,1RA,1RL,1RL, 89,
     &              1RC,1RA,1RS,1RE, 87,1RC,1RH,1RA,1RR, 52,1RE,1RL/
      DATA KEYW2  / 1RS,1RE, 83,1RE,1RP,1RT,1RR, 54,1RG,1RO,1RT,1RO,
     &               42,1RH,1RA,1RL,1RF, 59,1RI,1RN,1RI,1RT, 60,1RL,
     &              1RE,101,1RP,1RR,1RO,1RC, 88,1RS,1RB,1RI,1RN, 57,
     &              1RS,1RO,1RR,1RT,119,1RT,1RH,1RE,1RN, 82,1RT,1RY,
     &              1RP,1RE,113,1RU,1RB,1RI,1RN, 58,1RU,1RN,1RA,1RL,
     &               13,1RW,1RH,1RA,1RT,118,1RW,1RO,1RR,1RD, 59,1R$,
     &              1RL,1RS,1R1,1R0, 91,1R$,1RL,1RS,1R1,1R1, 91,1R$,
     &              1RL,1RS,1R1,1R2, 91,1R$,1RL,1RS,1R1,1R3, 91,1R$,
     &              1RL,1RS,1R1,1R4, 91,1R$,1RL,1RS,1R1,1R5, 91,1R$,
     &              1RL,1RS,1R1,1R6, 91,1R$,1RL,1RS,1R1,1R7, 91,1R$,
     &              1RL,1RS,1R1,1R8, 91,1R$,1RL,1RS,1R1,1R9, 91,1R$,
     &              1RL,1RS,1R2,1R0, 91,1R$,1RP,1RS,1R1,1R0, 91,1R$,
     &              1RP,1RS,1R1,1R1, 91,1R$,1RP,1RS,1R1,1R2, 91,1R$,
     &              1RP,1RS,1R1,1R3, 91,1R$,1RP,1RS,1R1,1R4, 91,1R$,
     &              1RP,1RS,1R1,1R5, 91,1R$,1RP,1RS,1R1,1R6, 91,1R$,
     &              1RP,1RS,1R1,1R7, 91,1R$,1RP,1RS,1R1,1R8, 91,1R$,
     &              1RP,1RS,1R1,1R9, 91,1R$,1RP,1RS,1R2,1R0, 91,1RA,
     &              1RS,1RY,1RN,1RC, 43,1RB,1RA,1RS,1RE,1RD, 22,1RE/
      DATA KEYW3  / 1RN,1RT,1RR,1RY, 71,1RE,1RR,1RA,1RS,1RE, 61,1RE,
     &              1RR,1RR,1RO,1RR,102,1RI,1RN,1RD,1RE,1RX, 41,1RL,
     &              1RA,1RB,1RE,1RL, 55,1RL,1RI,1RN,1RE,1RS,114,1RN,
     &              1RA,1RM,1RE,1RS,112,1RP,1RO,1RF,1RF,1RC, 41,1RP,
     &              1RO,1RF,1RF,1RW, 41,1RP,1RR,1RI,1RV,1RY, 42,1RR,
     &              1RE,1RD,1RE,1RF, 43,1RS,1RI,1RZ,1RE,1RB, 41,1RS,
     &              1RI,1RZ,1RE,1RC, 41,1RS,1RI,1RZ,1RE,1RV, 41,1RS,
     &              1RI,1RZ,1RE,1RW, 41,1RT,1RY,1RP,1RE,1RS,113,1RW,
     &              1RH,1RI,1RL,1RE, 43,1RX,1RL,1RA,1RT,1RE, 41,1RA,
     &              1RL,1RT,1RR,1RE,1RT, 43,1RA,1RS,1RC,1RB,1RI,1RN,
     &               41,1RA,1RS,1RC,1RB,1RI,1RT, 41,1RB,1RI,1RN,1RA,
     &              1RS,1RC, 41,1RB,1RI,1RN,1RB,1RI,1RT, 41,1RB,1RI,
     &              1RT,1RA,1RS,1RC, 41,1RB,1RI,1RT,1RB,1RI,1RN, 41,
     &              1RC,1RO,1RN,1RC,1RA,1RT, 41,1RD,1RC,1RB,1RN,1RU,
     &              1RM, 41,1RD,1RE,1RL,1RE,1RT,1RE,122,1RD,1RO,1RU,
     &              1RB,1RL,1RE, 41,1RE,1RN,1RA,1RB,1RL,1RE, 42,1RI,
     &              1RN,1RD,1RE,1RX,1R1, 41,1RI,1RN,1RD,1RE,1RX,1R2,
     &               41,1RI,1RN,1RS,1RE,1RR,1RT, 41,1RM,1RO,1RD,1RU,
     &              1RL,1RE,111,1RO,1RU,1RT,1RP,1RU,1RT,121,1RP,1RI/
      DATA KEYW4  / 1RN,1RC,1RR,1RB, 41,1RP,1RI,1RN,1RC,1RR,1RC, 41,
     &              1RP,1RI,1RN,1RC,1RR,1RW, 41,1RR,1RE,1RP,1RO,1RR,
     &              1RT,116,1RR,1RE,1RT,1RU,1RR,1RN, 42,1RS,1RE,1RA,
     &              1RR,1RC,1RH, 41,1RS,1RT,1RA,1RT,1RI,1RC, 24,1RS,
     &              1RU,1RB,1RS,1RT,1RR, 41,1RS,1RY,1RM,1RD,1RE,1RF,
     &               31,1RS,1RY,1RM,1RR,1RE,1RF, 32,1RU,1RN,1RW,1RI,
     &              1RN,1RD, 42,1RV,1RE,1RC,1RT,1RO,1RR, 41,1RA,1RL,
     &              1RI,1RG,1RN,1RE,1RD, 11,1RB,1RA,1RL,1RA,1RN,1RC,
     &              1RE,120,1RB,1RI,1RN,1RC,1RH,1RA,1RR, 41,1RC,1RH,
     &              1RA,1RR,1RB,1RI,1RN, 41,1RD,1RC,1RB,1RA,1RD,1RD,
     &              1RR, 41,1RD,1RI,1RS,1RA,1RB,1RL,1RE, 42,1RE,1RD,
     &              1RI,1RT,1RS,1RT,1RR, 41,1RE,1RN,1RT,1RA,1RD,1RD,
     &              1RR, 41,1RE,1RX,1RT,1RR,1RA,1RC,1RT,115,1RI,1RN,
     &              1RD,1RE,1RX,1R1,1RR, 41,1RI,1RN,1RD,1RE,1RX,1R2,
     &              1RR, 41,1RI,1RN,1RH,1RI,1RB,1RI,1RT, 41,1RL,1RE,
     &              1RN,1RG,1RT,1RH,1RB, 41,1RL,1RE,1RN,1RG,1RT,1RH,
     &              1RC, 41,1RL,1RE,1RN,1RG,1RT,1RH,1RV, 41,1RL,1RE,
     &              1RE,104,1RM,1RO,1RD,1RU,1RL,1RE,1RS,111,1RR,1RE/
      DATA KEYW5  / 1RT,1RU,1RR,1RN,1RS, 43,1RS,1RE,1RA,1RR,1RC,1RH,
     &              1RR, 41,1RV,1RE,1RR,1RS,1RI,1RO,1RN,105,1RB,1RI,
     &              1RN,1RX,1RC,1RH,1RA,1RR, 41,1RC,1RO,1RN,1RS,1RT,
     &              1RA,1RN,1RT, 23,1RD,1RA,1RL,1RI,1RG,1RN,1RE,1RD,
     &               12,1RE,1RD,1RI,1RT,1RC,1RH,1RA,1RR, 41,1RR,1RE,
     &              1RM,1RE,1RM,1RB,1RE,1RR, 42,1RX,1RC,1RH,1RA,1RR,
     &              1RB,1RI,1RN, 41,1RA,1RL,1RT,1RR,1RE,1RT,1RU,1RR,
     &              1RN, 42,1RD,1RA,1RT,1RA,1R_,1RB,1RA,1RS,1RE,117,
     &              1RE,1RD,1RI,1RT,1RX,1RC,1RH,1RA,1RR, 41,1RS,1RC,
     &              1RR,1RE,1RE,1RC,1RH,1R_,1RC,1RO,1RD,1RE,103/
