   %endoflist
%conststring(8)%array text(0:255) = %c
"Z","VDEC","OWNVDEC","EXTVSPEC","ADEC","OWNADEC",
"EXTASPEC","PROC","PROCSPEC","FORMDEC","SWDEC","LDEC",
"FORMSPEC","","","","","",
"OPTION","COMMA","T","COLON","COMMENT","LB",
"ALIAS","RB","SUB","ARRAYD","STYPE","ARRAY",
"NAME","PROCD","FNMAP","SWITCH","OWN","EXTERNAL",
"STRING","RECORD","FORMAT","SPEC","MCODE","LABEL",
"OP1","OP2","OP3","SIGN","UOP","MOD",
"DOT","COMP","ACOMP","EQ","EQEQ","JAM",
"JUMP","RESOP","AND","OR","NOT","WHILE",
"UNTIL","FOR","CWORD","EXIT","ON","SIGNAL",
"THEN","START","ELSE","FINISH","FELSE","CYCLE",
"REPEAT","PROGRAM","BEGIN","END","ENDPROG","ENDPERM",
"FRESULT","MRESULT","BACK","MONITOR","STOP","LIST",
"","CONTROL","INCLUDE","MASS","RTYPE","ADDOP",
"IDENT","V","N","CONST","FM","",
"R","F","M","P","RP","FP",
"MP","PP","L","S","A","AN",
"NA","NAN","","","","",
"","","","","","",
"%MSTART","%CLEAR","%PRED","","%DUBIOUS","%DUP",
"%PIN","%POUT","%EDUP","","PIDENT","CIDENT",
"OIDENT","FNAME","SWID","DOTL","DOTR","ASEP",
"CSEP","OSEP","PSEP","ARB","BPLRB","ORB",
"PRB","CRB","RCRB","RECRB","RECLB","LAB",
"MLAB","SLAB","XNAME","OWNT","DBSEP","PCONST",
"CMOD","CSIGN","CUOP","COP1","COP2","COP3",
"INDEF","XELSE","CRESOP","NLAB","RUNTIL","ACONST",
"ORRB","FMANY","OSTRING","FMLB","FMRB","FMOR",
"RANGERB","FSID","","","","",
"","%DUMMY","%DECL","%TYPE","%ZERO","%APPLY",
"%PROT","%SETPROT","%PTYPE","%GAPP","%LOCAL","%GUARD",
"%MCODE","%CDUMMY","%SETTYPE","%OPER","%PARAM","%BLOCK",
"%OTHER","%COMPILE","APP","BASEAPP","APP2","APP3",
"APP4","APP5","APP6","ADEFN","NPARM","SWDEF",
"SWIDS","CIEXP","RCONST","SCONST","ARRAYP","XIMP",
"IMP","COND","SCOND","EXP1","EXP2","SEXP",
"IEXP","IEXP1","IEXP2","ISEXP","SEQ","FDEF",
"EXP","NARRAYP","STRUCT","RESEXP","BPL","CONSTB",
"FITEM","MOREA","CLIST","FPP","FPP0","FPP1",
"FPP2","INITVAR","RECEXP","EIMP","IDENTS","RANGE",
"RCONSTB","VARP","INITDEC","","","",
"ESCDEC","ESCPROC","ESCARRAY","ESCREC"
%constinteger gmax1=718
%owninteger gmax=718
%constinteger imp phrase =24

%ownshortintegerarray phrase(200:255) = %C
   0, 563, 564, 566, 568, 570, 572, 561,
 613, 202, 199, 601, 477, 479, 623, 297,
 205, 307, 317, 432, 425, 436, 443, 457,
 452, 460, 466, 481, 401, 626, 628, 602,
 520, 510, 485, 501, 574, 526, 527, 542,
 549, 577, 396, 286, 196, 635, 515, 620,
 166,   0,   0,   0, 639, 692, 700, 708

%constbyteintegerarray atomic(130:179) = %c
  90,  90,  90,  90,  90,  48,  48,  19,
  19,  19,  19,  25,  25,  25,  25,  25,
  25,  25,  23, 104, 104, 105,  30,  20,
  21,  93,  47,  45,  46,  42,  43,  44,
  40,  68,  55, 104,  60,  93,  25,  40,
  93,  23,  25,  57,  25,  90, 176, 177,
 178, 179

!  FLAG<1> 0<1> SS<2> 0<3> T<1> LINK<8>
%constshortintegerarray initial(0:119) = %c
      23,       0,       0,       0,       0,       0,       0,       0,
       0,       0,       0,       0,       0,       0,       0,       0,
       0,       0,      22,       0,       0,       0,       0,       0,
       0,       0,       0,       0,       0,       0,       0,       0,
       0,       0,       0,       0,       0,       0,       0,       0,
      20,       0,       0,       0,       0,       0,       0,       0,
       0,       0,       0,       0,       0,       0,  -32552,       0,
       0,       0,       0,      13,       0,      14,       4,  -32558,
      16,  -32551,       0,       0,       5,       6,       3,      12,
      15,       8,       7,       9,      10,      11,  -32559,  -32555,
  -32560,  -32553,  -32554,      18,       0,      17,      21,      19,
       0,       0,       0,  -32563,  -32561,       0,       0,       0,
  -32562,       0,       0,       0,       0,       0,       0,       0,
       1,       2,       0,  -32557,       0,  -32556,       0,       0,
       0,       0,       0,       0,       0,       0,       0,       0

!  MORE<1> 0<1> ORDER<2> TYPE<4> CLASS<8>
%ownshortintegerarray gram(0:max grammar) = %c
       0,  -28523,  -28521,  -28602,  -32706,  -28509,  -28603,  -24502,
  -24503,  -20405,  -20404,  -28595,  -32697,  -32709,  -16323,  -28600,
  -32704,  -28587,  -28589,  -32681,  -16344,  -28586,  -16366,  -32586,
     216,  -12287,  -16380,   -8185,   -8184,  -12285,  -12286,  -12283,
  -12282,  -12279,  -12276,  -16373,   20490,  -32706,  -32701,     216,
  -16364,  -28610,  -28613,  -28612,   16445,     217,  -16364,      62,
  -32701,   16450,  -16364,    5346,  -16364,     166,  -16344,    4332,
     130,  -16360,  -16361,     126,     217,  -32701,     216,  -16364,
   16450,  -32700,   16404,  -32701,  -32706,     216,   16405,   16407,
  -16222,    8414,     130,     217,  -32697,   16450,    1250,    4307,
    4318,     192,      93,     170,      90,     207,  -16365,   16404,
      90,  -16360,  -16365,   16404,     241,  -16365,   16404,     132,
     132,  -16360,    4329,  -16365,   16404,     133,     175,      90,
  -16365,   16404,     209,  -16365,   16404,    4313,     217,   16451,
    4263,   16384,   16384,     120,     216,  -32700,   16404,  -32706,
   16404,     243,   16409,     454,  -32685,   16404,     454,     248,
  -16365,   16404,    4263,     194,  -16360,    4329,  -32717,   16404,
    4263,   16407,     454,     237,     127,     215,     454,    4263,
   16384,  -16364,    1502,  -32629,  -16361,     153,  -32606,     222,
     143,  -32629,     153,     454,     126,   16409,     454,   16384,
     234,  -16365,  -32595,     147,  -32678,     234,     193,  -32677,
  -32676,  -32661,     109,  -32717,      53,      52,      52,      52,
     194,     194,     194,  -28581,    4188,     194,  -28566,    4203,
     194,  -28564,    4205,    4580,   16429,     183,     183,     186,
     186,  -28583,       0,    9437,      90,  -16365,       0,     134,
  -16365,       0,     210,    4329,     199,  -32677,  -32672,  -32676,
  -32688,  -32690,  -32705,  -32661,  -32659,  -32689,  -32686,  -32687,
  -16330,      65,  -32716,     186,  -28583,  -32717,  -32715,  -32713,
      52,  -32664,    4201,     186,  -32717,  -32715,      55,  -16328,
       0,     197,     197,      52,      52,     197,  -28581,  -28580,
     186,  -28581,    4188,    4318,     194,  -28581,    4188,    9437,
     194,     194,     454,   16407,     216,     194,  -28566,  -28565,
     186,  -28566,    4203,     194,  -28564,  -28563,     186,  -28564,
    4205,     183,     183,     186,     183,  -16365,       0,     183,
    4580,   16429,    5095,    9444,    5348,     186,  -28583,  -16328,
       0,   16409,  -16365,       0,    9437,    5348,     217,  -32701,
   16450,  -32701,     216,  -32700,       0,  -32701,  -32706,     216,
     243,     217,  -16318,       0,  -32552,       0,  -32700,       0,
  -32706,       0,     215,  -32550,     228,  -28616,  -28615,       0,
    4096,     218,     218,  -28616,       0,  -32677,  -32676,  -16361,
  -32710,  -32669,  -32662,  -32661,  -32660,  -32659,     740,  -32039,
     740,  -32719,    4096,     194,  -32719,  -32718,  -32604,  -32726,
  -32725,  -32724,  -32720,    4096,     710,    6116,  -32719,       0,
     710,    6116,  -28581,    4188,     218,     122,      50,   16409,
  -32726,  -32725,  -32724,  -32719,    4096,     710,     454,     195,
     195,     195,     454,  -28581,    4188,     194,  -28566,  -28565,
  -28564,    4205,     195,     195,     195,     710,    4836,    5095,
    4829,  -32726,  -32725,  -32724,  -32719,    4096,    4827,    4828,
     454,  -32720,  -32719,    4096,    4829,    4827,    4828,     194,
  -32719,       0,     710,    4836,  -16291,  -32677,      92,     184,
     121,  -28581,  -28580,  -32722,  -32723,    4317,  -32726,  -32725,
  -32724,       0,     183,  -32726,  -32725,  -32724,  -32720,       0,
    4316,     195,     195,     195,     454,  -28581,    4188,    4315,
     183,    4317,  -32726,  -32725,       0,     195,     195,    4315,
    4317,  -32726,       0,     195,  -32677,  -32676,  -16361,   16431,
     228,     228,      47,  -32610,  -32611,    5345,  -32609,  -32608,
  -32607,       0,    4320,    4319,    5345,  -32609,  -32608,       0,
    4319,    5345,  -32609,       0,  -32613,  -16361,   16431,     222,
     222,     156,  -32677,      92,     183,     186,    1222,   16435,
     228,   16403,    4324,     138,    8420,  -32723,    4189,      93,
     454,     148,  -32674,   16546,   16409,  -32597,     182,  -16383,
   16388,     234,  -16365,  -32595,     172,  -32678,     234,      90,
     244,     246,  -16365,       0,     235,  -32678,     234,  -16365,
     246,  -16365,       0,  -32678,     234,      90,   16407,     222,
   16405,     222,     145,   16407,     222,   16405,     222,     146,
   16407,    1252,     154,    5348,  -16365,     142,     126,     182,
  -16383,   16391,      90,  -16365,     127,  -32678,     238,      90,
     125,     239,  -16365,    8319,    8430,     128,     126,  -16361,
     127,     190,     240,     189,   16409,     182,  -16383,   16391,
      90,  -16365,       0,  -32678,     240,      90,   16623,  -16365,
       0,     244,     232,    1252,    1252,     137,    1252,     137,
    1252,     137,    1252,     137,    1252,     137,     222,  -16365,
       0,     131,     194,  -16360,  -16333,  -16332,     124,     181,
  -16292,  -16277,   16493,  -31802,    5342,  -28581,    4188,    4263,
     181,     186,     454,   16475,     183,  -28583,     199,    5598,
    9438,     222,  -32677,  -32676,   16407,     186,     228,     135,
   16409,  -32632,       0,  -32677,      92,  -32677,  -32676,  -32662,
  -32661,  -32660,  -32659,     165,  -32677,      92,     188,  -32662,
     107,     188,  -32660,     109,  -32732,      37,  -16344,    4318,
     148,  -32674,   16424,     222,   16405,     222,     174,  -28644,
  -32734,  -32680,  -28641,  -32733,  -32730,  -32735,  -32727,  -32738,
    4326,  -32738,  -32739,  -32741,  -32736,     199,  -28644,  -32680,
  -28641,    4326,  -32739,  -32741,     199,  -32738,  -32739,  -32741,
  -32736,  -32729,     199,  -32616,     199,  -32739,  -32741,  -32729,
     199,  -32616,  -32729,     199,  -28644,  -32680,    4326,  -32738,
  -32739,  -32741,     199,     245,    4318,     245,   16409,     152,
    4318,   16409,     152,     245,  -32672,  -32671,  -32670,      99,
   16407,     200,     144,     185,  -32677,      92,   16407,  -32582,
     200,     200,     187,     141,  -32677,      92,   16410,     191,
  -32677,  -32676,  -32662,  -32661,  -32660,     109,     198,
0(max grammar-718)

%ownshortintegerarray glink(0:max grammar) = %c
      -1,      70,      71,      37,      45,      46,      66,      66,
      74,      66,       0,      66,      50,      75,      78,      52,
      54,      79,      66,      80,      81,      82,      83,      25,
      40,      84,      85,      56,      56,      88,      92,      95,
      96,     101,     102,     103,     106,      45,      66,      66,
       0,     109,     109,     110,      51,      48,       0,      60,
      66,      61,       0,      66,       0,     110,     111,     111,
      57,     112,     113,     114,      63,      66,      65,     115,
     116,      67,       0,      66,     121,      66,       0,      72,
     122,     122,      66,      76,      66,      39,      76,      66,
      66,       0,     123,     126,     127,      86,      85,       0,
      89,     130,      88,       0,      93,      92,       0,     131,
      97,     136,      99,      96,       0,     137,      66,     104,
     103,       0,     107,     106,       0,      66,      66,      66,
     138,     139,     140,       0,     117,     119,     115,     141,
     115,      66,      70,     124,      66,       0,      66,     128,
      84,       0,     142,     132,     143,     134,     144,       0,
     155,     156,      58,     157,      66,     118,      90,     158,
     145,     144,     147,     145,     150,       0,     152,     152,
     153,     145,       0,      98,     159,      66,     133,     160,
     161,     164,     160,     140,     161,     161,     167,     171,
     173,     174,     175,     176,     177,     178,     181,     184,
     187,     188,     179,     189,     189,     182,     190,     190,
     185,     190,     190,       0,     187,     191,     192,     193,
       0,     195,       0,       0,     197,     196,       0,     200,
     199,       0,     203,     204,       0,     227,     231,     218,
     233,     234,       0,     235,     236,     237,       0,     231,
     225,     243,     244,     220,     247,     248,     249,     250,
     244,       0,     251,     228,     248,     249,     250,     252,
       0,       0,     187,     253,     259,     238,     268,     268,
     241,     190,     190,     269,     245,     271,     271,     228,
     272,     273,     274,     275,       0,     254,     265,     265,
     257,     266,     266,     260,     265,     265,     263,     266,
     266,     231,     267,     231,       0,     276,       0,     277,
     231,     272,     231,     281,     282,     278,     284,     252,
       0,       0,     285,       0,     231,       0,     287,       0,
     289,       0,     291,     293,       0,       0,     296,       0,
       0,     298,     300,       0,     302,       0,     304,       0,
     306,       0,       0,     309,     312,     313,     314,       0,
       0,     315,     310,     313,       0,     331,     331,     327,
     348,     349,     350,     350,     350,     350,     329,     281,
     351,     357,       0,     332,     340,     346,     358,     359,
     360,     361,     362,       0,     341,     342,     344,       0,
     345,       0,     268,     268,       0,       0,     365,     352,
     370,     371,     372,     373,       0,     374,     375,     376,
     382,     383,     363,     384,     384,     366,     268,     268,
     268,     268,     388,     389,     390,     391,     392,       0,
     377,     359,     360,     361,     340,       0,     378,     379,
     385,     362,     340,       0,     352,     353,     354,     374,
     394,       0,     395,       0,     399,     268,     268,     400,
       0,     410,     410,     405,     416,     406,     417,     418,
     419,       0,     411,     417,     418,     419,     420,       0,
     408,     405,     423,     416,     421,     424,     424,     407,
     414,     426,     429,     430,       0,     425,     431,     427,
     433,     435,       0,     432,     268,     268,     440,     441,
     281,     442,       0,     445,     450,     446,     445,     451,
     450,       0,     448,     447,     453,     452,     456,       0,
     454,     458,     457,       0,     268,     463,     464,     281,
     465,       0,     468,     468,     469,     470,     471,     472,
     473,     474,     475,     476,       0,     478,     268,     480,
       0,     482,     484,     484,     204,     489,     487,     495,
     496,     490,     493,     489,       0,     490,     490,       0,
     497,     498,     500,       0,       0,     503,     505,     509,
     498,     507,       0,     505,     505,     503,     511,     512,
     513,     514,       0,     516,     517,     518,     519,       0,
     521,     522,     523,     524,     521,       0,     527,     528,
     530,     535,     531,     533,       0,     531,       0,     536,
     537,     538,     540,     541,     541,       0,     543,     545,
       0,     546,     547,     548,     532,     550,     552,     557,
     553,     555,       0,     553,       0,     558,     559,     556,
       0,     562,     204,       0,     565,     563,     567,     564,
     569,     566,     571,     568,     573,     570,     575,     574,
       0,     578,     579,     591,     592,     583,     204,     584,
     587,     587,     587,     589,     204,     593,     593,     594,
     595,     596,     580,     599,     597,     600,       0,     204,
     204,     204,     605,     605,     606,     607,     608,     604,
     609,     611,       0,     192,     192,     192,     192,     192,
     192,     192,     192,       0,     622,     622,     191,     625,
     625,       0,     625,     625,     630,     632,     281,     281,
     633,     281,     281,     636,     637,     638,       0,     649,
     676,     683,     665,     654,     204,     204,     204,     204,
     649,     658,     667,     684,     665,       0,     661,     685,
     665,     661,     667,     684,       0,     669,     673,     688,
     665,     204,       0,     204,       0,     673,     688,     204,
       0,     665,     204,       0,     679,     691,     679,     658,
     667,     684,       0,     649,     686,     661,     687,     204,
     689,     690,     665,     679,     696,     696,     696,     696,
     697,     698,     699,       0,     702,     702,     703,     705,
     706,     707,     707,     699,     710,     710,     711,     712,
     718,     718,     718,     718,     718,     718,       0,
0(max grammar-718)

%constshortintegerarray kdict(32:596) = %c
       0,     511,     131,     531,     131,     551,     559,     131,
     567,     575,     583,     603,     623,     631,     663,     671,
     129,     129,     129,     129,     129,     129,     129,     129,
     129,     129,     691,     698,     707,     751,     795,     131,
     131,     824,     900,     960,    1076,    1120,    1280,     128,
     128,    1392,     128,     128,    1460,    1556,    1592,    1660,
    1748,     128,    1828,    2000,    2196,    2228,     128,    2268,
     128,     128,     128,    2287,    2295,    2327,    2335,    2355,
     131,     131,     131,     131,     131,     131,     131,     131,
     131,     131,     131,     131,     131,     131,     131,     131,
     131,     131,     131,     131,     131,     131,     131,     131,
     131,     131,     131,     131,    2363,     131,    2335,  -32351,
   16428,      25,   16428,      29,  -32349,   16433,       1,   16434,
       1,  -16127,       0,   16427,      21,   16407,       0,   16409,
       0,  -32323,  -10840,      40,   16471,       0,  -32341,  -10580,
      32,   16473,     117,   16384,      19,  -31955,  -32322,  -10580,
      36,   -9290,       0,   16473,     113,   16432,      13,  -32337,
   16427,      46,   16427,      17,   16405,       0,   16404,       0,
  -31556,  -31939,  -32322,   -9551,       2,   16433,       1,   16433,
       5,   16426,       5,  -31606,  -32323,   -9807,       0,  -32374,
   -9678,       0,   16436,       0,   16435,       0,  -31939,  -32322,
   16433,       4,   16426,       9,   16433,       3,  -30772,  -31666,
   10578,   11457,  -32344,   16413,       2,   16411,       2,      68,
  -32374,   16440,       0,   16440,       0,    8393,      83,   16408,
       0,  -31291,   10841,      69,  -32311,   16412,      18,   10830,
    9157,   10565,   16412,      18,    9415,      78,   16458,       0,
  -32049,    8665,    8908,   16455,       0,  -30131,      78,  -31277,
      84,  -32055,   10194,      76,   16469,       0,   10958,      69,
   16447,      32,      84,  -32319,   16418,       2,   10830,   16418,
       2,    8909,   10830,   16406,       0,  -31927,   10073,    9921,
    8649,   16419,       5,    9153,   10190,    8915,   16469,       1,
  -27956,  -31282,      88,  -31927,    8916,   10066,    9793,   16419,
       3,      84,   16447,       4,      68,  -32305,   16459,       2,
      70,  -30650,  -31284,      80,  -31931,   10194,   10567,    9921,
   16460,       1,    9938,   16461,       0,   10697,      84,   16467,
       3,    9801,      69,   16460,       0,    8915,   16452,       0,
  -29631,  -30903,  -31282,  -31793,   10069,   10819,   10185,      78,
   16416,       9,      82,   16445,       0,   16416,       9,    9422,
    9299,  -32315,   16453,       0,   10700,      69,   16454,       0,
   10700,      69,   16464,    1210,  -30778,      78,  -31549,    8916,
    8903,      82,  -32344,   16412,      17,   16472,      17,   10956,
    8900,   16470,       0,   16446,      44,  -30143,  -30647,   10063,
      71,  -31671,  -32302,   16412,      20,    8389,      76,   16412,
      36,   10830,    9157,   10565,   16412,      20,   10835,   16467,
       1,    8898,      76,   16425,       6,  -31935,   10063,   10825,
   10575,   16465,     109,      80,   16416,      10,  -32191,   10831,
   16442,       0,    8909,  -32314,   16414,       1,  -31794,   10069,
   10819,   10185,      78,   16416,      10,   16416,      10,  -30770,
  -31408,  -32174,   10071,   16418,       1,  -32374,   16441,       2,
   16441,       2,    9428,   10063,   16402,       0,  -32315,   16448,
       0,    8918,   10830,   16448,       0,  -30523,      82,  -31419,
  -31927,    9167,    8402,      77,   16457,       0,      77,   16419,
       6,    9412,    8387,    8916,   16415,     123,    9938,   16419,
       7,  -31931,   10959,    9428,    8910,   16415,     104,  -28351,
  -30397,  -31024,  -32045,   10964,   10066,   16464,    1319,    9813,
    7892,  -32323,   16462,    1384,   16463,    1241,    8389,      84,
   16456,       0,   10575,      68,  -32314,   16421,      64,   10575,
    8397,      84,  -32301,   16422,       9,    8912,      67,   16422,
      12,      76,   16412,      33,  -27704,  -28983,  -29488,  -31276,
  -31913,   10713,    8916,      77,   16419,       4,   10825,    9283,
   16417,      12,  -31423,  -31921,    9426,    9166,      40,   16420,
      48,      80,   16466,     115,   10834,   16451,       0,    8645,
   16423,       0,   10055,    9793,  -32315,   16449,       0,    8918,
   10830,   16449,       0,   10575,      84,  -32311,   16412,      19,
   10830,    9157,   10565,   16412,      19,  -32056,   10962,      69,
   16464,    1354,   10053,   16450,       0,      78,  -32052,    9428,
      76,   16444,     182,   10693,      83,   16446,      46,    9416,
    8908,   16443,     180,   16407,       0,  -31939,  -32292,  -10454,
      51,   16426,      13,   16433,       1,   16409,       0,  -32290,
  -10454,      51,   16426,      13,   16410,       0,   16431,      14,
  -32323,   16430,      51,   16433,       1
   %list
%endoffile
