diff options
Diffstat (limited to 'src/GF/Source')
| -rw-r--r-- | src/GF/Source/AbsGF.hs | 1 | ||||
| -rw-r--r-- | src/GF/Source/GF.cf | 1 | ||||
| -rw-r--r-- | src/GF/Source/GrammarToSource.hs | 1 | ||||
| -rw-r--r-- | src/GF/Source/LexGF.hs | 148 | ||||
| -rw-r--r-- | src/GF/Source/LexGF.x | 52 | ||||
| -rw-r--r-- | src/GF/Source/ParGF.hs | 408 | ||||
| -rw-r--r-- | src/GF/Source/PrintGF.hs | 1 | ||||
| -rw-r--r-- | src/GF/Source/SkelGF.hs | 1 | ||||
| -rw-r--r-- | src/GF/Source/SourceToGrammar.hs | 2 | ||||
| -rw-r--r-- | src/GF/Source/TestGF.hs | 28 |
10 files changed, 325 insertions, 318 deletions
diff --git a/src/GF/Source/AbsGF.hs b/src/GF/Source/AbsGF.hs index 0a14d2e98..5a144f20f 100644 --- a/src/GF/Source/AbsGF.hs +++ b/src/GF/Source/AbsGF.hs @@ -167,6 +167,7 @@ data Exp = | EQCons Ident Ident | EApp Exp Exp | ETable [Case] + | EVTable Exp [Exp] | ETTable Exp [Case] | ECase Exp [Case] | EVariants [Exp] diff --git a/src/GF/Source/GF.cf b/src/GF/Source/GF.cf index d6170a6e7..98eeb7498 100644 --- a/src/GF/Source/GF.cf +++ b/src/GF/Source/GF.cf @@ -160,6 +160,7 @@ EQCons. Exp3 ::= "[" Ident "." Ident "]" ; -- qualified constant EApp. Exp2 ::= Exp2 Exp3 ; ETable. Exp2 ::= "table" "{" [Case] "}" ; ETTable. Exp2 ::= "table" Exp4 "{" [Case] "}" ; +EVTable. Exp2 ::= "table" Exp4 "[" [Exp] "]" ; ECase. Exp2 ::= "case" Exp "of" "{" [Case] "}" ; EVariants. Exp2 ::= "variants" "{" [Exp] "}" ; EPre. Exp2 ::= "pre" "{" Exp ";" [Altern] "}" ; diff --git a/src/GF/Source/GrammarToSource.hs b/src/GF/Source/GrammarToSource.hs index c05bd6d5f..1f4fa3888 100644 --- a/src/GF/Source/GrammarToSource.hs +++ b/src/GF/Source/GrammarToSource.hs @@ -129,6 +129,7 @@ trt trm = case trm of T (TComp ty) cc -> P.ETTable (trt ty) (map trCase cc) T (TWild ty) cc -> P.ETTable (trt ty) (map trCase cc) T _ cc -> P.ETable (map trCase cc) + V ty cc -> P.EVTable (trt ty) (map trt cc) Table x v -> P.ETType (trt x) (trt v) S f x -> P.ESelect (trt f) (trt x) diff --git a/src/GF/Source/LexGF.hs b/src/GF/Source/LexGF.hs index cda4582f0..3888a59f2 100644 --- a/src/GF/Source/LexGF.hs +++ b/src/GF/Source/LexGF.hs @@ -1,9 +1,8 @@ -{-# OPTIONS -fglasgow-exts -cpp #-} +{-# OPTIONS -cpp #-} {-# LINE 3 "LexGF.x" #-} module LexGF where import ErrM -import SharedString #if __GLASGOW_HASKELL__ >= 503 import Data.Array @@ -13,39 +12,31 @@ import Data.Array.Base (unsafeAt) import Array import Char (ord) #endif -#if __GLASGOW_HASKELL__ >= 503 -import GHC.Exts -#else -import GlaExts -#endif -alex_base :: AlexAddr -alex_base = AlexA# "\x01\x00\x15\x00\x39\x00\x3a\x00\x18\x00\x19\x00\x1a\x00\x00\x00\x44\x00\x45\x00\x1b\x00\x1c\x00\x1d\x00\x42\x00\x00\x00\x26\x00\x13\x00\x27\x00\x00\x00\x2c\x00\x2d\x00\x9c\x00\x6c\x01\x00\x00\x17\x01\xe7\x01\xd5\x00\x33\x00"# +alex_base :: Array Int Int +alex_base = listArray (0,27) [1,21,57,58,24,25,26,0,68,69,27,28,29,66,0,38,19,39,0,44,45,156,364,0,279,487,213,51] -alex_table :: AlexAddr -alex_table = AlexA# "\x00\x00\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\x0d\x00\x0d\x00\x0d\x00\x0d\x00\x0d\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\x0d\x00\x0e\x00\x18\x00\xff\xff\x0e\x00\xff\xff\xff\xff\x13\x00\x0e\x00\x0e\x00\x0f\x00\x11\x00\x0e\x00\x05\x00\x0e\x00\x0e\x00\x1b\x00\x1b\x00\x1b\x00\x1b\x00\x1b\x00\x1b\x00\x1b\x00\x1b\x00\x1b\x00\x1b\x00\x0e\x00\x0e\x00\x0e\x00\x10\x00\x0e\x00\x0e\x00\x0e\x00\x04\x00\xff\xff\xff\xff\x02\x00\x02\x00\x09\x00\x09\x00\x09\x00\x0a\x00\x0d\x00\x0d\x00\x0d\x00\x0d\x00\x0d\x00\x0e\x00\x0e\x00\x0e\x00\x12\x00\x12\x00\x00\x00\x00\x00\x0e\x00\x00\x00\x00\x00\x00\x00\x00\x00\x0e\x00\x0e\x00\x0e\x00\xff\xff\x0e\x00\xff\xff\x0d\x00\x1b\x00\x1b\x00\x1b\x00\x1b\x00\x1b\x00\x1b\x00\x1b\x00\x1b\x00\x1b\x00\x1b\x00\x00\x00\x00\x00\x00\x00\x00\x00\x09\x00\x08\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x0c\x00\x0e\x00\x0e\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\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\x06\x00\x07\x00\x16\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x00\x00\x00\x00\xff\xff\x00\x00\x00\x00\x00\x00\x00\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x19\x00\xff\xff\x00\x00\x00\x00\x16\x00\x19\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\xff\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\x19\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x17\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x19\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x19\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\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x1a\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x00\x00\x00\x00\x00\x00\x00\x00\x16\x00\x00\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\xff\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\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x17\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\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x1a\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x00\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\x00\x16\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\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\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\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"# +alex_table :: Array Int Int +alex_table = listArray (0,742) [0,-1,-1,-1,-1,-1,-1,-1,-1,-1,13,13,13,13,13,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,13,14,24,-1,14,-1,-1,19,14,14,15,17,14,5,14,14,27,27,27,27,27,27,27,27,27,27,14,14,14,16,14,14,14,4,-1,-1,2,2,9,9,9,10,13,13,13,13,13,14,14,14,18,18,0,0,14,0,0,0,0,14,14,14,-1,14,-1,13,27,27,27,27,27,27,27,27,27,27,0,0,0,0,9,8,0,0,0,0,0,0,0,0,0,12,14,14,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,6,7,22,0,0,0,0,0,0,0,0,22,22,22,22,22,22,22,22,22,22,0,0,-1,0,0,0,0,22,22,22,22,22,22,22,22,22,22,22,22,22,22,22,22,22,22,22,22,22,22,22,22,22,22,25,-1,0,0,22,25,22,22,22,22,22,22,22,22,22,22,22,22,22,22,22,22,22,22,22,22,22,22,22,22,22,22,0,0,0,0,0,0,0,0,0,0,-1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,25,0,0,0,0,0,0,0,23,0,0,0,0,0,0,0,0,0,25,0,0,0,0,0,25,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,22,22,22,22,22,22,22,22,22,22,22,22,22,22,22,22,22,22,22,22,22,22,22,26,22,22,22,22,22,22,22,22,22,22,22,22,22,22,22,22,22,22,22,22,22,22,22,22,22,22,22,22,22,22,22,22,22,22,22,22,22,22,22,22,22,22,22,22,22,22,22,22,22,22,0,0,0,0,0,0,0,22,22,22,22,22,22,22,22,22,22,22,22,22,22,22,22,22,22,22,22,22,22,22,22,22,22,0,0,0,0,22,0,22,22,22,22,22,22,22,22,22,22,22,22,22,22,22,22,22,22,22,22,22,22,22,22,22,22,0,0,0,0,0,0,0,0,0,0,-1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,23,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,22,22,22,22,22,22,22,22,22,22,22,22,22,22,22,22,22,22,22,22,22,22,22,26,22,22,22,22,22,22,22,22,22,22,22,22,22,22,22,22,22,22,22,22,22,22,22,22,22,22,22,22,22,22,22,0,22,22,22,22,22,22,22,22,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0] -alex_check :: AlexAddr -alex_check = AlexA# "\xff\xff\x00\x00\x01\x00\x02\x00\x03\x00\x04\x00\x05\x00\x06\x00\x07\x00\x08\x00\x09\x00\x0a\x00\x0b\x00\x0c\x00\x0d\x00\x0e\x00\x0f\x00\x10\x00\x11\x00\x12\x00\x13\x00\x14\x00\x15\x00\x16\x00\x17\x00\x18\x00\x19\x00\x1a\x00\x1b\x00\x1c\x00\x1d\x00\x1e\x00\x1f\x00\x20\x00\x21\x00\x22\x00\x23\x00\x24\x00\x25\x00\x26\x00\x27\x00\x28\x00\x29\x00\x2a\x00\x2b\x00\x2c\x00\x2d\x00\x2e\x00\x2f\x00\x30\x00\x31\x00\x32\x00\x33\x00\x34\x00\x35\x00\x36\x00\x37\x00\x38\x00\x39\x00\x3a\x00\x3b\x00\x3c\x00\x3d\x00\x3e\x00\x3f\x00\x40\x00\x2d\x00\x0a\x00\x0a\x00\x2d\x00\x2d\x00\x2d\x00\x2d\x00\x2d\x00\x2d\x00\x09\x00\x0a\x00\x0b\x00\x0c\x00\x0d\x00\x2a\x00\x3e\x00\x2b\x00\x27\x00\x27\x00\xff\xff\xff\xff\x3e\x00\xff\xff\xff\xff\xff\xff\xff\xff\x5b\x00\x5c\x00\x5d\x00\x5e\x00\x5f\x00\x60\x00\x20\x00\x30\x00\x31\x00\x32\x00\x33\x00\x34\x00\x35\x00\x36\x00\x37\x00\x38\x00\x39\x00\xff\xff\xff\xff\xff\xff\xff\xff\x2d\x00\x2d\x00\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\x7b\x00\x7c\x00\x7d\x00\x7e\x00\x7f\x00\x80\x00\x81\x00\x82\x00\x83\x00\x84\x00\x85\x00\x86\x00\x87\x00\x88\x00\x89\x00\x8a\x00\x8b\x00\x8c\x00\x8d\x00\x8e\x00\x8f\x00\x90\x00\x91\x00\x92\x00\x93\x00\x94\x00\x95\x00\x96\x00\x97\x00\x98\x00\x99\x00\x9a\x00\x9b\x00\x9c\x00\x9d\x00\x9e\x00\x9f\x00\xa0\x00\xa1\x00\xa2\x00\xa3\x00\xa4\x00\xa5\x00\xa6\x00\xa7\x00\xa8\x00\xa9\x00\xaa\x00\xab\x00\xac\x00\xad\x00\xae\x00\xaf\x00\xb0\x00\xb1\x00\xb2\x00\xb3\x00\xb4\x00\xb5\x00\xb6\x00\xb7\x00\xb8\x00\xb9\x00\xba\x00\xbb\x00\xbc\x00\xbd\x00\xbe\x00\xbf\x00\x7d\x00\x7d\x00\x27\x00\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\x30\x00\x31\x00\x32\x00\x33\x00\x34\x00\x35\x00\x36\x00\x37\x00\x38\x00\x39\x00\xff\xff\xff\xff\xd7\x00\xff\xff\xff\xff\xff\xff\xff\xff\x41\x00\x42\x00\x43\x00\x44\x00\x45\x00\x46\x00\x47\x00\x48\x00\x49\x00\x4a\x00\x4b\x00\x4c\x00\x4d\x00\x4e\x00\x4f\x00\x50\x00\x51\x00\x52\x00\x53\x00\x54\x00\x55\x00\x56\x00\x57\x00\x58\x00\x59\x00\x5a\x00\x22\x00\xf7\x00\xff\xff\xff\xff\x5f\x00\x27\x00\x61\x00\x62\x00\x63\x00\x64\x00\x65\x00\x66\x00\x67\x00\x68\x00\x69\x00\x6a\x00\x6b\x00\x6c\x00\x6d\x00\x6e\x00\x6f\x00\x70\x00\x71\x00\x72\x00\x73\x00\x74\x00\x75\x00\x76\x00\x77\x00\x78\x00\x79\x00\x7a\x00\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\x0a\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\x5c\x00\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\x22\x00\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\x6e\x00\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\x74\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\xc0\x00\xc1\x00\xc2\x00\xc3\x00\xc4\x00\xc5\x00\xc6\x00\xc7\x00\xc8\x00\xc9\x00\xca\x00\xcb\x00\xcc\x00\xcd\x00\xce\x00\xcf\x00\xd0\x00\xd1\x00\xd2\x00\xd3\x00\xd4\x00\xd5\x00\xd6\x00\x5c\x00\xd8\x00\xd9\x00\xda\x00\xdb\x00\xdc\x00\xdd\x00\xde\x00\xdf\x00\xe0\x00\xe1\x00\xe2\x00\xe3\x00\xe4\x00\xe5\x00\xe6\x00\xe7\x00\xe8\x00\xe9\x00\xea\x00\xeb\x00\xec\x00\xed\x00\xee\x00\xef\x00\xf0\x00\xf1\x00\xf2\x00\xf3\x00\xf4\x00\xf5\x00\xf6\x00\x27\x00\xf8\x00\xf9\x00\xfa\x00\xfb\x00\xfc\x00\xfd\x00\xfe\x00\xff\x00\x30\x00\x31\x00\x32\x00\x33\x00\x34\x00\x35\x00\x36\x00\x37\x00\x38\x00\x39\x00\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\x41\x00\x42\x00\x43\x00\x44\x00\x45\x00\x46\x00\x47\x00\x48\x00\x49\x00\x4a\x00\x4b\x00\x4c\x00\x4d\x00\x4e\x00\x4f\x00\x50\x00\x51\x00\x52\x00\x53\x00\x54\x00\x55\x00\x56\x00\x57\x00\x58\x00\x59\x00\x5a\x00\xff\xff\xff\xff\xff\xff\xff\xff\x5f\x00\xff\xff\x61\x00\x62\x00\x63\x00\x64\x00\x65\x00\x66\x00\x67\x00\x68\x00\x69\x00\x6a\x00\x6b\x00\x6c\x00\x6d\x00\x6e\x00\x6f\x00\x70\x00\x71\x00\x72\x00\x73\x00\x74\x00\x75\x00\x76\x00\x77\x00\x78\x00\x79\x00\x7a\x00\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\x0a\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\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\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xc0\x00\xc1\x00\xc2\x00\xc3\x00\xc4\x00\xc5\x00\xc6\x00\xc7\x00\xc8\x00\xc9\x00\xca\x00\xcb\x00\xcc\x00\xcd\x00\xce\x00\xcf\x00\xd0\x00\xd1\x00\xd2\x00\xd3\x00\xd4\x00\xd5\x00\xd6\x00\x5c\x00\xd8\x00\xd9\x00\xda\x00\xdb\x00\xdc\x00\xdd\x00\xde\x00\xdf\x00\xe0\x00\xe1\x00\xe2\x00\xe3\x00\xe4\x00\xe5\x00\xe6\x00\xe7\x00\xe8\x00\xe9\x00\xea\x00\xeb\x00\xec\x00\xed\x00\xee\x00\xef\x00\xf0\x00\xf1\x00\xf2\x00\xf3\x00\xf4\x00\xf5\x00\xf6\x00\xff\xff\xf8\x00\xf9\x00\xfa\x00\xfb\x00\xfc\x00\xfd\x00\xfe\x00\xff\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\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\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\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"# +alex_check :: Array Int Int +alex_check = listArray (0,742) [-1,0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21,22,23,24,25,26,27,28,29,30,31,32,33,34,35,36,37,38,39,40,41,42,43,44,45,46,47,48,49,50,51,52,53,54,55,56,57,58,59,60,61,62,63,64,45,10,10,45,45,45,45,45,45,9,10,11,12,13,42,62,43,39,39,-1,-1,62,-1,-1,-1,-1,91,92,93,94,95,96,32,48,49,50,51,52,53,54,55,56,57,-1,-1,-1,-1,45,45,-1,-1,-1,-1,-1,-1,-1,-1,-1,123,124,125,126,127,128,129,130,131,132,133,134,135,136,137,138,139,140,141,142,143,144,145,146,147,148,149,150,151,152,153,154,155,156,157,158,159,160,161,162,163,164,165,166,167,168,169,170,171,172,173,174,175,176,177,178,179,180,181,182,183,184,185,186,187,188,189,190,191,125,125,39,-1,-1,-1,-1,-1,-1,-1,-1,48,49,50,51,52,53,54,55,56,57,-1,-1,215,-1,-1,-1,-1,65,66,67,68,69,70,71,72,73,74,75,76,77,78,79,80,81,82,83,84,85,86,87,88,89,90,34,247,-1,-1,95,39,97,98,99,100,101,102,103,104,105,106,107,108,109,110,111,112,113,114,115,116,117,118,119,120,121,122,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,10,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,92,-1,-1,-1,-1,-1,-1,-1,34,-1,-1,-1,-1,-1,-1,-1,-1,-1,110,-1,-1,-1,-1,-1,116,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,192,193,194,195,196,197,198,199,200,201,202,203,204,205,206,207,208,209,210,211,212,213,214,92,216,217,218,219,220,221,222,223,224,225,226,227,228,229,230,231,232,233,234,235,236,237,238,239,240,241,242,243,244,245,246,39,248,249,250,251,252,253,254,255,48,49,50,51,52,53,54,55,56,57,-1,-1,-1,-1,-1,-1,-1,65,66,67,68,69,70,71,72,73,74,75,76,77,78,79,80,81,82,83,84,85,86,87,88,89,90,-1,-1,-1,-1,95,-1,97,98,99,100,101,102,103,104,105,106,107,108,109,110,111,112,113,114,115,116,117,118,119,120,121,122,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,10,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,34,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,192,193,194,195,196,197,198,199,200,201,202,203,204,205,206,207,208,209,210,211,212,213,214,92,216,217,218,219,220,221,222,223,224,225,226,227,228,229,230,231,232,233,234,235,236,237,238,239,240,241,242,243,244,245,246,-1,248,249,250,251,252,253,254,255,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1] -alex_deflt :: AlexAddr -alex_deflt = AlexA# "\x15\x00\xff\xff\x03\x00\x03\x00\xff\xff\xff\xff\x0b\x00\xff\xff\x0b\x00\x0b\x00\x0b\x00\x0b\x00\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\x14\x00\x14\x00\xff\xff\xff\xff\xff\xff\x19\x00\x19\x00\xff\xff\xff\xff"# +alex_deflt :: Array Int Int +alex_deflt = listArray (0,27) [21,-1,3,3,-1,-1,11,-1,11,11,11,11,-1,-1,-1,-1,-1,-1,-1,20,20,-1,-1,-1,25,25,-1,-1] alex_accept = listArray (0::Int,27) [[],[],[(AlexAccSkip)],[(AlexAccSkip)],[],[(AlexAcc (alex_action_3))],[(AlexAccSkip)],[(AlexAccSkip)],[],[],[],[],[(AlexAcc (alex_action_3))],[(AlexAccSkip)],[(AlexAcc (alex_action_3))],[(AlexAcc (alex_action_3))],[(AlexAcc (alex_action_3))],[(AlexAcc (alex_action_3))],[(AlexAcc (alex_action_4))],[],[],[(AlexAcc (alex_action_5))],[(AlexAcc (alex_action_5))],[(AlexAcc (alex_action_6))],[],[],[],[(AlexAcc (alex_action_7))]] -{-# LINE 35 "LexGF.x" #-} +{-# LINE 34 "LexGF.x" #-} tok f p s = f p s -share :: String -> String -share = shareString - data Tok = - TS !String -- reserved words - | TL !String -- string literals - | TI !String -- integer literals - | TV !String -- identifiers - | TD !String -- double precision float literals - | TC !String -- character literals - | T_LString !String + TS String -- reserved words + | TL String -- string literals + | TI String -- integer literals + | TV String -- identifiers + | TD String -- double precision float literals + | TC String -- character literals + | T_LString String deriving (Eq,Show,Ord) @@ -71,18 +62,20 @@ prToken t = case t of _ -> show t -data BTree = N | B String Tok BTree BTree deriving (Show) - eitherResIdent :: (String -> Tok) -> String -> Tok -eitherResIdent tv s = treeFind resWords - where - treeFind N = tv s - treeFind (B a t left right) | s < a = treeFind left - | s > a = treeFind right - | s == a = t +eitherResIdent tv s = if isResWord s then (TS s) else (tv s) where + isResWord s = isInTree s $ + B "lincat" (B "def" (B "Type" (B "Str" (B "PType" (B "Lin" N N) N) (B "Tok" (B "Strs" N N) N)) (B "cat" (B "case" (B "abstract" N N) N) (B "data" (B "concrete" N N) N))) (B "include" (B "fun" (B "fn" (B "flags" N N) N) (B "in" (B "grammar" N N) N)) (B "interface" (B "instance" (B "incomplete" N N) N) (B "lin" (B "let" N N) N)))) (B "resource" (B "out" (B "of" (B "lintype" (B "lindef" N N) N) (B "oper" (B "open" N N) N)) (B "pattern" (B "param" (B "package" N N) N) (B "printname" (B "pre" N N) N))) (B "union" (B "table" (B "strs" (B "reuse" N N) N) (B "transfer" (B "tokenizer" N N) N)) (B "where" (B "variants" (B "var" N N) N) (B "with" N N)))) -resWords = b "lincat" (b "def" (b "Type" (b "Str" (b "PType" (b "Lin" N N) N) (b "Tok" (b "Strs" N N) N)) (b "cat" (b "case" (b "abstract" N N) N) (b "data" (b "concrete" N N) N))) (b "include" (b "fun" (b "fn" (b "flags" N N) N) (b "in" (b "grammar" N N) N)) (b "interface" (b "instance" (b "incomplete" N N) N) (b "lin" (b "let" N N) N)))) (b "resource" (b "out" (b "of" (b "lintype" (b "lindef" N N) N) (b "oper" (b "open" N N) N)) (b "pattern" (b "param" (b "package" N N) N) (b "printname" (b "pre" N N) N))) (b "union" (b "table" (b "strs" (b "reuse" N N) N) (b "transfer" (b "tokenizer" N N) N)) (b "where" (b "variants" (b "var" N N) N) (b "with" N N)))) - where b s = B s (TS s) +data BTree = N | B String BTree BTree deriving (Show) + +isInTree :: String -> BTree -> Bool +isInTree x tree = case tree of + N -> False + B a left right + | x < a -> isInTree x left + | x > a -> isInTree x right + | x == a -> True unescapeInitTail :: String -> String unescapeInitTail = unesc . tail where @@ -134,14 +127,11 @@ alexGetChar (p, _, (c:s)) = alexInputPrevChar :: AlexInput -> Char alexInputPrevChar (p, c, s) = c -alex_action_3 = tok (\p s -> PT p (TS $ share s)) -alex_action_4 = tok (\p s -> PT p (eitherResIdent (T_LString . share) s)) -alex_action_5 = tok (\p s -> PT p (eitherResIdent (TV . share) s)) -alex_action_6 = tok (\p s -> PT p (TL $ share $ unescapeInitTail s)) -alex_action_7 = tok (\p s -> PT p (TI $ share s)) -{-# LINE 1 "GenericTemplate.hs" #-} -{-# LINE 1 "<built-in>" #-} -{-# LINE 1 "<command line>" #-} +alex_action_3 = tok (\p s -> PT p (TS s)) +alex_action_4 = tok (\p s -> PT p (eitherResIdent T_LString s)) +alex_action_5 = tok (\p s -> PT p (eitherResIdent TV s)) +alex_action_6 = tok (\p s -> PT p (TL $ unescapeInitTail s)) +alex_action_7 = tok (\p s -> PT p (TI s)) {-# LINE 1 "GenericTemplate.hs" #-} -- ----------------------------------------------------------------------------- -- ALEX TEMPLATE @@ -152,8 +142,17 @@ alex_action_7 = tok (\p s -> PT p (TI $ share s)) -- ----------------------------------------------------------------------------- -- INTERNALS and main scanner engine +{-# LINE 22 "GenericTemplate.hs" #-} + + + + + + + + + -{-# LINE 35 "GenericTemplate.hs" #-} @@ -165,28 +164,11 @@ alex_action_7 = tok (\p s -> PT p (TI $ share s)) -data AlexAddr = AlexA# Addr# -{-# INLINE alexIndexShortOffAddr #-} -alexIndexShortOffAddr (AlexA# arr) off = -#if __GLASGOW_HASKELL__ > 500 - narrow16Int# i -#elif __GLASGOW_HASKELL__ == 500 - intToInt16# i -#else - (i `iShiftL#` 16#) `iShiftRA#` 16# -#endif - where -#if __GLASGOW_HASKELL__ >= 503 - i = word2Int# ((high `uncheckedShiftL#` 8#) `or#` low) -#else - i = word2Int# ((high `shiftL#` 8#) `or#` low) -#endif - high = int2Word# (ord# (indexCharOffAddr# arr (off' +# 1#))) - low = int2Word# (ord# (indexCharOffAddr# arr off')) - off' = off *# 2# +{-# LINE 66 "GenericTemplate.hs" #-} +alexIndexShortOffAddr arr off = arr ! off -- ----------------------------------------------------------------------------- @@ -199,11 +181,11 @@ data AlexReturn a | AlexToken !AlexInput !Int a -- alexScan :: AlexInput -> StartCode -> Maybe (AlexInput,Int,act) -alexScan input (I# (sc)) - = alexScanUser undefined input (I# (sc)) +alexScan input (sc) + = alexScanUser undefined input (sc) -alexScanUser user input (I# (sc)) - = case alex_scan_tkn user input 0# input sc AlexNone of +alexScanUser user input (sc) + = case alex_scan_tkn user input (0) input sc AlexNone of (AlexNone, input') -> case alexGetChar input of Nothing -> @@ -236,12 +218,12 @@ alexScanUser user input (I# (sc)) alex_scan_tkn user orig_input len input s last_acc = input `seq` -- strict in the input case s of - -1# -> (last_acc, input) + (-1) -> (last_acc, input) _ -> alex_scan_tkn' user orig_input len input s last_acc alex_scan_tkn' user orig_input len input s last_acc = let - new_acc = check_accs (alex_accept `unsafeAt` (I# (s))) + new_acc = check_accs (alex_accept `unsafeAt` (s)) in new_acc `seq` case alexGetChar input of @@ -252,26 +234,26 @@ alex_scan_tkn' user orig_input len input s last_acc = let base = alexIndexShortOffAddr alex_base s - (I# (ord_c)) = ord c - offset = (base +# ord_c) + (ord_c) = ord c + offset = (base + ord_c) check = alexIndexShortOffAddr alex_check offset - new_s = if (offset >=# 0#) && (check ==# ord_c) + new_s = if (offset >= (0)) && (check == ord_c) then alexIndexShortOffAddr alex_table offset else alexIndexShortOffAddr alex_deflt s in - alex_scan_tkn user orig_input (len +# 1#) new_input new_s new_acc + alex_scan_tkn user orig_input (len + (1)) new_input new_s new_acc where check_accs [] = last_acc - check_accs (AlexAcc a : _) = AlexLastAcc a input (I# (len)) - check_accs (AlexAccSkip : _) = AlexLastSkip input (I# (len)) + check_accs (AlexAcc a : _) = AlexLastAcc a input (len) + check_accs (AlexAccSkip : _) = AlexLastSkip input (len) check_accs (AlexAccPred a pred : rest) - | pred user orig_input (I# (len)) input - = AlexLastAcc a input (I# (len)) + | pred user orig_input (len) input + = AlexLastAcc a input (len) check_accs (AlexAccSkipPred pred : rest) - | pred user orig_input (I# (len)) input - = AlexLastSkip input (I# (len)) + | pred user orig_input (len) input + = AlexLastSkip input (len) check_accs (_ : rest) = check_accs rest data AlexLastAcc a @@ -300,8 +282,8 @@ alexPrevCharIs c _ input _ _ = c == alexInputPrevChar input alexPrevCharIsOneOf arr _ input _ _ = arr ! alexInputPrevChar input --alexRightContext :: Int -> AlexAccPred _ -alexRightContext (I# (sc)) user _ _ input = - case alex_scan_tkn user input 0# input sc AlexNone of +alexRightContext (sc) user _ _ input = + case alex_scan_tkn user input (0) input sc AlexNone of (AlexNone, _) -> False _ -> True -- TODO: there's no need to find the longest @@ -309,4 +291,4 @@ alexRightContext (I# (sc)) user _ _ input = -- the first match will do. -- used by wrappers -iUnbox (I# (i)) = i +iUnbox (i) = i diff --git a/src/GF/Source/LexGF.x b/src/GF/Source/LexGF.x index 72431c578..0486b0f0e 100644 --- a/src/GF/Source/LexGF.x +++ b/src/GF/Source/LexGF.x @@ -4,7 +4,6 @@ module LexGF where import ErrM -import SharedString } @@ -23,30 +22,27 @@ $u = [\0-\255] -- universal: any character "{-" ([$u # \-] | \- [$u # \}])* ("-")+ "}" ; $white+ ; -@rsyms { tok (\p s -> PT p (TS $ share s)) } -\' ($u # \')* \' { tok (\p s -> PT p (eitherResIdent (T_LString . share) s)) } +@rsyms { tok (\p s -> PT p (TS s)) } +\' ($u # \')* \' { tok (\p s -> PT p (eitherResIdent T_LString s)) } -$l $i* { tok (\p s -> PT p (eitherResIdent (TV . share) s)) } -\" ([$u # [\" \\ \n]] | (\\ (\" | \\ | \' | n | t)))* \"{ tok (\p s -> PT p (TL $ share $ unescapeInitTail s)) } +$l $i* { tok (\p s -> PT p (eitherResIdent TV s)) } +\" ([$u # [\" \\ \n]] | (\\ (\" | \\ | \' | n | t)))* \"{ tok (\p s -> PT p (TL $ unescapeInitTail s)) } -$d+ { tok (\p s -> PT p (TI $ share s)) } +$d+ { tok (\p s -> PT p (TI s)) } { tok f p s = f p s -share :: String -> String -share = shareString - data Tok = - TS !String -- reserved words - | TL !String -- string literals - | TI !String -- integer literals - | TV !String -- identifiers - | TD !String -- double precision float literals - | TC !String -- character literals - | T_LString !String + TS String -- reserved words + | TL String -- string literals + | TI String -- integer literals + | TV String -- identifiers + | TD String -- double precision float literals + | TC String -- character literals + | T_LString String deriving (Eq,Show,Ord) @@ -72,18 +68,20 @@ prToken t = case t of _ -> show t -data BTree = N | B String Tok BTree BTree deriving (Show) - eitherResIdent :: (String -> Tok) -> String -> Tok -eitherResIdent tv s = treeFind resWords - where - treeFind N = tv s - treeFind (B a t left right) | s < a = treeFind left - | s > a = treeFind right - | s == a = t - -resWords = b "lincat" (b "def" (b "Type" (b "Str" (b "PType" (b "Lin" N N) N) (b "Tok" (b "Strs" N N) N)) (b "cat" (b "case" (b "abstract" N N) N) (b "data" (b "concrete" N N) N))) (b "include" (b "fun" (b "fn" (b "flags" N N) N) (b "in" (b "grammar" N N) N)) (b "interface" (b "instance" (b "incomplete" N N) N) (b "lin" (b "let" N N) N)))) (b "resource" (b "out" (b "of" (b "lintype" (b "lindef" N N) N) (b "oper" (b "open" N N) N)) (b "pattern" (b "param" (b "package" N N) N) (b "printname" (b "pre" N N) N))) (b "union" (b "table" (b "strs" (b "reuse" N N) N) (b "transfer" (b "tokenizer" N N) N)) (b "where" (b "variants" (b "var" N N) N) (b "with" N N)))) - where b s = B s (TS s) +eitherResIdent tv s = if isResWord s then (TS s) else (tv s) where + isResWord s = isInTree s $ + B "lincat" (B "def" (B "Type" (B "Str" (B "PType" (B "Lin" N N) N) (B "Tok" (B "Strs" N N) N)) (B "cat" (B "case" (B "abstract" N N) N) (B "data" (B "concrete" N N) N))) (B "include" (B "fun" (B "fn" (B "flags" N N) N) (B "in" (B "grammar" N N) N)) (B "interface" (B "instance" (B "incomplete" N N) N) (B "lin" (B "let" N N) N)))) (B "resource" (B "out" (B "of" (B "lintype" (B "lindef" N N) N) (B "oper" (B "open" N N) N)) (B "pattern" (B "param" (B "package" N N) N) (B "printname" (B "pre" N N) N))) (B "union" (B "table" (B "strs" (B "reuse" N N) N) (B "transfer" (B "tokenizer" N N) N)) (B "where" (B "variants" (B "var" N N) N) (B "with" N N)))) + +data BTree = N | B String BTree BTree deriving (Show) + +isInTree :: String -> BTree -> Bool +isInTree x tree = case tree of + N -> False + B a left right + | x < a -> isInTree x left + | x > a -> isInTree x right + | x == a -> True unescapeInitTail :: String -> String unescapeInitTail = unesc . tail where diff --git a/src/GF/Source/ParGF.hs b/src/GF/Source/ParGF.hs index 3c7cee9a3..604311be9 100644 --- a/src/GF/Source/ParGF.hs +++ b/src/GF/Source/ParGF.hs @@ -4,8 +4,8 @@ module ParGF where import AbsGF import LexGF -import Ident --H import ErrM +import Ident --H import Array #if __GLASGOW_HASKELL__ >= 503 import GHC.Exts @@ -496,21 +496,21 @@ happyOutTok x = unsafeCoerce# x {-# INLINE happyOutTok #-} happyActOffsets :: HappyAddr -happyActOffsets = HappyA# "\x00\x00\x89\x00\xb2\x04\x92\x00\x94\x04\x00\x00\xcb\x04\x00\x00\x00\x00\x00\x00\x00\x00\xcf\x04\xf8\x00\xe1\x00\x8a\x04\x00\x00\xd1\x04\x8c\x04\x19\x00\x24\x00\x00\x00\x92\x00\xfd\xff\x8c\x04\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x92\x00\x00\x00\xd3\x04\xfe\xff\xc3\x04\xb6\x04\x9a\x01\xb5\x04\x00\x00\x00\x00\x00\x00\x74\x04\x00\x00\xb3\x00\x01\x00\xb8\x04\x67\x04\x00\x00\x61\x04\x54\x00\xa5\x04\xae\x04\xac\x04\x5c\x04\x5c\x04\x5c\x04\x5c\x04\x5c\x04\x5c\x04\x00\x00\xb3\x00\x00\x00\xa4\x04\x00\x00\xb3\x00\xb3\x00\xb3\x00\xe6\x04\x92\x00\x00\x00\xa1\x04\x2c\x00\x5d\x00\x24\x00\x92\x00\x92\x00\x99\x04\xda\x00\x96\x04\x69\x04\x4d\x04\x2c\x00\x5e\x04\x00\x00\x00\x00\x78\x04\x8b\x04\xf6\xff\x00\x00\x7a\x04\x76\x04\x6a\x04\x8b\x02\x6e\x04\x00\x00\xb8\x02\x73\x04\x65\x04\x2d\x04\x8c\x02\x6b\x04\x92\x00\xc7\x00\xc7\x00\xc7\x00\x92\x00\x92\x00\x92\x00\x68\x04\x42\x04\xff\xff\x69\x01\x00\x00\x1a\x04\x00\x00\x00\x00\x12\x04\x19\x04\x00\x00\x00\x00\x00\x00\x49\x01\x49\x01\x49\x01\x00\x00\x00\x00\x00\x00\x19\x04\x19\x04\x47\x04\x92\x00\x00\x00\x00\x00\x00\x00\x15\x04\x00\x00\x92\x00\x92\x00\x33\x04\x92\x00\xf6\xff\x3f\x04\x3d\x04\x00\x00\x00\x00\x2c\x00\x3b\x04\x40\x04\x3c\x04\xf2\x03\x2c\x00\x2c\x00\x00\x00\x3a\x04\x92\x00\xec\x03\x92\x00\x92\x00\x35\x04\x34\x04\x2f\x04\x21\x04\x8e\x01\x00\x00\x00\x00\x1d\x04\x14\x04\x26\x04\x25\x04\x2c\x00\x05\x04\x00\x00\xbd\x03\xbd\x03\xbd\x03\xbd\x03\xbd\x03\xbd\x03\xbd\x03\xbd\x03\xbd\x03\xbd\x03\xbd\x03\xbd\x03\xbd\x03\x3c\x02\xbd\x03\xbd\x03\xbd\x03\x00\x00\x00\x00\x00\x00\xb3\x00\x00\x00\x04\x04\x00\x00\x00\x00\xe5\x03\xcf\x03\x00\x00\xe3\x04\x02\x04\xdb\x03\x20\x00\x00\x00\xc7\x03\xf4\x03\xb0\x03\xb0\x03\xb0\x03\xb0\x03\x1e\x00\x00\x00\x38\x01\xef\x03\x00\x00\xc1\x00\x00\x00\xe8\x03\xd5\x03\x00\x00\xe6\x03\x88\x03\x88\x03\x00\x00\xd6\x03\xd4\x03\x00\x00\xd2\x03\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\xd1\x03\x00\x00\xc0\x03\xc6\x03\xc5\x03\x00\x00\x00\x00\x16\x00\xc4\x03\x00\x00\x00\x00\x00\x00\xc1\x03\x00\x00\x00\x00\x12\x00\xbf\x03\x00\x00\x2c\x00\x92\x00\x2c\x00\x00\x00\x70\x03\x00\x00\x92\x00\x92\x00\xb8\x03\x00\x00\x00\x00\x00\x00\x78\x03\x00\x00\xa6\x03\x93\x03\x97\x03\x45\x01\x9c\x03\x9b\x03\x96\x03\x00\x00\x2c\x00\x92\x00\x00\x00\x46\x03\x2c\x00\x00\x00\x00\x00\x92\x00\x82\x03\x00\x00\x00\x00\x84\x03\x89\x03\x00\x00\x80\x03\x00\x00\x7f\x03\x00\x00\x8a\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x7e\x03\x00\x00\x00\x00\x00\x00\x00\x00\x36\x03\x2c\x00\x00\x00\x00\x00\x00\x00\x2c\x00\x92\x00\x92\x00\x64\x03\x6d\x03\x62\x03\x00\x00\x2c\x00\x00\x00\x00\x00\x00\x00\x00\x00\x22\x03\x18\x01\x22\x03\x22\x03\x22\x03\x22\x03\x92\x00\x22\x03\x69\x03\x1c\x03\x18\x00\x00\x00\x00\x00\x92\x00\x1c\x03\x00\x00\x92\x00\x92\x00\x1c\x03\x63\x03\x00\x00\x5c\x03\x1c\x01\x00\x00\x00\x00\x41\x03\x00\x00\x51\x03\x00\x00\x00\x00\x4e\x03\x0e\x00\x0e\x00\x49\x03\xf0\x02\x00\x00\x2f\x03\x02\x03\x00\x00\xe2\x02\xe2\x02\xe2\x02\x00\x00\x00\x00\x0e\x00\x92\x00\x00\x00\x2a\x03\x00\x00\x00\x00\x00\x00\x00\x00\x1b\x03\x00\x00\xec\x02\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x09\x03\x0a\x03\x00\x00\x11\x03\x00\x00\x00\x00\x00\x00\x19\x00\x00\x00\x00\x00\x00\x00\x92\x00\x92\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x10\x03\xc0\x02\xc0\x02\x56\x02\xc0\x02\xc0\x02\x18\x01\x92\x00\x00\x00\x00\x00\x94\x00\xfe\x02\x00\x00\x30\x02\x00\x00\x0e\x00\x08\x03\xbd\x02\x00\x00\x00\x00\x00\x00\xbd\x02\x00\x00\x00\x00\x00\x00\xf6\x02\xf9\x02\x00\x00\x00\x00\x92\x00\xde\x02\x00\x00\x00\x00\xdd\x02\xdf\x02\xd3\x02\xda\x02\x00\x00\x7e\x02\x7e\x02\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\xc3\x02\x00\x00\x63\x02\xe4\x00\x0e\x00\x0e\x00\xb0\x02\xa1\x02\x00\x00\x00\x00\x00\x00"# +happyActOffsets = HappyA# "\x00\x00\x89\x00\xe1\x04\x92\x00\xc6\x04\x00\x00\xfb\x04\x00\x00\x00\x00\x00\x00\x00\x00\xf9\x04\xf8\x00\xe1\x00\xb5\x04\x00\x00\xfc\x04\xb6\x04\x19\x00\x24\x00\x00\x00\x92\x00\xfd\xff\xb6\x04\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x92\x00\x00\x00\x00\x05\xfe\xff\xfd\x04\xfa\x04\x9a\x01\xf4\x04\x00\x00\x00\x00\x00\x00\xae\x04\x00\x00\xb3\x00\x01\x00\xfe\x04\xab\x04\x00\x00\xa5\x04\x54\x00\xf1\x04\xeb\x04\xea\x04\xa0\x04\xa0\x04\xa0\x04\xa0\x04\xa0\x04\xa0\x04\x00\x00\xb3\x00\x00\x00\xe7\x04\x00\x00\xb3\x00\xb3\x00\xb3\x00\xe3\x04\x92\x00\x00\x00\x83\x00\x2c\x00\x5d\x00\x24\x00\x92\x00\x92\x00\xd5\x04\xda\x00\xd2\x04\xa3\x04\x6d\x04\x2c\x00\x7a\x04\x00\x00\x00\x00\xad\x04\xa6\x04\xf6\xff\x00\x00\x94\x04\xa2\x04\x89\x04\x8b\x02\x8d\x04\x00\x00\xb8\x02\x92\x04\x8f\x04\x4a\x04\x8c\x02\x81\x04\x92\x00\xc7\x00\xc7\x00\xc7\x00\x92\x00\x92\x00\x92\x00\x80\x04\x75\x04\xff\xff\x69\x01\x00\x00\x36\x04\x00\x00\x00\x00\x1e\x04\x34\x04\x00\x00\x00\x00\x00\x00\x49\x01\x49\x01\x49\x01\x00\x00\x00\x00\x00\x00\x34\x04\x34\x04\x73\x04\x92\x00\x00\x00\x00\x00\x00\x00\x1f\x04\x00\x00\x92\x00\x92\x00\x53\x04\x92\x00\xf6\xff\x65\x04\x48\x04\x00\x00\x00\x00\x2c\x00\x4f\x04\x40\x04\x50\x04\x07\x04\x2c\x00\x2c\x00\x00\x00\x3b\x04\x92\x00\xf5\x03\x92\x00\x92\x00\x3d\x04\x3c\x04\x38\x04\x2e\x04\x8e\x01\x00\x00\x00\x00\x2b\x04\x11\x04\x25\x04\x21\x04\x2c\x00\x92\x00\x20\x04\x00\x00\xde\x03\xde\x03\xde\x03\xde\x03\xde\x03\xde\x03\xde\x03\xde\x03\xde\x03\xde\x03\xde\x03\xde\x03\xde\x03\x3c\x02\xde\x03\xde\x03\xde\x03\x00\x00\x00\x00\x00\x00\xb3\x00\x00\x00\x1c\x04\x00\x00\x00\x00\xdc\x03\xda\x03\x00\x00\xc7\x02\x0d\x04\xdf\x03\x20\x00\x00\x00\xd7\x03\x05\x04\xb6\x03\xb6\x03\xb6\x03\xb6\x03\x1e\x00\x00\x00\x38\x01\xfa\x03\x00\x00\xc1\x00\x00\x00\xf9\x03\xf8\x03\x00\x00\xf6\x03\x98\x03\x98\x03\x00\x00\xf4\x03\xe4\x03\x00\x00\xe2\x03\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\xe1\x03\x00\x00\xd9\x03\xdd\x03\xce\x03\x00\x00\x00\x00\x16\x00\xcc\x03\x00\x00\x00\x00\x00\x00\xca\x03\x00\x00\x00\x00\xc0\x03\x12\x00\xbf\x03\x00\x00\x2c\x00\x92\x00\x2c\x00\x00\x00\x72\x03\x00\x00\x92\x00\x92\x00\xb4\x03\x00\x00\x00\x00\x00\x00\x88\x03\x00\x00\xa9\x03\x8f\x03\xac\x03\x0a\x02\xae\x03\x9e\x03\x9a\x03\x00\x00\x2c\x00\x92\x00\x00\x00\x40\x03\x2c\x00\x00\x00\x00\x00\x92\x00\x8b\x03\x00\x00\x00\x00\x7d\x03\x7e\x03\x00\x00\x84\x03\x00\x00\x83\x03\x00\x00\x45\x01\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x81\x03\x00\x00\x00\x00\x00\x00\x00\x00\x26\x03\x2c\x00\x00\x00\x00\x00\x00\x00\x2c\x00\x92\x00\x92\x00\x63\x03\x6f\x03\x6b\x03\x00\x00\x2c\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x23\x03\x18\x01\x23\x03\x23\x03\x23\x03\x23\x03\x92\x00\x23\x03\x68\x03\x22\x03\x18\x00\x00\x00\x00\x00\x92\x00\x22\x03\x00\x00\x92\x00\x92\x00\x22\x03\x56\x03\x00\x00\x4d\x03\x1c\x01\x00\x00\x00\x00\x4b\x03\x00\x00\x4a\x03\x00\x00\x00\x00\x3c\x03\x0e\x00\x0e\x00\x37\x03\x07\x03\x00\x00\x1e\x03\xfc\x02\x00\x00\xdf\x02\xdf\x02\xdf\x02\x00\x00\x00\x00\x0e\x00\x92\x00\x00\x00\x25\x03\x00\x00\x00\x00\x00\x00\x00\x00\x18\x03\x00\x00\xf8\x02\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x0c\x03\x06\x03\x00\x00\x11\x03\x00\x00\x00\x00\x00\x00\x19\x00\x00\x00\x00\x00\x00\x00\x92\x00\x92\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x08\x03\xc6\x02\xc6\x02\x56\x02\xc6\x02\xc6\x02\x18\x01\x92\x00\x00\x00\x00\x00\x94\x00\x04\x03\x00\x00\x30\x02\x00\x00\x0e\x00\xfb\x02\xaf\x02\x00\x00\x00\x00\x00\x00\xaf\x02\x00\x00\x00\x00\x00\x00\xf0\x02\xf4\x02\x00\x00\x00\x00\x92\x00\xee\x02\x00\x00\x00\x00\xde\x02\xf1\x02\xe2\x02\xdd\x02\x00\x00\x93\x02\x93\x02\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\xcf\x02\x00\x00\x84\x02\xe4\x00\x0e\x00\x0e\x00\xc2\x02\xb0\x02\x00\x00\x00\x00\x00\x00"# happyGotoOffsets :: HappyAddr -happyGotoOffsets = HappyA# "\x36\x02\x86\x01\xda\x01\xd2\x04\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\xcd\x04\x00\x00\x00\x00\x00\x00\x00\x00\xa6\x01\xbb\x02\xe3\x01\x00\x00\x9e\x02\x85\x00\xa2\x02\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\xc0\x04\x00\x00\x00\x00\x56\x01\x00\x00\x00\x00\xc4\x02\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x86\x02\x07\x00\x00\x00\x7a\x02\x72\x02\x00\x00\x00\x00\xc0\x00\x00\x00\x00\x00\x00\x00\x6a\x02\x68\x02\x5d\x02\x5c\x02\x4c\x02\x43\x02\x00\x00\x0d\x00\x00\x00\x00\x00\x00\x00\x0b\x00\x09\x00\x03\x00\x24\x02\x03\x03\x00\x00\x00\x00\xdc\x01\xb4\x04\x75\x00\xed\x02\x9a\x04\x00\x00\x00\x00\x00\x00\x00\x00\x50\x01\xc7\x01\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x71\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x37\x02\x00\x00\x00\x00\x8e\x04\xf1\x03\xf3\x02\xa0\x01\x7c\x04\x71\x04\x5b\x04\x00\x00\x00\x00\x11\x00\xab\x01\x00\x00\x47\x01\x00\x00\x00\x00\x12\x02\x06\x01\x00\x00\x00\x00\x00\x00\xcd\x04\xcd\x04\xcd\x04\x00\x00\x00\x00\x00\x00\x74\x00\x11\x02\x00\x00\x56\x04\x00\x00\x00\x00\x00\x00\x0e\x02\x00\x00\x82\x02\x39\x04\x00\x00\x23\x04\x10\x00\x00\x00\x00\x00\x00\x00\x00\x00\x46\x02\x00\x00\x00\x00\x00\x00\x82\x00\x7d\x01\x2d\x01\x00\x00\x00\x00\x17\x04\xe2\x00\x01\x04\xe4\x03\x00\x00\x00\x00\x00\x00\x00\x00\x40\x02\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x1b\x02\x00\x00\x00\x00\xb3\x01\x1a\x00\xf3\x04\xba\x02\xd8\x00\x4c\x04\x92\x03\x4b\x04\x0a\x04\x38\x03\x03\x02\x27\x02\x37\x03\x8e\x02\xff\x01\x0c\x03\x02\x02\x00\x00\x00\x00\x00\x00\x05\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x44\x02\x00\x00\x00\x00\x00\x00\x00\x00\x89\x01\x00\x00\xe9\x01\x0b\x01\xd4\x01\xc6\x01\x40\x01\x00\x00\xfc\x01\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x8d\x02\x7c\x02\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\x3c\x01\x00\x00\x00\x00\x00\x00\x75\x01\x00\x00\x00\x00\xf5\x01\xdf\x03\x3d\x02\x00\x00\x8f\x01\x00\x00\xd0\x02\xc2\x01\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\xef\x00\xc9\x03\x00\x00\x62\x01\xdf\x01\x00\x00\x00\x00\xbe\x03\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\x6e\x00\x5a\x01\x00\x00\x00\x00\x00\x00\x8b\x00\xac\x03\xa0\x03\x00\x00\x00\x00\x00\x00\x00\x00\x24\x01\x00\x00\x00\x00\x00\x00\x00\x00\xb2\x01\x90\x00\xd1\x00\x88\x02\x2a\x02\x5f\x01\x86\x03\xc9\x00\x00\x00\xf8\x01\xdb\x00\x00\x00\x00\x00\x7a\x03\x0b\x02\x00\x00\x68\x03\x5d\x03\x33\x01\x00\x00\x00\x00\x00\x00\x3f\x01\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x50\x02\x21\x02\x00\x00\x41\x01\x00\x00\x00\x00\x00\x00\x0e\x01\x73\x00\x25\x00\x2b\x01\x00\x00\x00\x00\x21\x00\x47\x03\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\xc6\x00\x00\x00\x00\x00\x00\x00\x00\x00\xf3\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\xa9\x02\x00\x00\x00\x00\x00\x00\xbd\x01\x42\x03\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x2d\x02\x86\x00\x81\x00\x6b\x00\x9c\x00\x90\x00\x25\x03\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x36\x00\x00\x00\x2c\x01\x00\x00\x50\x03\x00\x00\x00\x00\x00\x00\x42\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x0f\x03\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x0d\x03\xca\x01\x00\x00\x00\x00\x22\x00\x00\x00\x00\x00\x1c\x00\x00\x00\x00\x00\x00\x00\x1b\x00\x14\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00"# +happyGotoOffsets = HappyA# "\x36\x02\x86\x01\xda\x01\xcb\x04\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x3b\x03\x00\x00\x00\x00\x00\x00\x00\x00\xa6\x01\xbb\x02\xe3\x01\x00\x00\x9e\x02\x85\x00\xa8\x02\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\xb3\x04\x00\x00\x00\x00\x56\x01\x00\x00\x00\x00\xc4\x02\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x99\x02\x07\x00\x00\x00\x96\x02\x94\x02\x00\x00\x00\x00\xc0\x00\x00\x00\x00\x00\x00\x00\x86\x02\x72\x02\x6a\x02\x68\x02\x5d\x02\x5c\x02\x00\x00\x0d\x00\x00\x00\x00\x00\x00\x00\x0b\x00\x09\x00\x03\x00\x34\x02\x15\x03\x00\x00\x00\x00\xdc\x01\xa7\x04\x75\x00\x03\x03\x91\x04\x00\x00\x00\x00\x00\x00\x00\x00\x50\x01\xc7\x01\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x71\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x43\x02\x00\x00\x00\x00\x8c\x04\x80\x03\x09\x03\xa0\x01\x74\x04\x6f\x04\x59\x04\x00\x00\x00\x00\x11\x00\xab\x01\x00\x00\x47\x01\x00\x00\x00\x00\x3a\x02\x06\x01\x00\x00\x00\x00\x00\x00\x3b\x03\x3b\x03\x3b\x03\x00\x00\x00\x00\x00\x00\x74\x00\x37\x02\x00\x00\x4d\x04\x00\x00\x00\x00\x00\x00\x11\x02\x00\x00\x82\x02\x35\x04\x00\x00\x30\x04\x10\x00\x00\x00\x00\x00\x00\x00\x00\x00\x46\x02\x00\x00\x00\x00\x00\x00\x82\x00\x7d\x01\x2d\x01\x00\x00\x00\x00\x1a\x04\xe2\x00\x15\x04\xfd\x03\x00\x00\x00\x00\x00\x00\x00\x00\x40\x02\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x1b\x02\xed\x02\x00\x00\x00\x00\xb3\x01\x1a\x00\xdd\x04\xba\x02\xd8\x00\xc5\x04\xc9\x04\xc4\x04\xb0\x04\xaf\x04\x03\x02\x27\x02\x56\x04\x8e\x02\xff\x01\x8a\x03\x02\x02\x00\x00\x00\x00\x00\x00\x05\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x44\x02\x00\x00\x00\x00\x00\x00\x00\x00\x89\x01\x00\x00\xe9\x01\x0b\x01\xd4\x01\xc6\x01\x40\x01\x00\x00\xfc\x01\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x8d\x02\x7c\x02\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\x3c\x01\x00\x00\x00\x00\x00\x00\x00\x00\x75\x01\x00\x00\x00\x00\xf5\x01\xf1\x03\x3d\x02\x00\x00\x8f\x01\x00\x00\xd0\x02\xc2\x01\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\xef\x00\xdb\x03\x00\x00\x62\x01\xdf\x01\x00\x00\x00\x00\xd6\x03\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\x6e\x00\x5a\x01\x00\x00\x00\x00\x00\x00\x8b\x00\xbe\x03\xb9\x03\x00\x00\x00\x00\x00\x00\x00\x00\x24\x01\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\xb2\x01\x90\x00\xd1\x00\x88\x02\x2a\x02\x5f\x01\xa3\x03\xc9\x00\x00\x00\xf8\x01\xdb\x00\x00\x00\x00\x00\x97\x03\x0b\x02\x00\x00\x7a\x03\x64\x03\x33\x01\x00\x00\x00\x00\x00\x00\x3f\x01\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x50\x02\x21\x02\x00\x00\x41\x01\x00\x00\x00\x00\x00\x00\x0e\x01\x73\x00\x25\x00\x2b\x01\x00\x00\x00\x00\x21\x00\x5f\x03\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\xc6\x00\x00\x00\x00\x00\x00\x00\x00\x00\xf3\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\xa9\x02\x00\x00\x00\x00\x00\x00\xbd\x01\x48\x03\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x2d\x02\x99\x00\x7c\x00\x6b\x00\x9c\x00\x90\x00\x2c\x03\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x36\x00\x00\x00\x2c\x01\x00\x00\xc2\x03\x00\x00\x00\x00\x00\x00\x42\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x20\x03\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x6c\x03\xca\x01\x00\x00\x00\x00\x22\x00\x00\x00\x00\x00\x1c\x00\x00\x00\x00\x00\x00\x00\x1b\x00\x14\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00"# happyDefActions :: HappyAddr -happyDefActions = HappyA# "\xf6\xff\xd2\xff\x1e\xff\x00\x00\x00\x00\xfb\xff\x89\xff\x85\xff\x84\xff\x7a\xff\x76\xff\x6d\xff\x68\xff\x5d\xff\x00\x00\x86\xff\x00\x00\x8c\xff\x3b\xff\x00\x00\x83\xff\x34\xff\x3b\xff\x00\x00\x49\xff\x47\xff\x46\xff\x48\xff\x4a\xff\x00\x00\x81\xff\x00\x00\x8c\xff\x00\x00\x00\x00\x00\x00\x00\x00\xfa\xff\xf9\xff\xf8\xff\x00\x00\xde\xff\x00\x00\x00\x00\x00\x00\x00\x00\xd1\xff\x00\x00\xd2\xff\xf5\xff\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\xf4\xff\x1b\xff\x1c\xff\x00\x00\x1d\xff\x00\x00\x00\x00\x00\x00\x1f\xff\x5c\xff\x89\xff\x00\x00\x8c\xff\x00\x00\x00\x00\x5c\xff\x00\x00\x91\xff\x00\x00\x8b\xff\x00\x00\x8c\xff\x2a\xff\x00\x00\x6c\xff\x3d\xff\x3a\xff\x00\x00\x3b\xff\x3c\xff\x36\xff\x33\xff\x00\x00\x00\x00\x00\x00\x82\xff\x89\xff\x00\x00\x00\x00\x00\x00\x91\xff\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x75\xff\x00\x00\x00\x00\x6e\xff\x8c\xff\x4c\xff\x79\xff\x00\x00\x8c\xff\x62\xff\x63\xff\x64\xff\x6a\xff\x6b\xff\x69\xff\x65\xff\x7f\xff\x88\xff\x00\x00\x00\x00\x00\x00\x00\x00\x7b\xff\x80\xff\x87\xff\x00\x00\x7e\xff\x34\xff\x00\x00\x00\x00\x00\x00\x3b\xff\x00\x00\x58\xff\x54\xff\x55\xff\x41\xff\x00\x00\x29\xff\x00\x00\x45\xff\x00\x00\x31\xff\x59\xff\x00\x00\x00\x00\x8c\xff\x00\x00\x00\x00\x00\x00\x5b\xff\x00\x00\x00\x00\x91\xff\x4e\xff\x42\xff\x3f\xff\x00\x00\x2d\xff\x00\x00\x00\x00\x00\x00\xdd\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\x18\xff\x1a\xff\x19\xff\x16\xff\x17\xff\x00\x00\xe7\xff\xe6\xff\x00\x00\x00\x00\xe8\xff\xdb\xff\x00\x00\x00\x00\x91\xff\xf2\xff\xd7\xff\x00\x00\x00\x00\xcd\xff\x00\x00\x00\x00\x00\x00\x15\xff\x91\xff\x00\x00\xb2\xff\x00\x00\xbf\xff\x00\x00\x00\x00\xb6\xff\x00\x00\x00\x00\x00\x00\xb4\xff\xa6\xff\x00\x00\xbe\xff\x00\x00\xbd\xff\xb5\xff\xbb\xff\xbc\xff\xba\xff\x00\x00\xc3\xff\x00\x00\x00\x00\x00\x00\xb7\xff\xc1\xff\x91\xff\x00\x00\xc2\xff\xc0\xff\x21\xff\x00\x00\xc4\xff\x71\xff\x58\xff\x00\x00\x74\xff\x00\x00\x00\x00\x00\x00\x50\xff\x00\x00\x6f\xff\x5c\xff\x26\xff\x8f\xff\x8e\xff\x8a\xff\x60\xff\x00\x00\x35\xff\x30\xff\x00\x00\x00\x00\x91\xff\x00\x00\x44\xff\x00\x00\x5e\xff\x2a\xff\x00\x00\x40\xff\x00\x00\x00\x00\x39\xff\x67\xff\x00\x00\x00\x00\x36\xff\x32\xff\x00\x00\x00\x00\x7d\xff\x00\x00\x90\xff\x00\x00\x4b\xff\x91\xff\x5f\xff\x78\xff\x38\xff\x77\xff\x7c\xff\x66\xff\x00\x00\x56\xff\x2b\xff\x28\xff\x53\xff\x45\xff\x00\x00\x57\xff\x51\xff\x52\xff\x31\xff\x00\x00\x00\x00\x00\x00\x25\xff\x00\x00\x5a\xff\x56\xff\x3e\xff\x2e\xff\x2c\xff\x73\xff\xa0\xff\xb0\xff\x9c\xff\xab\xff\x96\xff\x00\x00\x00\x00\x9e\xff\x00\x00\x9a\xff\x94\xff\xb8\xff\xb9\xff\x00\x00\x98\xff\xb1\xff\x00\x00\x00\x00\xa2\xff\x00\x00\xd5\xff\x00\x00\xd0\xff\xe4\xff\xe5\xff\xca\xff\xdf\xff\xcc\xff\xe0\xff\xdc\xff\x00\x00\xda\xff\xda\xff\x00\x00\x00\x00\xe1\xff\xd9\xff\x00\x00\xde\xff\xcd\xff\x00\x00\x00\x00\xcf\xff\xce\xff\x00\x00\x00\x00\xa1\xff\xc8\xff\xc7\xff\x97\xff\xa4\xff\x21\xff\x93\xff\xa8\xff\x00\x00\x99\xff\xde\xff\x9d\xff\xaf\xff\xa3\xff\x95\xff\xad\xff\xaa\xff\xae\xff\x00\x00\x9b\xff\x22\xff\x20\xff\x3b\xff\x9f\xff\x4f\xff\x70\xff\x26\xff\x00\x00\x8d\xff\x61\xff\x2f\xff\x4d\xff\x43\xff\x72\xff\x27\xff\x24\xff\x00\x00\xab\xff\x00\x00\x00\x00\x00\x00\x94\xff\xa5\xff\x00\x00\xc6\xff\xe3\xff\x00\x00\x00\x00\xcb\xff\x00\x00\xd6\xff\xda\xff\x00\x00\xf0\xff\xd8\xff\xe2\xff\xc9\xff\x00\x00\xd4\xff\xc5\xff\x92\xff\x00\x00\x00\x00\xac\xff\xa9\xff\x00\x00\x00\x00\xb3\xff\xa7\xff\x00\x00\x00\x00\xef\xff\x00\x00\xf3\xff\xf0\xff\x00\x00\xd3\xff\x23\xff\xec\xff\xf1\xff\xee\xff\xed\xff\xeb\xff\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\xea\xff\xe9\xff"# +happyDefActions = HappyA# "\xf6\xff\xd2\xff\x1d\xff\x00\x00\x00\x00\xfb\xff\x89\xff\x85\xff\x84\xff\x7a\xff\x76\xff\x6c\xff\x67\xff\x5c\xff\x00\x00\x86\xff\x00\x00\x8c\xff\x3a\xff\x00\x00\x83\xff\x33\xff\x3a\xff\x00\x00\x48\xff\x46\xff\x45\xff\x47\xff\x49\xff\x00\x00\x81\xff\x00\x00\x8c\xff\x00\x00\x00\x00\x00\x00\x00\x00\xfa\xff\xf9\xff\xf8\xff\x00\x00\xde\xff\x00\x00\x00\x00\x00\x00\x00\x00\xd1\xff\x00\x00\xd2\xff\xf5\xff\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\xf4\xff\x1a\xff\x1b\xff\x00\x00\x1c\xff\x00\x00\x00\x00\x00\x00\x1e\xff\x5b\xff\x89\xff\x00\x00\x8c\xff\x00\x00\x00\x00\x5b\xff\x00\x00\x91\xff\x00\x00\x8b\xff\x00\x00\x8c\xff\x29\xff\x00\x00\x6b\xff\x3c\xff\x39\xff\x00\x00\x3a\xff\x3b\xff\x35\xff\x32\xff\x00\x00\x00\x00\x00\x00\x82\xff\x89\xff\x00\x00\x00\x00\x00\x00\x91\xff\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x75\xff\x00\x00\x00\x00\x6d\xff\x8c\xff\x4b\xff\x79\xff\x00\x00\x8c\xff\x61\xff\x62\xff\x63\xff\x69\xff\x6a\xff\x68\xff\x64\xff\x7f\xff\x88\xff\x00\x00\x00\x00\x00\x00\x00\x00\x7b\xff\x80\xff\x87\xff\x00\x00\x7e\xff\x33\xff\x00\x00\x00\x00\x00\x00\x3a\xff\x00\x00\x57\xff\x53\xff\x54\xff\x40\xff\x00\x00\x28\xff\x00\x00\x44\xff\x00\x00\x30\xff\x58\xff\x00\x00\x00\x00\x8c\xff\x00\x00\x00\x00\x00\x00\x5a\xff\x00\x00\x00\x00\x91\xff\x4d\xff\x41\xff\x3e\xff\x00\x00\x2c\xff\x00\x00\x00\x00\x5b\xff\x00\x00\xdd\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\x17\xff\x19\xff\x18\xff\x15\xff\x16\xff\x00\x00\xe7\xff\xe6\xff\x00\x00\x00\x00\xe8\xff\xdb\xff\x00\x00\x00\x00\x91\xff\xf2\xff\xd7\xff\x00\x00\x00\x00\xcd\xff\x00\x00\x00\x00\x00\x00\x14\xff\x91\xff\x00\x00\xb2\xff\x00\x00\xbf\xff\x00\x00\x00\x00\xb6\xff\x00\x00\x00\x00\x00\x00\xb4\xff\xa6\xff\x00\x00\xbe\xff\x00\x00\xbd\xff\xb5\xff\xbb\xff\xbc\xff\xba\xff\x00\x00\xc3\xff\x00\x00\x00\x00\x00\x00\xb7\xff\xc1\xff\x91\xff\x00\x00\xc2\xff\xc0\xff\x20\xff\x00\x00\xc4\xff\x70\xff\x00\x00\x57\xff\x00\x00\x74\xff\x00\x00\x00\x00\x00\x00\x4f\xff\x00\x00\x6e\xff\x5b\xff\x25\xff\x8f\xff\x8e\xff\x8a\xff\x5f\xff\x00\x00\x34\xff\x2f\xff\x00\x00\x00\x00\x91\xff\x00\x00\x43\xff\x00\x00\x5d\xff\x29\xff\x00\x00\x3f\xff\x00\x00\x00\x00\x38\xff\x66\xff\x00\x00\x00\x00\x35\xff\x31\xff\x00\x00\x00\x00\x7d\xff\x00\x00\x90\xff\x00\x00\x4a\xff\x91\xff\x5e\xff\x78\xff\x37\xff\x77\xff\x7c\xff\x65\xff\x00\x00\x55\xff\x2a\xff\x27\xff\x52\xff\x44\xff\x00\x00\x56\xff\x50\xff\x51\xff\x30\xff\x00\x00\x00\x00\x00\x00\x24\xff\x00\x00\x59\xff\x55\xff\x3d\xff\x2d\xff\x2b\xff\x73\xff\x72\xff\xa0\xff\xb0\xff\x9c\xff\xab\xff\x96\xff\x00\x00\x00\x00\x9e\xff\x00\x00\x9a\xff\x94\xff\xb8\xff\xb9\xff\x00\x00\x98\xff\xb1\xff\x00\x00\x00\x00\xa2\xff\x00\x00\xd5\xff\x00\x00\xd0\xff\xe4\xff\xe5\xff\xca\xff\xdf\xff\xcc\xff\xe0\xff\xdc\xff\x00\x00\xda\xff\xda\xff\x00\x00\x00\x00\xe1\xff\xd9\xff\x00\x00\xde\xff\xcd\xff\x00\x00\x00\x00\xcf\xff\xce\xff\x00\x00\x00\x00\xa1\xff\xc8\xff\xc7\xff\x97\xff\xa4\xff\x20\xff\x93\xff\xa8\xff\x00\x00\x99\xff\xde\xff\x9d\xff\xaf\xff\xa3\xff\x95\xff\xad\xff\xaa\xff\xae\xff\x00\x00\x9b\xff\x21\xff\x1f\xff\x3a\xff\x9f\xff\x4e\xff\x6f\xff\x25\xff\x00\x00\x8d\xff\x60\xff\x2e\xff\x4c\xff\x42\xff\x71\xff\x26\xff\x23\xff\x00\x00\xab\xff\x00\x00\x00\x00\x00\x00\x94\xff\xa5\xff\x00\x00\xc6\xff\xe3\xff\x00\x00\x00\x00\xcb\xff\x00\x00\xd6\xff\xda\xff\x00\x00\xf0\xff\xd8\xff\xe2\xff\xc9\xff\x00\x00\xd4\xff\xc5\xff\x92\xff\x00\x00\x00\x00\xac\xff\xa9\xff\x00\x00\x00\x00\xb3\xff\xa7\xff\x00\x00\x00\x00\xef\xff\x00\x00\xf3\xff\xf0\xff\x00\x00\xd3\xff\x22\xff\xec\xff\xf1\xff\xee\xff\xed\xff\xeb\xff\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\xea\xff\xe9\xff"# happyCheck :: HappyAddr -happyCheck = HappyA# "\xff\xff\x03\x00\x01\x00\x00\x00\x01\x00\x00\x00\x01\x00\x00\x00\x01\x00\x00\x00\x01\x00\x00\x00\x01\x00\x00\x00\x01\x00\x19\x00\x00\x00\x00\x00\x15\x00\x05\x00\x00\x00\x03\x00\x19\x00\x05\x00\x02\x00\x1a\x00\x00\x00\x00\x00\x03\x00\x05\x00\x05\x00\x0d\x00\x0a\x00\x00\x00\x10\x00\x05\x00\x0b\x00\x00\x00\x12\x00\x0b\x00\x0f\x00\x10\x00\x0a\x00\x19\x00\x0a\x00\x12\x00\x15\x00\x03\x00\x0c\x00\x05\x00\x19\x00\x12\x00\x1a\x00\x1b\x00\x1d\x00\x1e\x00\x1f\x00\x20\x00\x21\x00\x22\x00\x10\x00\x24\x00\x24\x00\x25\x00\x27\x00\x4b\x00\x00\x00\x2a\x00\x2a\x00\x19\x00\x2d\x00\x36\x00\x4b\x00\x4b\x00\x4b\x00\x32\x00\x3c\x00\x3d\x00\x18\x00\x2a\x00\x4d\x00\x50\x00\x4d\x00\x4e\x00\x4d\x00\x4e\x00\x4d\x00\x3e\x00\x4d\x00\x4b\x00\x4d\x00\x42\x00\x43\x00\x4b\x00\x4c\x00\x4d\x00\x03\x00\x48\x00\x05\x00\x4b\x00\x4b\x00\x4c\x00\x4d\x00\x4e\x00\x0b\x00\x4b\x00\x4a\x00\x00\x00\x0f\x00\x10\x00\x00\x00\x4b\x00\x4c\x00\x00\x00\x15\x00\x00\x00\x00\x00\x00\x00\x01\x00\x4b\x00\x4c\x00\x4d\x00\x1d\x00\x1e\x00\x1f\x00\x20\x00\x21\x00\x22\x00\x2c\x00\x24\x00\x00\x00\x2f\x00\x27\x00\x00\x00\x00\x00\x2a\x00\x15\x00\x16\x00\x2d\x00\x00\x00\x01\x00\x02\x00\x04\x00\x32\x00\x00\x00\x01\x00\x02\x00\x03\x00\x0a\x00\x03\x00\x02\x00\x05\x00\x2a\x00\x18\x00\x06\x00\x3e\x00\x00\x00\x0b\x00\x2a\x00\x42\x00\x43\x00\x0f\x00\x10\x00\x35\x00\x50\x00\x48\x00\x38\x00\x15\x00\x4b\x00\x4c\x00\x4d\x00\x4e\x00\x2a\x00\x3c\x00\x3d\x00\x1d\x00\x1e\x00\x1f\x00\x20\x00\x21\x00\x22\x00\x2c\x00\x24\x00\x35\x00\x2f\x00\x27\x00\x38\x00\x1f\x00\x2a\x00\x2d\x00\x33\x00\x34\x00\x0d\x00\x3c\x00\x3d\x00\x02\x00\x32\x00\x29\x00\x06\x00\x37\x00\x07\x00\x00\x00\x03\x00\x40\x00\x05\x00\x42\x00\x1b\x00\x1c\x00\x3e\x00\x00\x00\x0b\x00\x13\x00\x42\x00\x43\x00\x0f\x00\x10\x00\x00\x00\x49\x00\x48\x00\x00\x00\x02\x00\x4b\x00\x4c\x00\x4d\x00\x4e\x00\x07\x00\x00\x00\x1a\x00\x1d\x00\x1e\x00\x1f\x00\x20\x00\x21\x00\x22\x00\x09\x00\x24\x00\x1b\x00\x24\x00\x27\x00\x00\x00\x01\x00\x02\x00\x1a\x00\x2a\x00\x13\x00\x14\x00\x25\x00\x16\x00\x17\x00\x18\x00\x1f\x00\x03\x00\x24\x00\x05\x00\x4b\x00\x4c\x00\x08\x00\x0e\x00\x2a\x00\x0b\x00\x29\x00\x3e\x00\x00\x00\x0f\x00\x10\x00\x42\x00\x43\x00\x00\x00\x2a\x00\x2b\x00\x2c\x00\x48\x00\x4a\x00\x2d\x00\x4b\x00\x4c\x00\x4d\x00\x4e\x00\x1e\x00\x1f\x00\x20\x00\x21\x00\x22\x00\x03\x00\x0e\x00\x05\x00\x3a\x00\x27\x00\x15\x00\x16\x00\x33\x00\x0b\x00\x00\x00\x01\x00\x02\x00\x0f\x00\x10\x00\x3a\x00\x49\x00\x00\x00\x00\x00\x00\x00\x01\x00\x02\x00\x2a\x00\x2b\x00\x2c\x00\x00\x00\x45\x00\x46\x00\x1e\x00\x1f\x00\x20\x00\x21\x00\x22\x00\x03\x00\x10\x00\x05\x00\x12\x00\x27\x00\x00\x00\x00\x00\x0a\x00\x4b\x00\x4c\x00\x4d\x00\x4e\x00\x00\x00\x10\x00\x04\x00\x17\x00\x2f\x00\x03\x00\x31\x00\x05\x00\x0a\x00\x00\x00\x19\x00\x12\x00\x14\x00\x0b\x00\x22\x00\x00\x00\x33\x00\x0f\x00\x10\x00\x00\x00\x01\x00\x02\x00\x2a\x00\x3a\x00\x00\x00\x33\x00\x34\x00\x00\x00\x4b\x00\x4c\x00\x4d\x00\x4e\x00\x1e\x00\x1f\x00\x20\x00\x21\x00\x22\x00\x03\x00\x40\x00\x05\x00\x42\x00\x27\x00\x2a\x00\x2b\x00\x2c\x00\x0b\x00\x00\x00\x01\x00\x02\x00\x0f\x00\x10\x00\x2a\x00\x2b\x00\x2c\x00\x00\x00\x01\x00\x02\x00\x2a\x00\x2b\x00\x2c\x00\x4b\x00\x4c\x00\x4d\x00\x4a\x00\x1e\x00\x1f\x00\x20\x00\x21\x00\x22\x00\x06\x00\x33\x00\x34\x00\x00\x00\x27\x00\x03\x00\x04\x00\x05\x00\x4b\x00\x4c\x00\x4d\x00\x4e\x00\x0a\x00\x13\x00\x11\x00\x0d\x00\x0e\x00\x03\x00\x10\x00\x05\x00\x00\x00\x01\x00\x02\x00\x03\x00\x16\x00\x0b\x00\x00\x00\x19\x00\x33\x00\x0f\x00\x10\x00\x00\x00\x01\x00\x02\x00\x03\x00\x3a\x00\x33\x00\x34\x00\x00\x00\x00\x00\x4b\x00\x4c\x00\x4d\x00\x4e\x00\x1e\x00\x1f\x00\x20\x00\x21\x00\x22\x00\x00\x00\x01\x00\x02\x00\x03\x00\x27\x00\x00\x00\x01\x00\x02\x00\x03\x00\x00\x00\x00\x00\x01\x00\x02\x00\x00\x00\x19\x00\x19\x00\x2d\x00\x2e\x00\x2f\x00\x2a\x00\x2b\x00\x2c\x00\x09\x00\x00\x00\x23\x00\x23\x00\x37\x00\x2d\x00\x4b\x00\x4c\x00\x4d\x00\x00\x00\x01\x00\x02\x00\x00\x00\x01\x00\x02\x00\x37\x00\x00\x00\x01\x00\x4b\x00\x4c\x00\x4d\x00\x4e\x00\x00\x00\x2d\x00\x2e\x00\x2f\x00\x30\x00\x31\x00\x2d\x00\x2e\x00\x2f\x00\x30\x00\x31\x00\x37\x00\x00\x00\x01\x00\x02\x00\x00\x00\x37\x00\x33\x00\x3e\x00\x00\x00\x01\x00\x02\x00\x00\x00\x3e\x00\x3a\x00\x00\x00\x00\x00\x47\x00\x48\x00\x2a\x00\x2b\x00\x2c\x00\x47\x00\x48\x00\x00\x00\x45\x00\x46\x00\x00\x00\x33\x00\x34\x00\x00\x00\x33\x00\x34\x00\x02\x00\x39\x00\x1e\x00\x3b\x00\x39\x00\x17\x00\x3b\x00\x00\x00\x01\x00\x02\x00\x26\x00\x43\x00\x44\x00\x00\x00\x43\x00\x44\x00\x22\x00\x4b\x00\x4c\x00\x00\x00\x33\x00\x34\x00\x00\x00\x20\x00\x2a\x00\x00\x00\x39\x00\x33\x00\x3b\x00\x10\x00\x27\x00\x12\x00\x04\x00\x2a\x00\x3a\x00\x00\x00\x43\x00\x44\x00\x04\x00\x05\x00\x18\x00\x00\x00\x01\x00\x02\x00\x00\x00\x01\x00\x02\x00\x00\x00\x00\x00\x1e\x00\x00\x00\x01\x00\x02\x00\x1c\x00\x1d\x00\x21\x00\x00\x00\x26\x00\x33\x00\x34\x00\x00\x00\x0d\x00\x28\x00\x0f\x00\x39\x00\x25\x00\x3b\x00\x27\x00\x28\x00\x29\x00\x04\x00\x2b\x00\x00\x00\x00\x00\x43\x00\x44\x00\x10\x00\x25\x00\x12\x00\x33\x00\x34\x00\x35\x00\x36\x00\x2b\x00\x00\x00\x39\x00\x00\x00\x3b\x00\x3c\x00\x3d\x00\x2a\x00\x3f\x00\x33\x00\x34\x00\x00\x00\x33\x00\x44\x00\x45\x00\x39\x00\x47\x00\x3b\x00\x33\x00\x3a\x00\x25\x00\x00\x00\x27\x00\x28\x00\x29\x00\x3a\x00\x2b\x00\x00\x00\x01\x00\x02\x00\x03\x00\x0c\x00\x4b\x00\x00\x00\x33\x00\x34\x00\x35\x00\x36\x00\x00\x00\x00\x00\x39\x00\x04\x00\x3b\x00\x3c\x00\x3d\x00\x0e\x00\x3f\x00\x0a\x00\x0c\x00\x0d\x00\x0d\x00\x44\x00\x45\x00\x20\x00\x47\x00\x00\x00\x01\x00\x02\x00\x03\x00\x00\x00\x27\x00\x1c\x00\x1d\x00\x2a\x00\x06\x00\x45\x00\x00\x00\x01\x00\x02\x00\x03\x00\x20\x00\x20\x00\x2d\x00\x2e\x00\x2f\x00\x30\x00\x31\x00\x27\x00\x27\x00\x06\x00\x2a\x00\x2a\x00\x37\x00\x00\x00\x00\x00\x01\x00\x02\x00\x03\x00\x07\x00\x3e\x00\x3f\x00\x0a\x00\x41\x00\x00\x00\x01\x00\x02\x00\x03\x00\x05\x00\x4b\x00\x12\x00\x2d\x00\x2e\x00\x2f\x00\x30\x00\x31\x00\x00\x00\x01\x00\x02\x00\x03\x00\x01\x00\x37\x00\x2d\x00\x2e\x00\x2f\x00\x30\x00\x31\x00\x21\x00\x3e\x00\x3f\x00\x04\x00\x41\x00\x37\x00\x02\x00\x28\x00\x06\x00\x06\x00\x3c\x00\x3d\x00\x3e\x00\x2d\x00\x2e\x00\x2f\x00\x30\x00\x31\x00\x00\x00\x01\x00\x02\x00\x03\x00\x2d\x00\x37\x00\x00\x00\x01\x00\x02\x00\x03\x00\x3c\x00\x3d\x00\x3e\x00\x01\x00\x37\x00\x06\x00\x2d\x00\x2e\x00\x2f\x00\x30\x00\x31\x00\x32\x00\x00\x00\x01\x00\x02\x00\x03\x00\x37\x00\x4b\x00\x01\x00\x0c\x00\x4b\x00\x00\x00\x00\x00\x3e\x00\x00\x00\x01\x00\x02\x00\x03\x00\x02\x00\x07\x00\x08\x00\x0d\x00\x07\x00\x0e\x00\x2d\x00\x2d\x00\x2e\x00\x2f\x00\x30\x00\x31\x00\x32\x00\x2d\x00\x2e\x00\x2f\x00\x17\x00\x37\x00\x00\x00\x01\x00\x02\x00\x03\x00\x0e\x00\x37\x00\x3e\x00\x02\x00\x4b\x00\x22\x00\x2d\x00\x2d\x00\x2e\x00\x2f\x00\x30\x00\x31\x00\x32\x00\x2a\x00\x00\x00\x00\x00\x0a\x00\x37\x00\x4b\x00\x2d\x00\x2e\x00\x2f\x00\x30\x00\x31\x00\x3e\x00\x00\x00\x01\x00\x02\x00\x03\x00\x37\x00\x00\x00\x01\x00\x02\x00\x03\x00\x02\x00\x0b\x00\x3e\x00\x17\x00\x17\x00\x00\x00\x03\x00\x2d\x00\x2e\x00\x2f\x00\x30\x00\x31\x00\x07\x00\x08\x00\x22\x00\x22\x00\x0a\x00\x37\x00\x00\x00\x01\x00\x02\x00\x03\x00\x2a\x00\x2a\x00\x3e\x00\x08\x00\x02\x00\x04\x00\x4b\x00\x00\x00\x01\x00\x02\x00\x03\x00\x03\x00\x4b\x00\x01\x00\x2d\x00\x2e\x00\x2f\x00\x30\x00\x31\x00\x2d\x00\x2e\x00\x2f\x00\x30\x00\x31\x00\x37\x00\x00\x00\x01\x00\x02\x00\x03\x00\x37\x00\x1b\x00\x3e\x00\x4b\x00\x04\x00\x04\x00\x04\x00\x3e\x00\x00\x00\x01\x00\x02\x00\x03\x00\x2d\x00\x2e\x00\x2f\x00\x30\x00\x31\x00\x06\x00\x0c\x00\x4b\x00\x00\x00\x11\x00\x37\x00\x2d\x00\x2e\x00\x2f\x00\x30\x00\x31\x00\x04\x00\x3e\x00\x01\x00\x06\x00\x02\x00\x37\x00\x00\x00\x01\x00\x02\x00\x03\x00\x11\x00\x2d\x00\x3e\x00\x2d\x00\x2e\x00\x2f\x00\x30\x00\x31\x00\x00\x00\x01\x00\x02\x00\x03\x00\x0a\x00\x37\x00\x20\x00\x2d\x00\x2e\x00\x2f\x00\x30\x00\x31\x00\x3e\x00\x27\x00\x02\x00\x4b\x00\x2a\x00\x37\x00\x00\x00\x01\x00\x02\x00\x03\x00\x01\x00\x04\x00\x3e\x00\x01\x00\x01\x00\x07\x00\x02\x00\x00\x00\x01\x00\x02\x00\x03\x00\x2d\x00\x2e\x00\x2f\x00\x30\x00\x31\x00\x01\x00\x4b\x00\x02\x00\x01\x00\x01\x00\x37\x00\x02\x00\x2d\x00\x2e\x00\x2f\x00\x30\x00\x31\x00\x3e\x00\x00\x00\x01\x00\x02\x00\x03\x00\x37\x00\x00\x00\x01\x00\x02\x00\x03\x00\x02\x00\x01\x00\x3e\x00\x2d\x00\x2e\x00\x2f\x00\x30\x00\x31\x00\x01\x00\x00\x00\x01\x00\x02\x00\x03\x00\x37\x00\x2d\x00\x2e\x00\x2f\x00\x30\x00\x31\x00\x4b\x00\x3e\x00\x09\x00\x23\x00\x38\x00\x37\x00\x00\x00\x01\x00\x02\x00\x03\x00\x03\x00\x37\x00\x3e\x00\x4b\x00\x04\x00\x00\x00\x07\x00\x2d\x00\x2e\x00\x2f\x00\x30\x00\x31\x00\x2d\x00\x2e\x00\x2f\x00\x30\x00\x31\x00\x37\x00\x00\x00\x01\x00\x02\x00\x03\x00\x37\x00\x37\x00\x3e\x00\x2d\x00\x2e\x00\x2f\x00\x17\x00\x3e\x00\x00\x00\x01\x00\x02\x00\x03\x00\x01\x00\x37\x00\x04\x00\x16\x00\x0e\x00\x22\x00\x0c\x00\x2d\x00\x2e\x00\x2f\x00\x30\x00\x31\x00\x04\x00\x2a\x00\x01\x00\x01\x00\x4b\x00\x37\x00\x00\x00\x01\x00\x02\x00\x03\x00\x4b\x00\x04\x00\x3e\x00\x04\x00\x01\x00\x03\x00\x08\x00\x2d\x00\x2e\x00\x2f\x00\x30\x00\x31\x00\x16\x00\x0d\x00\x00\x00\x00\x00\x06\x00\x37\x00\x0d\x00\x2d\x00\x2e\x00\x2f\x00\x30\x00\x31\x00\x3e\x00\x00\x00\x01\x00\x02\x00\x03\x00\x37\x00\x00\x00\x01\x00\x02\x00\x03\x00\x4d\x00\x4b\x00\x3e\x00\x17\x00\x17\x00\x4b\x00\x4b\x00\x2d\x00\x2e\x00\x2f\x00\x30\x00\x31\x00\x03\x00\x07\x00\x22\x00\x22\x00\x04\x00\x37\x00\x00\x00\x01\x00\x02\x00\x03\x00\x2a\x00\x2a\x00\x3e\x00\x4b\x00\x06\x00\x0c\x00\x11\x00\x00\x00\x01\x00\x02\x00\x03\x00\x0a\x00\x07\x00\x0a\x00\x2d\x00\x2e\x00\x2f\x00\x30\x00\x31\x00\x2d\x00\x2e\x00\x2f\x00\x30\x00\x31\x00\x37\x00\x00\x00\x01\x00\x02\x00\x03\x00\x37\x00\x08\x00\x3e\x00\x37\x00\x2d\x00\x01\x00\x4b\x00\x3e\x00\x00\x00\x01\x00\x02\x00\x03\x00\x2d\x00\x2e\x00\x2f\x00\x30\x00\x31\x00\x0a\x00\x03\x00\x01\x00\x01\x00\x4b\x00\x37\x00\x2d\x00\x2e\x00\x2f\x00\x30\x00\x31\x00\x02\x00\x3e\x00\x02\x00\x50\x00\x4b\x00\x37\x00\x00\x00\x01\x00\x02\x00\x03\x00\x03\x00\x03\x00\x3e\x00\x2d\x00\x2e\x00\x2f\x00\x30\x00\x31\x00\x00\x00\x01\x00\x02\x00\x03\x00\x50\x00\x37\x00\x03\x00\x2d\x00\x2e\x00\x2f\x00\x30\x00\x31\x00\x3e\x00\x00\x00\x01\x00\x02\x00\x03\x00\x37\x00\x00\x00\x01\x00\x02\x00\x03\x00\x03\x00\x4b\x00\x3e\x00\x08\x00\x50\x00\x23\x00\x0d\x00\x12\x00\x26\x00\x4b\x00\x2e\x00\x2d\x00\x2e\x00\x2f\x00\x30\x00\x31\x00\xff\xff\xff\xff\x30\x00\x31\x00\xff\xff\x37\x00\xff\xff\x2d\x00\x2e\x00\x2f\x00\x30\x00\x31\x00\x3e\x00\x00\x00\xff\xff\xff\xff\xff\xff\x37\x00\x40\x00\xff\xff\x2d\x00\x2e\x00\xff\xff\x45\x00\x3e\x00\x2d\x00\x2e\x00\x2f\x00\x30\x00\x31\x00\x37\x00\xff\xff\xff\xff\xff\xff\xff\xff\x37\x00\x17\x00\x25\x00\xff\xff\x27\x00\x28\x00\x29\x00\x3e\x00\x2b\x00\xff\xff\xff\xff\xff\xff\x22\x00\xff\xff\xff\xff\xff\xff\x33\x00\x34\x00\x35\x00\x36\x00\x2a\x00\xff\xff\x39\x00\xff\xff\x3b\x00\x3c\x00\x3d\x00\x41\x00\x3f\x00\xff\xff\xff\xff\xff\xff\x46\x00\x44\x00\x45\x00\xff\xff\x47\x00\x4b\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"# +happyCheck = HappyA# "\xff\xff\x03\x00\x01\x00\x00\x00\x01\x00\x00\x00\x01\x00\x00\x00\x01\x00\x00\x00\x01\x00\x00\x00\x01\x00\x00\x00\x01\x00\x19\x00\x00\x00\x00\x00\x15\x00\x05\x00\x00\x00\x03\x00\x19\x00\x05\x00\x02\x00\x1a\x00\x00\x00\x00\x00\x03\x00\x05\x00\x05\x00\x0d\x00\x0a\x00\x00\x00\x10\x00\x05\x00\x0b\x00\x00\x00\x12\x00\x0b\x00\x0f\x00\x10\x00\x0a\x00\x19\x00\x0a\x00\x12\x00\x15\x00\x03\x00\x0c\x00\x05\x00\x19\x00\x12\x00\x1a\x00\x1b\x00\x1d\x00\x1e\x00\x1f\x00\x20\x00\x21\x00\x22\x00\x10\x00\x24\x00\x24\x00\x25\x00\x27\x00\x4b\x00\x00\x00\x2a\x00\x2a\x00\x19\x00\x2d\x00\x36\x00\x4b\x00\x4b\x00\x4b\x00\x32\x00\x3c\x00\x3d\x00\x18\x00\x2a\x00\x4d\x00\x50\x00\x4d\x00\x4e\x00\x4d\x00\x4e\x00\x4d\x00\x3e\x00\x4d\x00\x4b\x00\x4d\x00\x42\x00\x43\x00\x4b\x00\x4c\x00\x4d\x00\x03\x00\x48\x00\x05\x00\x4b\x00\x4b\x00\x4c\x00\x4d\x00\x4e\x00\x0b\x00\x4b\x00\x4a\x00\x00\x00\x0f\x00\x10\x00\x00\x00\x4b\x00\x4c\x00\x00\x00\x15\x00\x00\x00\x00\x00\x00\x00\x01\x00\x4b\x00\x4c\x00\x4d\x00\x1d\x00\x1e\x00\x1f\x00\x20\x00\x21\x00\x22\x00\x2c\x00\x24\x00\x00\x00\x2f\x00\x27\x00\x00\x00\x03\x00\x2a\x00\x15\x00\x16\x00\x2d\x00\x00\x00\x01\x00\x02\x00\x0b\x00\x32\x00\x00\x00\x01\x00\x02\x00\x03\x00\x18\x00\x03\x00\x02\x00\x05\x00\x2a\x00\x00\x00\x06\x00\x3e\x00\x00\x00\x0b\x00\x2a\x00\x42\x00\x43\x00\x0f\x00\x10\x00\x35\x00\x50\x00\x48\x00\x38\x00\x15\x00\x4b\x00\x4c\x00\x4d\x00\x4e\x00\x2a\x00\x3c\x00\x3d\x00\x1d\x00\x1e\x00\x1f\x00\x20\x00\x21\x00\x22\x00\x2c\x00\x24\x00\x35\x00\x2f\x00\x27\x00\x38\x00\x1f\x00\x2a\x00\x2d\x00\x33\x00\x34\x00\x0d\x00\x3c\x00\x3d\x00\x02\x00\x32\x00\x29\x00\x06\x00\x37\x00\x07\x00\x00\x00\x03\x00\x40\x00\x05\x00\x42\x00\x1b\x00\x1c\x00\x3e\x00\x00\x00\x0b\x00\x13\x00\x42\x00\x43\x00\x0f\x00\x10\x00\x00\x00\x49\x00\x48\x00\x00\x00\x02\x00\x4b\x00\x4c\x00\x4d\x00\x4e\x00\x07\x00\x00\x00\x1a\x00\x1d\x00\x1e\x00\x1f\x00\x20\x00\x21\x00\x22\x00\x09\x00\x24\x00\x1b\x00\x24\x00\x27\x00\x00\x00\x01\x00\x02\x00\x1a\x00\x2a\x00\x13\x00\x14\x00\x25\x00\x16\x00\x17\x00\x18\x00\x1f\x00\x03\x00\x24\x00\x05\x00\x4b\x00\x4c\x00\x08\x00\x0e\x00\x2a\x00\x0b\x00\x29\x00\x3e\x00\x00\x00\x0f\x00\x10\x00\x42\x00\x43\x00\x00\x00\x2a\x00\x2b\x00\x2c\x00\x48\x00\x4a\x00\x2d\x00\x4b\x00\x4c\x00\x4d\x00\x4e\x00\x1e\x00\x1f\x00\x20\x00\x21\x00\x22\x00\x03\x00\x0e\x00\x05\x00\x3a\x00\x27\x00\x15\x00\x16\x00\x33\x00\x0b\x00\x00\x00\x01\x00\x02\x00\x0f\x00\x10\x00\x3a\x00\x49\x00\x00\x00\x00\x00\x00\x00\x01\x00\x02\x00\x2a\x00\x2b\x00\x2c\x00\x00\x00\x45\x00\x46\x00\x1e\x00\x1f\x00\x20\x00\x21\x00\x22\x00\x03\x00\x10\x00\x05\x00\x12\x00\x27\x00\x00\x00\x00\x00\x0a\x00\x4b\x00\x4c\x00\x4d\x00\x4e\x00\x00\x00\x10\x00\x04\x00\x17\x00\x2f\x00\x03\x00\x31\x00\x05\x00\x0a\x00\x00\x00\x19\x00\x12\x00\x14\x00\x0b\x00\x22\x00\x00\x00\x33\x00\x0f\x00\x10\x00\x00\x00\x01\x00\x02\x00\x2a\x00\x3a\x00\x00\x00\x33\x00\x34\x00\x00\x00\x4b\x00\x4c\x00\x4d\x00\x4e\x00\x1e\x00\x1f\x00\x20\x00\x21\x00\x22\x00\x03\x00\x40\x00\x05\x00\x42\x00\x27\x00\x2a\x00\x2b\x00\x2c\x00\x0b\x00\x00\x00\x01\x00\x02\x00\x0f\x00\x10\x00\x2a\x00\x2b\x00\x2c\x00\x00\x00\x01\x00\x02\x00\x2a\x00\x2b\x00\x2c\x00\x4b\x00\x4c\x00\x4d\x00\x4a\x00\x1e\x00\x1f\x00\x20\x00\x21\x00\x22\x00\x06\x00\x33\x00\x34\x00\x00\x00\x27\x00\x03\x00\x04\x00\x05\x00\x4b\x00\x4c\x00\x4d\x00\x4e\x00\x0a\x00\x13\x00\x11\x00\x0d\x00\x0e\x00\x03\x00\x10\x00\x05\x00\x00\x00\x01\x00\x02\x00\x03\x00\x16\x00\x0b\x00\x00\x00\x19\x00\x33\x00\x0f\x00\x10\x00\x00\x00\x01\x00\x02\x00\x03\x00\x3a\x00\x33\x00\x34\x00\x00\x00\x00\x00\x4b\x00\x4c\x00\x4d\x00\x4e\x00\x1e\x00\x1f\x00\x20\x00\x21\x00\x22\x00\x00\x00\x01\x00\x02\x00\x03\x00\x27\x00\x00\x00\x01\x00\x02\x00\x03\x00\x00\x00\x00\x00\x01\x00\x02\x00\x00\x00\x19\x00\x19\x00\x2d\x00\x2e\x00\x2f\x00\x2a\x00\x2b\x00\x2c\x00\x09\x00\x00\x00\x23\x00\x23\x00\x37\x00\x2d\x00\x4b\x00\x4c\x00\x4d\x00\x00\x00\x01\x00\x02\x00\x00\x00\x01\x00\x02\x00\x37\x00\x00\x00\x01\x00\x4b\x00\x4c\x00\x4d\x00\x4e\x00\x00\x00\x2d\x00\x2e\x00\x2f\x00\x30\x00\x31\x00\x2d\x00\x2e\x00\x2f\x00\x30\x00\x31\x00\x37\x00\x00\x00\x01\x00\x02\x00\x00\x00\x37\x00\x33\x00\x3e\x00\x00\x00\x01\x00\x02\x00\x00\x00\x3e\x00\x3a\x00\x00\x00\x00\x00\x47\x00\x48\x00\x2a\x00\x2b\x00\x2c\x00\x47\x00\x48\x00\x00\x00\x45\x00\x46\x00\x04\x00\x33\x00\x34\x00\x00\x00\x33\x00\x34\x00\x0a\x00\x39\x00\x1e\x00\x3b\x00\x39\x00\x17\x00\x3b\x00\x00\x00\x01\x00\x02\x00\x26\x00\x43\x00\x44\x00\x00\x00\x43\x00\x44\x00\x22\x00\x4b\x00\x4c\x00\x00\x00\x33\x00\x34\x00\x00\x00\x20\x00\x2a\x00\x00\x00\x39\x00\x33\x00\x3b\x00\x10\x00\x27\x00\x12\x00\x04\x00\x2a\x00\x3a\x00\x00\x00\x43\x00\x44\x00\x04\x00\x05\x00\x02\x00\x00\x00\x01\x00\x02\x00\x00\x00\x01\x00\x02\x00\x00\x00\x00\x00\x1e\x00\x00\x00\x01\x00\x02\x00\x1c\x00\x1d\x00\x21\x00\x18\x00\x26\x00\x33\x00\x34\x00\x00\x00\x0d\x00\x28\x00\x0f\x00\x39\x00\x25\x00\x3b\x00\x27\x00\x28\x00\x29\x00\x04\x00\x2b\x00\x00\x00\x00\x00\x43\x00\x44\x00\x10\x00\x25\x00\x12\x00\x33\x00\x34\x00\x35\x00\x36\x00\x2b\x00\x00\x00\x39\x00\x00\x00\x3b\x00\x3c\x00\x3d\x00\x2a\x00\x3f\x00\x33\x00\x34\x00\x00\x00\x33\x00\x44\x00\x45\x00\x39\x00\x47\x00\x3b\x00\x33\x00\x3a\x00\x25\x00\x00\x00\x27\x00\x28\x00\x29\x00\x3a\x00\x2b\x00\x00\x00\x01\x00\x02\x00\x03\x00\x00\x00\x4b\x00\x00\x00\x33\x00\x34\x00\x35\x00\x36\x00\x00\x00\x00\x00\x39\x00\x04\x00\x3b\x00\x3c\x00\x3d\x00\x00\x00\x3f\x00\x0a\x00\x0c\x00\x0d\x00\x0d\x00\x44\x00\x45\x00\x20\x00\x47\x00\x00\x00\x01\x00\x02\x00\x03\x00\x0c\x00\x27\x00\x1c\x00\x1d\x00\x2a\x00\x0e\x00\x00\x00\x00\x00\x01\x00\x02\x00\x03\x00\x20\x00\x20\x00\x2d\x00\x2e\x00\x2f\x00\x30\x00\x31\x00\x27\x00\x27\x00\x06\x00\x2a\x00\x2a\x00\x37\x00\x00\x00\x00\x00\x01\x00\x02\x00\x03\x00\x07\x00\x3e\x00\x3f\x00\x0a\x00\x41\x00\x00\x00\x01\x00\x02\x00\x03\x00\x06\x00\x45\x00\x12\x00\x2d\x00\x2e\x00\x2f\x00\x30\x00\x31\x00\x00\x00\x01\x00\x02\x00\x03\x00\x05\x00\x37\x00\x2d\x00\x2e\x00\x2f\x00\x30\x00\x31\x00\x21\x00\x3e\x00\x3f\x00\x4b\x00\x41\x00\x37\x00\x04\x00\x28\x00\x01\x00\x06\x00\x3c\x00\x3d\x00\x3e\x00\x2d\x00\x2e\x00\x2f\x00\x30\x00\x31\x00\x00\x00\x01\x00\x02\x00\x03\x00\x2d\x00\x37\x00\x02\x00\x06\x00\x01\x00\x06\x00\x3c\x00\x3d\x00\x3e\x00\x4b\x00\x37\x00\x01\x00\x2d\x00\x2e\x00\x2f\x00\x30\x00\x31\x00\x32\x00\x00\x00\x01\x00\x02\x00\x03\x00\x37\x00\x41\x00\x00\x00\x01\x00\x02\x00\x03\x00\x46\x00\x3e\x00\x07\x00\x0c\x00\x4b\x00\x4b\x00\x02\x00\x0e\x00\x00\x00\x01\x00\x02\x00\x03\x00\x0d\x00\x2d\x00\x2e\x00\x2f\x00\x30\x00\x31\x00\x32\x00\x00\x00\x01\x00\x02\x00\x03\x00\x37\x00\x2d\x00\x0e\x00\x02\x00\x0a\x00\x2d\x00\x4b\x00\x3e\x00\x00\x00\x01\x00\x02\x00\x03\x00\x2d\x00\x2e\x00\x2f\x00\x30\x00\x31\x00\x32\x00\x2d\x00\x2e\x00\x2f\x00\x02\x00\x37\x00\x00\x00\x01\x00\x02\x00\x03\x00\x03\x00\x37\x00\x3e\x00\x2d\x00\x2e\x00\x2f\x00\x30\x00\x31\x00\x32\x00\x00\x00\x01\x00\x02\x00\x03\x00\x37\x00\x2d\x00\x2e\x00\x2f\x00\x30\x00\x31\x00\x4b\x00\x3e\x00\x0a\x00\x08\x00\x0b\x00\x37\x00\x02\x00\x2d\x00\x2e\x00\x2f\x00\x30\x00\x31\x00\x3e\x00\x00\x00\x01\x00\x02\x00\x03\x00\x37\x00\x00\x00\x01\x00\x02\x00\x03\x00\x2d\x00\x2e\x00\x3e\x00\x03\x00\x00\x00\x4b\x00\x4b\x00\x04\x00\x01\x00\x4b\x00\x37\x00\x07\x00\x08\x00\x2d\x00\x2e\x00\x2f\x00\x30\x00\x31\x00\x00\x00\x01\x00\x02\x00\x03\x00\x1b\x00\x37\x00\x00\x00\x01\x00\x02\x00\x03\x00\x06\x00\x04\x00\x3e\x00\x04\x00\x04\x00\x0c\x00\x00\x00\x4b\x00\x2d\x00\x2e\x00\x2f\x00\x30\x00\x31\x00\x2d\x00\x2e\x00\x2f\x00\x30\x00\x31\x00\x37\x00\x00\x00\x01\x00\x02\x00\x03\x00\x37\x00\x11\x00\x3e\x00\x04\x00\x01\x00\x11\x00\x17\x00\x3e\x00\x00\x00\x01\x00\x02\x00\x03\x00\x2d\x00\x2e\x00\x2f\x00\x30\x00\x31\x00\x22\x00\x2d\x00\x2e\x00\x2f\x00\x02\x00\x37\x00\x06\x00\x0a\x00\x2a\x00\x2d\x00\x02\x00\x37\x00\x3e\x00\x00\x00\x01\x00\x02\x00\x03\x00\x4b\x00\x00\x00\x01\x00\x02\x00\x03\x00\x00\x00\x04\x00\x2d\x00\x2e\x00\x2f\x00\x30\x00\x31\x00\x07\x00\x08\x00\x01\x00\x0c\x00\x01\x00\x37\x00\x01\x00\x2d\x00\x2e\x00\x2f\x00\x30\x00\x31\x00\x3e\x00\x00\x00\x01\x00\x02\x00\x03\x00\x37\x00\x00\x00\x01\x00\x02\x00\x03\x00\x02\x00\x07\x00\x3e\x00\x01\x00\x4b\x00\x02\x00\x01\x00\x2d\x00\x2e\x00\x2f\x00\x30\x00\x31\x00\x2d\x00\x2e\x00\x2f\x00\x30\x00\x31\x00\x37\x00\x00\x00\x01\x00\x02\x00\x03\x00\x37\x00\x02\x00\x3e\x00\x02\x00\x01\x00\x01\x00\x01\x00\x3e\x00\x00\x00\x01\x00\x02\x00\x03\x00\x4b\x00\x23\x00\x2d\x00\x2e\x00\x2f\x00\x30\x00\x31\x00\x2d\x00\x2e\x00\x2f\x00\x30\x00\x31\x00\x37\x00\x09\x00\x38\x00\x03\x00\x37\x00\x37\x00\x37\x00\x3e\x00\x00\x00\x01\x00\x02\x00\x03\x00\x3e\x00\x00\x00\x01\x00\x02\x00\x03\x00\x2d\x00\x2e\x00\x2f\x00\x30\x00\x31\x00\x07\x00\x04\x00\x04\x00\x01\x00\x16\x00\x37\x00\x4b\x00\x2d\x00\x2e\x00\x2f\x00\x30\x00\x31\x00\x3e\x00\x00\x00\x01\x00\x02\x00\x03\x00\x37\x00\x00\x00\x01\x00\x02\x00\x03\x00\x0e\x00\x0c\x00\x3e\x00\x04\x00\x01\x00\x01\x00\x04\x00\x4b\x00\x01\x00\x2d\x00\x2e\x00\x2f\x00\x30\x00\x31\x00\x2d\x00\x2e\x00\x2f\x00\x30\x00\x31\x00\x37\x00\x00\x00\x01\x00\x02\x00\x03\x00\x37\x00\x4b\x00\x3e\x00\x04\x00\x0d\x00\x00\x00\x08\x00\x3e\x00\x00\x00\x01\x00\x02\x00\x03\x00\x2d\x00\x2e\x00\x2f\x00\x30\x00\x31\x00\x2d\x00\x2e\x00\x2f\x00\x30\x00\x31\x00\x37\x00\x03\x00\x16\x00\x4b\x00\x4d\x00\x37\x00\x17\x00\x3e\x00\x00\x00\x01\x00\x02\x00\x03\x00\x3e\x00\x00\x00\x01\x00\x02\x00\x03\x00\x22\x00\x06\x00\x2d\x00\x2e\x00\x2f\x00\x30\x00\x31\x00\x4b\x00\x2a\x00\x4b\x00\x0d\x00\x03\x00\x37\x00\x04\x00\x2d\x00\x2e\x00\x2f\x00\x30\x00\x31\x00\x3e\x00\x00\x00\x01\x00\x02\x00\x03\x00\x37\x00\x00\x00\x01\x00\x02\x00\x03\x00\x4b\x00\x07\x00\x3e\x00\x06\x00\x0c\x00\x11\x00\x07\x00\x2d\x00\x2e\x00\x2f\x00\x30\x00\x31\x00\x2d\x00\x2e\x00\x2f\x00\x30\x00\x31\x00\x37\x00\x00\x00\x01\x00\x02\x00\x03\x00\x37\x00\x0a\x00\x3e\x00\x08\x00\x00\x00\x00\x00\x37\x00\x3e\x00\x00\x00\x01\x00\x02\x00\x03\x00\x0a\x00\x4b\x00\x2d\x00\x2e\x00\x2f\x00\x30\x00\x31\x00\x2d\x00\x2e\x00\x2f\x00\x30\x00\x31\x00\x37\x00\x00\x00\x00\x00\x17\x00\x17\x00\x37\x00\x00\x00\x3e\x00\x00\x00\x01\x00\x02\x00\x03\x00\x3e\x00\x2d\x00\x22\x00\x22\x00\x01\x00\x2d\x00\x2e\x00\x2f\x00\x30\x00\x31\x00\x2a\x00\x2a\x00\x17\x00\x17\x00\x00\x00\x37\x00\x0a\x00\x2d\x00\x2e\x00\x2f\x00\x30\x00\x31\x00\x3e\x00\x22\x00\x22\x00\x01\x00\x20\x00\x37\x00\x4b\x00\x02\x00\x02\x00\x2a\x00\x2a\x00\x27\x00\x3e\x00\x01\x00\x2a\x00\x17\x00\x50\x00\x4b\x00\x03\x00\x2d\x00\x2e\x00\x2f\x00\x30\x00\x31\x00\x03\x00\x50\x00\x22\x00\x03\x00\x4b\x00\x37\x00\x03\x00\x08\x00\x50\x00\x0d\x00\x2a\x00\x25\x00\x3e\x00\x27\x00\x28\x00\x29\x00\x12\x00\x2b\x00\x2e\x00\xff\xff\x4b\x00\xff\xff\xff\xff\xff\xff\xff\xff\x33\x00\x34\x00\x35\x00\x36\x00\xff\xff\xff\xff\x39\x00\xff\xff\x3b\x00\x3c\x00\x3d\x00\x23\x00\x3f\x00\xff\xff\x26\x00\xff\xff\xff\xff\x44\x00\x45\x00\xff\xff\x47\x00\xff\xff\xff\xff\xff\xff\x30\x00\x31\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\x40\x00\xff\xff\xff\xff\xff\xff\xff\xff\x45\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"# happyTable :: HappyAddr -happyTable = HappyA# "\x00\x00\x50\x00\x3b\x00\x3b\x00\x3c\x00\x3b\x00\x3c\x00\x3b\x00\x3c\x00\x3b\x00\x3c\x00\x3b\x00\x3c\x00\x3b\x00\x3c\x00\x58\x00\x53\x00\x71\x00\x57\x00\x57\x01\x54\x01\x95\x00\x58\x00\x96\x00\x44\x01\x74\x00\xf0\x00\x54\x01\x12\x00\x77\x01\x13\x00\x00\x01\x7f\x00\x54\x01\x97\x00\x57\x01\x14\x00\x4b\x00\xc5\x01\xc0\x01\x15\x00\x16\x00\x7f\x00\x98\x00\xbf\x01\xc6\x01\x17\x00\x95\x00\x5e\x00\x96\x00\x58\x00\x9b\x01\xe9\x00\xf1\x00\x18\x00\x19\x00\x1a\x00\x1b\x00\x1c\x00\x1d\x00\x97\x00\x1e\x00\xf2\x00\xf3\x00\x1f\x00\x06\x00\xb3\x01\x20\x00\xeb\x00\x98\x00\x62\x00\x72\x00\x06\x00\x06\x00\x06\x00\x21\x00\x54\x00\x16\x01\xaa\x00\x9d\x01\xbc\x00\xff\xff\x3d\x00\xd3\x00\x3d\x00\x3e\x00\xbd\x00\x22\x00\xbe\x00\x06\x00\xc0\x00\x23\x00\x24\x00\x06\x00\x26\x00\x27\x00\x12\x00\x25\x00\x13\x00\x06\x00\x06\x00\x26\x00\x27\x00\x28\x00\x14\x00\x06\x00\x61\x01\xab\x01\x15\x00\x16\x00\x4b\x00\x06\x00\x26\x00\x53\x00\x17\x00\x59\x01\x4b\x00\xa0\x00\x5c\x00\x06\x00\x26\x00\x27\x00\x18\x00\x19\x00\x1a\x00\x1b\x00\x1c\x00\x1d\x00\x2e\x00\x1e\x00\x0c\x01\x2f\x00\x1f\x00\x53\x00\xad\x01\x20\x00\x9e\x01\x5b\x01\x62\x00\xf8\x00\x8e\x00\x8f\x00\x7e\x00\x21\x00\x44\x00\x07\x00\x08\x00\x09\x00\x7f\x00\x12\x00\xa8\x01\x13\x00\x0d\x01\xaa\x00\xa9\x01\x22\x00\x73\x01\x14\x00\x20\x01\x23\x00\x24\x00\x15\x00\x16\x00\x0e\x01\xf7\xff\x25\x00\x8e\x01\x17\x00\x06\x00\x26\x00\x27\x00\x28\x00\x0d\x01\x54\x00\x89\x00\x18\x00\x19\x00\x1a\x00\x1b\x00\x1c\x00\x1d\x00\x2e\x00\x1e\x00\x0e\x01\x2f\x00\x1f\x00\x0f\x01\x74\x01\x20\x00\x82\x01\xa2\x00\x08\x01\x40\x00\x54\x00\x55\x00\x51\x01\x21\x00\xaa\x01\x31\x00\x0f\x00\x52\x01\x4b\x00\x12\x00\x09\x01\x48\x00\x8c\x01\x41\x00\x42\x00\x22\x00\x80\x01\x14\x00\x2c\x00\x23\x00\x24\x00\x15\x00\x16\x00\x4b\x00\x83\x01\x25\x00\x73\x01\x9c\x00\x06\x00\x26\x00\x27\x00\x28\x00\x9d\x00\x4b\x00\xe9\x00\x18\x00\x19\x00\x1a\x00\x1b\x00\x1c\x00\x1d\x00\x66\x00\x1e\x00\xf1\x00\x79\x01\x1f\x00\x8d\x00\x8e\x00\x8f\x00\xe9\x00\xeb\x00\x67\x00\x68\x00\x81\x01\x69\x00\x6a\x00\x6b\x00\x74\x01\x12\x00\xea\x00\x48\x00\x06\x00\x26\x00\x37\xff\x95\x01\xeb\x00\x14\x00\x75\x01\x22\x00\x4b\x00\x15\x00\x16\x00\x23\x00\x24\x00\x59\x01\x4c\x00\x4d\x00\x05\x01\x25\x00\x98\x01\xc4\x01\x06\x00\x26\x00\x27\x00\x28\x00\x19\x00\x1a\x00\x1b\x00\x1c\x00\x1d\x00\x71\x00\x9f\x01\x85\x01\xc5\x01\x1f\x00\x5a\x01\x5b\x01\x90\x00\x49\x00\x8d\x00\x8e\x00\x8f\x00\x15\x00\x16\x00\x91\x00\x6c\x00\x9c\x01\x54\x01\xf8\x00\x8e\x00\x8f\x00\x4c\x00\x4d\x00\x21\x01\xd4\x00\x92\x00\x2d\x01\x19\x00\x1a\x00\x1b\x00\x1c\x00\x1d\x00\x95\x00\xa4\x01\x96\x00\x64\x01\x1f\x00\x54\x01\xa2\x01\x7f\x00\x06\x00\x26\x00\x27\x00\x28\x00\x23\x01\x97\x00\x32\x01\xd5\x00\x6b\x01\x12\x00\x6c\x01\x48\x00\x7f\x00\x4b\x00\x98\x00\x55\x01\x69\x01\x14\x00\x6e\x01\x4b\x00\x90\x00\x15\x00\x16\x00\xf8\x00\x8e\x00\x8f\x00\xd7\x00\x86\x01\x7b\x01\xa2\x00\x08\x01\x2b\x01\x06\x00\x26\x00\x27\x00\x28\x00\x19\x00\x1a\x00\x1b\x00\x1c\x00\x1d\x00\x71\x00\x09\x01\x48\x00\x0a\x01\x1f\x00\x4c\x00\x4d\x00\x63\x00\x49\x00\x8d\x00\x8e\x00\x8f\x00\x15\x00\x16\x00\x4c\x00\x4d\x00\x98\x00\xf8\x00\x8e\x00\x8f\x00\x4c\x00\x4d\x00\x4e\x00\x06\x00\x26\x00\x27\x00\x41\x01\x19\x00\x1a\x00\x1b\x00\x1c\x00\x1d\x00\x2b\x00\xa2\x00\x8d\x01\x3b\x01\x1f\x00\x95\x00\x7e\x00\x96\x00\x06\x00\x26\x00\x27\x00\x28\x00\x7f\x00\x2c\x00\x5e\x01\x00\x01\x58\xff\x47\x00\x97\x00\x48\x00\x06\x00\x07\x00\x08\x00\x09\x00\x58\xff\x49\x00\x62\x00\x98\x00\x90\x00\x15\x00\x16\x00\x44\x00\x07\x00\x08\x00\x09\x00\xfe\x00\xa2\x00\x0b\x01\xf4\x00\xf4\x00\x06\x00\x26\x00\x27\x00\x28\x00\x19\x00\x1a\x00\x1b\x00\x1c\x00\x1d\x00\x06\x00\x07\x00\x08\x00\x09\x00\x1f\x00\x06\x00\x07\x00\x08\x00\x09\x00\x57\x01\x8d\x00\x8e\x00\x8f\x00\xbc\x01\xf5\x00\xf5\x00\x0a\x00\x0b\x00\x78\x00\x4c\x00\x4d\x00\x63\x00\xbd\x01\x58\x01\x85\x01\xf6\x00\x0f\x00\x6f\x00\x06\x00\x26\x00\x27\x00\xa1\x00\x8e\x00\x8f\x00\xf8\x00\x8e\x00\x8f\x00\x0f\x00\x5b\x00\x5c\x00\x06\x00\x26\x00\x27\x00\x28\x00\x5c\x01\x0a\x00\x0b\x00\x0c\x00\x0d\x00\x37\x01\x0a\x00\x0b\x00\x0c\x00\x0d\x00\x37\x01\x0f\x00\xf8\x00\x8e\x00\x8f\x00\xe0\x00\x0f\x00\x90\x00\x10\x00\x8d\x00\x8e\x00\x8f\x00\xd9\x00\x10\x00\x91\x00\xd4\x00\xe3\x00\x38\x01\x91\x01\x4c\x00\x4d\x00\x63\x00\x38\x01\x39\x01\x4b\x00\x92\x00\x93\x00\x1c\x01\xa2\x00\xa3\x00\x1f\x01\xa2\x00\xa3\x00\x22\x01\xa4\x00\xe1\x00\xa5\x00\xa4\x00\xd5\x00\xa5\x00\xf8\x00\x8e\x00\x8f\x00\x77\x01\xa6\x00\xa7\x00\x54\x01\xa6\x00\x2a\x01\xd6\x00\x28\x00\x29\x00\xe0\x00\xa2\x00\xa3\x00\xec\x00\xda\x00\xd7\x00\x7d\x01\xa4\x00\x90\x00\xa5\x00\x63\x01\x71\x01\x64\x01\xa6\x01\xdc\x00\x53\x01\x80\x00\xa6\x00\x3e\x01\x2f\x00\x30\x00\xaa\x00\xf8\x00\x8e\x00\x8f\x00\x8d\x00\x8e\x00\x8f\x00\xc1\x00\xca\x00\xe1\x00\x8d\x00\x8e\x00\x8f\x00\x7e\x01\xae\x01\xed\x00\xc2\x00\xe2\x00\xa2\x00\xa3\x00\x54\x01\xcb\x00\x7c\x01\xcc\x00\xa4\x00\xac\x00\xa5\x00\xad\x00\xae\x00\xaf\x00\xad\x01\xb0\x00\xc3\x00\xc4\x00\xa6\x00\xf9\x00\x65\x01\xde\x00\x64\x01\xb1\x00\xb2\x00\xb3\x00\xb4\x00\xdf\x00\xc5\x00\xb5\x00\xc6\x00\xb6\x00\xb7\x00\xb8\x00\xcd\x00\xb9\x00\xa2\x00\xa3\x00\x32\x00\x90\x00\xba\x00\xbb\x00\xa4\x00\xbc\x00\x3c\x01\x90\x00\xfe\x00\xac\x00\x4b\x00\xad\x00\xae\x00\xaf\x00\x13\x01\xb0\x00\x06\x00\x07\x00\x08\x00\x09\x00\x33\x00\x06\x00\x7d\x01\xb1\x00\xb2\x00\xb3\x00\xb4\x00\x4b\x00\x4b\x00\xb5\x00\x7e\x00\xb6\x00\xb7\x00\xb8\x00\x42\x00\xb9\x00\x7f\x00\x85\x00\x86\x00\x80\x00\xba\x00\xbb\x00\xda\x00\xbc\x00\x06\x00\x07\x00\x08\x00\x09\x00\x52\x00\x4b\x01\x7e\x01\x7f\x01\xdc\x00\xc8\x01\xc3\x01\x5e\x00\x07\x00\x08\x00\x09\x00\xda\x00\xda\x00\x0a\x00\x0b\x00\x0c\x00\x0d\x00\x1a\x01\x4c\x01\xdb\x00\xc9\x01\xdc\x00\xdc\x00\x0f\x00\xec\x00\x5e\x00\x07\x00\x08\x00\x09\x00\x3d\xff\x10\x00\x59\x00\x3d\xff\x1b\x01\x44\x00\x07\x00\x08\x00\x09\x00\xc2\x01\x06\x00\x6f\x00\x0a\x00\x0b\x00\x0c\x00\x0d\x00\x58\x00\x06\x00\x07\x00\x08\x00\x09\x00\xb9\x01\x0f\x00\x0a\x00\x0b\x00\x0c\x00\x0d\x00\x5f\x00\xed\x00\x10\x00\x59\x00\xb8\x01\x5a\x00\x0f\x00\xba\x01\xee\x00\xbb\x01\xbc\x01\x54\x00\x92\x01\x10\x00\x0a\x00\x0b\x00\x0c\x00\x0d\x00\x5f\x00\x06\x00\x07\x00\x08\x00\x09\x00\x45\x00\x0f\x00\x06\x00\x07\x00\x08\x00\x09\x00\x54\x00\x60\x00\x10\x00\xb2\x01\x0f\x00\xb3\x01\x0a\x00\x0b\x00\x0c\x00\x0d\x00\x9e\x00\x3a\x01\x06\x00\x07\x00\x08\x00\x09\x00\x0f\x00\x06\x00\xa4\x01\xa7\x01\x06\x00\xd4\x00\xb4\x01\x10\x00\x06\x00\x07\x00\x08\x00\x09\x00\x44\x01\xb5\x01\xbe\x01\x95\x01\xb0\x01\x94\x01\x97\x01\x0a\x00\x0b\x00\x0c\x00\x0d\x00\x9e\x00\x9f\x00\x0a\x00\x0b\x00\x79\x00\xd5\x00\x0f\x00\x06\x00\x07\x00\x08\x00\x09\x00\x98\x01\x0f\x00\x10\x00\x9a\x01\x06\x00\xd8\x00\xa1\x01\x0a\x00\x0b\x00\x0c\x00\x0d\x00\x9e\x00\xa9\x00\xd7\x00\xd4\x00\xd4\x00\xa2\x01\x0f\x00\x06\x00\x0a\x00\x0b\x00\x0c\x00\x0d\x00\xb0\x01\x10\x00\x06\x00\x07\x00\x08\x00\x09\x00\x0f\x00\x06\x00\x07\x00\x08\x00\x09\x00\x63\x01\x69\x01\x10\x00\xd5\x00\xd5\x00\xb4\x01\x67\x01\x0a\x00\x0b\x00\x0c\x00\x0d\x00\xa9\x01\xb5\x01\xb6\x01\xdf\x00\xe4\x00\x68\x01\x0f\x00\x06\x00\x07\x00\x08\x00\x09\x00\xd7\x00\xd7\x00\x10\x00\x6d\x01\x6e\x01\x88\x01\x06\x00\x06\x00\x07\x00\x08\x00\x09\x00\x79\x01\x06\x00\x89\x01\x0a\x00\x0b\x00\x0c\x00\x0d\x00\x90\x01\x0a\x00\x0b\x00\x0c\x00\x0d\x00\x9a\x01\x0f\x00\x06\x00\x07\x00\x08\x00\x09\x00\x0f\x00\x8a\x01\x10\x00\x06\x00\x90\x01\x25\x01\x26\x01\x10\x00\x06\x00\x07\x00\x08\x00\x09\x00\x0a\x00\x0b\x00\x0c\x00\x0d\x00\x6f\x01\x27\x01\x28\x01\x06\x00\x4b\x00\x29\x01\x0f\x00\x0a\x00\x0b\x00\x0c\x00\x0d\x00\x70\x01\x2f\x01\x10\x00\x30\x01\x33\x01\x31\x01\x0f\x00\x06\x00\x07\x00\x08\x00\x09\x00\x34\x01\x36\x01\x10\x00\x0a\x00\x0b\x00\x0c\x00\x0d\x00\x72\x01\x06\x00\x07\x00\x08\x00\x09\x00\x35\x01\x0f\x00\xda\x00\x0a\x00\x0b\x00\x0c\x00\x0d\x00\x7a\x01\x10\x00\xe7\x00\x37\x01\x06\x00\xdc\x00\x0f\x00\x06\x00\x07\x00\x08\x00\x09\x00\x41\x01\x40\x01\x10\x00\x43\x01\x45\x01\x47\x01\x46\x01\x06\x00\x07\x00\x08\x00\x09\x00\x0a\x00\x0b\x00\x0c\x00\x0d\x00\x8a\x01\x48\x01\x06\x00\x49\x01\x4a\x01\x4f\x01\x0f\x00\x4b\x01\x0a\x00\x0b\x00\x0c\x00\x0d\x00\x8b\x01\x10\x00\x06\x00\x07\x00\x08\x00\x09\x00\x0f\x00\x06\x00\x07\x00\x08\x00\x09\x00\x4e\x01\x50\x01\x10\x00\x0a\x00\x0b\x00\x0c\x00\x0d\x00\x29\x01\x53\x01\x06\x00\x07\x00\x08\x00\x09\x00\x0f\x00\x0a\x00\x0b\x00\x0c\x00\x0d\x00\x2c\x01\x06\x00\x10\x00\x5e\x01\x62\x01\x60\x01\x0f\x00\x06\x00\x07\x00\x08\x00\x09\x00\xca\x00\xd1\x00\x10\x00\x06\x00\xf8\x00\xd4\x00\xd3\x00\x0a\x00\x0b\x00\x0c\x00\x0d\x00\x3d\x01\x0a\x00\x0b\x00\x0c\x00\x0d\x00\x03\x01\x0f\x00\x06\x00\x07\x00\x08\x00\x09\x00\x0f\x00\xd2\x00\x10\x00\x0a\x00\x0b\x00\x7a\x00\xd5\x00\x10\x00\x06\x00\x07\x00\x08\x00\x09\x00\xfc\x00\x0f\x00\xfb\x00\xfd\x00\xfe\x00\xe5\x00\x85\x00\x0a\x00\x0b\x00\x0c\x00\x0d\x00\x04\x01\x01\x01\xd7\x00\x02\x01\x03\x01\x06\x00\x0f\x00\x06\x00\x07\x00\x08\x00\x09\x00\x06\x00\x08\x01\x10\x00\x11\x01\x12\x01\x16\x01\x13\x01\x0a\x00\x0b\x00\x0c\x00\x0d\x00\x06\x01\x19\x01\x15\x01\xd4\x00\xd4\x00\x1f\x01\x0f\x00\x6e\x00\x0a\x00\x0b\x00\x0c\x00\x0d\x00\x17\x01\x10\x00\x06\x00\x07\x00\x08\x00\x09\x00\x0f\x00\x06\x00\x07\x00\x08\x00\x09\x00\x27\x00\x06\x00\x10\x00\xd5\x00\xd5\x00\x06\x00\x06\x00\x0a\x00\x0b\x00\x0c\x00\x0d\x00\x19\x01\x75\x00\x82\x00\xe6\x00\xe8\x00\x7d\x00\x0f\x00\x06\x00\x07\x00\x08\x00\x09\x00\xd7\x00\xd7\x00\x10\x00\x06\x00\x83\x00\x84\x00\x87\x00\x06\x00\x07\x00\x08\x00\x09\x00\x88\x00\x89\x00\x8c\x00\x0a\x00\x0b\x00\x0c\x00\x0d\x00\x1d\x01\x0a\x00\x0b\x00\x0c\x00\x0d\x00\x75\x00\x0f\x00\x06\x00\x07\x00\x08\x00\x09\x00\x0f\x00\x8b\x00\x10\x00\x8d\x00\x9a\x00\x9b\x00\x06\x00\x10\x00\x06\x00\x07\x00\x08\x00\x09\x00\x0a\x00\x0b\x00\x0c\x00\x0d\x00\x76\x00\x7f\x00\xa9\x00\xc0\x00\x3b\x00\x06\x00\x0f\x00\x0a\x00\x0b\x00\x0c\x00\x0d\x00\x77\x00\xc8\x00\x10\x00\xc9\x00\xff\xff\x06\x00\x0f\x00\x06\x00\x07\x00\x08\x00\x09\x00\x44\x00\x4a\x00\x10\x00\x0a\x00\x0b\x00\x0c\x00\x0d\x00\x7b\x00\x06\x00\x07\x00\x08\x00\x09\x00\xff\xff\x0f\x00\x4b\x00\x0a\x00\x0b\x00\x0c\x00\x0d\x00\x9d\x00\x10\x00\x44\x00\x07\x00\x08\x00\x09\x00\x0f\x00\x06\x00\x07\x00\x08\x00\x09\x00\x51\x00\x06\x00\x10\x00\x65\x00\xff\xff\x35\x00\x6e\x00\x6f\x00\x36\x00\x06\x00\x2b\x00\x0a\x00\x0b\x00\x0c\x00\x0d\x00\x5f\x00\x00\x00\x00\x00\x37\x00\x38\x00\x00\x00\x0f\x00\x00\x00\x0a\x00\x0b\x00\x0c\x00\x0d\x00\x51\x00\x10\x00\xd4\x00\x00\x00\x00\x00\x00\x00\x0f\x00\x39\x00\x00\x00\x0a\x00\x6c\x00\x00\x00\x3a\x00\x10\x00\x0a\x00\x0b\x00\x0c\x00\x0d\x00\x0e\x00\x0f\x00\x00\x00\x00\x00\x00\x00\x00\x00\x0f\x00\xd5\x00\xac\x00\x00\x00\xad\x00\xae\x00\xaf\x00\x10\x00\xb0\x00\x00\x00\x00\x00\x00\x00\xef\x00\x00\x00\x00\x00\x00\x00\xb1\x00\xb2\x00\xb3\x00\xb4\x00\xd7\x00\x00\x00\xb5\x00\x00\x00\xb6\x00\xb7\x00\xb8\x00\xcf\x00\xb9\x00\x00\x00\x00\x00\x00\x00\xd0\x00\xba\x00\xbb\x00\x00\x00\xbc\x00\x06\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\x50\x00\x3b\x00\x3b\x00\x3c\x00\x3b\x00\x3c\x00\x3b\x00\x3c\x00\x3b\x00\x3c\x00\x3b\x00\x3c\x00\x3b\x00\x3c\x00\x58\x00\x53\x00\x71\x00\x57\x00\x5a\x01\x57\x01\x95\x00\x58\x00\x96\x00\x47\x01\x74\x00\xf1\x00\x57\x01\x12\x00\x7a\x01\x13\x00\x02\x01\x7f\x00\x57\x01\x97\x00\x5a\x01\x14\x00\x4b\x00\xc8\x01\xc3\x01\x15\x00\x16\x00\x7f\x00\x98\x00\xc2\x01\xc9\x01\x17\x00\x95\x00\x5e\x00\x96\x00\x58\x00\x9e\x01\xea\x00\xf2\x00\x18\x00\x19\x00\x1a\x00\x1b\x00\x1c\x00\x1d\x00\x97\x00\x1e\x00\xf3\x00\xf4\x00\x1f\x00\x06\x00\xb6\x01\x20\x00\xec\x00\x98\x00\x62\x00\x72\x00\x06\x00\x06\x00\x06\x00\x21\x00\x54\x00\x18\x01\xab\x00\xa0\x01\xbd\x00\xff\xff\x3d\x00\xd4\x00\x3d\x00\x3e\x00\xbe\x00\x22\x00\xbf\x00\x06\x00\xc1\x00\x23\x00\x24\x00\x06\x00\x26\x00\x27\x00\x12\x00\x25\x00\x13\x00\x06\x00\x06\x00\x26\x00\x27\x00\x28\x00\x14\x00\x06\x00\x64\x01\xae\x01\x15\x00\x16\x00\x4b\x00\x06\x00\x26\x00\x53\x00\x17\x00\x5c\x01\x4b\x00\xa0\x00\x5c\x00\x06\x00\x26\x00\x27\x00\x18\x00\x19\x00\x1a\x00\x1b\x00\x1c\x00\x1d\x00\x2e\x00\x1e\x00\x0e\x01\x2f\x00\x1f\x00\x53\x00\xa9\x00\x20\x00\xa1\x01\x5e\x01\x62\x00\xfa\x00\x8e\x00\x8f\x00\xaa\x00\x21\x00\x44\x00\x07\x00\x08\x00\x09\x00\xab\x00\x12\x00\xab\x01\x13\x00\x0f\x01\xb0\x01\xac\x01\x22\x00\x76\x01\x14\x00\x22\x01\x23\x00\x24\x00\x15\x00\x16\x00\x10\x01\xf7\xff\x25\x00\x91\x01\x17\x00\x06\x00\x26\x00\x27\x00\x28\x00\x0f\x01\x54\x00\x89\x00\x18\x00\x19\x00\x1a\x00\x1b\x00\x1c\x00\x1d\x00\x2e\x00\x1e\x00\x10\x01\x2f\x00\x1f\x00\x11\x01\x77\x01\x20\x00\x85\x01\xa2\x00\x0a\x01\x40\x00\x54\x00\x55\x00\x54\x01\x21\x00\xad\x01\x31\x00\x0f\x00\x55\x01\x4b\x00\x12\x00\x0b\x01\x48\x00\x8f\x01\x41\x00\x42\x00\x22\x00\x83\x01\x14\x00\x2c\x00\x23\x00\x24\x00\x15\x00\x16\x00\x4b\x00\x86\x01\x25\x00\x76\x01\x9c\x00\x06\x00\x26\x00\x27\x00\x28\x00\x9d\x00\x4b\x00\xea\x00\x18\x00\x19\x00\x1a\x00\x1b\x00\x1c\x00\x1d\x00\x66\x00\x1e\x00\xf2\x00\x7c\x01\x1f\x00\x8d\x00\x8e\x00\x8f\x00\xea\x00\xec\x00\x67\x00\x68\x00\x84\x01\x69\x00\x6a\x00\x6b\x00\x77\x01\x12\x00\xeb\x00\x48\x00\x06\x00\x26\x00\x36\xff\x98\x01\xec\x00\x14\x00\x78\x01\x22\x00\x4b\x00\x15\x00\x16\x00\x23\x00\x24\x00\x5c\x01\x4c\x00\x4d\x00\x07\x01\x25\x00\x9b\x01\xc7\x01\x06\x00\x26\x00\x27\x00\x28\x00\x19\x00\x1a\x00\x1b\x00\x1c\x00\x1d\x00\x71\x00\xa2\x01\x88\x01\xc8\x01\x1f\x00\x5d\x01\x5e\x01\x90\x00\x49\x00\x8d\x00\x8e\x00\x8f\x00\x15\x00\x16\x00\x91\x00\x6c\x00\x9f\x01\x57\x01\xfa\x00\x8e\x00\x8f\x00\x4c\x00\x4d\x00\x23\x01\xd5\x00\x92\x00\x2f\x01\x19\x00\x1a\x00\x1b\x00\x1c\x00\x1d\x00\x95\x00\xa7\x01\x96\x00\x67\x01\x1f\x00\x57\x01\xa5\x01\x7f\x00\x06\x00\x26\x00\x27\x00\x28\x00\x25\x01\x97\x00\x7e\x00\xd6\x00\x6e\x01\x12\x00\x6f\x01\x48\x00\x7f\x00\x4b\x00\x98\x00\x58\x01\x6c\x01\x14\x00\x71\x01\x4b\x00\x90\x00\x15\x00\x16\x00\xfa\x00\x8e\x00\x8f\x00\xd8\x00\x89\x01\x7e\x01\xa2\x00\x0a\x01\x2d\x01\x06\x00\x26\x00\x27\x00\x28\x00\x19\x00\x1a\x00\x1b\x00\x1c\x00\x1d\x00\x71\x00\x0b\x01\x48\x00\x0c\x01\x1f\x00\x4c\x00\x4d\x00\x63\x00\x49\x00\x8d\x00\x8e\x00\x8f\x00\x15\x00\x16\x00\x4c\x00\x4d\x00\x98\x00\xfa\x00\x8e\x00\x8f\x00\x4c\x00\x4d\x00\x4e\x00\x06\x00\x26\x00\x27\x00\x44\x01\x19\x00\x1a\x00\x1b\x00\x1c\x00\x1d\x00\x2b\x00\xa2\x00\x90\x01\x3d\x01\x1f\x00\x95\x00\x7e\x00\x96\x00\x06\x00\x26\x00\x27\x00\x28\x00\x7f\x00\x2c\x00\x61\x01\x02\x01\x57\xff\x47\x00\x97\x00\x48\x00\x06\x00\x07\x00\x08\x00\x09\x00\x57\xff\x49\x00\x62\x00\x98\x00\x90\x00\x15\x00\x16\x00\x44\x00\x07\x00\x08\x00\x09\x00\x00\x01\xa2\x00\x0d\x01\xf5\x00\xf5\x00\x06\x00\x26\x00\x27\x00\x28\x00\x19\x00\x1a\x00\x1b\x00\x1c\x00\x1d\x00\x06\x00\x07\x00\x08\x00\x09\x00\x1f\x00\x06\x00\x07\x00\x08\x00\x09\x00\x5a\x01\x8d\x00\x8e\x00\x8f\x00\xbf\x01\xf6\x00\xf6\x00\x0a\x00\x0b\x00\x78\x00\x4c\x00\x4d\x00\x63\x00\xc0\x01\x5b\x01\x88\x01\xf7\x00\x0f\x00\x6f\x00\x06\x00\x26\x00\x27\x00\xa1\x00\x8e\x00\x8f\x00\xfa\x00\x8e\x00\x8f\x00\x0f\x00\x5b\x00\x5c\x00\x06\x00\x26\x00\x27\x00\x28\x00\x5f\x01\x0a\x00\x0b\x00\x0c\x00\x0d\x00\x39\x01\x0a\x00\x0b\x00\x0c\x00\x0d\x00\x39\x01\x0f\x00\xfa\x00\x8e\x00\x8f\x00\xe1\x00\x0f\x00\x90\x00\x10\x00\x8d\x00\x8e\x00\x8f\x00\xda\x00\x10\x00\x91\x00\xd5\x00\xe4\x00\x3a\x01\x94\x01\x4c\x00\x4d\x00\x63\x00\x3a\x01\x3b\x01\x4b\x00\x92\x00\x93\x00\x34\x01\xa2\x00\xa3\x00\x1e\x01\xa2\x00\xa3\x00\x7f\x00\xa4\x00\xe2\x00\xa5\x00\xa4\x00\xd6\x00\xa5\x00\xfa\x00\x8e\x00\x8f\x00\x7a\x01\xa6\x00\xa7\x00\x57\x01\xa6\x00\x2c\x01\xd7\x00\x28\x00\x29\x00\xe1\x00\xa2\x00\xa3\x00\xed\x00\xdb\x00\xd8\x00\x80\x01\xa4\x00\x90\x00\xa5\x00\x66\x01\x74\x01\x67\x01\xa9\x01\xdd\x00\x56\x01\x21\x01\xa6\x00\x40\x01\x2f\x00\x30\x00\x24\x01\xfa\x00\x8e\x00\x8f\x00\x8d\x00\x8e\x00\x8f\x00\x80\x00\xcb\x00\xe2\x00\x8d\x00\x8e\x00\x8f\x00\x81\x01\xb1\x01\xee\x00\xab\x00\xe3\x00\xa2\x00\xa3\x00\x57\x01\xcc\x00\x7f\x01\xcd\x00\xa4\x00\xad\x00\xa5\x00\xae\x00\xaf\x00\xb0\x00\xb0\x01\xb1\x00\xc2\x00\xc3\x00\xa6\x00\xfb\x00\x68\x01\xdf\x00\x67\x01\xb2\x00\xb3\x00\xb4\x00\xb5\x00\xe0\x00\xc4\x00\xb6\x00\xc5\x00\xb7\x00\xb8\x00\xb9\x00\xce\x00\xba\x00\xa2\x00\xa3\x00\xc6\x00\x90\x00\xbb\x00\xbc\x00\xa4\x00\xbd\x00\x3e\x01\x90\x00\x00\x01\xad\x00\x4b\x00\xae\x00\xaf\x00\xb0\x00\x15\x01\xb1\x00\x06\x00\x07\x00\x08\x00\x09\x00\xc7\x00\x06\x00\x80\x01\xb2\x00\xb3\x00\xb4\x00\xb5\x00\x4b\x00\x4b\x00\xb6\x00\x7e\x00\xb7\x00\xb8\x00\xb9\x00\x32\x00\xba\x00\x7f\x00\x85\x00\x86\x00\x80\x00\xbb\x00\xbc\x00\xdb\x00\xbd\x00\x06\x00\x07\x00\x08\x00\x09\x00\x33\x00\x4e\x01\x81\x01\x82\x01\xdd\x00\x42\x00\x52\x00\x5e\x00\x07\x00\x08\x00\x09\x00\xdb\x00\xdb\x00\x0a\x00\x0b\x00\x0c\x00\x0d\x00\x1c\x01\x4f\x01\xdc\x00\xcb\x01\xdd\x00\xdd\x00\x0f\x00\xed\x00\x5e\x00\x07\x00\x08\x00\x09\x00\x3c\xff\x10\x00\x59\x00\x3c\xff\x1d\x01\x44\x00\x07\x00\x08\x00\x09\x00\xcc\x01\xc6\x01\x6f\x00\x0a\x00\x0b\x00\x0c\x00\x0d\x00\x58\x00\x06\x00\x07\x00\x08\x00\x09\x00\xc5\x01\x0f\x00\x0a\x00\x0b\x00\x0c\x00\x0d\x00\x5f\x00\xee\x00\x10\x00\x59\x00\x06\x00\x5a\x00\x0f\x00\xbb\x01\xef\x00\xbc\x01\xbe\x01\x54\x00\x95\x01\x10\x00\x0a\x00\x0b\x00\x0c\x00\x0d\x00\x5f\x00\x06\x00\x07\x00\x08\x00\x09\x00\x45\x00\x0f\x00\xbd\x01\xbf\x01\xb5\x01\xb6\x01\x54\x00\x60\x00\x10\x00\x06\x00\x0f\x00\xa7\x01\x0a\x00\x0b\x00\x0c\x00\x0d\x00\x9e\x00\x3c\x01\x06\x00\x07\x00\x08\x00\x09\x00\x0f\x00\xd0\x00\x06\x00\x07\x00\x08\x00\x09\x00\xd1\x00\x10\x00\xb3\x01\xaa\x01\x06\x00\x06\x00\x47\x01\x97\x01\x06\x00\x07\x00\x08\x00\x09\x00\x98\x01\x0a\x00\x0b\x00\x0c\x00\x0d\x00\x9e\x00\xf9\x00\x06\x00\x07\x00\x08\x00\x09\x00\x0f\x00\x9a\x01\x9b\x01\x9d\x01\xa5\x01\xa4\x01\x06\x00\x10\x00\x06\x00\x07\x00\x08\x00\x09\x00\x0a\x00\x0b\x00\x0c\x00\x0d\x00\x9e\x00\x9f\x00\x0a\x00\x0b\x00\x79\x00\x66\x01\x0f\x00\x44\x00\x07\x00\x08\x00\x09\x00\x6a\x01\x0f\x00\x10\x00\x0a\x00\x0b\x00\x0c\x00\x0d\x00\x9e\x00\xaa\x00\x06\x00\x07\x00\x08\x00\x09\x00\x0f\x00\x0a\x00\x0b\x00\x0c\x00\x0d\x00\xb3\x01\x06\x00\x10\x00\x6b\x01\x70\x01\x6c\x01\x0f\x00\x71\x01\x0a\x00\x0b\x00\x0c\x00\x0d\x00\xac\x01\x10\x00\x06\x00\x07\x00\x08\x00\x09\x00\x0f\x00\x06\x00\x07\x00\x08\x00\x09\x00\x0a\x00\x6c\x00\x10\x00\x7c\x01\xb7\x01\x06\x00\x06\x00\x8b\x01\x8c\x01\x06\x00\x0f\x00\xb8\x01\xc1\x01\x0a\x00\x0b\x00\x0c\x00\x0d\x00\x93\x01\x06\x00\x07\x00\x08\x00\x09\x00\x8d\x01\x0f\x00\x06\x00\x07\x00\x08\x00\x09\x00\x29\x01\x93\x01\x10\x00\x27\x01\x28\x01\x2a\x01\xd5\x00\x06\x00\x0a\x00\x0b\x00\x0c\x00\x0d\x00\x9d\x01\x0a\x00\x0b\x00\x0c\x00\x0d\x00\x72\x01\x0f\x00\x06\x00\x07\x00\x08\x00\x09\x00\x0f\x00\x2b\x01\x10\x00\x31\x01\x32\x01\x36\x01\xd6\x00\x10\x00\x06\x00\x07\x00\x08\x00\x09\x00\x0a\x00\x0b\x00\x0c\x00\x0d\x00\x73\x01\xd9\x00\x0a\x00\x0b\x00\x7a\x00\x33\x01\x0f\x00\x35\x01\x37\x01\xd8\x00\x38\x01\x39\x01\x0f\x00\x10\x00\x06\x00\x07\x00\x08\x00\x09\x00\x06\x00\x06\x00\x07\x00\x08\x00\x09\x00\xb7\x01\x42\x01\x0a\x00\x0b\x00\x0c\x00\x0d\x00\x75\x01\xb8\x01\xb9\x01\x44\x01\x43\x01\x46\x01\x0f\x00\x48\x01\x0a\x00\x0b\x00\x0c\x00\x0d\x00\x7d\x01\x10\x00\x06\x00\x07\x00\x08\x00\x09\x00\x0f\x00\x06\x00\x07\x00\x08\x00\x09\x00\x49\x01\x4a\x01\x10\x00\x4b\x01\x06\x00\x4c\x01\x4d\x01\x0a\x00\x0b\x00\x0c\x00\x0d\x00\x8d\x01\x0a\x00\x0b\x00\x0c\x00\x0d\x00\x8e\x01\x0f\x00\x06\x00\x07\x00\x08\x00\x09\x00\x0f\x00\x4e\x01\x10\x00\x51\x01\x52\x01\x53\x01\x56\x01\x10\x00\x06\x00\x07\x00\x08\x00\x09\x00\x06\x00\x65\x01\x0a\x00\x0b\x00\x0c\x00\x0d\x00\x2b\x01\x0a\x00\x0b\x00\x0c\x00\x0d\x00\x2e\x01\x0f\x00\x61\x01\x63\x01\xcb\x00\xd2\x00\x0f\x00\xd3\x00\x10\x00\x06\x00\x07\x00\x08\x00\x09\x00\x10\x00\x06\x00\x07\x00\x08\x00\x09\x00\x0a\x00\x0b\x00\x0c\x00\x0d\x00\x3f\x01\xd4\x00\xf9\x00\xfd\x00\xfe\x00\xff\x00\x0f\x00\x06\x00\x0a\x00\x0b\x00\x0c\x00\x0d\x00\x05\x01\x10\x00\x06\x00\x07\x00\x08\x00\x09\x00\x0f\x00\x06\x00\x07\x00\x08\x00\x09\x00\x00\x01\x85\x00\x10\x00\x03\x01\x04\x01\x05\x01\x0a\x01\x06\x00\x14\x01\x0a\x00\x0b\x00\x0c\x00\x0d\x00\x06\x01\x0a\x00\x0b\x00\x0c\x00\x0d\x00\x08\x01\x0f\x00\x06\x00\x07\x00\x08\x00\x09\x00\x0f\x00\x06\x00\x10\x00\x13\x01\x17\x01\xd5\x00\x15\x01\x10\x00\x06\x00\x07\x00\x08\x00\x09\x00\x0a\x00\x0b\x00\x0c\x00\x0d\x00\x19\x01\x0a\x00\x0b\x00\x0c\x00\x0d\x00\x1b\x01\x0f\x00\x18\x01\x1b\x01\x06\x00\x27\x00\x0f\x00\xd6\x00\x10\x00\x06\x00\x07\x00\x08\x00\x09\x00\x10\x00\x06\x00\x07\x00\x08\x00\x09\x00\xe0\x00\x21\x01\x0a\x00\x0b\x00\x0c\x00\x0d\x00\x1f\x01\x06\x00\xd8\x00\x06\x00\x6e\x00\x75\x00\x0f\x00\x7d\x00\x0a\x00\x0b\x00\x0c\x00\x0d\x00\x75\x00\x10\x00\x06\x00\x07\x00\x08\x00\x09\x00\x0f\x00\x06\x00\x07\x00\x08\x00\x09\x00\x06\x00\x82\x00\x10\x00\x83\x00\x84\x00\x87\x00\x89\x00\x0a\x00\x0b\x00\x0c\x00\x0d\x00\x76\x00\x0a\x00\x0b\x00\x0c\x00\x0d\x00\x77\x00\x0f\x00\x06\x00\x07\x00\x08\x00\x09\x00\x0f\x00\x88\x00\x10\x00\x8b\x00\xd5\x00\xd5\x00\x8d\x00\x10\x00\x06\x00\x07\x00\x08\x00\x09\x00\x8c\x00\x06\x00\x0a\x00\x0b\x00\x0c\x00\x0d\x00\x7b\x00\x0a\x00\x0b\x00\x0c\x00\x0d\x00\x9d\x00\x0f\x00\xd5\x00\xd5\x00\xd6\x00\xd6\x00\x0f\x00\x4b\x00\x10\x00\x06\x00\x07\x00\x08\x00\x09\x00\x10\x00\x9a\x00\xe5\x00\xe6\x00\x9b\x00\x0a\x00\x0b\x00\x0c\x00\x0d\x00\x5f\x00\xd8\x00\xd8\x00\xd6\x00\xd6\x00\xd5\x00\x0f\x00\x7f\x00\x0a\x00\x0b\x00\x0c\x00\x0d\x00\x51\x00\x10\x00\xe7\x00\xe9\x00\xc1\x00\xdb\x00\x0f\x00\x06\x00\xc9\x00\xca\x00\xd8\x00\xd8\x00\xe8\x00\x10\x00\x3b\x00\xdd\x00\xd6\x00\xff\xff\x06\x00\x44\x00\x0a\x00\x0b\x00\x0c\x00\x0d\x00\x0e\x00\x4a\x00\xff\xff\xf0\x00\x4b\x00\x06\x00\x0f\x00\x51\x00\x65\x00\xff\xff\x6e\x00\xd8\x00\xad\x00\x10\x00\xae\x00\xaf\x00\xb0\x00\x6f\x00\xb1\x00\x2b\x00\x00\x00\x06\x00\x00\x00\x00\x00\x00\x00\x00\x00\xb2\x00\xb3\x00\xb4\x00\xb5\x00\x00\x00\x00\x00\xb6\x00\x00\x00\xb7\x00\xb8\x00\xb9\x00\x35\x00\xba\x00\x00\x00\x36\x00\x00\x00\x00\x00\xbb\x00\xbc\x00\x00\x00\xbd\x00\x00\x00\x00\x00\x00\x00\x37\x00\x38\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\x39\x00\x00\x00\x00\x00\x00\x00\x00\x00\x3a\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 (4, 234) [ +happyReduceArr = array (4, 235) [ (4 , happyReduce_4), (5 , happyReduce_5), (6 , happyReduce_6), @@ -741,7 +741,8 @@ happyReduceArr = array (4, 234) [ (231 , happyReduce_231), (232 , happyReduce_232), (233 , happyReduce_233), - (234 , happyReduce_234) + (234 , happyReduce_234), + (235 , happyReduce_235) ] happy_n_terms = 81 :: Int @@ -1958,8 +1959,21 @@ happyReduction_140 (happy_x_5 `HappyStk` (ETTable happy_var_2 happy_var_4 ) `HappyStk` happyRest}} -happyReduce_141 = happyReduce 6# 47# happyReduction_141 -happyReduction_141 (happy_x_6 `HappyStk` +happyReduce_141 = happyReduce 5# 47# happyReduction_141 +happyReduction_141 (happy_x_5 `HappyStk` + happy_x_4 `HappyStk` + happy_x_3 `HappyStk` + happy_x_2 `HappyStk` + happy_x_1 `HappyStk` + happyRest) + = case happyOut52 happy_x_2 of { happy_var_2 -> + case happyOut57 happy_x_4 of { happy_var_4 -> + happyIn54 + (EVTable happy_var_2 happy_var_4 + ) `HappyStk` happyRest}} + +happyReduce_142 = happyReduce 6# 47# happyReduction_142 +happyReduction_142 (happy_x_6 `HappyStk` happy_x_5 `HappyStk` happy_x_4 `HappyStk` happy_x_3 `HappyStk` @@ -1972,8 +1986,8 @@ happyReduction_141 (happy_x_6 `HappyStk` (ECase happy_var_2 happy_var_5 ) `HappyStk` happyRest}} -happyReduce_142 = happyReduce 4# 47# happyReduction_142 -happyReduction_142 (happy_x_4 `HappyStk` +happyReduce_143 = happyReduce 4# 47# happyReduction_143 +happyReduction_143 (happy_x_4 `HappyStk` happy_x_3 `HappyStk` happy_x_2 `HappyStk` happy_x_1 `HappyStk` @@ -1983,8 +1997,8 @@ happyReduction_142 (happy_x_4 `HappyStk` (EVariants happy_var_3 ) `HappyStk` happyRest} -happyReduce_143 = happyReduce 6# 47# happyReduction_143 -happyReduction_143 (happy_x_6 `HappyStk` +happyReduce_144 = happyReduce 6# 47# happyReduction_144 +happyReduction_144 (happy_x_6 `HappyStk` happy_x_5 `HappyStk` happy_x_4 `HappyStk` happy_x_3 `HappyStk` @@ -1997,8 +2011,8 @@ happyReduction_143 (happy_x_6 `HappyStk` (EPre happy_var_3 happy_var_5 ) `HappyStk` happyRest}} -happyReduce_144 = happyReduce 4# 47# happyReduction_144 -happyReduction_144 (happy_x_4 `HappyStk` +happyReduce_145 = happyReduce 4# 47# happyReduction_145 +happyReduction_145 (happy_x_4 `HappyStk` happy_x_3 `HappyStk` happy_x_2 `HappyStk` happy_x_1 `HappyStk` @@ -2008,8 +2022,8 @@ happyReduction_144 (happy_x_4 `HappyStk` (EStrs happy_var_3 ) `HappyStk` happyRest} -happyReduce_145 = happySpecReduce_3 47# happyReduction_145 -happyReduction_145 happy_x_3 +happyReduce_146 = happySpecReduce_3 47# happyReduction_146 +happyReduction_146 happy_x_3 happy_x_2 happy_x_1 = case happyOut7 happy_x_1 of { happy_var_1 -> @@ -2018,23 +2032,23 @@ happyReduction_145 happy_x_3 (EConAt happy_var_1 happy_var_3 )}} -happyReduce_146 = happySpecReduce_1 47# happyReduction_146 -happyReduction_146 happy_x_1 +happyReduce_147 = happySpecReduce_1 47# happyReduction_147 +happyReduction_147 happy_x_1 = case happyOut53 happy_x_1 of { happy_var_1 -> happyIn54 (happy_var_1 )} -happyReduce_147 = happySpecReduce_2 47# happyReduction_147 -happyReduction_147 happy_x_2 +happyReduce_148 = happySpecReduce_2 47# happyReduction_148 +happyReduction_148 happy_x_2 happy_x_1 = case happyOut7 happy_x_2 of { happy_var_2 -> happyIn54 (ELin happy_var_2 )} -happyReduce_148 = happySpecReduce_3 48# happyReduction_148 -happyReduction_148 happy_x_3 +happyReduce_149 = happySpecReduce_3 48# happyReduction_149 +happyReduction_149 happy_x_3 happy_x_2 happy_x_1 = case happyOut55 happy_x_1 of { happy_var_1 -> @@ -2043,8 +2057,8 @@ happyReduction_148 happy_x_3 (ESelect happy_var_1 happy_var_3 )}} -happyReduce_149 = happySpecReduce_3 48# happyReduction_149 -happyReduction_149 happy_x_3 +happyReduce_150 = happySpecReduce_3 48# happyReduction_150 +happyReduction_150 happy_x_3 happy_x_2 happy_x_1 = case happyOut55 happy_x_1 of { happy_var_1 -> @@ -2053,8 +2067,8 @@ happyReduction_149 happy_x_3 (ETupTyp happy_var_1 happy_var_3 )}} -happyReduce_150 = happySpecReduce_3 48# happyReduction_150 -happyReduction_150 happy_x_3 +happyReduce_151 = happySpecReduce_3 48# happyReduction_151 +happyReduction_151 happy_x_3 happy_x_2 happy_x_1 = case happyOut55 happy_x_1 of { happy_var_1 -> @@ -2063,15 +2077,15 @@ happyReduction_150 happy_x_3 (EExtend happy_var_1 happy_var_3 )}} -happyReduce_151 = happySpecReduce_1 48# happyReduction_151 -happyReduction_151 happy_x_1 +happyReduce_152 = happySpecReduce_1 48# happyReduction_152 +happyReduction_152 happy_x_1 = case happyOut54 happy_x_1 of { happy_var_1 -> happyIn55 (happy_var_1 )} -happyReduce_152 = happyReduce 4# 49# happyReduction_152 -happyReduction_152 (happy_x_4 `HappyStk` +happyReduce_153 = happyReduce 4# 49# happyReduction_153 +happyReduction_153 (happy_x_4 `HappyStk` happy_x_3 `HappyStk` happy_x_2 `HappyStk` happy_x_1 `HappyStk` @@ -2082,8 +2096,8 @@ happyReduction_152 (happy_x_4 `HappyStk` (EAbstr happy_var_2 happy_var_4 ) `HappyStk` happyRest}} -happyReduce_153 = happyReduce 5# 49# happyReduction_153 -happyReduction_153 (happy_x_5 `HappyStk` +happyReduce_154 = happyReduce 5# 49# happyReduction_154 +happyReduction_154 (happy_x_5 `HappyStk` happy_x_4 `HappyStk` happy_x_3 `HappyStk` happy_x_2 `HappyStk` @@ -2095,8 +2109,8 @@ happyReduction_153 (happy_x_5 `HappyStk` (ECTable happy_var_3 happy_var_5 ) `HappyStk` happyRest}} -happyReduce_154 = happySpecReduce_3 49# happyReduction_154 -happyReduction_154 happy_x_3 +happyReduce_155 = happySpecReduce_3 49# happyReduction_155 +happyReduction_155 happy_x_3 happy_x_2 happy_x_1 = case happyOut69 happy_x_1 of { happy_var_1 -> @@ -2105,8 +2119,8 @@ happyReduction_154 happy_x_3 (EProd happy_var_1 happy_var_3 )}} -happyReduce_155 = happySpecReduce_3 49# happyReduction_155 -happyReduction_155 happy_x_3 +happyReduce_156 = happySpecReduce_3 49# happyReduction_156 +happyReduction_156 happy_x_3 happy_x_2 happy_x_1 = case happyOut55 happy_x_1 of { happy_var_1 -> @@ -2115,8 +2129,8 @@ happyReduction_155 happy_x_3 (ETType happy_var_1 happy_var_3 )}} -happyReduce_156 = happySpecReduce_3 49# happyReduction_156 -happyReduction_156 happy_x_3 +happyReduce_157 = happySpecReduce_3 49# happyReduction_157 +happyReduction_157 happy_x_3 happy_x_2 happy_x_1 = case happyOut55 happy_x_1 of { happy_var_1 -> @@ -2125,8 +2139,8 @@ happyReduction_156 happy_x_3 (EConcat happy_var_1 happy_var_3 )}} -happyReduce_157 = happySpecReduce_3 49# happyReduction_157 -happyReduction_157 happy_x_3 +happyReduce_158 = happySpecReduce_3 49# happyReduction_158 +happyReduction_158 happy_x_3 happy_x_2 happy_x_1 = case happyOut55 happy_x_1 of { happy_var_1 -> @@ -2135,8 +2149,8 @@ happyReduction_157 happy_x_3 (EGlue happy_var_1 happy_var_3 )}} -happyReduce_158 = happyReduce 6# 49# happyReduction_158 -happyReduction_158 (happy_x_6 `HappyStk` +happyReduce_159 = happyReduce 6# 49# happyReduction_159 +happyReduction_159 (happy_x_6 `HappyStk` happy_x_5 `HappyStk` happy_x_4 `HappyStk` happy_x_3 `HappyStk` @@ -2149,8 +2163,8 @@ happyReduction_158 (happy_x_6 `HappyStk` (ELet happy_var_3 happy_var_6 ) `HappyStk` happyRest}} -happyReduce_159 = happyReduce 4# 49# happyReduction_159 -happyReduction_159 (happy_x_4 `HappyStk` +happyReduce_160 = happyReduce 4# 49# happyReduction_160 +happyReduction_160 (happy_x_4 `HappyStk` happy_x_3 `HappyStk` happy_x_2 `HappyStk` happy_x_1 `HappyStk` @@ -2161,8 +2175,8 @@ happyReduction_159 (happy_x_4 `HappyStk` (ELetb happy_var_2 happy_var_4 ) `HappyStk` happyRest}} -happyReduce_160 = happyReduce 5# 49# happyReduction_160 -happyReduction_160 (happy_x_5 `HappyStk` +happyReduce_161 = happyReduce 5# 49# happyReduction_161 +happyReduction_161 (happy_x_5 `HappyStk` happy_x_4 `HappyStk` happy_x_3 `HappyStk` happy_x_2 `HappyStk` @@ -2174,8 +2188,8 @@ happyReduction_160 (happy_x_5 `HappyStk` (EWhere happy_var_1 happy_var_4 ) `HappyStk` happyRest}} -happyReduce_161 = happyReduce 4# 49# happyReduction_161 -happyReduction_161 (happy_x_4 `HappyStk` +happyReduce_162 = happyReduce 4# 49# happyReduction_162 +happyReduction_162 (happy_x_4 `HappyStk` happy_x_3 `HappyStk` happy_x_2 `HappyStk` happy_x_1 `HappyStk` @@ -2185,27 +2199,27 @@ happyReduction_161 (happy_x_4 `HappyStk` (EEqs happy_var_3 ) `HappyStk` happyRest} -happyReduce_162 = happySpecReduce_1 49# happyReduction_162 -happyReduction_162 happy_x_1 +happyReduce_163 = happySpecReduce_1 49# happyReduction_163 +happyReduction_163 happy_x_1 = case happyOut55 happy_x_1 of { happy_var_1 -> happyIn56 (happy_var_1 )} -happyReduce_163 = happySpecReduce_0 50# happyReduction_163 -happyReduction_163 = happyIn57 +happyReduce_164 = happySpecReduce_0 50# happyReduction_164 +happyReduction_164 = happyIn57 ([] ) -happyReduce_164 = happySpecReduce_1 50# happyReduction_164 -happyReduction_164 happy_x_1 +happyReduce_165 = happySpecReduce_1 50# happyReduction_165 +happyReduction_165 happy_x_1 = case happyOut56 happy_x_1 of { happy_var_1 -> happyIn57 ((:[]) happy_var_1 )} -happyReduce_165 = happySpecReduce_3 50# happyReduction_165 -happyReduction_165 happy_x_3 +happyReduce_166 = happySpecReduce_3 50# happyReduction_166 +happyReduction_166 happy_x_3 happy_x_2 happy_x_1 = case happyOut56 happy_x_1 of { happy_var_1 -> @@ -2214,21 +2228,21 @@ happyReduction_165 happy_x_3 ((:) happy_var_1 happy_var_3 )}} -happyReduce_166 = happySpecReduce_1 51# happyReduction_166 -happyReduction_166 happy_x_1 +happyReduce_167 = happySpecReduce_1 51# happyReduction_167 +happyReduction_167 happy_x_1 = happyIn58 (PW ) -happyReduce_167 = happySpecReduce_1 51# happyReduction_167 -happyReduction_167 happy_x_1 +happyReduce_168 = happySpecReduce_1 51# happyReduction_168 +happyReduction_168 happy_x_1 = case happyOut7 happy_x_1 of { happy_var_1 -> happyIn58 (PV happy_var_1 )} -happyReduce_168 = happySpecReduce_3 51# happyReduction_168 -happyReduction_168 happy_x_3 +happyReduce_169 = happySpecReduce_3 51# happyReduction_169 +happyReduction_169 happy_x_3 happy_x_2 happy_x_1 = case happyOut7 happy_x_2 of { happy_var_2 -> @@ -2236,8 +2250,8 @@ happyReduction_168 happy_x_3 (PCon happy_var_2 )} -happyReduce_169 = happySpecReduce_3 51# happyReduction_169 -happyReduction_169 happy_x_3 +happyReduce_170 = happySpecReduce_3 51# happyReduction_170 +happyReduction_170 happy_x_3 happy_x_2 happy_x_1 = case happyOut7 happy_x_1 of { happy_var_1 -> @@ -2246,22 +2260,22 @@ happyReduction_169 happy_x_3 (PQ happy_var_1 happy_var_3 )}} -happyReduce_170 = happySpecReduce_1 51# happyReduction_170 -happyReduction_170 happy_x_1 +happyReduce_171 = happySpecReduce_1 51# happyReduction_171 +happyReduction_171 happy_x_1 = case happyOut9 happy_x_1 of { happy_var_1 -> happyIn58 (PInt happy_var_1 )} -happyReduce_171 = happySpecReduce_1 51# happyReduction_171 -happyReduction_171 happy_x_1 +happyReduce_172 = happySpecReduce_1 51# happyReduction_172 +happyReduction_172 happy_x_1 = case happyOut8 happy_x_1 of { happy_var_1 -> happyIn58 (PStr happy_var_1 )} -happyReduce_172 = happySpecReduce_3 51# happyReduction_172 -happyReduction_172 happy_x_3 +happyReduce_173 = happySpecReduce_3 51# happyReduction_173 +happyReduction_173 happy_x_3 happy_x_2 happy_x_1 = case happyOut63 happy_x_2 of { happy_var_2 -> @@ -2269,8 +2283,8 @@ happyReduction_172 happy_x_3 (PR happy_var_2 )} -happyReduce_173 = happySpecReduce_3 51# happyReduction_173 -happyReduction_173 happy_x_3 +happyReduce_174 = happySpecReduce_3 51# happyReduction_174 +happyReduction_174 happy_x_3 happy_x_2 happy_x_1 = case happyOut73 happy_x_2 of { happy_var_2 -> @@ -2278,8 +2292,8 @@ happyReduction_173 happy_x_3 (PTup happy_var_2 )} -happyReduce_174 = happySpecReduce_3 51# happyReduction_174 -happyReduction_174 happy_x_3 +happyReduce_175 = happySpecReduce_3 51# happyReduction_175 +happyReduction_175 happy_x_3 happy_x_2 happy_x_1 = case happyOut59 happy_x_2 of { happy_var_2 -> @@ -2287,8 +2301,8 @@ happyReduction_174 happy_x_3 (happy_var_2 )} -happyReduce_175 = happySpecReduce_2 52# happyReduction_175 -happyReduction_175 happy_x_2 +happyReduce_176 = happySpecReduce_2 52# happyReduction_176 +happyReduction_176 happy_x_2 happy_x_1 = case happyOut7 happy_x_1 of { happy_var_1 -> case happyOut65 happy_x_2 of { happy_var_2 -> @@ -2296,8 +2310,8 @@ happyReduction_175 happy_x_2 (PC happy_var_1 happy_var_2 )}} -happyReduce_176 = happyReduce 4# 52# happyReduction_176 -happyReduction_176 (happy_x_4 `HappyStk` +happyReduce_177 = happyReduce 4# 52# happyReduction_177 +happyReduction_177 (happy_x_4 `HappyStk` happy_x_3 `HappyStk` happy_x_2 `HappyStk` happy_x_1 `HappyStk` @@ -2309,15 +2323,15 @@ happyReduction_176 (happy_x_4 `HappyStk` (PQC happy_var_1 happy_var_3 happy_var_4 ) `HappyStk` happyRest}}} -happyReduce_177 = happySpecReduce_1 52# happyReduction_177 -happyReduction_177 happy_x_1 +happyReduce_178 = happySpecReduce_1 52# happyReduction_178 +happyReduction_178 happy_x_1 = case happyOut58 happy_x_1 of { happy_var_1 -> happyIn59 (happy_var_1 )} -happyReduce_178 = happySpecReduce_3 53# happyReduction_178 -happyReduction_178 happy_x_3 +happyReduce_179 = happySpecReduce_3 53# happyReduction_179 +happyReduction_179 happy_x_3 happy_x_2 happy_x_1 = case happyOut49 happy_x_1 of { happy_var_1 -> @@ -2326,65 +2340,65 @@ happyReduction_178 happy_x_3 (PA happy_var_1 happy_var_3 )}} -happyReduce_179 = happySpecReduce_1 54# happyReduction_179 -happyReduction_179 happy_x_1 +happyReduce_180 = happySpecReduce_1 54# happyReduction_180 +happyReduction_180 happy_x_1 = case happyOut7 happy_x_1 of { happy_var_1 -> happyIn61 (LIdent happy_var_1 )} -happyReduce_180 = happySpecReduce_2 54# happyReduction_180 -happyReduction_180 happy_x_2 +happyReduce_181 = happySpecReduce_2 54# happyReduction_181 +happyReduction_181 happy_x_2 happy_x_1 = case happyOut9 happy_x_2 of { happy_var_2 -> happyIn61 (LVar happy_var_2 )} -happyReduce_181 = happySpecReduce_1 55# happyReduction_181 -happyReduction_181 happy_x_1 - = happyIn62 - (Sort_Type - ) - happyReduce_182 = happySpecReduce_1 55# happyReduction_182 happyReduction_182 happy_x_1 = happyIn62 - (Sort_PType + (Sort_Type ) happyReduce_183 = happySpecReduce_1 55# happyReduction_183 happyReduction_183 happy_x_1 = happyIn62 - (Sort_Tok + (Sort_PType ) happyReduce_184 = happySpecReduce_1 55# happyReduction_184 happyReduction_184 happy_x_1 = happyIn62 - (Sort_Str + (Sort_Tok ) happyReduce_185 = happySpecReduce_1 55# happyReduction_185 happyReduction_185 happy_x_1 = happyIn62 + (Sort_Str + ) + +happyReduce_186 = happySpecReduce_1 55# happyReduction_186 +happyReduction_186 happy_x_1 + = happyIn62 (Sort_Strs ) -happyReduce_186 = happySpecReduce_0 56# happyReduction_186 -happyReduction_186 = happyIn63 +happyReduce_187 = happySpecReduce_0 56# happyReduction_187 +happyReduction_187 = happyIn63 ([] ) -happyReduce_187 = happySpecReduce_1 56# happyReduction_187 -happyReduction_187 happy_x_1 +happyReduce_188 = happySpecReduce_1 56# happyReduction_188 +happyReduction_188 happy_x_1 = case happyOut60 happy_x_1 of { happy_var_1 -> happyIn63 ((:[]) happy_var_1 )} -happyReduce_188 = happySpecReduce_3 56# happyReduction_188 -happyReduction_188 happy_x_3 +happyReduce_189 = happySpecReduce_3 56# happyReduction_189 +happyReduction_189 happy_x_3 happy_x_2 happy_x_1 = case happyOut60 happy_x_1 of { happy_var_1 -> @@ -2393,22 +2407,22 @@ happyReduction_188 happy_x_3 ((:) happy_var_1 happy_var_3 )}} -happyReduce_189 = happySpecReduce_1 57# happyReduction_189 -happyReduction_189 happy_x_1 +happyReduce_190 = happySpecReduce_1 57# happyReduction_190 +happyReduction_190 happy_x_1 = case happyOut59 happy_x_1 of { happy_var_1 -> happyIn64 (AltP happy_var_1 )} -happyReduce_190 = happySpecReduce_1 58# happyReduction_190 -happyReduction_190 happy_x_1 +happyReduce_191 = happySpecReduce_1 58# happyReduction_191 +happyReduction_191 happy_x_1 = case happyOut58 happy_x_1 of { happy_var_1 -> happyIn65 ((:[]) happy_var_1 )} -happyReduce_191 = happySpecReduce_2 58# happyReduction_191 -happyReduction_191 happy_x_2 +happyReduce_192 = happySpecReduce_2 58# happyReduction_192 +happyReduction_192 happy_x_2 happy_x_1 = case happyOut58 happy_x_1 of { happy_var_1 -> case happyOut65 happy_x_2 of { happy_var_2 -> @@ -2416,15 +2430,15 @@ happyReduction_191 happy_x_2 ((:) happy_var_1 happy_var_2 )}} -happyReduce_192 = happySpecReduce_1 59# happyReduction_192 -happyReduction_192 happy_x_1 +happyReduce_193 = happySpecReduce_1 59# happyReduction_193 +happyReduction_193 happy_x_1 = case happyOut64 happy_x_1 of { happy_var_1 -> happyIn66 ((:[]) happy_var_1 )} -happyReduce_193 = happySpecReduce_3 59# happyReduction_193 -happyReduction_193 happy_x_3 +happyReduce_194 = happySpecReduce_3 59# happyReduction_194 +happyReduction_194 happy_x_3 happy_x_2 happy_x_1 = case happyOut64 happy_x_1 of { happy_var_1 -> @@ -2433,33 +2447,33 @@ happyReduction_193 happy_x_3 ((:) happy_var_1 happy_var_3 )}} -happyReduce_194 = happySpecReduce_1 60# happyReduction_194 -happyReduction_194 happy_x_1 +happyReduce_195 = happySpecReduce_1 60# happyReduction_195 +happyReduction_195 happy_x_1 = case happyOut7 happy_x_1 of { happy_var_1 -> happyIn67 (BIdent happy_var_1 )} -happyReduce_195 = happySpecReduce_1 60# happyReduction_195 -happyReduction_195 happy_x_1 +happyReduce_196 = happySpecReduce_1 60# happyReduction_196 +happyReduction_196 happy_x_1 = happyIn67 (BWild ) -happyReduce_196 = happySpecReduce_0 61# happyReduction_196 -happyReduction_196 = happyIn68 +happyReduce_197 = happySpecReduce_0 61# happyReduction_197 +happyReduction_197 = happyIn68 ([] ) -happyReduce_197 = happySpecReduce_1 61# happyReduction_197 -happyReduction_197 happy_x_1 +happyReduce_198 = happySpecReduce_1 61# happyReduction_198 +happyReduction_198 happy_x_1 = case happyOut67 happy_x_1 of { happy_var_1 -> happyIn68 ((:[]) happy_var_1 )} -happyReduce_198 = happySpecReduce_3 61# happyReduction_198 -happyReduction_198 happy_x_3 +happyReduce_199 = happySpecReduce_3 61# happyReduction_199 +happyReduction_199 happy_x_3 happy_x_2 happy_x_1 = case happyOut67 happy_x_1 of { happy_var_1 -> @@ -2468,8 +2482,8 @@ happyReduction_198 happy_x_3 ((:) happy_var_1 happy_var_3 )}} -happyReduce_199 = happyReduce 5# 62# happyReduction_199 -happyReduction_199 (happy_x_5 `HappyStk` +happyReduce_200 = happyReduce 5# 62# happyReduction_200 +happyReduction_200 (happy_x_5 `HappyStk` happy_x_4 `HappyStk` happy_x_3 `HappyStk` happy_x_2 `HappyStk` @@ -2481,41 +2495,41 @@ happyReduction_199 (happy_x_5 `HappyStk` (DDec happy_var_2 happy_var_4 ) `HappyStk` happyRest}} -happyReduce_200 = happySpecReduce_1 62# happyReduction_200 -happyReduction_200 happy_x_1 +happyReduce_201 = happySpecReduce_1 62# happyReduction_201 +happyReduction_201 happy_x_1 = case happyOut54 happy_x_1 of { happy_var_1 -> happyIn69 (DExp happy_var_1 )} -happyReduce_201 = happySpecReduce_1 63# happyReduction_201 -happyReduction_201 happy_x_1 +happyReduce_202 = happySpecReduce_1 63# happyReduction_202 +happyReduction_202 happy_x_1 = case happyOut56 happy_x_1 of { happy_var_1 -> happyIn70 (TComp happy_var_1 )} -happyReduce_202 = happySpecReduce_1 64# happyReduction_202 -happyReduction_202 happy_x_1 +happyReduce_203 = happySpecReduce_1 64# happyReduction_203 +happyReduction_203 happy_x_1 = case happyOut59 happy_x_1 of { happy_var_1 -> happyIn71 (PTComp happy_var_1 )} -happyReduce_203 = happySpecReduce_0 65# happyReduction_203 -happyReduction_203 = happyIn72 +happyReduce_204 = happySpecReduce_0 65# happyReduction_204 +happyReduction_204 = happyIn72 ([] ) -happyReduce_204 = happySpecReduce_1 65# happyReduction_204 -happyReduction_204 happy_x_1 +happyReduce_205 = happySpecReduce_1 65# happyReduction_205 +happyReduction_205 happy_x_1 = case happyOut70 happy_x_1 of { happy_var_1 -> happyIn72 ((:[]) happy_var_1 )} -happyReduce_205 = happySpecReduce_3 65# happyReduction_205 -happyReduction_205 happy_x_3 +happyReduce_206 = happySpecReduce_3 65# happyReduction_206 +happyReduction_206 happy_x_3 happy_x_2 happy_x_1 = case happyOut70 happy_x_1 of { happy_var_1 -> @@ -2524,20 +2538,20 @@ happyReduction_205 happy_x_3 ((:) happy_var_1 happy_var_3 )}} -happyReduce_206 = happySpecReduce_0 66# happyReduction_206 -happyReduction_206 = happyIn73 +happyReduce_207 = happySpecReduce_0 66# happyReduction_207 +happyReduction_207 = happyIn73 ([] ) -happyReduce_207 = happySpecReduce_1 66# happyReduction_207 -happyReduction_207 happy_x_1 +happyReduce_208 = happySpecReduce_1 66# happyReduction_208 +happyReduction_208 happy_x_1 = case happyOut71 happy_x_1 of { happy_var_1 -> happyIn73 ((:[]) happy_var_1 )} -happyReduce_208 = happySpecReduce_3 66# happyReduction_208 -happyReduction_208 happy_x_3 +happyReduce_209 = happySpecReduce_3 66# happyReduction_209 +happyReduction_209 happy_x_3 happy_x_2 happy_x_1 = case happyOut71 happy_x_1 of { happy_var_1 -> @@ -2546,8 +2560,8 @@ happyReduction_208 happy_x_3 ((:) happy_var_1 happy_var_3 )}} -happyReduce_209 = happySpecReduce_3 67# happyReduction_209 -happyReduction_209 happy_x_3 +happyReduce_210 = happySpecReduce_3 67# happyReduction_210 +happyReduction_210 happy_x_3 happy_x_2 happy_x_1 = case happyOut66 happy_x_1 of { happy_var_1 -> @@ -2556,15 +2570,15 @@ happyReduction_209 happy_x_3 (Case happy_var_1 happy_var_3 )}} -happyReduce_210 = happySpecReduce_1 68# happyReduction_210 -happyReduction_210 happy_x_1 +happyReduce_211 = happySpecReduce_1 68# happyReduction_211 +happyReduction_211 happy_x_1 = case happyOut74 happy_x_1 of { happy_var_1 -> happyIn75 ((:[]) happy_var_1 )} -happyReduce_211 = happySpecReduce_3 68# happyReduction_211 -happyReduction_211 happy_x_3 +happyReduce_212 = happySpecReduce_3 68# happyReduction_212 +happyReduction_212 happy_x_3 happy_x_2 happy_x_1 = case happyOut74 happy_x_1 of { happy_var_1 -> @@ -2573,8 +2587,8 @@ happyReduction_211 happy_x_3 ((:) happy_var_1 happy_var_3 )}} -happyReduce_212 = happySpecReduce_3 69# happyReduction_212 -happyReduction_212 happy_x_3 +happyReduce_213 = happySpecReduce_3 69# happyReduction_213 +happyReduction_213 happy_x_3 happy_x_2 happy_x_1 = case happyOut65 happy_x_1 of { happy_var_1 -> @@ -2583,20 +2597,20 @@ happyReduction_212 happy_x_3 (Equ happy_var_1 happy_var_3 )}} -happyReduce_213 = happySpecReduce_0 70# happyReduction_213 -happyReduction_213 = happyIn77 +happyReduce_214 = happySpecReduce_0 70# happyReduction_214 +happyReduction_214 = happyIn77 ([] ) -happyReduce_214 = happySpecReduce_1 70# happyReduction_214 -happyReduction_214 happy_x_1 +happyReduce_215 = happySpecReduce_1 70# happyReduction_215 +happyReduction_215 happy_x_1 = case happyOut76 happy_x_1 of { happy_var_1 -> happyIn77 ((:[]) happy_var_1 )} -happyReduce_215 = happySpecReduce_3 70# happyReduction_215 -happyReduction_215 happy_x_3 +happyReduce_216 = happySpecReduce_3 70# happyReduction_216 +happyReduction_216 happy_x_3 happy_x_2 happy_x_1 = case happyOut76 happy_x_1 of { happy_var_1 -> @@ -2605,8 +2619,8 @@ happyReduction_215 happy_x_3 ((:) happy_var_1 happy_var_3 )}} -happyReduce_216 = happySpecReduce_3 71# happyReduction_216 -happyReduction_216 happy_x_3 +happyReduce_217 = happySpecReduce_3 71# happyReduction_217 +happyReduction_217 happy_x_3 happy_x_2 happy_x_1 = case happyOut56 happy_x_1 of { happy_var_1 -> @@ -2615,20 +2629,20 @@ happyReduction_216 happy_x_3 (Alt happy_var_1 happy_var_3 )}} -happyReduce_217 = happySpecReduce_0 72# happyReduction_217 -happyReduction_217 = happyIn79 +happyReduce_218 = happySpecReduce_0 72# happyReduction_218 +happyReduction_218 = happyIn79 ([] ) -happyReduce_218 = happySpecReduce_1 72# happyReduction_218 -happyReduction_218 happy_x_1 +happyReduce_219 = happySpecReduce_1 72# happyReduction_219 +happyReduction_219 happy_x_1 = case happyOut78 happy_x_1 of { happy_var_1 -> happyIn79 ((:[]) happy_var_1 )} -happyReduce_219 = happySpecReduce_3 72# happyReduction_219 -happyReduction_219 happy_x_3 +happyReduce_220 = happySpecReduce_3 72# happyReduction_220 +happyReduction_220 happy_x_3 happy_x_2 happy_x_1 = case happyOut78 happy_x_1 of { happy_var_1 -> @@ -2637,8 +2651,8 @@ happyReduction_219 happy_x_3 ((:) happy_var_1 happy_var_3 )}} -happyReduce_220 = happyReduce 5# 73# happyReduction_220 -happyReduction_220 (happy_x_5 `HappyStk` +happyReduce_221 = happyReduce 5# 73# happyReduction_221 +happyReduction_221 (happy_x_5 `HappyStk` happy_x_4 `HappyStk` happy_x_3 `HappyStk` happy_x_2 `HappyStk` @@ -2650,20 +2664,20 @@ happyReduction_220 (happy_x_5 `HappyStk` (DDDec happy_var_2 happy_var_4 ) `HappyStk` happyRest}} -happyReduce_221 = happySpecReduce_1 73# happyReduction_221 -happyReduction_221 happy_x_1 +happyReduce_222 = happySpecReduce_1 73# happyReduction_222 +happyReduction_222 happy_x_1 = case happyOut52 happy_x_1 of { happy_var_1 -> happyIn80 (DDExp happy_var_1 )} -happyReduce_222 = happySpecReduce_0 74# happyReduction_222 -happyReduction_222 = happyIn81 +happyReduce_223 = happySpecReduce_0 74# happyReduction_223 +happyReduction_223 = happyIn81 ([] ) -happyReduce_223 = happySpecReduce_2 74# happyReduction_223 -happyReduction_223 happy_x_2 +happyReduce_224 = happySpecReduce_2 74# happyReduction_224 +happyReduction_224 happy_x_2 happy_x_1 = case happyOut81 happy_x_1 of { happy_var_1 -> case happyOut80 happy_x_2 of { happy_var_2 -> @@ -2671,8 +2685,8 @@ happyReduction_223 happy_x_2 (flip (:) happy_var_1 happy_var_2 )}} -happyReduce_224 = happySpecReduce_2 75# happyReduction_224 -happyReduction_224 happy_x_2 +happyReduce_225 = happySpecReduce_2 75# happyReduction_225 +happyReduction_225 happy_x_2 happy_x_1 = case happyOut83 happy_x_1 of { happy_var_1 -> case happyOut21 happy_x_2 of { happy_var_2 -> @@ -2680,59 +2694,59 @@ happyReduction_224 happy_x_2 (OldGr happy_var_1 (reverse happy_var_2) )}} -happyReduce_225 = happySpecReduce_0 76# happyReduction_225 -happyReduction_225 = happyIn83 +happyReduce_226 = happySpecReduce_0 76# happyReduction_226 +happyReduction_226 = happyIn83 (NoIncl ) -happyReduce_226 = happySpecReduce_2 76# happyReduction_226 -happyReduction_226 happy_x_2 +happyReduce_227 = happySpecReduce_2 76# happyReduction_227 +happyReduction_227 happy_x_2 happy_x_1 = case happyOut85 happy_x_2 of { happy_var_2 -> happyIn83 (Incl happy_var_2 )} -happyReduce_227 = happySpecReduce_1 77# happyReduction_227 -happyReduction_227 happy_x_1 +happyReduce_228 = happySpecReduce_1 77# happyReduction_228 +happyReduction_228 happy_x_1 = case happyOut8 happy_x_1 of { happy_var_1 -> happyIn84 (FString happy_var_1 )} -happyReduce_228 = happySpecReduce_1 77# happyReduction_228 -happyReduction_228 happy_x_1 +happyReduce_229 = happySpecReduce_1 77# happyReduction_229 +happyReduction_229 happy_x_1 = case happyOut7 happy_x_1 of { happy_var_1 -> happyIn84 (FIdent happy_var_1 )} -happyReduce_229 = happySpecReduce_2 77# happyReduction_229 -happyReduction_229 happy_x_2 +happyReduce_230 = happySpecReduce_2 77# happyReduction_230 +happyReduction_230 happy_x_2 happy_x_1 = case happyOut84 happy_x_2 of { happy_var_2 -> happyIn84 (FSlash happy_var_2 )} -happyReduce_230 = happySpecReduce_2 77# happyReduction_230 -happyReduction_230 happy_x_2 +happyReduce_231 = happySpecReduce_2 77# happyReduction_231 +happyReduction_231 happy_x_2 happy_x_1 = case happyOut84 happy_x_2 of { happy_var_2 -> happyIn84 (FDot happy_var_2 )} -happyReduce_231 = happySpecReduce_2 77# happyReduction_231 -happyReduction_231 happy_x_2 +happyReduce_232 = happySpecReduce_2 77# happyReduction_232 +happyReduction_232 happy_x_2 happy_x_1 = case happyOut84 happy_x_2 of { happy_var_2 -> happyIn84 (FMinus happy_var_2 )} -happyReduce_232 = happySpecReduce_2 77# happyReduction_232 -happyReduction_232 happy_x_2 +happyReduce_233 = happySpecReduce_2 77# happyReduction_233 +happyReduction_233 happy_x_2 happy_x_1 = case happyOut7 happy_x_1 of { happy_var_1 -> case happyOut84 happy_x_2 of { happy_var_2 -> @@ -2740,16 +2754,16 @@ happyReduction_232 happy_x_2 (FAddId happy_var_1 happy_var_2 )}} -happyReduce_233 = happySpecReduce_2 78# happyReduction_233 -happyReduction_233 happy_x_2 +happyReduce_234 = happySpecReduce_2 78# happyReduction_234 +happyReduction_234 happy_x_2 happy_x_1 = case happyOut84 happy_x_1 of { happy_var_1 -> happyIn85 ((:[]) happy_var_1 )} -happyReduce_234 = happySpecReduce_3 78# happyReduction_234 -happyReduction_234 happy_x_3 +happyReduce_235 = happySpecReduce_3 78# happyReduction_235 +happyReduction_235 happy_x_3 happy_x_2 happy_x_1 = case happyOut84 happy_x_1 of { happy_var_1 -> @@ -2861,7 +2875,7 @@ pOldGrammar tks = happyThen (happyParse 2# tks) (\x -> happyReturn (happyOut82 x pExp tks = happyThen (happyParse 3# tks) (\x -> happyReturn (happyOut56 x)) -happySeq = happyDoSeq +happySeq = happyDontSeq returnM :: a -> Err a returnM = return @@ -2875,7 +2889,7 @@ happyError ts = myLexer = tokens {-# LINE 1 "GenericTemplate.hs" #-} --- $Id: ParGF.hs,v 1.5 2004/12/06 18:44:59 bringert Exp $ +-- $Id: ParGF.hs,v 1.6 2005/01/11 16:06:14 aarne Exp $ diff --git a/src/GF/Source/PrintGF.hs b/src/GF/Source/PrintGF.hs index ce8ac22cc..f33ec0c96 100644 --- a/src/GF/Source/PrintGF.hs +++ b/src/GF/Source/PrintGF.hs @@ -334,6 +334,7 @@ instance Print Exp where EApp exp0 exp -> prPrec i 2 (concatD [prt 2 exp0 , prt 3 exp]) ETable cases -> prPrec i 2 (concatD [doc (showString "table") , doc (showString "{") , prt 0 cases , doc (showString "}")]) ETTable exp cases -> prPrec i 2 (concatD [doc (showString "table") , prt 4 exp , doc (showString "{") , prt 0 cases , doc (showString "}")]) + EVTable exp exps -> prPrec i 2 (concatD [doc (showString "table") , prt 4 exp , doc (showString "[") , prt 0 exps , doc (showString "]")]) ECase exp cases -> prPrec i 2 (concatD [doc (showString "case") , prt 0 exp , doc (showString "of") , doc (showString "{") , prt 0 cases , doc (showString "}")]) EVariants exps -> prPrec i 2 (concatD [doc (showString "variants") , doc (showString "{") , prt 0 exps , doc (showString "}")]) EPre exp alterns -> prPrec i 2 (concatD [doc (showString "pre") , doc (showString "{") , prt 0 exp , doc (showString ";") , prt 0 alterns , doc (showString "}")]) diff --git a/src/GF/Source/SkelGF.hs b/src/GF/Source/SkelGF.hs index 544473533..73a78c5a2 100644 --- a/src/GF/Source/SkelGF.hs +++ b/src/GF/Source/SkelGF.hs @@ -206,6 +206,7 @@ transExp x = case x of EApp exp0 exp -> failure x ETable cases -> failure x ETTable exp cases -> failure x + EVTable exp exps -> failure x ECase exp cases -> failure x EVariants exps -> failure x EPre exp alterns -> failure x diff --git a/src/GF/Source/SourceToGrammar.hs b/src/GF/Source/SourceToGrammar.hs index 38a55e4d5..1ab949c9d 100644 --- a/src/GF/Source/SourceToGrammar.hs +++ b/src/GF/Source/SourceToGrammar.hs @@ -350,6 +350,8 @@ transExp x = case x of ETable cases -> liftM (G.T G.TRaw) (transCases cases) ETTable exp cases -> liftM2 (\t c -> G.T (G.TTyped t) c) (transExp exp) (transCases cases) + EVTable exp cases -> + liftM2 (\t c -> G.V t c) (transExp exp) (mapM transExp cases) ECase exp cases -> do exp' <- transExp exp cases' <- transCases cases diff --git a/src/GF/Source/TestGF.hs b/src/GF/Source/TestGF.hs index d6c026487..f72e69b31 100644 --- a/src/GF/Source/TestGF.hs +++ b/src/GF/Source/TestGF.hs @@ -18,22 +18,28 @@ type ParseFun a = [Token] -> Err a myLLexer = myLexer -runFile :: (Print a, Show a) => ParseFun a -> FilePath -> IO () -runFile p f = readFile f >>= run p +type Verbosity = Int -run :: (Print a, Show a) => ParseFun a -> String -> IO () -run p s = case (p (myLLexer s)) of - Bad s -> do putStrLn "\nParse Failed...\n" +putStrV :: Verbosity -> String -> IO () +putStrV v s = if v > 1 then putStrLn s else return () + +runFile :: (Print a, Show a) => Verbosity -> ParseFun a -> FilePath -> IO () +runFile v p f = putStrLn f >> readFile f >>= run v p + +run :: (Print a, Show a) => Verbosity -> ParseFun a -> String -> IO () +run v p s = let ts = myLLexer s in case p ts of + Bad s -> do putStrLn "\nParse Failed...\n" + putStrV v "Tokens:" + putStrV v $ show ts putStrLn s Ok tree -> do putStrLn "\nParse Successful!" - putStrLn $ "\n[Abstract Syntax]\n\n" ++ show tree - putStrLn $ "\n[Linearized tree]\n\n" ++ printTree tree + putStrV v $ "\n[Abstract Syntax]\n\n" ++ show tree + putStrV v $ "\n[Linearized tree]\n\n" ++ printTree tree main :: IO () main = do args <- getArgs case args of - [] -> hGetContents stdin >>= run pGrammar - [f] -> runFile pGrammar f - _ -> do progName <- getProgName - putStrLn $ progName ++ ": excess arguments." + [] -> hGetContents stdin >>= run 2 pGrammar + "-s":fs -> mapM_ (runFile 0 pGrammar) fs + fs -> mapM_ (runFile 2 pGrammar) fs |
