BLOCK DATA 
 
      INTEGER  SYMTBL (65) 
      INTEGER ICLP15 
      COMMON   /SYMB/   SYMTBL 
      COMMON   /SYMB/   ICLP15 
      DATA  SYMTBL   /0, 29, 46, 18, 12, -1, 30, 45, 13, 14, 26, 24,  2,
     1 25,  4, 27, 1,  1,  1,  1,  1,  1,  1,  1, 1,  1,  5,  3, 21, 17,
     1 19, -1, 53,  0,  0,  0,  0,  0,  0,  0, 0,  0,  0,  0,  0,  0,  0
     1,0, 0,  0,  0,  0,  0,  0,  0,  0, 0,  0,  0, 15, -1, 16, 41, -1, 
     19/ 
      END