home *** CD-ROM | disk | FTP | other *** search
/ Night Owl 25 / nopv25.iso / 040A / INTERCAL.ZIP / src / y.output < prev    next >
Encoding:
Text File  |  1996-09-03  |  39.2 KB  |  1,976 lines
  1.  
  2.  
  3. Terminals which are not used:
  4.  
  5.    RESIZE
  6.    DISABLE
  7.    ENABLE
  8.    PLEASE
  9.    SPLATTERED
  10.    TESTNZ
  11.    C_AND
  12.    C_OR
  13.    C_XOR
  14.    C_NOT
  15.    EQUALS
  16.    AND
  17.    OR
  18.    XOR
  19.    FIN
  20.    MESH32
  21.    WHIRL
  22.    WHIRL2
  23.    WHIRL3
  24.    WHIRL4
  25.    WHIRL5
  26.  
  27.  
  28. Conflict in state 114 between rule 64 and token SPARK resolved as reduce.
  29. Conflict in state 114 between rule 64 and token EARS resolved as reduce.
  30.  
  31. Grammar
  32. rule 1    program ->        /* empty */
  33. rule 2    program -> program command
  34. rule 3    command -> please perform
  35. rule 4    command -> please OHOHSEVEN perform
  36. rule 5    command -> LABEL please perform
  37. rule 6    command -> LABEL please OHOHSEVEN perform
  38. rule 7    command -> error
  39. rule 8    please -> DO
  40. rule 9    please -> DO NOT
  41. rule 10   perform -> lvalue GETS expr
  42. rule 11   perform -> array GETS byexpr
  43. rule 12   perform -> LABEL NEXT
  44. rule 13   perform -> FORGET expr
  45. rule 14   perform -> RESUME expr
  46. rule 15   perform -> STASH varlist
  47. rule 16   perform -> RETRIEVE varlist
  48. rule 17   perform -> IGNORE varlist
  49. rule 18   perform -> REMEMBER varlist
  50. rule 19   perform -> ABSTAIN LABEL
  51. rule 20   perform -> ABSTAIN gerunds
  52. rule 21   perform -> REINSTATE LABEL
  53. rule 22   perform -> REINSTATE gerunds
  54. rule 23   perform -> WRITE_IN inlist
  55. rule 24   perform -> READ_OUT outlist
  56. rule 25   perform -> GIVE_UP
  57. rule 26   perform -> COME_FROM LABEL
  58. rule 27   perform -> BADCHAR
  59. rule 28   perform -> error
  60. rule 29   gerunds -> GERUND
  61. rule 30   gerunds -> gerunds INTERSECTION GERUND
  62. rule 31   variable -> scalar
  63. rule 32   variable -> array
  64. rule 33   lvalue -> scalar
  65. rule 34   lvalue -> subscr
  66. rule 35   scalar -> ONESPOT NUMBER
  67. rule 36   scalar -> TWOSPOT NUMBER
  68. rule 37   array -> TAIL NUMBER
  69. rule 38   array -> HYBRID NUMBER
  70. rule 39   oparray -> TAIL UNARY NUMBER
  71. rule 40   oparray -> HYBRID UNARY NUMBER
  72. rule 41   constant -> MESH NUMBER
  73. rule 42   varlist -> variable
  74. rule 43   varlist -> varlist INTERSECTION variable
  75. rule 44   initem -> scalar
  76. rule 45   initem -> subscr
  77. rule 46   initem -> array
  78. rule 47   inlist -> initem INTERSECTION inlist
  79. rule 48   inlist -> initem
  80. rule 49   outitem -> scalar
  81. rule 50   outitem -> subscr
  82. rule 51   outitem -> constant
  83. rule 52   outitem -> array
  84. rule 53   outlist -> outitem INTERSECTION outlist
  85. rule 54   outlist -> outitem
  86. rule 55   byexpr -> expr BY byexpr
  87. rule 56   byexpr -> expr
  88. rule 57   subscr -> subscr1
  89. rule 58   subscr -> array SUB sublist
  90. rule 59   subscr1 -> array SUB sublist1
  91. rule 60   sublist -> unambig sublist
  92. rule 61   sublist -> unambig sublist1
  93. rule 62   sublist1 -> subscr1
  94. rule 63   sublist1 -> osubscr1
  95. rule 64   sublist1 -> unambig
  96. rule 65   osubscr -> osubscr1
  97. rule 66   osubscr -> oparray SUB sublist
  98. rule 67   osubscr1 -> oparray SUB sublist1
  99. rule 68   expr -> unambig
  100. rule 69   expr -> unambig SELECT unambig
  101. rule 70   expr -> unambig SELECT subscr
  102. rule 71   expr -> unambig SELECT osubscr
  103. rule 72   expr -> unambig MINGLE unambig
  104. rule 73   expr -> unambig MINGLE subscr
  105. rule 74   expr -> unambig MINGLE osubscr
  106. rule 75   expr -> subscr
  107. rule 76   expr -> osubscr
  108. rule 77   preftype -> MESH
  109. rule 78   preftype -> ONESPOT
  110. rule 79   preftype -> TWOSPOT
  111. rule 80   unambig -> variable
  112. rule 81   unambig -> constant
  113. rule 82   unambig -> preftype UNARY NUMBER
  114. rule 83   unambig -> SPARK UNARY expr SPARK
  115. rule 84   unambig -> EARS UNARY expr EARS
  116. rule 85   unambig -> SPARK expr SPARK
  117. rule 86   unambig -> EARS expr EARS
  118.  
  119. Terminals, with rules where they appear
  120.  
  121. $ (-1)
  122. error (256) 7 28
  123. GETS (258) 10 11
  124. RESIZE (259)
  125. NEXT (260) 12
  126. FORGET (261) 13
  127. RESUME (262) 14
  128. STASH (263) 15
  129. RETRIEVE (264) 16
  130. IGNORE (265) 17
  131. REMEMBER (266) 18
  132. ABSTAIN (267) 19 20
  133. REINSTATE (268) 21 22
  134. DISABLE (269)
  135. ENABLE (270)
  136. GIVE_UP (271) 25
  137. READ_OUT (272) 24
  138. WRITE_IN (273) 23
  139. COME_FROM (274) 26
  140. DO (275) 8 9
  141. PLEASE (276)
  142. NOT (277) 9
  143. MESH (278) 41 77
  144. ONESPOT (279) 35 78
  145. TWOSPOT (280) 36 79
  146. TAIL (281) 37 39
  147. HYBRID (282) 38 40
  148. MINGLE (283) 72 73 74
  149. SELECT (284) 69 70 71
  150. SPARK (285) 83 85
  151. EARS (286) 84 86
  152. SUB (287) 58 59 66 67
  153. BY (288) 55
  154. BADCHAR (289) 27
  155. NUMBER (290) 35 36 37 38 39 40 41 82
  156. UNARY (291) 39 40 82 83 84
  157. OHOHSEVEN (292) 4 6
  158. GERUND (293) 29 30
  159. LABEL (294) 5 6 12 19 21 26
  160. INTERSECTION (295) 30 43 47 53
  161. SPLATTERED (296)
  162. TESTNZ (297)
  163. C_AND (298)
  164. C_OR (299)
  165. C_XOR (300)
  166. C_NOT (301)
  167. EQUALS (302)
  168. AND (303)
  169. OR (304)
  170. XOR (305)
  171. FIN (306)
  172. MESH32 (307)
  173. WHIRL (308)
  174. WHIRL2 (309)
  175. WHIRL3 (310)
  176. WHIRL4 (311)
  177. WHIRL5 (312)
  178. HIGHPREC (313)
  179.  
  180. Nonterminals, with rules where they appear
  181.  
  182. program (59)
  183.     on left: 1 2, on right: 2
  184. command (60)
  185.     on left: 3 4 5 6 7, on right: 2
  186. please (61)
  187.     on left: 8 9, on right: 3 4 5 6
  188. perform (62)
  189.     on left: 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27
  190.     28, on right: 3 4 5 6
  191. gerunds (63)
  192.     on left: 29 30, on right: 20 22 30
  193. variable (64)
  194.     on left: 31 32, on right: 42 43 80
  195. lvalue (65)
  196.     on left: 33 34, on right: 10
  197. scalar (66)
  198.     on left: 35 36, on right: 31 33 44 49
  199. array (67)
  200.     on left: 37 38, on right: 11 32 46 52 58 59
  201. oparray (68)
  202.     on left: 39 40, on right: 66 67
  203. constant (69)
  204.     on left: 41, on right: 51 81
  205. varlist (70)
  206.     on left: 42 43, on right: 15 16 17 18 43
  207. initem (71)
  208.     on left: 44 45 46, on right: 47 48
  209. inlist (72)
  210.     on left: 47 48, on right: 23 47
  211. outitem (73)
  212.     on left: 49 50 51 52, on right: 53 54
  213. outlist (74)
  214.     on left: 53 54, on right: 24 53
  215. byexpr (75)
  216.     on left: 55 56, on right: 11 55
  217. subscr (76)
  218.     on left: 57 58, on right: 34 45 50 70 73 75
  219. subscr1 (77)
  220.     on left: 59, on right: 57 62
  221. sublist (78)
  222.     on left: 60 61, on right: 58 60 66
  223. sublist1 (79)
  224.     on left: 62 63 64, on right: 59 61 67
  225. osubscr (80)
  226.     on left: 65 66, on right: 71 74 76
  227. osubscr1 (81)
  228.     on left: 67, on right: 63 65
  229. expr (82)
  230.     on left: 68 69 70 71 72 73 74 75 76, on right: 10 13 14 55 56 83
  231.     84 85 86
  232. preftype (83)
  233.     on left: 77 78 79, on right: 82
  234. unambig (84)
  235.     on left: 80 81 82 83 84 85 86, on right: 60 61 64 68 69 70 71 72
  236.     73 74
  237.  
  238.  
  239. state 0
  240.  
  241.     $default    reduce using rule 1 (program)
  242.  
  243.     program    go to state 1
  244.  
  245.  
  246.  
  247. state 1
  248.  
  249.     program  ->  program . command   (rule 2)
  250.  
  251.     $       go to state 143
  252.     error    shift, and go to state 2
  253.     DO      shift, and go to state 3
  254.     LABEL    shift, and go to state 4
  255.  
  256.     command    go to state 5
  257.     please    go to state 6
  258.  
  259.  
  260.  
  261. state 2
  262.  
  263.     command  ->  error .   (rule 7)
  264.  
  265.     $default    reduce using rule 7 (command)
  266.  
  267.  
  268.  
  269. state 3
  270.  
  271.     please  ->  DO .   (rule 8)
  272.     please  ->  DO . NOT   (rule 9)
  273.  
  274.     NOT     shift, and go to state 7
  275.  
  276.     $default    reduce using rule 8 (please)
  277.  
  278.  
  279.  
  280. state 4
  281.  
  282.     command  ->  LABEL . please perform   (rule 5)
  283.     command  ->  LABEL . please OHOHSEVEN perform   (rule 6)
  284.  
  285.     DO      shift, and go to state 3
  286.  
  287.     please    go to state 8
  288.  
  289.  
  290.  
  291. state 5
  292.  
  293.     program  ->  program command .   (rule 2)
  294.  
  295.     $default    reduce using rule 2 (program)
  296.  
  297.  
  298.  
  299. state 6
  300.  
  301.     command  ->  please . perform   (rule 3)
  302.     command  ->  please . OHOHSEVEN perform   (rule 4)
  303.  
  304.     error    shift, and go to state 9
  305.     FORGET    shift, and go to state 10
  306.     RESUME    shift, and go to state 11
  307.     STASH    shift, and go to state 12
  308.     RETRIEVE    shift, and go to state 13
  309.     IGNORE    shift, and go to state 14
  310.     REMEMBER    shift, and go to state 15
  311.     ABSTAIN    shift, and go to state 16
  312.     REINSTATE    shift, and go to state 17
  313.     GIVE_UP    shift, and go to state 18
  314.     READ_OUT    shift, and go to state 19
  315.     WRITE_IN    shift, and go to state 20
  316.     COME_FROM    shift, and go to state 21
  317.     ONESPOT    shift, and go to state 22
  318.     TWOSPOT    shift, and go to state 23
  319.     TAIL    shift, and go to state 24
  320.     HYBRID    shift, and go to state 25
  321.     BADCHAR    shift, and go to state 26
  322.     OHOHSEVEN    shift, and go to state 27
  323.     LABEL    shift, and go to state 28
  324.  
  325.     perform    go to state 29
  326.     lvalue    go to state 30
  327.     scalar    go to state 31
  328.     array    go to state 32
  329.     subscr    go to state 33
  330.     subscr1    go to state 34
  331.  
  332.  
  333.  
  334. state 7
  335.  
  336.     please  ->  DO NOT .   (rule 9)
  337.  
  338.     $default    reduce using rule 9 (please)
  339.  
  340.  
  341.  
  342. state 8
  343.  
  344.     command  ->  LABEL please . perform   (rule 5)
  345.     command  ->  LABEL please . OHOHSEVEN perform   (rule 6)
  346.  
  347.     error    shift, and go to state 9
  348.     FORGET    shift, and go to state 10
  349.     RESUME    shift, and go to state 11
  350.     STASH    shift, and go to state 12
  351.     RETRIEVE    shift, and go to state 13
  352.     IGNORE    shift, and go to state 14
  353.     REMEMBER    shift, and go to state 15
  354.     ABSTAIN    shift, and go to state 16
  355.     REINSTATE    shift, and go to state 17
  356.     GIVE_UP    shift, and go to state 18
  357.     READ_OUT    shift, and go to state 19
  358.     WRITE_IN    shift, and go to state 20
  359.     COME_FROM    shift, and go to state 21
  360.     ONESPOT    shift, and go to state 22
  361.     TWOSPOT    shift, and go to state 23
  362.     TAIL    shift, and go to state 24
  363.     HYBRID    shift, and go to state 25
  364.     BADCHAR    shift, and go to state 26
  365.     OHOHSEVEN    shift, and go to state 35
  366.     LABEL    shift, and go to state 28
  367.  
  368.     perform    go to state 36
  369.     lvalue    go to state 30
  370.     scalar    go to state 31
  371.     array    go to state 32
  372.     subscr    go to state 33
  373.     subscr1    go to state 34
  374.  
  375.  
  376.  
  377. state 9
  378.  
  379.     perform  ->  error .   (rule 28)
  380.  
  381.     $default    reduce using rule 28 (perform)
  382.  
  383.  
  384.  
  385. state 10
  386.  
  387.     perform  ->  FORGET . expr   (rule 13)
  388.  
  389.     MESH    shift, and go to state 37
  390.     ONESPOT    shift, and go to state 38
  391.     TWOSPOT    shift, and go to state 39
  392.     TAIL    shift, and go to state 40
  393.     HYBRID    shift, and go to state 41
  394.     SPARK    shift, and go to state 42
  395.     EARS    shift, and go to state 43
  396.  
  397.     variable    go to state 44
  398.     scalar    go to state 45
  399.     array    go to state 46
  400.     oparray    go to state 47
  401.     constant    go to state 48
  402.     subscr    go to state 49
  403.     subscr1    go to state 34
  404.     osubscr    go to state 50
  405.     osubscr1    go to state 51
  406.     expr    go to state 52
  407.     preftype    go to state 53
  408.     unambig    go to state 54
  409.  
  410.  
  411.  
  412. state 11
  413.  
  414.     perform  ->  RESUME . expr   (rule 14)
  415.  
  416.     MESH    shift, and go to state 37
  417.     ONESPOT    shift, and go to state 38
  418.     TWOSPOT    shift, and go to state 39
  419.     TAIL    shift, and go to state 40
  420.     HYBRID    shift, and go to state 41
  421.     SPARK    shift, and go to state 42
  422.     EARS    shift, and go to state 43
  423.  
  424.     variable    go to state 44
  425.     scalar    go to state 45
  426.     array    go to state 46
  427.     oparray    go to state 47
  428.     constant    go to state 48
  429.     subscr    go to state 49
  430.     subscr1    go to state 34
  431.     osubscr    go to state 50
  432.     osubscr1    go to state 51
  433.     expr    go to state 55
  434.     preftype    go to state 53
  435.     unambig    go to state 54
  436.  
  437.  
  438.  
  439. state 12
  440.  
  441.     perform  ->  STASH . varlist   (rule 15)
  442.  
  443.     ONESPOT    shift, and go to state 22
  444.     TWOSPOT    shift, and go to state 23
  445.     TAIL    shift, and go to state 24
  446.     HYBRID    shift, and go to state 25
  447.  
  448.     variable    go to state 56
  449.     scalar    go to state 45
  450.     array    go to state 57
  451.     varlist    go to state 58
  452.  
  453.  
  454.  
  455. state 13
  456.  
  457.     perform  ->  RETRIEVE . varlist   (rule 16)
  458.  
  459.     ONESPOT    shift, and go to state 22
  460.     TWOSPOT    shift, and go to state 23
  461.     TAIL    shift, and go to state 24
  462.     HYBRID    shift, and go to state 25
  463.  
  464.     variable    go to state 56
  465.     scalar    go to state 45
  466.     array    go to state 57
  467.     varlist    go to state 59
  468.  
  469.  
  470.  
  471. state 14
  472.  
  473.     perform  ->  IGNORE . varlist   (rule 17)
  474.  
  475.     ONESPOT    shift, and go to state 22
  476.     TWOSPOT    shift, and go to state 23
  477.     TAIL    shift, and go to state 24
  478.     HYBRID    shift, and go to state 25
  479.  
  480.     variable    go to state 56
  481.     scalar    go to state 45
  482.     array    go to state 57
  483.     varlist    go to state 60
  484.  
  485.  
  486.  
  487. state 15
  488.  
  489.     perform  ->  REMEMBER . varlist   (rule 18)
  490.  
  491.     ONESPOT    shift, and go to state 22
  492.     TWOSPOT    shift, and go to state 23
  493.     TAIL    shift, and go to state 24
  494.     HYBRID    shift, and go to state 25
  495.  
  496.     variable    go to state 56
  497.     scalar    go to state 45
  498.     array    go to state 57
  499.     varlist    go to state 61
  500.  
  501.  
  502.  
  503. state 16
  504.  
  505.     perform  ->  ABSTAIN . LABEL   (rule 19)
  506.     perform  ->  ABSTAIN . gerunds   (rule 20)
  507.  
  508.     GERUND    shift, and go to state 62
  509.     LABEL    shift, and go to state 63
  510.  
  511.     gerunds    go to state 64
  512.  
  513.  
  514.  
  515. state 17
  516.  
  517.     perform  ->  REINSTATE . LABEL   (rule 21)
  518.     perform  ->  REINSTATE . gerunds   (rule 22)
  519.  
  520.     GERUND    shift, and go to state 62
  521.     LABEL    shift, and go to state 65
  522.  
  523.     gerunds    go to state 66
  524.  
  525.  
  526.  
  527. state 18
  528.  
  529.     perform  ->  GIVE_UP .   (rule 25)
  530.  
  531.     $default    reduce using rule 25 (perform)
  532.  
  533.  
  534.  
  535. state 19
  536.  
  537.     perform  ->  READ_OUT . outlist   (rule 24)
  538.  
  539.     MESH    shift, and go to state 67
  540.     ONESPOT    shift, and go to state 22
  541.     TWOSPOT    shift, and go to state 23
  542.     TAIL    shift, and go to state 24
  543.     HYBRID    shift, and go to state 25
  544.  
  545.     scalar    go to state 68
  546.     array    go to state 69
  547.     constant    go to state 70
  548.     outitem    go to state 71
  549.     outlist    go to state 72
  550.     subscr    go to state 73
  551.     subscr1    go to state 34
  552.  
  553.  
  554.  
  555. state 20
  556.  
  557.     perform  ->  WRITE_IN . inlist   (rule 23)
  558.  
  559.     ONESPOT    shift, and go to state 22
  560.     TWOSPOT    shift, and go to state 23
  561.     TAIL    shift, and go to state 24
  562.     HYBRID    shift, and go to state 25
  563.  
  564.     scalar    go to state 74
  565.     array    go to state 75
  566.     initem    go to state 76
  567.     inlist    go to state 77
  568.     subscr    go to state 78
  569.     subscr1    go to state 34
  570.  
  571.  
  572.  
  573. state 21
  574.  
  575.     perform  ->  COME_FROM . LABEL   (rule 26)
  576.  
  577.     LABEL    shift, and go to state 79
  578.  
  579.  
  580.  
  581. state 22
  582.  
  583.     scalar  ->  ONESPOT . NUMBER   (rule 35)
  584.  
  585.     NUMBER    shift, and go to state 80
  586.  
  587.  
  588.  
  589. state 23
  590.  
  591.     scalar  ->  TWOSPOT . NUMBER   (rule 36)
  592.  
  593.     NUMBER    shift, and go to state 81
  594.  
  595.  
  596.  
  597. state 24
  598.  
  599.     array  ->  TAIL . NUMBER   (rule 37)
  600.  
  601.     NUMBER    shift, and go to state 82
  602.  
  603.  
  604.  
  605. state 25
  606.  
  607.     array  ->  HYBRID . NUMBER   (rule 38)
  608.  
  609.     NUMBER    shift, and go to state 83
  610.  
  611.  
  612.  
  613. state 26
  614.  
  615.     perform  ->  BADCHAR .   (rule 27)
  616.  
  617.     $default    reduce using rule 27 (perform)
  618.  
  619.  
  620.  
  621. state 27
  622.  
  623.     command  ->  please OHOHSEVEN . perform   (rule 4)
  624.  
  625.     error    shift, and go to state 9
  626.     FORGET    shift, and go to state 10
  627.     RESUME    shift, and go to state 11
  628.     STASH    shift, and go to state 12
  629.     RETRIEVE    shift, and go to state 13
  630.     IGNORE    shift, and go to state 14
  631.     REMEMBER    shift, and go to state 15
  632.     ABSTAIN    shift, and go to state 16
  633.     REINSTATE    shift, and go to state 17
  634.     GIVE_UP    shift, and go to state 18
  635.     READ_OUT    shift, and go to state 19
  636.     WRITE_IN    shift, and go to state 20
  637.     COME_FROM    shift, and go to state 21
  638.     ONESPOT    shift, and go to state 22
  639.     TWOSPOT    shift, and go to state 23
  640.     TAIL    shift, and go to state 24
  641.     HYBRID    shift, and go to state 25
  642.     BADCHAR    shift, and go to state 26
  643.     LABEL    shift, and go to state 28
  644.  
  645.     perform    go to state 84
  646.     lvalue    go to state 30
  647.     scalar    go to state 31
  648.     array    go to state 32
  649.     subscr    go to state 33
  650.     subscr1    go to state 34
  651.  
  652.  
  653.  
  654. state 28
  655.  
  656.     perform  ->  LABEL . NEXT   (rule 12)
  657.  
  658.     NEXT    shift, and go to state 85
  659.  
  660.  
  661.  
  662. state 29
  663.  
  664.     command  ->  please perform .   (rule 3)
  665.  
  666.     $default    reduce using rule 3 (command)
  667.  
  668.  
  669.  
  670. state 30
  671.  
  672.     perform  ->  lvalue . GETS expr   (rule 10)
  673.  
  674.     GETS    shift, and go to state 86
  675.  
  676.  
  677.  
  678. state 31
  679.  
  680.     lvalue  ->  scalar .   (rule 33)
  681.  
  682.     $default    reduce using rule 33 (lvalue)
  683.  
  684.  
  685.  
  686. state 32
  687.  
  688.     perform  ->  array . GETS byexpr   (rule 11)
  689.     subscr  ->  array . SUB sublist   (rule 58)
  690.     subscr1  ->  array . SUB sublist1   (rule 59)
  691.  
  692.     GETS    shift, and go to state 87
  693.     SUB     shift, and go to state 88
  694.  
  695.  
  696.  
  697. state 33
  698.  
  699.     lvalue  ->  subscr .   (rule 34)
  700.  
  701.     $default    reduce using rule 34 (lvalue)
  702.  
  703.  
  704.  
  705. state 34
  706.  
  707.     subscr  ->  subscr1 .   (rule 57)
  708.  
  709.     $default    reduce using rule 57 (subscr)
  710.  
  711.  
  712.  
  713. state 35
  714.  
  715.     command  ->  LABEL please OHOHSEVEN . perform   (rule 6)
  716.  
  717.     error    shift, and go to state 9
  718.     FORGET    shift, and go to state 10
  719.     RESUME    shift, and go to state 11
  720.     STASH    shift, and go to state 12
  721.     RETRIEVE    shift, and go to state 13
  722.     IGNORE    shift, and go to state 14
  723.     REMEMBER    shift, and go to state 15
  724.     ABSTAIN    shift, and go to state 16
  725.     REINSTATE    shift, and go to state 17
  726.     GIVE_UP    shift, and go to state 18
  727.     READ_OUT    shift, and go to state 19
  728.     WRITE_IN    shift, and go to state 20
  729.     COME_FROM    shift, and go to state 21
  730.     ONESPOT    shift, and go to state 22
  731.     TWOSPOT    shift, and go to state 23
  732.     TAIL    shift, and go to state 24
  733.     HYBRID    shift, and go to state 25
  734.     BADCHAR    shift, and go to state 26
  735.     LABEL    shift, and go to state 28
  736.  
  737.     perform    go to state 89
  738.     lvalue    go to state 30
  739.     scalar    go to state 31
  740.     array    go to state 32
  741.     subscr    go to state 33
  742.     subscr1    go to state 34
  743.  
  744.  
  745.  
  746. state 36
  747.  
  748.     command  ->  LABEL please perform .   (rule 5)
  749.  
  750.     $default    reduce using rule 5 (command)
  751.  
  752.  
  753.  
  754. state 37
  755.  
  756.     constant  ->  MESH . NUMBER   (rule 41)
  757.     preftype  ->  MESH .   (rule 77)
  758.  
  759.     NUMBER    shift, and go to state 90
  760.  
  761.     $default    reduce using rule 77 (preftype)
  762.  
  763.  
  764.  
  765. state 38
  766.  
  767.     scalar  ->  ONESPOT . NUMBER   (rule 35)
  768.     preftype  ->  ONESPOT .   (rule 78)
  769.  
  770.     NUMBER    shift, and go to state 80
  771.  
  772.     $default    reduce using rule 78 (preftype)
  773.  
  774.  
  775.  
  776. state 39
  777.  
  778.     scalar  ->  TWOSPOT . NUMBER   (rule 36)
  779.     preftype  ->  TWOSPOT .   (rule 79)
  780.  
  781.     NUMBER    shift, and go to state 81
  782.  
  783.     $default    reduce using rule 79 (preftype)
  784.  
  785.  
  786.  
  787. state 40
  788.  
  789.     array  ->  TAIL . NUMBER   (rule 37)
  790.     oparray  ->  TAIL . UNARY NUMBER   (rule 39)
  791.  
  792.     NUMBER    shift, and go to state 82
  793.     UNARY    shift, and go to state 91
  794.  
  795.  
  796.  
  797. state 41
  798.  
  799.     array  ->  HYBRID . NUMBER   (rule 38)
  800.     oparray  ->  HYBRID . UNARY NUMBER   (rule 40)
  801.  
  802.     NUMBER    shift, and go to state 83
  803.     UNARY    shift, and go to state 92
  804.  
  805.  
  806.  
  807. state 42
  808.  
  809.     unambig  ->  SPARK . UNARY expr SPARK   (rule 83)
  810.     unambig  ->  SPARK . expr SPARK   (rule 85)
  811.  
  812.     MESH    shift, and go to state 37
  813.     ONESPOT    shift, and go to state 38
  814.     TWOSPOT    shift, and go to state 39
  815.     TAIL    shift, and go to state 40
  816.     HYBRID    shift, and go to state 41
  817.     SPARK    shift, and go to state 42
  818.     EARS    shift, and go to state 43
  819.     UNARY    shift, and go to state 93
  820.  
  821.     variable    go to state 44
  822.     scalar    go to state 45
  823.     array    go to state 46
  824.     oparray    go to state 47
  825.     constant    go to state 48
  826.     subscr    go to state 49
  827.     subscr1    go to state 34
  828.     osubscr    go to state 50
  829.     osubscr1    go to state 51
  830.     expr    go to state 94
  831.     preftype    go to state 53
  832.     unambig    go to state 54
  833.  
  834.  
  835.  
  836. state 43
  837.  
  838.     unambig  ->  EARS . UNARY expr EARS   (rule 84)
  839.     unambig  ->  EARS . expr EARS   (rule 86)
  840.  
  841.     MESH    shift, and go to state 37
  842.     ONESPOT    shift, and go to state 38
  843.     TWOSPOT    shift, and go to state 39
  844.     TAIL    shift, and go to state 40
  845.     HYBRID    shift, and go to state 41
  846.     SPARK    shift, and go to state 42
  847.     EARS    shift, and go to state 43
  848.     UNARY    shift, and go to state 95
  849.  
  850.     variable    go to state 44
  851.     scalar    go to state 45
  852.     array    go to state 46
  853.     oparray    go to state 47
  854.     constant    go to state 48
  855.     subscr    go to state 49
  856.     subscr1    go to state 34
  857.     osubscr    go to state 50
  858.     osubscr1    go to state 51
  859.     expr    go to state 96
  860.     preftype    go to state 53
  861.     unambig    go to state 54
  862.  
  863.  
  864.  
  865. state 44
  866.  
  867.     unambig  ->  variable .   (rule 80)
  868.  
  869.     $default    reduce using rule 80 (unambig)
  870.  
  871.  
  872.  
  873. state 45
  874.  
  875.     variable  ->  scalar .   (rule 31)
  876.  
  877.     $default    reduce using rule 31 (variable)
  878.  
  879.  
  880.  
  881. state 46
  882.  
  883.     variable  ->  array .   (rule 32)
  884.     subscr  ->  array . SUB sublist   (rule 58)
  885.     subscr1  ->  array . SUB sublist1   (rule 59)
  886.  
  887.     SUB     shift, and go to state 88
  888.  
  889.     $default    reduce using rule 32 (variable)
  890.  
  891.  
  892.  
  893. state 47
  894.  
  895.     osubscr  ->  oparray . SUB sublist   (rule 66)
  896.     osubscr1  ->  oparray . SUB sublist1   (rule 67)
  897.  
  898.     SUB     shift, and go to state 97
  899.  
  900.  
  901.  
  902. state 48
  903.  
  904.     unambig  ->  constant .   (rule 81)
  905.  
  906.     $default    reduce using rule 81 (unambig)
  907.  
  908.  
  909.  
  910. state 49
  911.  
  912.     expr  ->  subscr .   (rule 75)
  913.  
  914.     $default    reduce using rule 75 (expr)
  915.  
  916.  
  917.  
  918. state 50
  919.  
  920.     expr  ->  osubscr .   (rule 76)
  921.  
  922.     $default    reduce using rule 76 (expr)
  923.  
  924.  
  925.  
  926. state 51
  927.  
  928.     osubscr  ->  osubscr1 .   (rule 65)
  929.  
  930.     $default    reduce using rule 65 (osubscr)
  931.  
  932.  
  933.  
  934. state 52
  935.  
  936.     perform  ->  FORGET expr .   (rule 13)
  937.  
  938.     $default    reduce using rule 13 (perform)
  939.  
  940.  
  941.  
  942. state 53
  943.  
  944.     unambig  ->  preftype . UNARY NUMBER   (rule 82)
  945.  
  946.     UNARY    shift, and go to state 98
  947.  
  948.  
  949.  
  950. state 54
  951.  
  952.     expr  ->  unambig .   (rule 68)
  953.     expr  ->  unambig . SELECT unambig   (rule 69)
  954.     expr  ->  unambig . SELECT subscr   (rule 70)
  955.     expr  ->  unambig . SELECT osubscr   (rule 71)
  956.     expr  ->  unambig . MINGLE unambig   (rule 72)
  957.     expr  ->  unambig . MINGLE subscr   (rule 73)
  958.     expr  ->  unambig . MINGLE osubscr   (rule 74)
  959.  
  960.     MINGLE    shift, and go to state 99
  961.     SELECT    shift, and go to state 100
  962.  
  963.     $default    reduce using rule 68 (expr)
  964.  
  965.  
  966.  
  967. state 55
  968.  
  969.     perform  ->  RESUME expr .   (rule 14)
  970.  
  971.     $default    reduce using rule 14 (perform)
  972.  
  973.  
  974.  
  975. state 56
  976.  
  977.     varlist  ->  variable .   (rule 42)
  978.  
  979.     $default    reduce using rule 42 (varlist)
  980.  
  981.  
  982.  
  983. state 57
  984.  
  985.     variable  ->  array .   (rule 32)
  986.  
  987.     $default    reduce using rule 32 (variable)
  988.  
  989.  
  990.  
  991. state 58
  992.  
  993.     perform  ->  STASH varlist .   (rule 15)
  994.     varlist  ->  varlist . INTERSECTION variable   (rule 43)
  995.  
  996.     INTERSECTION    shift, and go to state 101
  997.  
  998.     $default    reduce using rule 15 (perform)
  999.  
  1000.  
  1001.  
  1002. state 59
  1003.  
  1004.     perform  ->  RETRIEVE varlist .   (rule 16)
  1005.     varlist  ->  varlist . INTERSECTION variable   (rule 43)
  1006.  
  1007.     INTERSECTION    shift, and go to state 101
  1008.  
  1009.     $default    reduce using rule 16 (perform)
  1010.  
  1011.  
  1012.  
  1013. state 60
  1014.  
  1015.     perform  ->  IGNORE varlist .   (rule 17)
  1016.     varlist  ->  varlist . INTERSECTION variable   (rule 43)
  1017.  
  1018.     INTERSECTION    shift, and go to state 101
  1019.  
  1020.     $default    reduce using rule 17 (perform)
  1021.  
  1022.  
  1023.  
  1024. state 61
  1025.  
  1026.     perform  ->  REMEMBER varlist .   (rule 18)
  1027.     varlist  ->  varlist . INTERSECTION variable   (rule 43)
  1028.  
  1029.     INTERSECTION    shift, and go to state 101
  1030.  
  1031.     $default    reduce using rule 18 (perform)
  1032.  
  1033.  
  1034.  
  1035. state 62
  1036.  
  1037.     gerunds  ->  GERUND .   (rule 29)
  1038.  
  1039.     $default    reduce using rule 29 (gerunds)
  1040.  
  1041.  
  1042.  
  1043. state 63
  1044.  
  1045.     perform  ->  ABSTAIN LABEL .   (rule 19)
  1046.  
  1047.     $default    reduce using rule 19 (perform)
  1048.  
  1049.  
  1050.  
  1051. state 64
  1052.  
  1053.     perform  ->  ABSTAIN gerunds .   (rule 20)
  1054.     gerunds  ->  gerunds . INTERSECTION GERUND   (rule 30)
  1055.  
  1056.     INTERSECTION    shift, and go to state 102
  1057.  
  1058.     $default    reduce using rule 20 (perform)
  1059.  
  1060.  
  1061.  
  1062. state 65
  1063.  
  1064.     perform  ->  REINSTATE LABEL .   (rule 21)
  1065.  
  1066.     $default    reduce using rule 21 (perform)
  1067.  
  1068.  
  1069.  
  1070. state 66
  1071.  
  1072.     perform  ->  REINSTATE gerunds .   (rule 22)
  1073.     gerunds  ->  gerunds . INTERSECTION GERUND   (rule 30)
  1074.  
  1075.     INTERSECTION    shift, and go to state 102
  1076.  
  1077.     $default    reduce using rule 22 (perform)
  1078.  
  1079.  
  1080.  
  1081. state 67
  1082.  
  1083.     constant  ->  MESH . NUMBER   (rule 41)
  1084.  
  1085.     NUMBER    shift, and go to state 90
  1086.  
  1087.  
  1088.  
  1089. state 68
  1090.  
  1091.     outitem  ->  scalar .   (rule 49)
  1092.  
  1093.     $default    reduce using rule 49 (outitem)
  1094.  
  1095.  
  1096.  
  1097. state 69
  1098.  
  1099.     outitem  ->  array .   (rule 52)
  1100.     subscr  ->  array . SUB sublist   (rule 58)
  1101.     subscr1  ->  array . SUB sublist1   (rule 59)
  1102.  
  1103.     SUB     shift, and go to state 88
  1104.  
  1105.     $default    reduce using rule 52 (outitem)
  1106.  
  1107.  
  1108.  
  1109. state 70
  1110.  
  1111.     outitem  ->  constant .   (rule 51)
  1112.  
  1113.     $default    reduce using rule 51 (outitem)
  1114.  
  1115.  
  1116.  
  1117. state 71
  1118.  
  1119.     outlist  ->  outitem . INTERSECTION outlist   (rule 53)
  1120.     outlist  ->  outitem .   (rule 54)
  1121.  
  1122.     INTERSECTION    shift, and go to state 103
  1123.  
  1124.     $default    reduce using rule 54 (outlist)
  1125.  
  1126.  
  1127.  
  1128. state 72
  1129.  
  1130.     perform  ->  READ_OUT outlist .   (rule 24)
  1131.  
  1132.     $default    reduce using rule 24 (perform)
  1133.  
  1134.  
  1135.  
  1136. state 73
  1137.  
  1138.     outitem  ->  subscr .   (rule 50)
  1139.  
  1140.     $default    reduce using rule 50 (outitem)
  1141.  
  1142.  
  1143.  
  1144. state 74
  1145.  
  1146.     initem  ->  scalar .   (rule 44)
  1147.  
  1148.     $default    reduce using rule 44 (initem)
  1149.  
  1150.  
  1151.  
  1152. state 75
  1153.  
  1154.     initem  ->  array .   (rule 46)
  1155.     subscr  ->  array . SUB sublist   (rule 58)
  1156.     subscr1  ->  array . SUB sublist1   (rule 59)
  1157.  
  1158.     SUB     shift, and go to state 88
  1159.  
  1160.     $default    reduce using rule 46 (initem)
  1161.  
  1162.  
  1163.  
  1164. state 76
  1165.  
  1166.     inlist  ->  initem . INTERSECTION inlist   (rule 47)
  1167.     inlist  ->  initem .   (rule 48)
  1168.  
  1169.     INTERSECTION    shift, and go to state 104
  1170.  
  1171.     $default    reduce using rule 48 (inlist)
  1172.  
  1173.  
  1174.  
  1175. state 77
  1176.  
  1177.     perform  ->  WRITE_IN inlist .   (rule 23)
  1178.  
  1179.     $default    reduce using rule 23 (perform)
  1180.  
  1181.  
  1182.  
  1183. state 78
  1184.  
  1185.     initem  ->  subscr .   (rule 45)
  1186.  
  1187.     $default    reduce using rule 45 (initem)
  1188.  
  1189.  
  1190.  
  1191. state 79
  1192.  
  1193.     perform  ->  COME_FROM LABEL .   (rule 26)
  1194.  
  1195.     $default    reduce using rule 26 (perform)
  1196.  
  1197.  
  1198.  
  1199. state 80
  1200.  
  1201.     scalar  ->  ONESPOT NUMBER .   (rule 35)
  1202.  
  1203.     $default    reduce using rule 35 (scalar)
  1204.  
  1205.  
  1206.  
  1207. state 81
  1208.  
  1209.     scalar  ->  TWOSPOT NUMBER .   (rule 36)
  1210.  
  1211.     $default    reduce using rule 36 (scalar)
  1212.  
  1213.  
  1214.  
  1215. state 82
  1216.  
  1217.     array  ->  TAIL NUMBER .   (rule 37)
  1218.  
  1219.     $default    reduce using rule 37 (array)
  1220.  
  1221.  
  1222.  
  1223. state 83
  1224.  
  1225.     array  ->  HYBRID NUMBER .   (rule 38)
  1226.  
  1227.     $default    reduce using rule 38 (array)
  1228.  
  1229.  
  1230.  
  1231. state 84
  1232.  
  1233.     command  ->  please OHOHSEVEN perform .   (rule 4)
  1234.  
  1235.     $default    reduce using rule 4 (command)
  1236.  
  1237.  
  1238.  
  1239. state 85
  1240.  
  1241.     perform  ->  LABEL NEXT .   (rule 12)
  1242.  
  1243.     $default    reduce using rule 12 (perform)
  1244.  
  1245.  
  1246.  
  1247. state 86
  1248.  
  1249.     perform  ->  lvalue GETS . expr   (rule 10)
  1250.  
  1251.     MESH    shift, and go to state 37
  1252.     ONESPOT    shift, and go to state 38
  1253.     TWOSPOT    shift, and go to state 39
  1254.     TAIL    shift, and go to state 40
  1255.     HYBRID    shift, and go to state 41
  1256.     SPARK    shift, and go to state 42
  1257.     EARS    shift, and go to state 43
  1258.  
  1259.     variable    go to state 44
  1260.     scalar    go to state 45
  1261.     array    go to state 46
  1262.     oparray    go to state 47
  1263.     constant    go to state 48
  1264.     subscr    go to state 49
  1265.     subscr1    go to state 34
  1266.     osubscr    go to state 50
  1267.     osubscr1    go to state 51
  1268.     expr    go to state 105
  1269.     preftype    go to state 53
  1270.     unambig    go to state 54
  1271.  
  1272.  
  1273.  
  1274. state 87
  1275.  
  1276.     perform  ->  array GETS . byexpr   (rule 11)
  1277.  
  1278.     MESH    shift, and go to state 37
  1279.     ONESPOT    shift, and go to state 38
  1280.     TWOSPOT    shift, and go to state 39
  1281.     TAIL    shift, and go to state 40
  1282.     HYBRID    shift, and go to state 41
  1283.     SPARK    shift, and go to state 42
  1284.     EARS    shift, and go to state 43
  1285.  
  1286.     variable    go to state 44
  1287.     scalar    go to state 45
  1288.     array    go to state 46
  1289.     oparray    go to state 47
  1290.     constant    go to state 48
  1291.     byexpr    go to state 106
  1292.     subscr    go to state 49
  1293.     subscr1    go to state 34
  1294.     osubscr    go to state 50
  1295.     osubscr1    go to state 51
  1296.     expr    go to state 107
  1297.     preftype    go to state 53
  1298.     unambig    go to state 54
  1299.  
  1300.  
  1301.  
  1302. state 88
  1303.  
  1304.     subscr  ->  array SUB . sublist   (rule 58)
  1305.     subscr1  ->  array SUB . sublist1   (rule 59)
  1306.  
  1307.     MESH    shift, and go to state 37
  1308.     ONESPOT    shift, and go to state 38
  1309.     TWOSPOT    shift, and go to state 39
  1310.     TAIL    shift, and go to state 40
  1311.     HYBRID    shift, and go to state 41
  1312.     SPARK    shift, and go to state 42
  1313.     EARS    shift, and go to state 43
  1314.  
  1315.     variable    go to state 44
  1316.     scalar    go to state 45
  1317.     array    go to state 108
  1318.     oparray    go to state 109
  1319.     constant    go to state 48
  1320.     subscr1    go to state 110
  1321.     sublist    go to state 111
  1322.     sublist1    go to state 112
  1323.     osubscr1    go to state 113
  1324.     preftype    go to state 53
  1325.     unambig    go to state 114
  1326.  
  1327.  
  1328.  
  1329. state 89
  1330.  
  1331.     command  ->  LABEL please OHOHSEVEN perform .   (rule 6)
  1332.  
  1333.     $default    reduce using rule 6 (command)
  1334.  
  1335.  
  1336.  
  1337. state 90
  1338.  
  1339.     constant  ->  MESH NUMBER .   (rule 41)
  1340.  
  1341.     $default    reduce using rule 41 (constant)
  1342.  
  1343.  
  1344.  
  1345. state 91
  1346.  
  1347.     oparray  ->  TAIL UNARY . NUMBER   (rule 39)
  1348.  
  1349.     NUMBER    shift, and go to state 115
  1350.  
  1351.  
  1352.  
  1353. state 92
  1354.  
  1355.     oparray  ->  HYBRID UNARY . NUMBER   (rule 40)
  1356.  
  1357.     NUMBER    shift, and go to state 116
  1358.  
  1359.  
  1360.  
  1361. state 93
  1362.  
  1363.     unambig  ->  SPARK UNARY . expr SPARK   (rule 83)
  1364.  
  1365.     MESH    shift, and go to state 37
  1366.     ONESPOT    shift, and go to state 38
  1367.     TWOSPOT    shift, and go to state 39
  1368.     TAIL    shift, and go to state 40
  1369.     HYBRID    shift, and go to state 41
  1370.     SPARK    shift, and go to state 42
  1371.     EARS    shift, and go to state 43
  1372.  
  1373.     variable    go to state 44
  1374.     scalar    go to state 45
  1375.     array    go to state 46
  1376.     oparray    go to state 47
  1377.     constant    go to state 48
  1378.     subscr    go to state 49
  1379.     subscr1    go to state 34
  1380.     osubscr    go to state 50
  1381.     osubscr1    go to state 51
  1382.     expr    go to state 117
  1383.     preftype    go to state 53
  1384.     unambig    go to state 54
  1385.  
  1386.  
  1387.  
  1388. state 94
  1389.  
  1390.     unambig  ->  SPARK expr . SPARK   (rule 85)
  1391.  
  1392.     SPARK    shift, and go to state 118
  1393.  
  1394.  
  1395.  
  1396. state 95
  1397.  
  1398.     unambig  ->  EARS UNARY . expr EARS   (rule 84)
  1399.  
  1400.     MESH    shift, and go to state 37
  1401.     ONESPOT    shift, and go to state 38
  1402.     TWOSPOT    shift, and go to state 39
  1403.     TAIL    shift, and go to state 40
  1404.     HYBRID    shift, and go to state 41
  1405.     SPARK    shift, and go to state 42
  1406.     EARS    shift, and go to state 43
  1407.  
  1408.     variable    go to state 44
  1409.     scalar    go to state 45
  1410.     array    go to state 46
  1411.     oparray    go to state 47
  1412.     constant    go to state 48
  1413.     subscr    go to state 49
  1414.     subscr1    go to state 34
  1415.     osubscr    go to state 50
  1416.     osubscr1    go to state 51
  1417.     expr    go to state 119
  1418.     preftype    go to state 53
  1419.     unambig    go to state 54
  1420.  
  1421.  
  1422.  
  1423. state 96
  1424.  
  1425.     unambig  ->  EARS expr . EARS   (rule 86)
  1426.  
  1427.     EARS    shift, and go to state 120
  1428.  
  1429.  
  1430.  
  1431. state 97
  1432.  
  1433.     osubscr  ->  oparray SUB . sublist   (rule 66)
  1434.     osubscr1  ->  oparray SUB . sublist1   (rule 67)
  1435.  
  1436.     MESH    shift, and go to state 37
  1437.     ONESPOT    shift, and go to state 38
  1438.     TWOSPOT    shift, and go to state 39
  1439.     TAIL    shift, and go to state 40
  1440.     HYBRID    shift, and go to state 41
  1441.     SPARK    shift, and go to state 42
  1442.     EARS    shift, and go to state 43
  1443.  
  1444.     variable    go to state 44
  1445.     scalar    go to state 45
  1446.     array    go to state 108
  1447.     oparray    go to state 109
  1448.     constant    go to state 48
  1449.     subscr1    go to state 110
  1450.     sublist    go to state 121
  1451.     sublist1    go to state 122
  1452.     osubscr1    go to state 113
  1453.     preftype    go to state 53
  1454.     unambig    go to state 114
  1455.  
  1456.  
  1457.  
  1458. state 98
  1459.  
  1460.     unambig  ->  preftype UNARY . NUMBER   (rule 82)
  1461.  
  1462.     NUMBER    shift, and go to state 123
  1463.  
  1464.  
  1465.  
  1466. state 99
  1467.  
  1468.     expr  ->  unambig MINGLE . unambig   (rule 72)
  1469.     expr  ->  unambig MINGLE . subscr   (rule 73)
  1470.     expr  ->  unambig MINGLE . osubscr   (rule 74)
  1471.  
  1472.     MESH    shift, and go to state 37
  1473.     ONESPOT    shift, and go to state 38
  1474.     TWOSPOT    shift, and go to state 39
  1475.     TAIL    shift, and go to state 40
  1476.     HYBRID    shift, and go to state 41
  1477.     SPARK    shift, and go to state 42
  1478.     EARS    shift, and go to state 43
  1479.  
  1480.     variable    go to state 44
  1481.     scalar    go to state 45
  1482.     array    go to state 46
  1483.     oparray    go to state 47
  1484.     constant    go to state 48
  1485.     subscr    go to state 124
  1486.     subscr1    go to state 34
  1487.     osubscr    go to state 125
  1488.     osubscr1    go to state 51
  1489.     preftype    go to state 53
  1490.     unambig    go to state 126
  1491.  
  1492.  
  1493.  
  1494. state 100
  1495.  
  1496.     expr  ->  unambig SELECT . unambig   (rule 69)
  1497.     expr  ->  unambig SELECT . subscr   (rule 70)
  1498.     expr  ->  unambig SELECT . osubscr   (rule 71)
  1499.  
  1500.     MESH    shift, and go to state 37
  1501.     ONESPOT    shift, and go to state 38
  1502.     TWOSPOT    shift, and go to state 39
  1503.     TAIL    shift, and go to state 40
  1504.     HYBRID    shift, and go to state 41
  1505.     SPARK    shift, and go to state 42
  1506.     EARS    shift, and go to state 43
  1507.  
  1508.     variable    go to state 44
  1509.     scalar    go to state 45
  1510.     array    go to state 46
  1511.     oparray    go to state 47
  1512.     constant    go to state 48
  1513.     subscr    go to state 127
  1514.     subscr1    go to state 34
  1515.     osubscr    go to state 128
  1516.     osubscr1    go to state 51
  1517.     preftype    go to state 53
  1518.     unambig    go to state 129
  1519.  
  1520.  
  1521.  
  1522. state 101
  1523.  
  1524.     varlist  ->  varlist INTERSECTION . variable   (rule 43)
  1525.  
  1526.     ONESPOT    shift, and go to state 22
  1527.     TWOSPOT    shift, and go to state 23
  1528.     TAIL    shift, and go to state 24
  1529.     HYBRID    shift, and go to state 25
  1530.  
  1531.     variable    go to state 130
  1532.     scalar    go to state 45
  1533.     array    go to state 57
  1534.  
  1535.  
  1536.  
  1537. state 102
  1538.  
  1539.     gerunds  ->  gerunds INTERSECTION . GERUND   (rule 30)
  1540.  
  1541.     GERUND    shift, and go to state 131
  1542.  
  1543.  
  1544.  
  1545. state 103
  1546.  
  1547.     outlist  ->  outitem INTERSECTION . outlist   (rule 53)
  1548.  
  1549.     MESH    shift, and go to state 67
  1550.     ONESPOT    shift, and go to state 22
  1551.     TWOSPOT    shift, and go to state 23
  1552.     TAIL    shift, and go to state 24
  1553.     HYBRID    shift, and go to state 25
  1554.  
  1555.     scalar    go to state 68
  1556.     array    go to state 69
  1557.     constant    go to state 70
  1558.     outitem    go to state 71
  1559.     outlist    go to state 132
  1560.     subscr    go to state 73
  1561.     subscr1    go to state 34
  1562.  
  1563.  
  1564.  
  1565. state 104
  1566.  
  1567.     inlist  ->  initem INTERSECTION . inlist   (rule 47)
  1568.  
  1569.     ONESPOT    shift, and go to state 22
  1570.     TWOSPOT    shift, and go to state 23
  1571.     TAIL    shift, and go to state 24
  1572.     HYBRID    shift, and go to state 25
  1573.  
  1574.     scalar    go to state 74
  1575.     array    go to state 75
  1576.     initem    go to state 76
  1577.     inlist    go to state 133
  1578.     subscr    go to state 78
  1579.     subscr1    go to state 34
  1580.  
  1581.  
  1582.  
  1583. state 105
  1584.  
  1585.     perform  ->  lvalue GETS expr .   (rule 10)
  1586.  
  1587.     $default    reduce using rule 10 (perform)
  1588.  
  1589.  
  1590.  
  1591. state 106
  1592.  
  1593.     perform  ->  array GETS byexpr .   (rule 11)
  1594.  
  1595.     $default    reduce using rule 11 (perform)
  1596.  
  1597.  
  1598.  
  1599. state 107
  1600.  
  1601.     byexpr  ->  expr . BY byexpr   (rule 55)
  1602.     byexpr  ->  expr .   (rule 56)
  1603.  
  1604.     BY      shift, and go to state 134
  1605.  
  1606.     $default    reduce using rule 56 (byexpr)
  1607.  
  1608.  
  1609.  
  1610. state 108
  1611.  
  1612.     variable  ->  array .   (rule 32)
  1613.     subscr1  ->  array . SUB sublist1   (rule 59)
  1614.  
  1615.     SUB     shift, and go to state 135
  1616.  
  1617.     $default    reduce using rule 32 (variable)
  1618.  
  1619.  
  1620.  
  1621. state 109
  1622.  
  1623.     osubscr1  ->  oparray . SUB sublist1   (rule 67)
  1624.  
  1625.     SUB     shift, and go to state 136
  1626.  
  1627.  
  1628.  
  1629. state 110
  1630.  
  1631.     sublist1  ->  subscr1 .   (rule 62)
  1632.  
  1633.     $default    reduce using rule 62 (sublist1)
  1634.  
  1635.  
  1636.  
  1637. state 111
  1638.  
  1639.     subscr  ->  array SUB sublist .   (rule 58)
  1640.  
  1641.     $default    reduce using rule 58 (subscr)
  1642.  
  1643.  
  1644.  
  1645. state 112
  1646.  
  1647.     subscr1  ->  array SUB sublist1 .   (rule 59)
  1648.  
  1649.     $default    reduce using rule 59 (subscr1)
  1650.  
  1651.  
  1652.  
  1653. state 113
  1654.  
  1655.     sublist1  ->  osubscr1 .   (rule 63)
  1656.  
  1657.     $default    reduce using rule 63 (sublist1)
  1658.  
  1659.  
  1660.  
  1661. state 114
  1662.  
  1663.     sublist  ->  unambig . sublist   (rule 60)
  1664.     sublist  ->  unambig . sublist1   (rule 61)
  1665.     sublist1  ->  unambig .   (rule 64)
  1666.  
  1667.     MESH    shift, and go to state 37
  1668.     ONESPOT    shift, and go to state 38
  1669.     TWOSPOT    shift, and go to state 39
  1670.     TAIL    shift, and go to state 40
  1671.     HYBRID    shift, and go to state 41
  1672.  
  1673.     $default    reduce using rule 64 (sublist1)
  1674.  
  1675.     variable    go to state 44
  1676.     scalar    go to state 45
  1677.     array    go to state 108
  1678.     oparray    go to state 109
  1679.     constant    go to state 48
  1680.     subscr1    go to state 110
  1681.     sublist    go to state 137
  1682.     sublist1    go to state 138
  1683.     osubscr1    go to state 113
  1684.     preftype    go to state 53
  1685.     unambig    go to state 114
  1686.  
  1687.  
  1688.  
  1689. state 115
  1690.  
  1691.     oparray  ->  TAIL UNARY NUMBER .   (rule 39)
  1692.  
  1693.     $default    reduce using rule 39 (oparray)
  1694.  
  1695.  
  1696.  
  1697. state 116
  1698.  
  1699.     oparray  ->  HYBRID UNARY NUMBER .   (rule 40)
  1700.  
  1701.     $default    reduce using rule 40 (oparray)
  1702.  
  1703.  
  1704.  
  1705. state 117
  1706.  
  1707.     unambig  ->  SPARK UNARY expr . SPARK   (rule 83)
  1708.  
  1709.     SPARK    shift, and go to state 139
  1710.  
  1711.  
  1712.  
  1713. state 118
  1714.  
  1715.     unambig  ->  SPARK expr SPARK .   (rule 85)
  1716.  
  1717.     $default    reduce using rule 85 (unambig)
  1718.  
  1719.  
  1720.  
  1721. state 119
  1722.  
  1723.     unambig  ->  EARS UNARY expr . EARS   (rule 84)
  1724.  
  1725.     EARS    shift, and go to state 140
  1726.  
  1727.  
  1728.  
  1729. state 120
  1730.  
  1731.     unambig  ->  EARS expr EARS .   (rule 86)
  1732.  
  1733.     $default    reduce using rule 86 (unambig)
  1734.  
  1735.  
  1736.  
  1737. state 121
  1738.  
  1739.     osubscr  ->  oparray SUB sublist .   (rule 66)
  1740.  
  1741.     $default    reduce using rule 66 (osubscr)
  1742.  
  1743.  
  1744.  
  1745. state 122
  1746.  
  1747.     osubscr1  ->  oparray SUB sublist1 .   (rule 67)
  1748.  
  1749.     $default    reduce using rule 67 (osubscr1)
  1750.  
  1751.  
  1752.  
  1753. state 123
  1754.  
  1755.     unambig  ->  preftype UNARY NUMBER .   (rule 82)
  1756.  
  1757.     $default    reduce using rule 82 (unambig)
  1758.  
  1759.  
  1760.  
  1761. state 124
  1762.  
  1763.     expr  ->  unambig MINGLE subscr .   (rule 73)
  1764.  
  1765.     $default    reduce using rule 73 (expr)
  1766.  
  1767.  
  1768.  
  1769. state 125
  1770.  
  1771.     expr  ->  unambig MINGLE osubscr .   (rule 74)
  1772.  
  1773.     $default    reduce using rule 74 (expr)
  1774.  
  1775.  
  1776.  
  1777. state 126
  1778.  
  1779.     expr  ->  unambig MINGLE unambig .   (rule 72)
  1780.  
  1781.     $default    reduce using rule 72 (expr)
  1782.  
  1783.  
  1784.  
  1785. state 127
  1786.  
  1787.     expr  ->  unambig SELECT subscr .   (rule 70)
  1788.  
  1789.     $default    reduce using rule 70 (expr)
  1790.  
  1791.  
  1792.  
  1793. state 128
  1794.  
  1795.     expr  ->  unambig SELECT osubscr .   (rule 71)
  1796.  
  1797.     $default    reduce using rule 71 (expr)
  1798.  
  1799.  
  1800.  
  1801. state 129
  1802.  
  1803.     expr  ->  unambig SELECT unambig .   (rule 69)
  1804.  
  1805.     $default    reduce using rule 69 (expr)
  1806.  
  1807.  
  1808.  
  1809. state 130
  1810.  
  1811.     varlist  ->  varlist INTERSECTION variable .   (rule 43)
  1812.  
  1813.     $default    reduce using rule 43 (varlist)
  1814.  
  1815.  
  1816.  
  1817. state 131
  1818.  
  1819.     gerunds  ->  gerunds INTERSECTION GERUND .   (rule 30)
  1820.  
  1821.     $default    reduce using rule 30 (gerunds)
  1822.  
  1823.  
  1824.  
  1825. state 132
  1826.  
  1827.     outlist  ->  outitem INTERSECTION outlist .   (rule 53)
  1828.  
  1829.     $default    reduce using rule 53 (outlist)
  1830.  
  1831.  
  1832.  
  1833. state 133
  1834.  
  1835.     inlist  ->  initem INTERSECTION inlist .   (rule 47)
  1836.  
  1837.     $default    reduce using rule 47 (inlist)
  1838.  
  1839.  
  1840.  
  1841. state 134
  1842.  
  1843.     byexpr  ->  expr BY . byexpr   (rule 55)
  1844.  
  1845.     MESH    shift, and go to state 37
  1846.     ONESPOT    shift, and go to state 38
  1847.     TWOSPOT    shift, and go to state 39
  1848.     TAIL    shift, and go to state 40
  1849.     HYBRID    shift, and go to state 41
  1850.     SPARK    shift, and go to state 42
  1851.     EARS    shift, and go to state 43
  1852.  
  1853.     variable    go to state 44
  1854.     scalar    go to state 45
  1855.     array    go to state 46
  1856.     oparray    go to state 47
  1857.     constant    go to state 48
  1858.     byexpr    go to state 141
  1859.     subscr    go to state 49
  1860.     subscr1    go to state 34
  1861.     osubscr    go to state 50
  1862.     osubscr1    go to state 51
  1863.     expr    go to state 107
  1864.     preftype    go to state 53
  1865.     unambig    go to state 54
  1866.  
  1867.  
  1868.  
  1869. state 135
  1870.  
  1871.     subscr1  ->  array SUB . sublist1   (rule 59)
  1872.  
  1873.     MESH    shift, and go to state 37
  1874.     ONESPOT    shift, and go to state 38
  1875.     TWOSPOT    shift, and go to state 39
  1876.     TAIL    shift, and go to state 40
  1877.     HYBRID    shift, and go to state 41
  1878.     SPARK    shift, and go to state 42
  1879.     EARS    shift, and go to state 43
  1880.  
  1881.     variable    go to state 44
  1882.     scalar    go to state 45
  1883.     array    go to state 108
  1884.     oparray    go to state 109
  1885.     constant    go to state 48
  1886.     subscr1    go to state 110
  1887.     sublist1    go to state 112
  1888.     osubscr1    go to state 113
  1889.     preftype    go to state 53
  1890.     unambig    go to state 142
  1891.  
  1892.  
  1893.  
  1894. state 136
  1895.  
  1896.     osubscr1  ->  oparray SUB . sublist1   (rule 67)
  1897.  
  1898.     MESH    shift, and go to state 37
  1899.     ONESPOT    shift, and go to state 38
  1900.     TWOSPOT    shift, and go to state 39
  1901.     TAIL    shift, and go to state 40
  1902.     HYBRID    shift, and go to state 41
  1903.     SPARK    shift, and go to state 42
  1904.     EARS    shift, and go to state 43
  1905.  
  1906.     variable    go to state 44
  1907.     scalar    go to state 45
  1908.     array    go to state 108
  1909.     oparray    go to state 109
  1910.     constant    go to state 48
  1911.     subscr1    go to state 110
  1912.     sublist1    go to state 122
  1913.     osubscr1    go to state 113
  1914.     preftype    go to state 53
  1915.     unambig    go to state 142
  1916.  
  1917.  
  1918.  
  1919. state 137
  1920.  
  1921.     sublist  ->  unambig sublist .   (rule 60)
  1922.  
  1923.     $default    reduce using rule 60 (sublist)
  1924.  
  1925.  
  1926.  
  1927. state 138
  1928.  
  1929.     sublist  ->  unambig sublist1 .   (rule 61)
  1930.  
  1931.     $default    reduce using rule 61 (sublist)
  1932.  
  1933.  
  1934.  
  1935. state 139
  1936.  
  1937.     unambig  ->  SPARK UNARY expr SPARK .   (rule 83)
  1938.  
  1939.     $default    reduce using rule 83 (unambig)
  1940.  
  1941.  
  1942.  
  1943. state 140
  1944.  
  1945.     unambig  ->  EARS UNARY expr EARS .   (rule 84)
  1946.  
  1947.     $default    reduce using rule 84 (unambig)
  1948.  
  1949.  
  1950.  
  1951. state 141
  1952.  
  1953.     byexpr  ->  expr BY byexpr .   (rule 55)
  1954.  
  1955.     $default    reduce using rule 55 (byexpr)
  1956.  
  1957.  
  1958.  
  1959. state 142
  1960.  
  1961.     sublist1  ->  unambig .   (rule 64)
  1962.  
  1963.     $default    reduce using rule 64 (sublist1)
  1964.  
  1965.  
  1966.  
  1967. state 143
  1968.  
  1969.     $       go to state 144
  1970.  
  1971.  
  1972.  
  1973. state 144
  1974.  
  1975.     $default    accept
  1976.