cleaned up new GFCC, but added RP as deprecated

author: aarne <aarne@cs.chalmers.se> 2007-10-05 09:02:47 +0000
committer: aarne <aarne@cs.chalmers.se> 2007-10-05 09:02:47 +0000
commit: 945a49214bd49fb082e8f613fc68d192a1b38743 (patch)
tree: 4d6582426ea0bb5458b12a74a1c7c86fc0981553 /src/GF/GFCC/ParGFCC.hs
parent: cc104236df63dafebaf87612aa379156cf914063 (diff)
1 files changed, 185 insertions, 188 deletions
diff --git a/src/GF/GFCC/ParGFCC.hs b/src/GF/GFCC/ParGFCC.hs
index f5d244ed2..c512b4f74 100644
--- a/src/GF/GFCC/ParGFCC.hs
+++ b/src/GF/GFCC/ParGFCC.hs
@@ -4,18 +4,14 @@ module GF.GFCC.ParGFCC where
 import GF.GFCC.AbsGFCC
 import GF.GFCC.LexGFCC
 import GF.GFCC.ErrM
-#if __GLASGOW_HASKELL__ >= 503
-import Data.Array
-#else
 import Array
-#endif
 #if __GLASGOW_HASKELL__ >= 503
 import GHC.Exts
 #else
 import GlaExts
 #endif
 
--- parser produced by Happy Version 1.16
+-- parser produced by Happy Version 1.15
 
 newtype HappyAbsSyn  = HappyAbsSyn (() -> ())
 happyIn30 :: (String) -> (HappyAbsSyn )
@@ -212,19 +208,19 @@ happyOutTok x = unsafeCoerce# x
 {-# INLINE happyOutTok #-}
 
 happyActOffsets :: HappyAddr
-happyActOffsets = HappyA# "\x3e\x01\x3f\x01\x3b\x01\x39\x01\x39\x01\x39\x01\x39\x01\x0b\x00\xbb\x00\x4a\x00\x0a\x00\x12\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x39\x01\x0a\x00\x00\x00\x00\x00\x36\x01\x37\x01\x00\x00\x00\x00\x00\x00\x35\x01\x00\x00\x34\x01\x41\x00\xb3\x00\x34\x01\x2b\x01\x33\x01\x00\x00\x32\x01\x67\x00\x31\x01\xa6\x00\x01\x00\x00\x00\x00\x00\x00\x00\x30\x01\x00\x00\x2d\x01\x0a\x00\x02\x00\x00\x00\x2f\x01\x0a\x00\x00\x00\x2c\x01\x2a\x01\x41\x00\x41\x00\x41\x00\x41\x00\xff\xff\x2a\x01\x2a\x01\x2e\x01\x29\x01\x00\x00\x00\x00\x00\x00\x00\x00\x29\x01\x27\x01\x28\x01\x00\x00\x25\x01\x4a\x00\x00\x00\x26\x01\x24\x01\x23\x01\x00\x00\x22\x01\x21\x01\x20\x01\x1f\x01\x1e\x01\x1b\x01\x1d\x01\x19\x01\x19\x01\x18\x01\x17\x01\x1a\x01\x02\x01\x11\x01\x1c\x01\x0e\x01\x15\x01\x0d\x01\x00\x00\x0b\x00\x0a\x00\x04\x00\xff\x00\xff\x00\x16\x01\x00\x00\x00\x00\x00\x00\x00\x00\x14\x01\x13\x01\x12\x01\x10\x01\x0f\x01\xfe\x00\x05\x01\x00\x00\x08\x01\x01\x01\xb5\x00\x0a\x01\x0a\x00\x00\x00\x00\x00\x00\x00\x5d\x00\x0b\x00\xbb\x00\x0c\x01\x0b\x01\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\xfd\x00\x00\x00\x00\x00\x0a\x00\x0a\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\xfd\xff\xb7\x00\x00\x00\x09\x01\x00\x00\xf8\x00\x00\x00\x04\x01\xfe\xff\x00\x00\xf7\x00\x00\x00\xf6\x00\x07\x01\x1e\x00\x00\x00\x00\x00\xbb\x00\x00\x00\x4a\x00\x00\x00\x5d\x00\x06\x01\x03\x01\x00\x00\x00\x00\xfc\x00\x00\x00\xbb\x00\x00\x00\x6a\x00\x00\x00\x00\x01\xf4\x00\x60\x00\x00\x00\x96\x00\xfa\x00\x00\x00\x00\x00\xa4\x00\x00\x00\xfb\x00\x00\x00\x05\x00\x00\x00\x1d\x00\x00\x00\xf1\x00\x00\x00\x93\x00\x00\x00\xb8\x00\x00\x00\xfc\xff\x00\x00\x00\x00"#
+happyActOffsets = HappyA# "\x37\x01\x39\x01\x35\x01\x33\x01\x33\x01\x33\x01\x33\x01\x41\x01\xc4\x00\x1f\x00\x05\x00\x03\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x31\x01\x05\x00\x00\x00\x00\x00\x30\x01\x2f\x01\x00\x00\x2f\x01\x00\x00\x2e\x01\x00\x00\x2c\x01\x2d\x01\x2b\x01\x2a\x01\x00\x00\x83\x00\x2a\x01\x2a\x01\x29\x01\x2d\x00\x27\x01\x99\x00\x0c\x00\x00\x00\x00\x00\x00\x00\x28\x01\x00\x00\x25\x01\x05\x00\x01\x00\x00\x00\x24\x01\x05\x00\x00\x00\x23\x01\x22\x01\x50\x00\x50\x00\x50\x00\x50\x00\x4f\x00\x22\x01\x22\x01\x26\x01\x21\x01\x00\x00\x00\x00\x00\x00\x00\x00\x21\x01\x20\x01\x1f\x01\x00\x00\x1e\x01\x00\x00\x1d\x01\x1b\x01\x1c\x01\x1a\x01\x19\x01\x18\x01\x17\x01\x16\x01\x14\x01\x15\x01\x13\x01\x13\x01\x10\x01\x0f\x01\x11\x01\x0d\x01\x0c\x01\x12\x01\x0b\x01\x0e\x01\x09\x01\x02\x01\x0a\x01\x05\x00\x07\x01\xf7\x00\xff\x00\x00\x00\x00\x00\x00\x00\x08\x01\x06\x01\x05\x01\x04\x01\x03\x01\xf3\x00\x00\x01\x00\x00\xfd\x00\xed\x00\x4a\x00\x01\x01\x05\x00\x00\x00\x00\x00\x00\x00\x25\x00\xc4\x00\xf1\x00\xfb\x00\xfe\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\xf0\x00\x00\x00\x00\x00\x05\x00\x05\x00\x05\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\xfd\xff\x00\x00\xfc\x00\xea\x00\x00\x00\xfa\x00\xf5\x00\x00\x00\xe8\x00\x00\x00\xe7\x00\xf9\x00\x1b\x00\x00\x00\x00\x00\xc4\x00\x00\x00\x1f\x00\x25\x00\xf8\x00\xf6\x00\xf4\x00\x00\x00\x00\x00\x00\x00\xef\x00\x00\x00\xc4\x00\x00\x00\x8b\x00\x00\x00\xf2\x00\xe5\x00\x09\x00\x00\x00\xb8\x00\xeb\x00\x00\x00\x00\x00\x93\x00\x00\x00\xee\x00\x00\x00\x0f\x00\x00\x00\x44\x00\x00\x00\xd2\x00\x00\x00\x72\x00\x00\x00\xa6\x00\x00\x00\x04\x00\x00\x00\x00\x00"#
 
 happyGotoOffsets :: HappyAddr
-happyGotoOffsets = HappyA# "\xf9\x00\xf3\x00\xf5\x00\xd0\x00\xc1\x00\x5e\x00\xa5\x00\x59\x00\xf0\x00\xa0\x00\x8a\x00\x0e\x00\x6e\x00\xee\x00\xef\x00\xed\x00\xe6\x00\xe4\x00\x5b\x00\x51\x00\xdf\x00\xdd\x00\x99\x00\x13\x00\xbc\x00\xd7\x00\xd5\x00\x00\x00\x00\x00\xb6\x00\x10\x00\xe9\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\xf2\x00\x00\x00\xf2\x00\xe2\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x4b\x00\x39\x00\x00\x00\xec\x00\x33\x00\x00\x00\x00\x00\x00\x00\xa1\x00\x46\x00\xc0\x00\xca\x00\xea\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\xeb\x00\xe8\x00\x00\x00\x00\x00\x92\x00\xd3\x00\x00\x00\x00\x00\x00\x00\xd2\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\xe7\x00\x00\x00\x00\x00\x00\x00\xe3\x00\x00\x00\x00\x00\x00\x00\xe5\x00\xc7\x00\x50\x00\x7a\x00\x10\x00\xe0\x00\x5a\x00\xb4\x00\xd1\x00\x00\x00\x00\x00\xcf\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x40\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x2f\x00\x00\x00\x00\x00\xce\x00\x97\x00\x42\x00\xd6\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\xe1\x00\x00\x00\x00\x00\x76\x00\x72\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\xe1\x00\xd4\x00\x00\x00\x00\x00\x00\x00\xdc\x00\x00\x00\x00\x00\x10\x00\x00\x00\x00\x00\xcc\x00\x25\x00\x00\x00\xc8\x00\xcb\x00\x00\x00\xcd\x00\xc4\x00\x8e\x00\x00\x00\x8c\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\xc3\x00\xc9\x00\x00\x00\xc8\x00\xa2\x00\x00\x00\xa7\x00\x46\x00\x95\x00\x73\x00\x00\x00\x00\x00\x00\x00\xa1\x00\x31\x00\x00\x00\x85\x00\xc0\x00\x58\x00\xa1\x00\x00\x00\x14\x00\x23\x00\xa1\x00\x06\x00\xa1\x00\xf2\xff\xa1\x00\x00\x00\x00\x00"#
+happyGotoOffsets = HappyA# "\xec\x00\xe9\x00\xe6\x00\xbf\x00\xb0\x00\xac\x00\xaa\x00\xe4\x00\xe1\x00\x9b\x00\x85\x00\x5d\x00\x79\x00\xe3\x00\xe0\x00\xd6\x00\xd7\x00\xd1\x00\x48\x00\x63\x00\xcf\x00\xcc\x00\x92\x00\x1d\x00\xab\x00\x19\x00\xc6\x00\x00\x00\x00\x00\xa5\x00\x00\x00\x00\x00\x00\x00\x00\x00\xde\x00\x00\x00\x00\x00\x00\x00\xe2\x00\x00\x00\xe2\x00\xd5\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x53\x00\x49\x00\x00\x00\xdf\x00\x43\x00\x00\x00\x00\x00\x00\x00\x9c\x00\x9e\x00\xaf\x00\x8a\x00\xdd\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\xdc\x00\xdb\x00\x00\x00\x00\x00\xc1\x00\x00\x00\x00\x00\x13\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\xd9\x00\x00\x00\x00\x00\x00\x00\xd8\x00\x00\x00\x00\x00\x00\x00\xda\x00\x12\x00\xcd\x00\x81\x00\x00\x00\x38\x00\xeb\xff\x00\x00\x00\x00\xc0\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x14\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x39\x00\x00\x00\x00\x00\xbd\x00\x90\x00\xcb\x00\xfe\xff\xca\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\xd4\x00\x00\x00\x00\x00\x7d\x00\x6d\x00\x68\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\xd4\x00\x00\x00\x00\x00\xce\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\xbe\x00\x02\x00\x00\x00\x7c\x00\xb2\x00\x00\x00\xc3\x00\xbb\x00\x97\x00\x5f\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\xba\x00\xc2\x00\x00\x00\x7c\x00\xb9\x00\x00\x00\xb6\x00\x9e\x00\xb7\x00\x4d\x00\x00\x00\x00\x00\x00\x00\x9c\x00\x07\x00\x00\x00\xa0\x00\xaf\x00\xb5\x00\x9c\x00\x00\x00\xb4\x00\x8e\x00\x9c\x00\x3a\x00\x9c\x00\x22\x00\x9c\x00\x00\x00\x00\x00"#
 
 happyDefActions :: HappyAddr
-happyDefActions = HappyA# "\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\xb7\xff\x00\x00\x00\x00\x00\x00\x00\x00\xaf\xff\xc1\xff\xbf\xff\xbd\xff\xbb\xff\xb9\xff\xb7\xff\xb4\xff\xb1\xff\xaf\xff\xaf\xff\x00\x00\xb1\xff\xa8\xff\xa6\xff\x00\x00\xe4\xff\xb1\xff\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\xe1\xff\xac\xff\x00\x00\x00\x00\x00\x00\x00\x00\xc4\xff\xc9\xff\xc8\xff\xb3\xff\xcb\xff\x00\x00\xb4\xff\xb4\xff\xc5\xff\x00\x00\xb4\xff\xe3\xff\xb6\xff\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\xd3\xff\xd2\xff\xd1\xff\xd4\xff\x00\x00\x00\x00\x00\x00\xe2\xff\x00\x00\x00\x00\xa6\xff\x00\x00\x00\x00\x00\x00\xa8\xff\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\xa8\xff\xb7\xff\x00\x00\x00\x00\x00\x00\xb7\xff\xb1\xff\xb1\xff\xcf\xff\xd0\xff\xaf\xff\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\xb7\xff\x00\x00\xca\xff\x00\x00\xc4\xff\xb3\xff\x00\x00\xb4\xff\xb0\xff\xae\xff\xaf\xff\xad\xff\xb7\xff\x00\x00\x00\x00\x00\x00\xa5\xff\xa7\xff\xa9\xff\xaa\xff\xab\xff\xc2\xff\xb2\xff\xcc\xff\x00\x00\x00\x00\xce\xff\xc7\xff\xb5\xff\xb8\xff\xba\xff\xbc\xff\xbe\xff\xc0\xff\x00\x00\x00\x00\xd5\xff\x00\x00\xd9\xff\x00\x00\xda\xff\x00\x00\x00\x00\xdd\xff\x00\x00\xbf\xff\xb7\xff\x00\x00\x00\x00\xbf\xff\xdc\xff\x00\x00\xb1\xff\x00\x00\xd7\xff\xad\xff\x00\x00\x00\x00\xcd\xff\xc6\xff\x00\x00\xb1\xff\xd8\xff\xdb\xff\x00\x00\xbb\xff\x00\x00\x00\x00\x00\x00\xb9\xff\x00\x00\x00\x00\xc3\xff\xd6\xff\x00\x00\xbd\xff\x00\x00\xc1\xff\x00\x00\xb9\xff\x00\x00\xdf\xff\xe0\xff\xb9\xff\x00\x00\xb9\xff\x00\x00\xb9\xff\x00\x00\xde\xff"#
+happyDefActions = HappyA# "\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\xb0\xff\xc2\xff\xc0\xff\xbe\xff\xbc\xff\xba\xff\xb8\xff\xb5\xff\xb2\xff\xb0\xff\xb0\xff\x00\x00\xb2\xff\xa9\xff\xa6\xff\x00\x00\xe4\xff\xb2\xff\x00\x00\xa8\xff\x00\x00\xe1\xff\x00\x00\x00\x00\x00\x00\xad\xff\x00\x00\x00\x00\x00\x00\x00\x00\xc5\xff\xcb\xff\xca\xff\xb4\xff\xcd\xff\x00\x00\xb5\xff\xb5\xff\xc7\xff\x00\x00\xb5\xff\xe3\xff\xb7\xff\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\xd5\xff\xd4\xff\xd3\xff\xd6\xff\x00\x00\x00\x00\x00\x00\xe2\xff\x00\x00\xa6\xff\x00\x00\x00\x00\xa9\xff\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\xa9\xff\x00\x00\x00\x00\x00\x00\xb8\xff\xb2\xff\xd1\xff\xd2\xff\xb0\xff\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\xb8\xff\x00\x00\xcc\xff\x00\x00\xc5\xff\xb4\xff\x00\x00\xb5\xff\xb1\xff\xaf\xff\xb0\xff\xae\xff\x00\x00\xa9\xff\x00\x00\x00\x00\xa5\xff\xab\xff\xa7\xff\xaa\xff\xac\xff\xc3\xff\xb3\xff\xce\xff\x00\x00\x00\x00\x00\x00\xd0\xff\xc9\xff\xb6\xff\xb9\xff\xbb\xff\xbd\xff\xbf\xff\xc1\xff\x00\x00\xd7\xff\x00\x00\x00\x00\xda\xff\x00\x00\x00\x00\xdd\xff\x00\x00\xc0\xff\xb8\xff\x00\x00\x00\x00\xc0\xff\xdc\xff\x00\x00\xb2\xff\x00\x00\xae\xff\x00\x00\x00\x00\x00\x00\xcf\xff\xc6\xff\xc8\xff\x00\x00\xb2\xff\xd9\xff\xdb\xff\x00\x00\xbc\xff\x00\x00\x00\x00\x00\x00\xba\xff\x00\x00\x00\x00\xc4\xff\xd8\xff\x00\x00\xbe\xff\x00\x00\xc2\xff\x00\x00\xba\xff\x00\x00\xdf\xff\xe0\xff\xba\xff\x00\x00\xba\xff\x00\x00\xba\xff\x00\x00\xde\xff"#
 
 happyCheck :: HappyAddr
-happyCheck = HappyA# "\xff\xff\x05\x00\x01\x00\x01\x00\x07\x00\x04\x00\x08\x00\x15\x00\x07\x00\x07\x00\x05\x00\x01\x00\x08\x00\x0b\x00\x00\x00\x0d\x00\x0e\x00\x07\x00\x07\x00\x03\x00\x15\x00\x0b\x00\x03\x00\x0d\x00\x0e\x00\x07\x00\x06\x00\x15\x00\x1f\x00\x0f\x00\x22\x00\x1d\x00\x22\x00\x1f\x00\x20\x00\x24\x00\x22\x00\x24\x00\x22\x00\x22\x00\x03\x00\x1f\x00\x20\x00\x1b\x00\x22\x00\x22\x00\x1b\x00\x00\x00\x01\x00\x1f\x00\x03\x00\x00\x00\x01\x00\x17\x00\x03\x00\x1a\x00\x15\x00\x00\x00\x01\x00\x16\x00\x03\x00\x0e\x00\x0f\x00\x22\x00\x22\x00\x0e\x00\x0f\x00\x03\x00\x13\x00\x03\x00\x17\x00\x0e\x00\x0f\x00\x03\x00\x17\x00\x00\x00\x01\x00\x0b\x00\x03\x00\x09\x00\x17\x00\x00\x00\x01\x00\x03\x00\x03\x00\x0b\x00\x16\x00\x0d\x00\x16\x00\x0e\x00\x0f\x00\x0b\x00\x03\x00\x03\x00\x03\x00\x0e\x00\x0f\x00\x03\x00\x17\x00\x22\x00\x0b\x00\x24\x00\x16\x00\x09\x00\x17\x00\x1f\x00\x20\x00\x21\x00\x22\x00\x15\x00\x11\x00\x16\x00\x16\x00\x16\x00\x00\x00\x01\x00\x14\x00\x03\x00\x00\x00\x01\x00\x11\x00\x03\x00\x00\x00\x01\x00\x1f\x00\x03\x00\x10\x00\x0c\x00\x0e\x00\x0f\x00\x22\x00\x19\x00\x0e\x00\x0f\x00\x1f\x00\x19\x00\x0e\x00\x0f\x00\x00\x00\x01\x00\x22\x00\x03\x00\x00\x00\x01\x00\x02\x00\x03\x00\x00\x00\x01\x00\x02\x00\x03\x00\x11\x00\x01\x00\x0e\x00\x0f\x00\x04\x00\x0d\x00\x10\x00\x07\x00\x08\x00\x0d\x00\x00\x00\x01\x00\x02\x00\x03\x00\x03\x00\x19\x00\x1a\x00\x10\x00\x03\x00\x10\x00\x15\x00\x0a\x00\x05\x00\x0d\x00\x1b\x00\x0a\x00\x19\x00\x1a\x00\x19\x00\x1a\x00\x01\x00\x22\x00\x14\x00\x04\x00\x01\x00\x02\x00\x07\x00\x04\x00\x01\x00\x0a\x00\x07\x00\x04\x00\x1c\x00\x0c\x00\x07\x00\x03\x00\x03\x00\x1f\x00\x22\x00\x12\x00\x08\x00\x08\x00\x24\x00\x03\x00\x18\x00\x03\x00\x18\x00\x07\x00\x1c\x00\x07\x00\x1c\x00\x03\x00\x18\x00\x0c\x00\x1e\x00\x07\x00\x1c\x00\x0c\x00\x22\x00\x18\x00\x18\x00\x12\x00\x12\x00\x03\x00\x0c\x00\x00\x00\x0c\x00\x03\x00\x1d\x00\x00\x00\x03\x00\x19\x00\x19\x00\x18\x00\x03\x00\x03\x00\x01\x00\x01\x00\x0c\x00\x1d\x00\x06\x00\x1e\x00\x00\x00\x1e\x00\x1d\x00\x0c\x00\x19\x00\x18\x00\x05\x00\x15\x00\x14\x00\x06\x00\x0c\x00\x04\x00\x03\x00\x11\x00\x13\x00\x12\x00\x08\x00\x03\x00\x08\x00\x02\x00\x15\x00\x13\x00\x02\x00\x02\x00\x06\x00\x02\x00\x02\x00\x16\x00\x03\x00\x03\x00\x08\x00\x10\x00\x03\x00\x03\x00\x0f\x00\x03\x00\x03\x00\x03\x00\x22\x00\x04\x00\x22\x00\x05\x00\x1f\x00\x01\x00\x04\x00\xff\xff\x22\x00\x22\x00\xff\xff\x06\x00\x16\x00\x07\x00\x24\x00\x01\x00\x06\x00\x09\x00\xff\xff\xff\xff\x1f\x00\x0a\x00\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\x22\x00\x09\x00\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\x22\x00\x24\x00\xff\xff\x24\x00\x12\x00\x24\x00\xff\xff\xff\xff\x12\x00\x24\x00\x12\x00\x24\x00\xff\xff\x20\x00\x24\x00\x24\x00\x22\x00\x1d\x00\xff\xff\x24\x00\x24\x00\x20\x00\x15\x00\x24\x00\x13\x00\xff\xff\x1f\x00\x24\x00\x18\x00\x24\x00\x24\x00\x22\x00\x24\x00\x22\x00\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff"#
+happyCheck = HappyA# "\xff\xff\x03\x00\x01\x00\x18\x00\x07\x00\x03\x00\x01\x00\x1c\x00\x07\x00\x05\x00\x07\x00\x0a\x00\x07\x00\x0c\x00\x0d\x00\x0a\x00\x04\x00\x0c\x00\x0d\x00\x07\x00\x05\x00\x03\x00\x03\x00\x03\x00\x16\x00\x1b\x00\x13\x00\x1d\x00\x03\x00\x20\x00\x15\x00\x1e\x00\x03\x00\x20\x00\x21\x00\x20\x00\x23\x00\x20\x00\x21\x00\x23\x00\x23\x00\x0a\x00\x16\x00\x0c\x00\x23\x00\x1b\x00\x1b\x00\x1d\x00\x1d\x00\x25\x00\x23\x00\x18\x00\x1b\x00\x10\x00\x1d\x00\x15\x00\x1b\x00\x00\x00\x01\x00\x03\x00\x03\x00\x10\x00\x23\x00\x20\x00\x21\x00\x22\x00\x23\x00\x00\x00\x01\x00\x20\x00\x03\x00\x0e\x00\x0f\x00\x00\x00\x01\x00\x03\x00\x03\x00\x20\x00\x16\x00\x15\x00\x17\x00\x0e\x00\x0f\x00\x00\x00\x01\x00\x0b\x00\x03\x00\x0e\x00\x0f\x00\x0c\x00\x17\x00\x11\x00\x12\x00\x00\x00\x16\x00\x1b\x00\x17\x00\x0e\x00\x0f\x00\x00\x00\x01\x00\x16\x00\x03\x00\x23\x00\x00\x00\x01\x00\x17\x00\x03\x00\x0f\x00\x00\x00\x01\x00\x10\x00\x03\x00\x0e\x00\x0f\x00\x23\x00\x25\x00\x25\x00\x0e\x00\x0f\x00\x19\x00\x1a\x00\x17\x00\x0e\x00\x0f\x00\x00\x00\x01\x00\x03\x00\x03\x00\x00\x00\x01\x00\x07\x00\x03\x00\x00\x00\x01\x00\x04\x00\x03\x00\x10\x00\x07\x00\x0e\x00\x0f\x00\x03\x00\x1c\x00\x0e\x00\x0f\x00\x07\x00\x19\x00\x0e\x00\x0f\x00\x23\x00\x13\x00\x00\x00\x01\x00\x02\x00\x03\x00\x00\x00\x01\x00\x02\x00\x03\x00\x03\x00\x10\x00\x03\x00\x10\x00\x15\x00\x0d\x00\x1a\x00\x0a\x00\x09\x00\x0d\x00\x19\x00\x1a\x00\x19\x00\x1a\x00\x03\x00\x23\x00\x03\x00\x1d\x00\x11\x00\x03\x00\x03\x00\x0a\x00\x09\x00\x23\x00\x08\x00\x08\x00\x20\x00\x06\x00\x05\x00\x04\x00\x18\x00\x25\x00\x07\x00\x08\x00\x1c\x00\x03\x00\x18\x00\x12\x00\x1f\x00\x07\x00\x1c\x00\x04\x00\x23\x00\x15\x00\x07\x00\x15\x00\x14\x00\x0c\x00\x0c\x00\x12\x00\x03\x00\x18\x00\x18\x00\x00\x00\x0b\x00\x19\x00\x0c\x00\x0b\x00\x19\x00\x00\x00\x03\x00\x03\x00\x01\x00\x03\x00\x1e\x00\x01\x00\x0c\x00\x00\x00\x06\x00\x1e\x00\x19\x00\x15\x00\x18\x00\x16\x00\x13\x00\x0c\x00\x14\x00\x06\x00\x0c\x00\x05\x00\x0b\x00\x04\x00\x03\x00\x12\x00\x08\x00\x11\x00\x03\x00\x02\x00\x08\x00\x02\x00\x14\x00\x02\x00\x02\x00\x0f\x00\x08\x00\x02\x00\x17\x00\x06\x00\x03\x00\x07\x00\x02\x00\x05\x00\x08\x00\x03\x00\x03\x00\x03\x00\x03\x00\x23\x00\x03\x00\xff\xff\x23\x00\x0e\x00\x08\x00\x20\x00\x07\x00\x04\x00\x01\x00\x23\x00\x04\x00\x23\x00\xff\xff\xff\xff\xff\xff\x23\x00\x06\x00\xff\xff\x07\x00\x01\x00\xff\xff\x06\x00\x09\x00\x17\x00\xff\xff\xff\xff\x23\x00\xff\xff\xff\xff\xff\xff\x20\x00\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\x23\x00\xff\xff\xff\xff\x25\x00\x23\x00\x25\x00\x12\x00\x09\x00\xff\xff\x25\x00\x25\x00\x12\x00\x12\x00\x25\x00\x12\x00\x25\x00\x23\x00\x25\x00\x21\x00\x23\x00\x25\x00\x1e\x00\x21\x00\x25\x00\x25\x00\x07\x00\xff\xff\x25\x00\x16\x00\x25\x00\x14\x00\x20\x00\x25\x00\x19\x00\x25\x00\x23\x00\xff\xff\x23\x00\x25\x00\x23\x00\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff"#
 
 happyTable :: HappyAddr
-happyTable = HappyA# "\x00\x00\xcb\x00\x4a\x00\x30\x00\xa9\x00\x4b\x00\xa4\x00\xc9\x00\x4c\x00\x31\x00\xc3\x00\x30\x00\x99\x00\x32\x00\x29\x00\x33\x00\x34\x00\x31\x00\x4f\x00\x21\x00\x59\x00\x32\x00\x21\x00\x33\x00\x34\x00\x3f\x00\x6c\x00\xc7\x00\x1d\x00\x3d\x00\x24\x00\x6c\x00\x24\x00\x1d\x00\x35\x00\xff\xff\x24\x00\xff\xff\x24\x00\x24\x00\x35\x00\x1d\x00\x35\x00\x7f\x00\x24\x00\x24\x00\x22\x00\x29\x00\x2a\x00\x1d\x00\x2b\x00\x29\x00\x2a\x00\xb3\x00\x2b\x00\xc5\x00\xc5\x00\x29\x00\x2a\x00\xa0\x00\x2b\x00\x2c\x00\x2d\x00\x24\x00\x24\x00\x2c\x00\x2d\x00\x35\x00\xbf\x00\x35\x00\x87\x00\x2c\x00\x2d\x00\x51\x00\x72\x00\x75\x00\x2a\x00\x84\x00\x2b\x00\x6f\x00\x74\x00\x29\x00\x2a\x00\x35\x00\x2b\x00\x46\x00\x8d\x00\x47\x00\x4d\x00\x76\x00\x2d\x00\x9a\x00\x35\x00\x35\x00\x35\x00\x2c\x00\x2d\x00\x51\x00\x77\x00\x24\x00\x4c\x00\xff\xff\x4d\x00\x52\x00\x2e\x00\x1d\x00\x35\x00\x48\x00\x24\x00\xc1\x00\xaf\xff\x4d\x00\x96\x00\x36\x00\x29\x00\x2a\x00\xbd\x00\x2b\x00\x29\x00\x2a\x00\x7c\x00\x2b\x00\x29\x00\x2a\x00\xaf\xff\x2b\x00\x3c\x00\x79\x00\xa9\x00\x2d\x00\x24\x00\xb7\x00\xaa\x00\x2d\x00\x1d\x00\x25\x00\x99\x00\x2d\x00\x29\x00\x2a\x00\x24\x00\x2b\x00\x40\x00\x41\x00\x42\x00\x43\x00\x40\x00\x41\x00\x42\x00\x43\x00\xc3\x00\x4a\x00\x3f\x00\x2d\x00\x4b\x00\xae\x00\x24\x00\x4c\x00\xbb\x00\x68\x00\x40\x00\x41\x00\x42\x00\x43\x00\x4f\x00\x25\x00\xad\x00\x24\x00\x4f\x00\x24\x00\xbb\x00\x70\x00\xbd\x00\x44\x00\xc7\x00\x50\x00\x25\x00\x85\x00\x25\x00\x26\x00\x4a\x00\x24\x00\xb5\x00\x4b\x00\x4a\x00\xa8\x00\x4c\x00\x4b\x00\x4a\x00\x7f\x00\x4c\x00\x4b\x00\xc1\x00\x8a\x00\x4c\x00\x53\x00\x53\x00\x1d\x00\x24\x00\x79\x00\x6e\x00\x54\x00\xff\xff\x55\x00\x1f\x00\x55\x00\x1f\x00\x6d\x00\x80\x00\x6d\x00\x80\x00\x55\x00\x1f\x00\x79\x00\xc9\x00\x56\x00\x20\x00\xb0\x00\x24\x00\xb7\x00\xaf\x00\xb1\x00\xa1\x00\xa5\x00\x79\x00\x7a\x00\x83\x00\x97\x00\x9b\x00\x9c\x00\x5d\x00\x86\x00\x93\x00\x94\x00\x5f\x00\x69\x00\x6a\x00\x73\x00\x79\x00\x64\x00\x6c\x00\x67\x00\x7a\x00\x1d\x00\x1e\x00\x79\x00\x27\x00\x28\x00\x59\x00\x37\x00\x38\x00\x57\x00\x48\x00\x5b\x00\xbf\x00\x3b\x00\x39\x00\x3a\x00\xba\x00\xb5\x00\xb9\x00\xac\x00\x59\x00\x5b\x00\xad\x00\xb4\x00\xa5\x00\xa7\x00\x89\x00\xa3\x00\x82\x00\x83\x00\x8c\x00\x8b\x00\x8f\x00\x90\x00\x8d\x00\x91\x00\x92\x00\x93\x00\x24\x00\x9e\x00\x24\x00\x96\x00\x1d\x00\xa0\x00\x5f\x00\x00\x00\x24\x00\x24\x00\x00\x00\x61\x00\x9f\x00\x62\x00\xff\xff\x67\x00\x64\x00\x63\x00\x00\x00\x00\x00\x1d\x00\x66\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x24\x00\x7e\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x24\x00\xff\xff\x00\x00\xff\xff\x72\x00\xff\xff\x00\x00\x00\x00\x79\x00\xff\xff\x7d\x00\xff\xff\x00\x00\x35\x00\xff\xff\xff\xff\x24\x00\x6c\x00\x00\x00\xff\xff\xff\xff\x35\x00\x59\x00\xff\xff\x5b\x00\x00\x00\x1d\x00\xff\xff\x5d\x00\xff\xff\xff\xff\x24\x00\xad\xff\x24\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00"#
+happyTable = HappyA# "\x00\x00\x1e\x00\x31\x00\x22\x00\xa4\x00\x36\x00\x31\x00\x7d\x00\x32\x00\xc8\x00\x40\x00\x33\x00\x32\x00\x34\x00\x35\x00\x33\x00\x4b\x00\x34\x00\x35\x00\x4c\x00\xc0\x00\x1e\x00\x1e\x00\x36\x00\x9c\x00\x1f\x00\xbc\x00\x80\x00\x1e\x00\x1d\x00\xba\x00\x69\x00\x1e\x00\x1d\x00\x36\x00\x1d\x00\x22\x00\x1d\x00\x36\x00\x22\x00\x22\x00\x47\x00\x8b\x00\x48\x00\x22\x00\x1f\x00\x1f\x00\x97\x00\x63\x00\xff\xff\x22\x00\xb0\x00\x1f\x00\xb0\xff\x20\x00\xc6\x00\x24\x00\x2a\x00\x2b\x00\x36\x00\x2c\x00\x79\x00\x22\x00\x1d\x00\x36\x00\x49\x00\x22\x00\x2a\x00\x2b\x00\xb0\xff\x2c\x00\x2d\x00\x2e\x00\x2a\x00\x2b\x00\x36\x00\x2c\x00\x1d\x00\x93\x00\xc4\x00\x84\x00\x2d\x00\x2e\x00\x72\x00\x2b\x00\x87\x00\x2c\x00\x2d\x00\x2e\x00\x76\x00\x6f\x00\x88\x00\x76\x00\x2a\x00\x37\x00\xc2\x00\x71\x00\x73\x00\x2e\x00\x2a\x00\x2b\x00\x58\x00\x2c\x00\x22\x00\x2a\x00\x2b\x00\x74\x00\x2c\x00\x3e\x00\x2a\x00\x2b\x00\x25\x00\x2c\x00\x2d\x00\x2e\x00\x22\x00\xff\xff\xff\xff\xa4\x00\x2e\x00\x26\x00\xaa\x00\x2f\x00\xa5\x00\x2e\x00\x2a\x00\x2b\x00\x54\x00\x2c\x00\x2a\x00\x2b\x00\x6a\x00\x2c\x00\x2a\x00\x2b\x00\x4b\x00\x2c\x00\x3d\x00\x4c\x00\xa6\x00\x2e\x00\x54\x00\xc4\x00\x95\x00\x2e\x00\x6a\x00\x26\x00\x40\x00\x2e\x00\x22\x00\x7b\x00\x41\x00\x42\x00\x43\x00\x44\x00\x41\x00\x42\x00\x43\x00\x44\x00\x4e\x00\x25\x00\x50\x00\x25\x00\xc2\x00\xab\x00\xb4\x00\x6d\x00\x6c\x00\x45\x00\x26\x00\x82\x00\x26\x00\x27\x00\x4e\x00\x22\x00\x50\x00\xbe\x00\xc0\x00\x52\x00\x52\x00\x4f\x00\x51\x00\x22\x00\x6b\x00\x53\x00\x1d\x00\x69\x00\xba\x00\x4b\x00\x22\x00\xff\xff\x4c\x00\xb8\x00\x7d\x00\x54\x00\x22\x00\xae\x00\xc6\x00\x55\x00\x23\x00\x4b\x00\x22\x00\xbe\x00\x4c\x00\xb8\x00\xb2\x00\x76\x00\xad\x00\x9d\x00\xa1\x00\xb4\x00\xac\x00\x77\x00\x7f\x00\x83\x00\x81\x00\x96\x00\x91\x00\x98\x00\x5c\x00\x5e\x00\x67\x00\x66\x00\x65\x00\x70\x00\x76\x00\x77\x00\x69\x00\x1d\x00\x28\x00\x38\x00\x29\x00\x58\x00\x3a\x00\x76\x00\x39\x00\x56\x00\x49\x00\x58\x00\x4c\x00\x5a\x00\xbc\x00\x3b\x00\xb7\x00\x3c\x00\xb2\x00\xa8\x00\xb6\x00\xa9\x00\x5a\x00\xaa\x00\xb1\x00\x89\x00\xa0\x00\xa3\x00\x9f\x00\xa1\x00\x7f\x00\x4e\x00\x86\x00\x93\x00\x8a\x00\x8d\x00\x8e\x00\x8f\x00\x90\x00\x22\x00\x91\x00\x00\x00\x22\x00\x8b\x00\x95\x00\x1d\x00\x4e\x00\x9a\x00\x9c\x00\x22\x00\x5e\x00\x22\x00\x00\x00\x00\x00\x00\x00\x22\x00\x60\x00\x00\x00\x61\x00\x65\x00\x00\x00\x63\x00\x62\x00\x9b\x00\x00\x00\x00\x00\x22\x00\x00\x00\x00\x00\x00\x00\x1d\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x22\x00\x00\x00\x00\x00\xff\xff\x22\x00\xff\xff\x6f\x00\x7d\x00\x00\x00\xff\xff\xff\xff\x76\x00\x7a\x00\xff\xff\x7c\x00\xff\xff\x22\x00\xff\xff\x36\x00\x22\x00\xff\xff\x69\x00\x36\x00\xff\xff\xff\xff\x4e\x00\x00\x00\xff\xff\x58\x00\xff\xff\x5a\x00\x1d\x00\xff\xff\x5c\x00\xff\xff\x22\x00\x00\x00\x22\x00\xae\xff\x22\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00"#
 
 happyReduceArr = array (27, 90) [
 	(27 , happyReduce_27),
@@ -293,31 +289,31 @@ happyReduceArr = array (27, 90) [
 	(90 , happyReduce_90)
 	]
 
-happy_n_terms = 37 :: Int
+happy_n_terms = 38 :: Int
 happy_n_nonterms = 31 :: Int
 
-happyReduce_27 = happySpecReduce_1  0# happyReduction_27
+happyReduce_27 = happySpecReduce_1 0# happyReduction_27
 happyReduction_27 happy_x_1
 	 =  case happyOutTok happy_x_1 of { (PT _ (TL happy_var_1)) -> 
 	happyIn30
 		 (happy_var_1
 	)}
 
-happyReduce_28 = happySpecReduce_1  1# happyReduction_28
+happyReduce_28 = happySpecReduce_1 1# happyReduction_28
 happyReduction_28 happy_x_1
 	 =  case happyOutTok happy_x_1 of { (PT _ (TI happy_var_1)) -> 
 	happyIn31
 		 ((read happy_var_1) :: Integer
 	)}
 
-happyReduce_29 = happySpecReduce_1  2# happyReduction_29
+happyReduce_29 = happySpecReduce_1 2# happyReduction_29
 happyReduction_29 happy_x_1
 	 =  case happyOutTok happy_x_1 of { (PT _ (TD happy_var_1)) -> 
 	happyIn32
 		 ((read happy_var_1) :: Double
 	)}
 
-happyReduce_30 = happySpecReduce_1  3# happyReduction_30
+happyReduce_30 = happySpecReduce_1 3# happyReduction_30
 happyReduction_30 happy_x_1
 	 =  case happyOutTok happy_x_1 of { (PT _ (T_CId happy_var_1)) -> 
 	happyIn33
@@ -390,7 +386,7 @@ happyReduction_33 (happy_x_16 `HappyStk`
 		 (Cnc happy_var_2 (reverse happy_var_5) (reverse happy_var_7) (reverse happy_var_9) (reverse happy_var_11) (reverse happy_var_13) (reverse happy_var_15)
 	) `HappyStk` happyRest}}}}}}}
 
-happyReduce_34 = happySpecReduce_3  7# happyReduction_34
+happyReduce_34 = happySpecReduce_3 7# happyReduction_34
 happyReduction_34 happy_x_3
 	happy_x_2
 	happy_x_1
@@ -409,7 +405,7 @@ happyReduction_35 (happy_x_4 `HappyStk`
 	 = case happyOut33 happy_x_1 of { happy_var_1 -> 
 	case happyOut59 happy_x_3 of { happy_var_3 -> 
 	happyIn38
-		 (Cat happy_var_1 (reverse happy_var_3)
+		 (Cat happy_var_1 happy_var_3
 	) `HappyStk` happyRest}}
 
 happyReduce_36 = happyReduce 5# 9# happyReduction_36
@@ -426,7 +422,7 @@ happyReduction_36 (happy_x_5 `HappyStk`
 		 (Fun happy_var_1 happy_var_3 happy_var_5
 	) `HappyStk` happyRest}}}
 
-happyReduce_37 = happySpecReduce_3  10# happyReduction_37
+happyReduce_37 = happySpecReduce_3 10# happyReduction_37
 happyReduction_37 happy_x_3
 	happy_x_2
 	happy_x_1
@@ -436,18 +432,8 @@ happyReduction_37 happy_x_3
 		 (Lin happy_var_1 happy_var_3
 	)}}
 
-happyReduce_38 = happySpecReduce_3  11# happyReduction_38
-happyReduction_38 happy_x_3
-	happy_x_2
-	happy_x_1
-	 =  case happyOut52 happy_x_1 of { happy_var_1 -> 
-	case happyOut33 happy_x_3 of { happy_var_3 -> 
-	happyIn41
-		 (Typ happy_var_1 happy_var_3
-	)}}
-
-happyReduce_39 = happyReduce 5# 11# happyReduction_39
-happyReduction_39 (happy_x_5 `HappyStk`
+happyReduce_38 = happyReduce 5# 11# happyReduction_38
+happyReduction_38 (happy_x_5 `HappyStk`
 	happy_x_4 `HappyStk`
 	happy_x_3 `HappyStk`
 	happy_x_2 `HappyStk`
@@ -457,23 +443,11 @@ happyReduction_39 (happy_x_5 `HappyStk`
 	case happyOut33 happy_x_4 of { happy_var_4 -> 
 	case happyOut54 happy_x_5 of { happy_var_5 -> 
 	happyIn41
-		 (DTyp (reverse happy_var_2) happy_var_4 (reverse happy_var_5)
+		 (DTyp happy_var_2 happy_var_4 (reverse happy_var_5)
 	) `HappyStk` happyRest}}}
 
-happyReduce_40 = happyReduce 4# 12# happyReduction_40
-happyReduction_40 (happy_x_4 `HappyStk`
-	happy_x_3 `HappyStk`
-	happy_x_2 `HappyStk`
-	happy_x_1 `HappyStk`
-	happyRest)
-	 = case happyOut43 happy_x_2 of { happy_var_2 -> 
-	case happyOut54 happy_x_3 of { happy_var_3 -> 
-	happyIn42
-		 (Tr happy_var_2 (reverse happy_var_3)
-	) `HappyStk` happyRest}}
-
-happyReduce_41 = happyReduce 7# 12# happyReduction_41
-happyReduction_41 (happy_x_7 `HappyStk`
+happyReduce_39 = happyReduce 7# 12# happyReduction_39
+happyReduction_39 (happy_x_7 `HappyStk`
 	happy_x_6 `HappyStk`
 	happy_x_5 `HappyStk`
 	happy_x_4 `HappyStk`
@@ -488,8 +462,8 @@ happyReduction_41 (happy_x_7 `HappyStk`
 		 (DTr happy_var_3 happy_var_5 (reverse happy_var_6)
 	) `HappyStk` happyRest}}}
 
-happyReduce_42 = happySpecReduce_3  12# happyReduction_42
-happyReduction_42 happy_x_3
+happyReduce_40 = happySpecReduce_3 12# happyReduction_40
+happyReduction_40 happy_x_3
 	happy_x_2
 	happy_x_1
 	 =  case happyOut60 happy_x_2 of { happy_var_2 -> 
@@ -497,52 +471,52 @@ happyReduction_42 happy_x_3
 		 (EEq (reverse happy_var_2)
 	)}
 
-happyReduce_43 = happySpecReduce_1  13# happyReduction_43
-happyReduction_43 happy_x_1
+happyReduce_41 = happySpecReduce_1 13# happyReduction_41
+happyReduction_41 happy_x_1
 	 =  case happyOut33 happy_x_1 of { happy_var_1 -> 
 	happyIn43
 		 (AC happy_var_1
 	)}
 
-happyReduce_44 = happySpecReduce_1  13# happyReduction_44
-happyReduction_44 happy_x_1
+happyReduce_42 = happySpecReduce_1 13# happyReduction_42
+happyReduction_42 happy_x_1
 	 =  case happyOut30 happy_x_1 of { happy_var_1 -> 
 	happyIn43
 		 (AS happy_var_1
 	)}
 
-happyReduce_45 = happySpecReduce_1  13# happyReduction_45
-happyReduction_45 happy_x_1
+happyReduce_43 = happySpecReduce_1 13# happyReduction_43
+happyReduction_43 happy_x_1
 	 =  case happyOut31 happy_x_1 of { happy_var_1 -> 
 	happyIn43
 		 (AI happy_var_1
 	)}
 
-happyReduce_46 = happySpecReduce_1  13# happyReduction_46
-happyReduction_46 happy_x_1
+happyReduce_44 = happySpecReduce_1 13# happyReduction_44
+happyReduction_44 happy_x_1
 	 =  case happyOut32 happy_x_1 of { happy_var_1 -> 
 	happyIn43
 		 (AF happy_var_1
 	)}
 
-happyReduce_47 = happySpecReduce_2  13# happyReduction_47
-happyReduction_47 happy_x_2
+happyReduce_45 = happySpecReduce_2 13# happyReduction_45
+happyReduction_45 happy_x_2
 	happy_x_1
 	 =  case happyOut31 happy_x_2 of { happy_var_2 -> 
 	happyIn43
 		 (AM happy_var_2
 	)}
 
-happyReduce_48 = happySpecReduce_2  13# happyReduction_48
-happyReduction_48 happy_x_2
+happyReduce_46 = happySpecReduce_2 13# happyReduction_46
+happyReduction_46 happy_x_2
 	happy_x_1
 	 =  case happyOut33 happy_x_2 of { happy_var_2 -> 
 	happyIn43
 		 (AV happy_var_2
 	)}
 
-happyReduce_49 = happySpecReduce_3  14# happyReduction_49
-happyReduction_49 happy_x_3
+happyReduce_47 = happySpecReduce_3 14# happyReduction_47
+happyReduction_47 happy_x_3
 	happy_x_2
 	happy_x_1
 	 =  case happyOut53 happy_x_2 of { happy_var_2 -> 
@@ -550,8 +524,8 @@ happyReduction_49 happy_x_3
 		 (R happy_var_2
 	)}
 
-happyReduce_50 = happyReduce 5# 14# happyReduction_50
-happyReduction_50 (happy_x_5 `HappyStk`
+happyReduce_48 = happyReduce 5# 14# happyReduction_48
+happyReduction_48 (happy_x_5 `HappyStk`
 	happy_x_4 `HappyStk`
 	happy_x_3 `HappyStk`
 	happy_x_2 `HappyStk`
@@ -563,8 +537,8 @@ happyReduction_50 (happy_x_5 `HappyStk`
 		 (P happy_var_2 happy_var_4
 	) `HappyStk` happyRest}}
 
-happyReduce_51 = happySpecReduce_3  14# happyReduction_51
-happyReduction_51 happy_x_3
+happyReduce_49 = happySpecReduce_3 14# happyReduction_49
+happyReduction_49 happy_x_3
 	happy_x_2
 	happy_x_1
 	 =  case happyOut53 happy_x_2 of { happy_var_2 -> 
@@ -572,37 +546,37 @@ happyReduction_51 happy_x_3
 		 (S happy_var_2
 	)}
 
-happyReduce_52 = happySpecReduce_1  14# happyReduction_52
-happyReduction_52 happy_x_1
+happyReduce_50 = happySpecReduce_1 14# happyReduction_50
+happyReduction_50 happy_x_1
 	 =  case happyOut45 happy_x_1 of { happy_var_1 -> 
 	happyIn44
 		 (K happy_var_1
 	)}
 
-happyReduce_53 = happySpecReduce_2  14# happyReduction_53
-happyReduction_53 happy_x_2
+happyReduce_51 = happySpecReduce_2 14# happyReduction_51
+happyReduction_51 happy_x_2
 	happy_x_1
 	 =  case happyOut31 happy_x_2 of { happy_var_2 -> 
 	happyIn44
 		 (V (fromInteger happy_var_2) --H
 	)}
 
-happyReduce_54 = happySpecReduce_1  14# happyReduction_54
-happyReduction_54 happy_x_1
+happyReduce_52 = happySpecReduce_1 14# happyReduction_52
+happyReduction_52 happy_x_1
 	 =  case happyOut31 happy_x_1 of { happy_var_1 -> 
 	happyIn44
 		 (C (fromInteger happy_var_1) --H
 	)}
 
-happyReduce_55 = happySpecReduce_1  14# happyReduction_55
-happyReduction_55 happy_x_1
+happyReduce_53 = happySpecReduce_1 14# happyReduction_53
+happyReduction_53 happy_x_1
 	 =  case happyOut33 happy_x_1 of { happy_var_1 -> 
 	happyIn44
 		 (F happy_var_1
 	)}
 
-happyReduce_56 = happySpecReduce_3  14# happyReduction_56
-happyReduction_56 happy_x_3
+happyReduce_54 = happySpecReduce_3 14# happyReduction_54
+happyReduction_54 happy_x_3
 	happy_x_2
 	happy_x_1
 	 =  case happyOut53 happy_x_2 of { happy_var_2 -> 
@@ -610,8 +584,8 @@ happyReduction_56 happy_x_3
 		 (FV happy_var_2
 	)}
 
-happyReduce_57 = happyReduce 5# 14# happyReduction_57
-happyReduction_57 (happy_x_5 `HappyStk`
+happyReduce_55 = happyReduce 5# 14# happyReduction_55
+happyReduction_55 (happy_x_5 `HappyStk`
 	happy_x_4 `HappyStk`
 	happy_x_3 `HappyStk`
 	happy_x_2 `HappyStk`
@@ -623,21 +597,34 @@ happyReduction_57 (happy_x_5 `HappyStk`
 		 (W happy_var_2 happy_var_4
 	) `HappyStk` happyRest}}
 
-happyReduce_58 = happySpecReduce_1  14# happyReduction_58
-happyReduction_58 happy_x_1
+happyReduce_56 = happySpecReduce_1 14# happyReduction_56
+happyReduction_56 happy_x_1
 	 =  happyIn44
 		 (TM
 	)
 
-happyReduce_59 = happySpecReduce_1  15# happyReduction_59
-happyReduction_59 happy_x_1
+happyReduce_57 = happyReduce 5# 14# happyReduction_57
+happyReduction_57 (happy_x_5 `HappyStk`
+	happy_x_4 `HappyStk`
+	happy_x_3 `HappyStk`
+	happy_x_2 `HappyStk`
+	happy_x_1 `HappyStk`
+	happyRest)
+	 = case happyOut44 happy_x_2 of { happy_var_2 -> 
+	case happyOut44 happy_x_4 of { happy_var_4 -> 
+	happyIn44
+		 (RP happy_var_2 happy_var_4
+	) `HappyStk` happyRest}}
+
+happyReduce_58 = happySpecReduce_1 15# happyReduction_58
+happyReduction_58 happy_x_1
 	 =  case happyOut30 happy_x_1 of { happy_var_1 -> 
 	happyIn45
 		 (KS happy_var_1
 	)}
 
-happyReduce_60 = happyReduce 7# 15# happyReduction_60
-happyReduction_60 (happy_x_7 `HappyStk`
+happyReduce_59 = happyReduce 7# 15# happyReduction_59
+happyReduction_59 (happy_x_7 `HappyStk`
 	happy_x_6 `HappyStk`
 	happy_x_5 `HappyStk`
 	happy_x_4 `HappyStk`
@@ -651,8 +638,8 @@ happyReduction_60 (happy_x_7 `HappyStk`
 		 (KP (reverse happy_var_3) happy_var_5
 	) `HappyStk` happyRest}}
 
-happyReduce_61 = happySpecReduce_3  16# happyReduction_61
-happyReduction_61 happy_x_3
+happyReduce_60 = happySpecReduce_3 16# happyReduction_60
+happyReduction_60 happy_x_3
 	happy_x_2
 	happy_x_1
 	 =  case happyOut55 happy_x_1 of { happy_var_1 -> 
@@ -661,13 +648,13 @@ happyReduction_61 happy_x_3
 		 (Var (reverse happy_var_1) (reverse happy_var_3)
 	)}}
 
-happyReduce_62 = happySpecReduce_0  17# happyReduction_62
-happyReduction_62  =  happyIn47
+happyReduce_61 = happySpecReduce_0 17# happyReduction_61
+happyReduction_61  =  happyIn47
 		 ([]
 	)
 
-happyReduce_63 = happySpecReduce_3  17# happyReduction_63
-happyReduction_63 happy_x_3
+happyReduce_62 = happySpecReduce_3 17# happyReduction_62
+happyReduction_62 happy_x_3
 	happy_x_2
 	happy_x_1
 	 =  case happyOut47 happy_x_1 of { happy_var_1 -> 
@@ -676,13 +663,13 @@ happyReduction_63 happy_x_3
 		 (flip (:) happy_var_1 happy_var_2
 	)}}
 
-happyReduce_64 = happySpecReduce_0  18# happyReduction_64
-happyReduction_64  =  happyIn48
+happyReduce_63 = happySpecReduce_0 18# happyReduction_63
+happyReduction_63  =  happyIn48
 		 ([]
 	)
 
-happyReduce_65 = happySpecReduce_3  18# happyReduction_65
-happyReduction_65 happy_x_3
+happyReduce_64 = happySpecReduce_3 18# happyReduction_64
+happyReduction_64 happy_x_3
 	happy_x_2
 	happy_x_1
 	 =  case happyOut48 happy_x_1 of { happy_var_1 -> 
@@ -691,13 +678,13 @@ happyReduction_65 happy_x_3
 		 (flip (:) happy_var_1 happy_var_2
 	)}}
 
-happyReduce_66 = happySpecReduce_0  19# happyReduction_66
-happyReduction_66  =  happyIn49
+happyReduce_65 = happySpecReduce_0 19# happyReduction_65
+happyReduction_65  =  happyIn49
 		 ([]
 	)
 
-happyReduce_67 = happySpecReduce_3  19# happyReduction_67
-happyReduction_67 happy_x_3
+happyReduce_66 = happySpecReduce_3 19# happyReduction_66
+happyReduction_66 happy_x_3
 	happy_x_2
 	happy_x_1
 	 =  case happyOut49 happy_x_1 of { happy_var_1 -> 
@@ -706,13 +693,13 @@ happyReduction_67 happy_x_3
 		 (flip (:) happy_var_1 happy_var_2
 	)}}
 
-happyReduce_68 = happySpecReduce_0  20# happyReduction_68
-happyReduction_68  =  happyIn50
+happyReduce_67 = happySpecReduce_0 20# happyReduction_67
+happyReduction_67  =  happyIn50
 		 ([]
 	)
 
-happyReduce_69 = happySpecReduce_3  20# happyReduction_69
-happyReduction_69 happy_x_3
+happyReduce_68 = happySpecReduce_3 20# happyReduction_68
+happyReduction_68 happy_x_3
 	happy_x_2
 	happy_x_1
 	 =  case happyOut50 happy_x_1 of { happy_var_1 -> 
@@ -721,13 +708,13 @@ happyReduction_69 happy_x_3
 		 (flip (:) happy_var_1 happy_var_2
 	)}}
 
-happyReduce_70 = happySpecReduce_0  21# happyReduction_70
-happyReduction_70  =  happyIn51
+happyReduce_69 = happySpecReduce_0 21# happyReduction_69
+happyReduction_69  =  happyIn51
 		 ([]
 	)
 
-happyReduce_71 = happySpecReduce_3  21# happyReduction_71
-happyReduction_71 happy_x_3
+happyReduce_70 = happySpecReduce_3 21# happyReduction_70
+happyReduction_70 happy_x_3
 	happy_x_2
 	happy_x_1
 	 =  case happyOut51 happy_x_1 of { happy_var_1 -> 
@@ -736,20 +723,20 @@ happyReduction_71 happy_x_3
 		 (flip (:) happy_var_1 happy_var_2
 	)}}
 
-happyReduce_72 = happySpecReduce_0  22# happyReduction_72
-happyReduction_72  =  happyIn52
+happyReduce_71 = happySpecReduce_0 22# happyReduction_71
+happyReduction_71  =  happyIn52
 		 ([]
 	)
 
-happyReduce_73 = happySpecReduce_1  22# happyReduction_73
-happyReduction_73 happy_x_1
+happyReduce_72 = happySpecReduce_1 22# happyReduction_72
+happyReduction_72 happy_x_1
 	 =  case happyOut33 happy_x_1 of { happy_var_1 -> 
 	happyIn52
 		 ((:[]) happy_var_1
 	)}
 
-happyReduce_74 = happySpecReduce_3  22# happyReduction_74
-happyReduction_74 happy_x_3
+happyReduce_73 = happySpecReduce_3 22# happyReduction_73
+happyReduction_73 happy_x_3
 	happy_x_2
 	happy_x_1
 	 =  case happyOut33 happy_x_1 of { happy_var_1 -> 
@@ -758,20 +745,20 @@ happyReduction_74 happy_x_3
 		 ((:) happy_var_1 happy_var_3
 	)}}
 
-happyReduce_75 = happySpecReduce_0  23# happyReduction_75
-happyReduction_75  =  happyIn53
+happyReduce_74 = happySpecReduce_0 23# happyReduction_74
+happyReduction_74  =  happyIn53
 		 ([]
 	)
 
-happyReduce_76 = happySpecReduce_1  23# happyReduction_76
-happyReduction_76 happy_x_1
+happyReduce_75 = happySpecReduce_1 23# happyReduction_75
+happyReduction_75 happy_x_1
 	 =  case happyOut44 happy_x_1 of { happy_var_1 -> 
 	happyIn53
 		 ((:[]) happy_var_1
 	)}
 
-happyReduce_77 = happySpecReduce_3  23# happyReduction_77
-happyReduction_77 happy_x_3
+happyReduce_76 = happySpecReduce_3 23# happyReduction_76
+happyReduction_76 happy_x_3
 	happy_x_2
 	happy_x_1
 	 =  case happyOut44 happy_x_1 of { happy_var_1 -> 
@@ -780,13 +767,13 @@ happyReduction_77 happy_x_3
 		 ((:) happy_var_1 happy_var_3
 	)}}
 
-happyReduce_78 = happySpecReduce_0  24# happyReduction_78
-happyReduction_78  =  happyIn54
+happyReduce_77 = happySpecReduce_0 24# happyReduction_77
+happyReduction_77  =  happyIn54
 		 ([]
 	)
 
-happyReduce_79 = happySpecReduce_2  24# happyReduction_79
-happyReduction_79 happy_x_2
+happyReduce_78 = happySpecReduce_2 24# happyReduction_78
+happyReduction_78 happy_x_2
 	happy_x_1
 	 =  case happyOut54 happy_x_1 of { happy_var_1 -> 
 	case happyOut42 happy_x_2 of { happy_var_2 -> 
@@ -794,13 +781,13 @@ happyReduction_79 happy_x_2
 		 (flip (:) happy_var_1 happy_var_2
 	)}}
 
-happyReduce_80 = happySpecReduce_0  25# happyReduction_80
-happyReduction_80  =  happyIn55
+happyReduce_79 = happySpecReduce_0 25# happyReduction_79
+happyReduction_79  =  happyIn55
 		 ([]
 	)
 
-happyReduce_81 = happySpecReduce_2  25# happyReduction_81
-happyReduction_81 happy_x_2
+happyReduce_80 = happySpecReduce_2 25# happyReduction_80
+happyReduction_80 happy_x_2
 	happy_x_1
 	 =  case happyOut55 happy_x_1 of { happy_var_1 -> 
 	case happyOut30 happy_x_2 of { happy_var_2 -> 
@@ -808,20 +795,20 @@ happyReduction_81 happy_x_2
 		 (flip (:) happy_var_1 happy_var_2
 	)}}
 
-happyReduce_82 = happySpecReduce_0  26# happyReduction_82
-happyReduction_82  =  happyIn56
+happyReduce_81 = happySpecReduce_0 26# happyReduction_81
+happyReduction_81  =  happyIn56
 		 ([]
 	)
 
-happyReduce_83 = happySpecReduce_1  26# happyReduction_83
-happyReduction_83 happy_x_1
+happyReduce_82 = happySpecReduce_1 26# happyReduction_82
+happyReduction_82 happy_x_1
 	 =  case happyOut46 happy_x_1 of { happy_var_1 -> 
 	happyIn56
 		 ((:[]) happy_var_1
 	)}
 
-happyReduce_84 = happySpecReduce_3  26# happyReduction_84
-happyReduction_84 happy_x_3
+happyReduce_83 = happySpecReduce_3 26# happyReduction_83
+happyReduction_83 happy_x_3
 	happy_x_2
 	happy_x_1
 	 =  case happyOut46 happy_x_1 of { happy_var_1 -> 
@@ -830,8 +817,8 @@ happyReduction_84 happy_x_3
 		 ((:) happy_var_1 happy_var_3
 	)}}
 
-happyReduce_85 = happySpecReduce_3  27# happyReduction_85
-happyReduction_85 happy_x_3
+happyReduce_84 = happySpecReduce_3 27# happyReduction_84
+happyReduction_84 happy_x_3
 	happy_x_2
 	happy_x_1
 	 =  case happyOut33 happy_x_1 of { happy_var_1 -> 
@@ -840,8 +827,8 @@ happyReduction_85 happy_x_3
 		 (Hyp happy_var_1 happy_var_3
 	)}}
 
-happyReduce_86 = happySpecReduce_3  28# happyReduction_86
-happyReduction_86 happy_x_3
+happyReduce_85 = happySpecReduce_3 28# happyReduction_85
+happyReduction_85 happy_x_3
 	happy_x_2
 	happy_x_1
 	 =  case happyOut54 happy_x_1 of { happy_var_1 -> 
@@ -850,27 +837,34 @@ happyReduction_86 happy_x_3
 		 (Equ (reverse happy_var_1) happy_var_3
 	)}}
 
-happyReduce_87 = happySpecReduce_0  29# happyReduction_87
-happyReduction_87  =  happyIn59
+happyReduce_86 = happySpecReduce_0 29# happyReduction_86
+happyReduction_86  =  happyIn59
 		 ([]
 	)
 
-happyReduce_88 = happySpecReduce_3  29# happyReduction_88
+happyReduce_87 = happySpecReduce_1 29# happyReduction_87
+happyReduction_87 happy_x_1
+	 =  case happyOut57 happy_x_1 of { happy_var_1 -> 
+	happyIn59
+		 ((:[]) happy_var_1
+	)}
+
+happyReduce_88 = happySpecReduce_3 29# happyReduction_88
 happyReduction_88 happy_x_3
 	happy_x_2
 	happy_x_1
-	 =  case happyOut59 happy_x_1 of { happy_var_1 -> 
-	case happyOut57 happy_x_2 of { happy_var_2 -> 
+	 =  case happyOut57 happy_x_1 of { happy_var_1 -> 
+	case happyOut59 happy_x_3 of { happy_var_3 -> 
 	happyIn59
-		 (flip (:) happy_var_1 happy_var_2
+		 ((:) happy_var_1 happy_var_3
 	)}}
 
-happyReduce_89 = happySpecReduce_0  30# happyReduction_89
+happyReduce_89 = happySpecReduce_0 30# happyReduction_89
 happyReduction_89  =  happyIn60
 		 ([]
 	)
 
-happyReduce_90 = happySpecReduce_3  30# happyReduction_90
+happyReduce_90 = happySpecReduce_3 30# happyReduction_90
 happyReduction_90 happy_x_3
 	happy_x_2
 	happy_x_1
@@ -881,7 +875,7 @@ happyReduction_90 happy_x_3
 	)}}
 
 happyNewToken action sts stk [] =
-	happyDoAction 36# notHappyAtAll action sts stk []
+	happyDoAction 37# (error "reading EOF!") action sts stk []
 
 happyNewToken action sts stk (tk:tks) =
 	let cont i = happyDoAction i tk action sts stk tks in
@@ -895,32 +889,33 @@ happyNewToken action sts stk (tk:tks) =
 	PT _ (TS "[") -> cont 7#;
 	PT _ (TS "]") -> cont 8#;
 	PT _ (TS ":") -> cont 9#;
-	PT _ (TS "->") -> cont 10#;
-	PT _ (TS "?") -> cont 11#;
-	PT _ (TS "!") -> cont 12#;
-	PT _ (TS "$") -> cont 13#;
-	PT _ (TS "[|") -> cont 14#;
-	PT _ (TS "|]") -> cont 15#;
-	PT _ (TS "+") -> cont 16#;
-	PT _ (TS "/") -> cont 17#;
+	PT _ (TS "?") -> cont 10#;
+	PT _ (TS "!") -> cont 11#;
+	PT _ (TS "$") -> cont 12#;
+	PT _ (TS "[|") -> cont 13#;
+	PT _ (TS "|]") -> cont 14#;
+	PT _ (TS "+") -> cont 15#;
+	PT _ (TS "/") -> cont 16#;
+	PT _ (TS "@") -> cont 17#;
 	PT _ (TS ",") -> cont 18#;
-	PT _ (TS "abstract") -> cont 19#;
-	PT _ (TS "cat") -> cont 20#;
-	PT _ (TS "concrete") -> cont 21#;
-	PT _ (TS "flags") -> cont 22#;
-	PT _ (TS "fun") -> cont 23#;
-	PT _ (TS "grammar") -> cont 24#;
-	PT _ (TS "lin") -> cont 25#;
-	PT _ (TS "lincat") -> cont 26#;
-	PT _ (TS "lindef") -> cont 27#;
-	PT _ (TS "oper") -> cont 28#;
-	PT _ (TS "pre") -> cont 29#;
-	PT _ (TS "printname") -> cont 30#;
-	PT _ (TL happy_dollar_dollar) -> cont 31#;
-	PT _ (TI happy_dollar_dollar) -> cont 32#;
-	PT _ (TD happy_dollar_dollar) -> cont 33#;
-	PT _ (T_CId happy_dollar_dollar) -> cont 34#;
-	_ -> cont 35#;
+	PT _ (TS "->") -> cont 19#;
+	PT _ (TS "abstract") -> cont 20#;
+	PT _ (TS "cat") -> cont 21#;
+	PT _ (TS "concrete") -> cont 22#;
+	PT _ (TS "flags") -> cont 23#;
+	PT _ (TS "fun") -> cont 24#;
+	PT _ (TS "grammar") -> cont 25#;
+	PT _ (TS "lin") -> cont 26#;
+	PT _ (TS "lincat") -> cont 27#;
+	PT _ (TS "lindef") -> cont 28#;
+	PT _ (TS "oper") -> cont 29#;
+	PT _ (TS "pre") -> cont 30#;
+	PT _ (TS "printname") -> cont 31#;
+	PT _ (TL happy_dollar_dollar) -> cont 32#;
+	PT _ (TI happy_dollar_dollar) -> cont 33#;
+	PT _ (TD happy_dollar_dollar) -> cont 34#;
+	PT _ (T_CId happy_dollar_dollar) -> cont 35#;
+	_ -> cont 36#;
 	_ -> happyError' (tk:tks)
 	}
 
@@ -1019,7 +1014,6 @@ pListEquation tks = happySomeParser where
 
 happySeq = happyDontSeq
 
-
 returnM :: a -> Err a
 returnM = return
 
@@ -1039,7 +1033,8 @@ myLexer = tokens
 {-# LINE 1 "<built-in>" #-}
 {-# LINE 1 "<command line>" #-}
 {-# LINE 1 "GenericTemplate.hs" #-}
--- Id: GenericTemplate.hs,v 1.26 2005/01/14 14:47:22 simonmar Exp 
+-- $Id$
+
 
 {-# LINE 28 "GenericTemplate.hs" #-}
 
@@ -1050,11 +1045,20 @@ data Happy_IntList = HappyCons Int# Happy_IntList
 
 
 
+
 {-# LINE 49 "GenericTemplate.hs" #-}
 
+
 {-# LINE 59 "GenericTemplate.hs" #-}
 
-{-# LINE 68 "GenericTemplate.hs" #-}
+
+
+
+
+
+
+
+
 
 infixr 9 `HappyStk`
 data HappyStk a = HappyStk a (HappyStk a)
@@ -1106,7 +1110,14 @@ happyDoAction i tk st
  	 action | check     = indexShortOffAddr happyTable off_i
 		| otherwise = indexShortOffAddr happyDefActions st
 
-{-# LINE 127 "GenericTemplate.hs" #-}
+
+
+
+
+
+
+
+
 
 
 indexShortOffAddr (HappyA# arr) off =
@@ -1188,24 +1199,10 @@ happyReduce k nt fn j tk st sts stk
 happyMonadReduce k nt fn 0# tk st sts stk
      = happyFail 0# tk st sts stk
 happyMonadReduce k nt fn j tk st sts stk =
-        happyThen1 (fn stk tk) (\r -> happyGoto nt j tk st1 sts1 (r `HappyStk` drop_stk))
-       where sts1@((HappyCons (st1@(action)) (_))) = happyDrop k (HappyCons (st) (sts))
-             drop_stk = happyDropStk k stk
-
-happyMonad2Reduce k nt fn 0# tk st sts stk
-     = happyFail 0# tk st sts stk
-happyMonad2Reduce k nt fn j tk st sts stk =
-       happyThen1 (fn stk tk) (\r -> happyNewToken new_state sts1 (r `HappyStk` drop_stk))
+        happyThen1 (fn stk) (\r -> happyGoto nt j tk st1 sts1 (r `HappyStk` drop_stk))
        where sts1@((HappyCons (st1@(action)) (_))) = happyDrop k (HappyCons (st) (sts))
              drop_stk = happyDropStk k stk
 
-             off    = indexShortOffAddr happyGotoOffsets st1
-             off_i  = (off +# nt)
-             new_state = indexShortOffAddr happyTable off_i
-
-
-
-
 happyDrop 0# l = l
 happyDrop n (HappyCons (_) (t)) = happyDrop (n -# (1# :: Int#)) t
author	aarne <aarne@cs.chalmers.se>	2007-10-05 09:02:47 +0000
committer	aarne <aarne@cs.chalmers.se>	2007-10-05 09:02:47 +0000
commit	945a49214bd49fb082e8f613fc68d192a1b38743 (patch)
tree	4d6582426ea0bb5458b12a74a1c7c86fc0981553 /src/GF/GFCC/ParGFCC.hs
parent	cc104236df63dafebaf87612aa379156cf914063 (diff)