From 56f62f31d88348e25636e13d9f8f57a04c1b0b74 Mon Sep 17 00:00:00 2001 From: bringert Date: Thu, 1 Dec 2005 16:55:57 +0000 Subject: Transfer: Added Double type. --- src/Transfer/Syntax/Abs.hs | 35 +- src/Transfer/Syntax/Doc.tex | 7 + src/Transfer/Syntax/Lex.hs | 11 +- src/Transfer/Syntax/Lex.x | 2 +- src/Transfer/Syntax/Par.hs | 1021 +++++++++++++++++++++-------------------- src/Transfer/Syntax/Par.y | 5 +- src/Transfer/Syntax/Print.hs | 3 +- src/Transfer/Syntax/Skel.hs | 6 +- src/Transfer/Syntax/Syntax.cf | 3 +- 9 files changed, 568 insertions(+), 525 deletions(-) (limited to 'src/Transfer/Syntax') diff --git a/src/Transfer/Syntax/Abs.hs b/src/Transfer/Syntax/Abs.hs index 20acca269..30da73a59 100644 --- a/src/Transfer/Syntax/Abs.hs +++ b/src/Transfer/Syntax/Abs.hs @@ -85,7 +85,8 @@ data Tree :: * -> * where EVar :: Ident -> Tree Exp_ EType :: Tree Exp_ EStr :: String -> Tree Exp_ - EInt :: Integer -> Tree Exp_ + EInteger :: Integer -> Tree Exp_ + EDouble :: Double -> Tree Exp_ EMeta :: Tree Exp_ LetDef :: Ident -> Exp -> Exp -> Tree LetDef_ Case :: Pattern -> Exp -> Tree Case_ @@ -268,7 +269,8 @@ instance Show (Tree c) where EVar i -> opar n . showString "EVar" . showChar ' ' . showsPrec 1 i . cpar n EType -> showString "EType" EStr str -> opar n . showString "EStr" . showChar ' ' . showsPrec 1 str . cpar n - EInt n -> opar n . showString "EInt" . showChar ' ' . showsPrec 1 n . cpar n + EInteger n -> opar n . showString "EInteger" . showChar ' ' . showsPrec 1 n . cpar n + EDouble d -> opar n . showString "EDouble" . showChar ' ' . showsPrec 1 d . cpar n EMeta -> showString "EMeta" LetDef i exp0 exp1 -> opar n . showString "LetDef" . showChar ' ' . showsPrec 1 i . showChar ' ' . showsPrec 1 exp0 . showChar ' ' . showsPrec 1 exp1 . cpar n Case pattern exp -> opar n . showString "Case" . showChar ' ' . showsPrec 1 pattern . showChar ' ' . showsPrec 1 exp . cpar n @@ -334,7 +336,8 @@ johnMajorEq (EList exps) (EList exps_) = exps == exps_ johnMajorEq (EVar i) (EVar i_) = i == i_ johnMajorEq EType EType = True johnMajorEq (EStr str) (EStr str_) = str == str_ -johnMajorEq (EInt n) (EInt n_) = n == n_ +johnMajorEq (EInteger n) (EInteger n_) = n == n_ +johnMajorEq (EDouble d) (EDouble d_) = d == d_ johnMajorEq EMeta EMeta = True johnMajorEq (LetDef i exp0 exp1) (LetDef i_ exp0_ exp1_) = i == i_ && exp0 == exp0_ && exp1 == exp1_ johnMajorEq (Case pattern exp) (Case pattern_ exp_) = pattern == pattern_ && exp == exp_ @@ -399,17 +402,18 @@ instance Ord (Tree c) where index (EVar _) = 46 index (EType ) = 47 index (EStr _) = 48 - index (EInt _) = 49 - index (EMeta ) = 50 - index (LetDef _ _ _) = 51 - index (Case _ _) = 52 - index (BindVar _ _) = 53 - index (BindNoVar _) = 54 - index (VVar _) = 55 - index (VWild ) = 56 - index (FieldType _ _) = 57 - index (FieldValue _ _) = 58 - index (Ident _) = 59 + index (EInteger _) = 49 + index (EDouble _) = 50 + index (EMeta ) = 51 + index (LetDef _ _ _) = 52 + index (Case _ _) = 53 + index (BindVar _ _) = 54 + index (BindNoVar _) = 55 + index (VVar _) = 56 + index (VWild ) = 57 + index (FieldType _ _) = 58 + index (FieldValue _ _) = 59 + index (Ident _) = 60 compareSame (Module imports decls) (Module imports_ decls_) = mappend (compare imports imports_) (compare decls decls_) compareSame (Import i) (Import i_) = compare i i_ compareSame (DataDecl i exp consdecls) (DataDecl i_ exp_ consdecls_) = mappend (compare i i_) (mappend (compare exp exp_) (compare consdecls consdecls_)) @@ -459,7 +463,8 @@ instance Ord (Tree c) where compareSame (EVar i) (EVar i_) = compare i i_ compareSame EType EType = EQ compareSame (EStr str) (EStr str_) = compare str str_ - compareSame (EInt n) (EInt n_) = compare n n_ + compareSame (EInteger n) (EInteger n_) = compare n n_ + compareSame (EDouble d) (EDouble d_) = compare d d_ compareSame EMeta EMeta = EQ compareSame (LetDef i exp0 exp1) (LetDef i_ exp0_ exp1_) = mappend (compare i i_) (mappend (compare exp0 exp0_) (compare exp1 exp1_)) compareSame (Case pattern exp) (Case pattern_ exp_) = mappend (compare pattern pattern_) (compare exp exp_) diff --git a/src/Transfer/Syntax/Doc.tex b/src/Transfer/Syntax/Doc.tex index 781f9c4fb..8c34773fe 100644 --- a/src/Transfer/Syntax/Doc.tex +++ b/src/Transfer/Syntax/Doc.tex @@ -37,6 +37,12 @@ except \terminal{"}\ unless preceded by \verb6\6. Integer literals \nonterminal{Int}\ are nonempty sequences of digits. +Double-precision float literals \nonterminal{Double}\ have the structure +indicated by the regular expression $\nonterminal{digit}+ \mbox{{\it `.'}} \nonterminal{digit}+ (\mbox{{\it `e'}} \mbox{{\it `-'}}? \nonterminal{digit}+)?$ i.e.\ +two sequences of digits separated by a decimal point, optionally +followed by an unsigned or negative exponent. + + \subsection*{Reserved words and symbols} @@ -266,6 +272,7 @@ All other symbols are terminals.\\ & {\delimit} &{\terminal{Type}} \\ & {\delimit} &{\nonterminal{String}} \\ & {\delimit} &{\nonterminal{Integer}} \\ + & {\delimit} &{\nonterminal{Double}} \\ & {\delimit} &{\terminal{?}} \\ & {\delimit} &{\terminal{(}} {\nonterminal{Exp}} {\terminal{)}} \\ \end{tabular}\\ diff --git a/src/Transfer/Syntax/Lex.hs b/src/Transfer/Syntax/Lex.hs index 1aa85c3c8..a156775de 100644 --- a/src/Transfer/Syntax/Lex.hs +++ b/src/Transfer/Syntax/Lex.hs @@ -24,18 +24,18 @@ import GHC.Exts import GlaExts #endif alex_base :: AlexAddr -alex_base = AlexA# "\x01\x00\x00\x00\x15\x00\x00\x00\x39\x00\x00\x00\x3a\x00\x00\x00\x18\x00\x00\x00\x19\x00\x00\x00\x1a\x00\x00\x00\x00\x00\x00\x00\x44\x00\x00\x00\x45\x00\x00\x00\x1b\x00\x00\x00\x1c\x00\x00\x00\x1d\x00\x00\x00\x42\x00\x00\x00\x00\x00\x00\x00\x26\x00\x00\x00\x13\x00\x00\x00\x14\x00\x00\x00\x17\x00\x00\x00\x1e\x00\x00\x00\x1f\x00\x00\x00\xd9\xff\xff\xff\x30\x00\x00\x00\x9c\x00\x00\x00\x00\x00\x00\x00\x17\x01\x00\x00\xd5\x00\x00\x00\x34\x00\x00\x00"# +alex_base = AlexA# "\x01\x00\x00\x00\x15\x00\x00\x00\x39\x00\x00\x00\x3a\x00\x00\x00\x18\x00\x00\x00\x19\x00\x00\x00\x1a\x00\x00\x00\x00\x00\x00\x00\x44\x00\x00\x00\x45\x00\x00\x00\x1b\x00\x00\x00\x1c\x00\x00\x00\x1d\x00\x00\x00\x42\x00\x00\x00\x00\x00\x00\x00\x26\x00\x00\x00\x13\x00\x00\x00\x14\x00\x00\x00\x17\x00\x00\x00\x1e\x00\x00\x00\x1f\x00\x00\x00\xd9\xff\xff\xff\x30\x00\x00\x00\x9c\x00\x00\x00\x00\x00\x00\x00\x17\x01\x00\x00\xd5\x00\x00\x00\x36\x00\x00\x00\xe7\x00\x00\x00\xf2\x00\x00\x00\x1d\x01\x00\x00\x6c\x01\x00\x00\x79\x01\x00\x00"# 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\xff\xff\x19\x00\xff\xff\xff\xff\x0e\x00\x16\x00\xff\xff\x0e\x00\x0e\x00\x0e\x00\x0e\x00\x0e\x00\x05\x00\x0e\x00\x13\x00\x1b\x00\x1b\x00\x1b\x00\x1b\x00\x1b\x00\x1b\x00\x1b\x00\x1b\x00\x1b\x00\x1b\x00\x14\x00\x0e\x00\x0f\x00\x12\x00\x11\x00\x0e\x00\xff\xff\x04\x00\xff\xff\xff\xff\x03\x00\x03\x00\x09\x00\x09\x00\x09\x00\x0b\x00\x0d\x00\x0d\x00\x0d\x00\x0d\x00\x0d\x00\x0e\x00\x0e\x00\x10\x00\x0e\x00\x0e\x00\x0e\x00\x0e\x00\x0e\x00\x00\x00\x0e\x00\x00\x00\x0e\x00\x0e\x00\x0e\x00\x0e\x00\xff\xff\x0e\x00\xff\xff\x0d\x00\x0e\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\x09\x00\x08\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x0c\x00\x15\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\x17\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x00\x00\x00\x00\xff\xff\x00\x00\x00\x00\x00\x00\x00\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x19\x00\xff\xff\x00\x00\x00\x00\x17\x00\x19\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\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\x18\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\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x1a\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x00\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\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\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\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 = 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\xff\xff\x19\x00\xff\xff\xff\xff\x0e\x00\x16\x00\xff\xff\x0e\x00\x0e\x00\x0e\x00\x0e\x00\x0e\x00\x05\x00\x0e\x00\x13\x00\x1b\x00\x1b\x00\x1b\x00\x1b\x00\x1b\x00\x1b\x00\x1b\x00\x1b\x00\x1b\x00\x1b\x00\x14\x00\x0e\x00\x0f\x00\x12\x00\x11\x00\x0e\x00\xff\xff\x04\x00\xff\xff\xff\xff\x03\x00\x03\x00\x09\x00\x09\x00\x09\x00\x0b\x00\x0d\x00\x0d\x00\x0d\x00\x0d\x00\x0d\x00\x0e\x00\x0e\x00\x10\x00\x0e\x00\x0e\x00\x0e\x00\x0e\x00\x0e\x00\x00\x00\x0e\x00\x00\x00\x0e\x00\x0e\x00\x0e\x00\x0e\x00\xff\xff\x0e\x00\xff\xff\x0d\x00\x0e\x00\x1e\x00\x00\x00\x1b\x00\x1b\x00\x1b\x00\x1b\x00\x1b\x00\x1b\x00\x1b\x00\x1b\x00\x1b\x00\x1b\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\x15\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\x17\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x00\x00\x00\x00\xff\xff\x00\x00\x00\x00\x00\x00\x00\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x19\x00\xff\xff\x00\x00\x00\x00\x17\x00\x19\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x1c\x00\x1c\x00\x1c\x00\x1c\x00\x1c\x00\x1c\x00\x1c\x00\x1c\x00\x1c\x00\x1c\x00\xff\xff\x1d\x00\x1d\x00\x1d\x00\x1d\x00\x1d\x00\x1d\x00\x1d\x00\x1d\x00\x1d\x00\x1d\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\x18\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\x20\x00\x1c\x00\x1c\x00\x1c\x00\x1c\x00\x1c\x00\x1c\x00\x1c\x00\x1c\x00\x1c\x00\x1c\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x1a\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x00\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x17\x00\x1d\x00\x1d\x00\x1d\x00\x1d\x00\x1d\x00\x1d\x00\x1d\x00\x1d\x00\x1d\x00\x1d\x00\x1f\x00\x00\x00\x00\x00\x1d\x00\x1d\x00\x1d\x00\x1d\x00\x1d\x00\x1d\x00\x1d\x00\x1d\x00\x1d\x00\x1d\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\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_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\x3d\x00\x3d\x00\x3e\x00\x2d\x00\x3d\x00\x7c\x00\x26\x00\x3e\x00\xff\xff\x3a\x00\xff\xff\x3d\x00\x5b\x00\x5c\x00\x5d\x00\x5e\x00\x5f\x00\x60\x00\x20\x00\x3d\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\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\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 = 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\x3d\x00\x3d\x00\x3e\x00\x2d\x00\x3d\x00\x7c\x00\x26\x00\x3e\x00\xff\xff\x3a\x00\xff\xff\x3d\x00\x5b\x00\x5c\x00\x5d\x00\x5e\x00\x5f\x00\x60\x00\x20\x00\x3d\x00\x2e\x00\xff\xff\x30\x00\x31\x00\x32\x00\x33\x00\x34\x00\x35\x00\x36\x00\x37\x00\x38\x00\x39\x00\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\x30\x00\x31\x00\x32\x00\x33\x00\x34\x00\x35\x00\x36\x00\x37\x00\x38\x00\x39\x00\x0a\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\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\x65\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\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\x30\x00\x31\x00\x32\x00\x33\x00\x34\x00\x35\x00\x36\x00\x37\x00\x38\x00\x39\x00\x2d\x00\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\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\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_deflt :: AlexAddr -alex_deflt = AlexA# "\x17\x00\xff\xff\x02\x00\x02\x00\xff\xff\xff\xff\x0a\x00\xff\xff\x0a\x00\x0a\x00\x0a\x00\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\x19\x00\xff\xff\xff\xff"# +alex_deflt = AlexA# "\x17\x00\xff\xff\x02\x00\x02\x00\xff\xff\xff\xff\x0a\x00\xff\xff\x0a\x00\x0a\x00\x0a\x00\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\x19\x00\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff"# -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_3))],[(AlexAcc (alex_action_3))],[(AlexAcc (alex_action_3))],[],[],[(AlexAcc (alex_action_4))],[(AlexAcc (alex_action_5))],[],[],[(AlexAcc (alex_action_6))]] +alex_accept = listArray (0::Int,32) [[],[],[(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_3))],[(AlexAcc (alex_action_3))],[(AlexAcc (alex_action_3))],[],[],[(AlexAcc (alex_action_4))],[(AlexAcc (alex_action_5))],[],[],[(AlexAcc (alex_action_6))],[(AlexAcc (alex_action_7))],[(AlexAcc (alex_action_7))],[],[],[]] {-# LINE 34 "Transfer/Syntax/Lex.x" #-} tok f p s = f p s @@ -141,6 +141,7 @@ alex_action_3 = tok (\p s -> PT p (TS $ share s)) alex_action_4 = tok (\p s -> PT p (eitherResIdent (TV . share) s)) alex_action_5 = tok (\p s -> PT p (TL $ share $ unescapeInitTail s)) alex_action_6 = tok (\p s -> PT p (TI $ share s)) +alex_action_7 = tok (\p s -> PT p (TD $ share s)) {-# LINE 1 "GenericTemplate.hs" #-} {-# LINE 1 "" #-} {-# LINE 1 "" #-} diff --git a/src/Transfer/Syntax/Lex.x b/src/Transfer/Syntax/Lex.x index 41f8e1fd0..3805b1d65 100644 --- a/src/Transfer/Syntax/Lex.x +++ b/src/Transfer/Syntax/Lex.x @@ -29,7 +29,7 @@ $l $i* { tok (\p s -> PT p (eitherResIdent (TV . share) s)) } \" ([$u # [\" \\ \n]] | (\\ (\" | \\ | \' | n | t)))* \"{ tok (\p s -> PT p (TL $ share $ unescapeInitTail s)) } $d+ { tok (\p s -> PT p (TI $ share s)) } - +$d+ \. $d+ (e (\-)? $d+)? { tok (\p s -> PT p (TD $ share s)) } { diff --git a/src/Transfer/Syntax/Par.hs b/src/Transfer/Syntax/Par.hs index 8108d9bd6..ab26c4dde 100644 --- a/src/Transfer/Syntax/Par.hs +++ b/src/Transfer/Syntax/Par.hs @@ -31,52 +31,52 @@ happyIn7 x = unsafeCoerce# x happyOut7 :: (HappyAbsSyn ) -> (Integer) happyOut7 x = unsafeCoerce# x {-# INLINE happyOut7 #-} -happyIn8 :: (Module) -> (HappyAbsSyn ) +happyIn8 :: (Double) -> (HappyAbsSyn ) happyIn8 x = unsafeCoerce# x {-# INLINE happyIn8 #-} -happyOut8 :: (HappyAbsSyn ) -> (Module) +happyOut8 :: (HappyAbsSyn ) -> (Double) happyOut8 x = unsafeCoerce# x {-# INLINE happyOut8 #-} -happyIn9 :: (Import) -> (HappyAbsSyn ) +happyIn9 :: (Module) -> (HappyAbsSyn ) happyIn9 x = unsafeCoerce# x {-# INLINE happyIn9 #-} -happyOut9 :: (HappyAbsSyn ) -> (Import) +happyOut9 :: (HappyAbsSyn ) -> (Module) happyOut9 x = unsafeCoerce# x {-# INLINE happyOut9 #-} -happyIn10 :: ([Import]) -> (HappyAbsSyn ) +happyIn10 :: (Import) -> (HappyAbsSyn ) happyIn10 x = unsafeCoerce# x {-# INLINE happyIn10 #-} -happyOut10 :: (HappyAbsSyn ) -> ([Import]) +happyOut10 :: (HappyAbsSyn ) -> (Import) happyOut10 x = unsafeCoerce# x {-# INLINE happyOut10 #-} -happyIn11 :: (Decl) -> (HappyAbsSyn ) +happyIn11 :: ([Import]) -> (HappyAbsSyn ) happyIn11 x = unsafeCoerce# x {-# INLINE happyIn11 #-} -happyOut11 :: (HappyAbsSyn ) -> (Decl) +happyOut11 :: (HappyAbsSyn ) -> ([Import]) happyOut11 x = unsafeCoerce# x {-# INLINE happyOut11 #-} -happyIn12 :: ([Decl]) -> (HappyAbsSyn ) +happyIn12 :: (Decl) -> (HappyAbsSyn ) happyIn12 x = unsafeCoerce# x {-# INLINE happyIn12 #-} -happyOut12 :: (HappyAbsSyn ) -> ([Decl]) +happyOut12 :: (HappyAbsSyn ) -> (Decl) happyOut12 x = unsafeCoerce# x {-# INLINE happyOut12 #-} -happyIn13 :: (ConsDecl) -> (HappyAbsSyn ) +happyIn13 :: ([Decl]) -> (HappyAbsSyn ) happyIn13 x = unsafeCoerce# x {-# INLINE happyIn13 #-} -happyOut13 :: (HappyAbsSyn ) -> (ConsDecl) +happyOut13 :: (HappyAbsSyn ) -> ([Decl]) happyOut13 x = unsafeCoerce# x {-# INLINE happyOut13 #-} -happyIn14 :: ([ConsDecl]) -> (HappyAbsSyn ) +happyIn14 :: (ConsDecl) -> (HappyAbsSyn ) happyIn14 x = unsafeCoerce# x {-# INLINE happyIn14 #-} -happyOut14 :: (HappyAbsSyn ) -> ([ConsDecl]) +happyOut14 :: (HappyAbsSyn ) -> (ConsDecl) happyOut14 x = unsafeCoerce# x {-# INLINE happyOut14 #-} -happyIn15 :: (Pattern) -> (HappyAbsSyn ) +happyIn15 :: ([ConsDecl]) -> (HappyAbsSyn ) happyIn15 x = unsafeCoerce# x {-# INLINE happyIn15 #-} -happyOut15 :: (HappyAbsSyn ) -> (Pattern) +happyOut15 :: (HappyAbsSyn ) -> ([ConsDecl]) happyOut15 x = unsafeCoerce# x {-# INLINE happyOut15 #-} happyIn16 :: (Pattern) -> (HappyAbsSyn ) @@ -91,82 +91,82 @@ happyIn17 x = unsafeCoerce# x happyOut17 :: (HappyAbsSyn ) -> (Pattern) happyOut17 x = unsafeCoerce# x {-# INLINE happyOut17 #-} -happyIn18 :: ([Pattern]) -> (HappyAbsSyn ) +happyIn18 :: (Pattern) -> (HappyAbsSyn ) happyIn18 x = unsafeCoerce# x {-# INLINE happyIn18 #-} -happyOut18 :: (HappyAbsSyn ) -> ([Pattern]) +happyOut18 :: (HappyAbsSyn ) -> (Pattern) happyOut18 x = unsafeCoerce# x {-# INLINE happyOut18 #-} -happyIn19 :: (FieldPattern) -> (HappyAbsSyn ) +happyIn19 :: ([Pattern]) -> (HappyAbsSyn ) happyIn19 x = unsafeCoerce# x {-# INLINE happyIn19 #-} -happyOut19 :: (HappyAbsSyn ) -> (FieldPattern) +happyOut19 :: (HappyAbsSyn ) -> ([Pattern]) happyOut19 x = unsafeCoerce# x {-# INLINE happyOut19 #-} -happyIn20 :: ([FieldPattern]) -> (HappyAbsSyn ) +happyIn20 :: (FieldPattern) -> (HappyAbsSyn ) happyIn20 x = unsafeCoerce# x {-# INLINE happyIn20 #-} -happyOut20 :: (HappyAbsSyn ) -> ([FieldPattern]) +happyOut20 :: (HappyAbsSyn ) -> (FieldPattern) happyOut20 x = unsafeCoerce# x {-# INLINE happyOut20 #-} -happyIn21 :: (Exp) -> (HappyAbsSyn ) +happyIn21 :: ([FieldPattern]) -> (HappyAbsSyn ) happyIn21 x = unsafeCoerce# x {-# INLINE happyIn21 #-} -happyOut21 :: (HappyAbsSyn ) -> (Exp) +happyOut21 :: (HappyAbsSyn ) -> ([FieldPattern]) happyOut21 x = unsafeCoerce# x {-# INLINE happyOut21 #-} -happyIn22 :: (LetDef) -> (HappyAbsSyn ) +happyIn22 :: (Exp) -> (HappyAbsSyn ) happyIn22 x = unsafeCoerce# x {-# INLINE happyIn22 #-} -happyOut22 :: (HappyAbsSyn ) -> (LetDef) +happyOut22 :: (HappyAbsSyn ) -> (Exp) happyOut22 x = unsafeCoerce# x {-# INLINE happyOut22 #-} -happyIn23 :: ([LetDef]) -> (HappyAbsSyn ) +happyIn23 :: (LetDef) -> (HappyAbsSyn ) happyIn23 x = unsafeCoerce# x {-# INLINE happyIn23 #-} -happyOut23 :: (HappyAbsSyn ) -> ([LetDef]) +happyOut23 :: (HappyAbsSyn ) -> (LetDef) happyOut23 x = unsafeCoerce# x {-# INLINE happyOut23 #-} -happyIn24 :: (Case) -> (HappyAbsSyn ) +happyIn24 :: ([LetDef]) -> (HappyAbsSyn ) happyIn24 x = unsafeCoerce# x {-# INLINE happyIn24 #-} -happyOut24 :: (HappyAbsSyn ) -> (Case) +happyOut24 :: (HappyAbsSyn ) -> ([LetDef]) happyOut24 x = unsafeCoerce# x {-# INLINE happyOut24 #-} -happyIn25 :: ([Case]) -> (HappyAbsSyn ) +happyIn25 :: (Case) -> (HappyAbsSyn ) happyIn25 x = unsafeCoerce# x {-# INLINE happyIn25 #-} -happyOut25 :: (HappyAbsSyn ) -> ([Case]) +happyOut25 :: (HappyAbsSyn ) -> (Case) happyOut25 x = unsafeCoerce# x {-# INLINE happyOut25 #-} -happyIn26 :: (Bind) -> (HappyAbsSyn ) +happyIn26 :: ([Case]) -> (HappyAbsSyn ) happyIn26 x = unsafeCoerce# x {-# INLINE happyIn26 #-} -happyOut26 :: (HappyAbsSyn ) -> (Bind) +happyOut26 :: (HappyAbsSyn ) -> ([Case]) happyOut26 x = unsafeCoerce# x {-# INLINE happyOut26 #-} -happyIn27 :: ([Bind]) -> (HappyAbsSyn ) +happyIn27 :: (Bind) -> (HappyAbsSyn ) happyIn27 x = unsafeCoerce# x {-# INLINE happyIn27 #-} -happyOut27 :: (HappyAbsSyn ) -> ([Bind]) +happyOut27 :: (HappyAbsSyn ) -> (Bind) happyOut27 x = unsafeCoerce# x {-# INLINE happyOut27 #-} -happyIn28 :: (Exp) -> (HappyAbsSyn ) +happyIn28 :: ([Bind]) -> (HappyAbsSyn ) happyIn28 x = unsafeCoerce# x {-# INLINE happyIn28 #-} -happyOut28 :: (HappyAbsSyn ) -> (Exp) +happyOut28 :: (HappyAbsSyn ) -> ([Bind]) happyOut28 x = unsafeCoerce# x {-# INLINE happyOut28 #-} -happyIn29 :: (VarOrWild) -> (HappyAbsSyn ) +happyIn29 :: (Exp) -> (HappyAbsSyn ) happyIn29 x = unsafeCoerce# x {-# INLINE happyIn29 #-} -happyOut29 :: (HappyAbsSyn ) -> (VarOrWild) +happyOut29 :: (HappyAbsSyn ) -> (Exp) happyOut29 x = unsafeCoerce# x {-# INLINE happyOut29 #-} -happyIn30 :: (Exp) -> (HappyAbsSyn ) +happyIn30 :: (VarOrWild) -> (HappyAbsSyn ) happyIn30 x = unsafeCoerce# x {-# INLINE happyIn30 #-} -happyOut30 :: (HappyAbsSyn ) -> (Exp) +happyOut30 :: (HappyAbsSyn ) -> (VarOrWild) happyOut30 x = unsafeCoerce# x {-# INLINE happyOut30 #-} happyIn31 :: (Exp) -> (HappyAbsSyn ) @@ -229,42 +229,48 @@ happyIn40 x = unsafeCoerce# x happyOut40 :: (HappyAbsSyn ) -> (Exp) happyOut40 x = unsafeCoerce# x {-# INLINE happyOut40 #-} -happyIn41 :: (FieldType) -> (HappyAbsSyn ) +happyIn41 :: (Exp) -> (HappyAbsSyn ) happyIn41 x = unsafeCoerce# x {-# INLINE happyIn41 #-} -happyOut41 :: (HappyAbsSyn ) -> (FieldType) +happyOut41 :: (HappyAbsSyn ) -> (Exp) happyOut41 x = unsafeCoerce# x {-# INLINE happyOut41 #-} -happyIn42 :: ([FieldType]) -> (HappyAbsSyn ) +happyIn42 :: (FieldType) -> (HappyAbsSyn ) happyIn42 x = unsafeCoerce# x {-# INLINE happyIn42 #-} -happyOut42 :: (HappyAbsSyn ) -> ([FieldType]) +happyOut42 :: (HappyAbsSyn ) -> (FieldType) happyOut42 x = unsafeCoerce# x {-# INLINE happyOut42 #-} -happyIn43 :: (FieldValue) -> (HappyAbsSyn ) +happyIn43 :: ([FieldType]) -> (HappyAbsSyn ) happyIn43 x = unsafeCoerce# x {-# INLINE happyIn43 #-} -happyOut43 :: (HappyAbsSyn ) -> (FieldValue) +happyOut43 :: (HappyAbsSyn ) -> ([FieldType]) happyOut43 x = unsafeCoerce# x {-# INLINE happyOut43 #-} -happyIn44 :: ([FieldValue]) -> (HappyAbsSyn ) +happyIn44 :: (FieldValue) -> (HappyAbsSyn ) happyIn44 x = unsafeCoerce# x {-# INLINE happyIn44 #-} -happyOut44 :: (HappyAbsSyn ) -> ([FieldValue]) +happyOut44 :: (HappyAbsSyn ) -> (FieldValue) happyOut44 x = unsafeCoerce# x {-# INLINE happyOut44 #-} -happyIn45 :: (Exp) -> (HappyAbsSyn ) +happyIn45 :: ([FieldValue]) -> (HappyAbsSyn ) happyIn45 x = unsafeCoerce# x {-# INLINE happyIn45 #-} -happyOut45 :: (HappyAbsSyn ) -> (Exp) +happyOut45 :: (HappyAbsSyn ) -> ([FieldValue]) happyOut45 x = unsafeCoerce# x {-# INLINE happyOut45 #-} -happyIn46 :: ([Exp]) -> (HappyAbsSyn ) +happyIn46 :: (Exp) -> (HappyAbsSyn ) happyIn46 x = unsafeCoerce# x {-# INLINE happyIn46 #-} -happyOut46 :: (HappyAbsSyn ) -> ([Exp]) +happyOut46 :: (HappyAbsSyn ) -> (Exp) happyOut46 x = unsafeCoerce# x {-# INLINE happyOut46 #-} +happyIn47 :: ([Exp]) -> (HappyAbsSyn ) +happyIn47 x = unsafeCoerce# x +{-# INLINE happyIn47 #-} +happyOut47 :: (HappyAbsSyn ) -> ([Exp]) +happyOut47 x = unsafeCoerce# x +{-# INLINE happyOut47 #-} happyInTok :: Token -> (HappyAbsSyn ) happyInTok x = unsafeCoerce# x {-# INLINE happyInTok #-} @@ -273,21 +279,21 @@ happyOutTok x = unsafeCoerce# x {-# INLINE happyOutTok #-} happyActOffsets :: HappyAddr -happyActOffsets = HappyA# "\x9b\x01\x29\x00\x92\x01\x00\x00\x00\x00\x00\x00\x00\x00\x90\x01\x00\x00\xfd\xff\x00\x00\xb4\x01\x9a\x01\xac\x01\xe6\x00\x6e\x01\x00\x00\x48\x00\x8f\x01\x00\x00\x00\x00\x12\x00\xf9\xff\x40\x00\x29\x00\x00\x00\x00\x00\x29\x00\xa5\x01\x29\x00\xa3\x01\xa2\x01\xa1\x01\x00\x00\x00\x00\x63\x01\x91\x01\xe5\xff\x61\x01\x00\x00\x8e\x01\x8d\x01\x00\x00\x55\x01\x55\x01\x5c\x01\x41\x01\x41\x01\x41\x01\x45\x01\x00\x00\x43\x01\x50\x01\x4f\x01\x00\x00\x29\x00\x00\x00\x4c\x01\x00\x00\x0f\x00\x64\x01\x4b\x01\x21\x01\x36\x01\x40\x00\x40\x00\x40\x00\x40\x00\x40\x00\x40\x00\x40\x00\x40\x00\x40\x00\x40\x00\x40\x00\x40\x00\x40\x00\x40\x00\x29\x00\x40\x00\x40\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x6e\x01\x6e\x01\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x29\x00\x00\x00\x29\x00\x00\x00\x29\x00\x49\x01\x12\x00\x29\x00\x48\x01\x38\x01\x37\x01\x33\x01\x35\x01\x31\x01\x32\x01\x1d\x01\x15\x01\x00\x00\xea\x00\x13\x01\xe5\xff\xfc\xff\x29\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x29\x00\x55\x00\x00\x00\x00\x00\x11\x01\x00\x00\x29\x00\x00\x00\x00\x00\xd3\x00\x29\x00\x00\x00\xd3\x00\x29\x00\xe9\x00\xd1\x00\x29\x00\xda\x00\xbe\x00\xe7\x00\xcf\x00\x55\x00\x00\x00\x00\x00\xc1\x00\xbd\x00\x55\x00\xb4\x00\xb7\x00\x00\x00\xb8\x00\xb2\x00\x29\x00\x00\x00\x00\x00\x29\x00\xa0\x00\x00\x00\x29\x00\x00\x00\x00\x00\x00\x00\x00\x00\x78\x00\x72\x00\x8b\x00\x00\x00\x00\x00\x85\x00\x76\x00\x6f\x00\x63\x00\x00\x00\x29\x00\x00\x00\x00\x00\x00\x00\x55\x00\x55\x00\x29\x00\x00\x00\x29\x00\x00\x00\x55\x00\x00\x00\x00\x00\x00\x00\x00\x00\x27\x00\x00\x00\x27\x00\x55\x00\x00\x00\x00\x00\x43\x00\x3f\x00\x39\x00\x00\x00\x08\x00\x29\x00\x00\x00\x00\x00\x00\x00"# +happyActOffsets = HappyA# "\x85\x01\x29\x00\x7c\x01\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x64\x01\x00\x00\xdd\x00\x00\x00\x99\x01\x89\x01\x42\x01\x24\x01\x01\x01\x00\x00\x48\x00\x76\x01\x00\x00\x00\x00\x12\x00\xf9\xff\x40\x00\x29\x00\x00\x00\x00\x00\x29\x00\x93\x01\x29\x00\x91\x01\x90\x01\x8e\x01\x00\x00\x00\x00\x00\x00\x60\x01\x8f\x01\x66\x00\x5f\x01\x00\x00\x8c\x01\x8b\x01\x00\x00\x5d\x01\x5d\x01\x63\x01\x48\x01\x48\x01\x48\x01\x4c\x01\x00\x00\x4a\x01\x57\x01\x56\x01\x00\x00\x29\x00\x00\x00\x5c\x01\x00\x00\x20\x00\x6b\x01\x5e\x01\x2f\x01\x41\x01\x40\x00\x40\x00\x40\x00\x40\x00\x40\x00\x40\x00\x40\x00\x40\x00\x40\x00\x40\x00\x40\x00\x40\x00\x40\x00\x40\x00\x29\x00\x40\x00\x40\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x01\x01\x01\x01\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x29\x00\x00\x00\x29\x00\x00\x00\x29\x00\x58\x01\x12\x00\x29\x00\x5a\x01\x59\x01\x55\x01\x53\x01\x40\x01\x3b\x01\x3c\x01\x2c\x01\x20\x01\x00\x00\xf1\x00\x1e\x01\x66\x00\xfc\xff\x29\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x29\x00\x5b\x00\x00\x00\x00\x00\x1b\x01\x00\x00\x29\x00\x00\x00\x00\x00\xd8\x00\x29\x00\x00\x00\xd8\x00\x29\x00\xf4\x00\xd6\x00\x29\x00\xdf\x00\xea\x00\xe8\x00\xe2\x00\x5b\x00\x00\x00\x00\x00\xbe\x00\xde\x00\x5b\x00\xc3\x00\xc5\x00\x00\x00\xc0\x00\xbc\x00\x29\x00\x00\x00\x00\x00\x29\x00\xb7\x00\x00\x00\x29\x00\x00\x00\x00\x00\x00\x00\x00\x00\x7b\x00\x78\x00\x9b\x00\x00\x00\x00\x00\x83\x00\x84\x00\x62\x00\x65\x00\x00\x00\x29\x00\x00\x00\x00\x00\x00\x00\x5b\x00\x5b\x00\x29\x00\x00\x00\x29\x00\x00\x00\x5b\x00\x00\x00\x00\x00\x00\x00\x00\x00\x30\x00\x00\x00\x30\x00\x5b\x00\x00\x00\x00\x00\x5c\x00\x56\x00\x50\x00\x00\x00\x10\x00\x29\x00\x00\x00\x00\x00\x00\x00"# happyGotoOffsets :: HappyAddr -happyGotoOffsets = HappyA# "\xe1\x00\x1b\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\x7e\x00\x00\x00\x00\x00\x00\x00\xd7\x00\x04\x00\xdf\x03\x8f\x00\x00\x00\x00\x00\x07\x03\x00\x00\xe3\x02\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x86\x01\x36\x00\x00\x00\x05\x00\x00\x00\x00\x00\x32\x00\x2b\x00\x66\x00\x68\x00\x26\x00\x13\x00\x00\x00\x11\x00\x00\x00\x00\x00\x00\x00\x00\x00\xcf\x02\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x23\x00\x00\x00\xdb\x03\xcb\x03\xc7\x03\xb2\x03\xc3\x03\xb7\x03\x9f\x03\x8e\x03\x87\x03\x7b\x03\x74\x03\xbf\x00\x63\x03\x50\x03\xab\x02\x3f\x03\x2c\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\x97\x02\x00\x00\x73\x02\x00\x00\x7b\x00\x00\x00\xb3\x00\x5f\x02\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x06\x00\x00\x00\xe3\x00\x53\x01\x3b\x02\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x27\x02\x4e\x01\x00\x00\x00\x00\x00\x00\x00\x00\x03\x02\x00\x00\x00\x00\x64\x00\xef\x01\x00\x00\x14\x00\xcb\x01\x00\x00\x10\x00\xb7\x01\x00\x00\x00\x00\x00\x00\x00\x00\x03\x04\x00\x00\x00\x00\x00\x00\x00\x00\x1b\x01\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x93\x01\x00\x00\x00\x00\x7f\x01\x00\x00\x00\x00\x5b\x01\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x60\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x47\x01\x00\x00\x00\x00\x00\x00\x0c\x00\x16\x01\x23\x01\x02\x00\x0f\x01\x00\x00\x82\x00\x00\x00\x00\x00\x00\x00\x00\x00\x82\x01\x00\x00\x54\x00\xba\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x49\x00\xeb\x00\x00\x00\x00\x00\x00\x00"# +happyGotoOffsets = HappyA# "\xfd\x00\x29\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\x81\x00\x00\x00\x00\x00\x00\x00\xdb\x00\x06\x00\x0a\x04\x91\x00\x00\x00\x00\x00\x15\x03\x00\x00\xf0\x02\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x1f\x01\x52\x00\x00\x00\x2f\x00\x00\x00\x00\x00\x38\x00\x36\x00\x21\x00\x51\x00\x25\x00\x0e\x00\x00\x00\xfb\xff\x00\x00\x00\x00\x00\x00\x00\x00\xdc\x02\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x32\x00\x00\x00\x06\x04\x02\x04\xfe\x03\xcf\x03\xd9\x03\xd4\x03\xc8\x03\xc1\x03\x9c\x03\x95\x03\x8e\x03\xc2\x00\x87\x03\x62\x03\xb7\x02\x58\x03\x4e\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\xa3\x02\x00\x00\x7e\x02\x00\x00\x7d\x00\x00\x00\xb6\x00\x6a\x02\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x07\x00\x00\x00\x63\x00\x0f\x00\x45\x02\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x31\x02\x11\x04\x00\x00\x00\x00\x00\x00\x00\x00\x0c\x02\x00\x00\x00\x00\x49\x00\xf8\x01\x00\x00\x13\x00\xd3\x01\x00\x00\x04\x00\xbf\x01\x00\x00\x00\x00\x00\x00\x00\x00\x2f\x04\x00\x00\x00\x00\x00\x00\x00\x00\x0b\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x9a\x01\x00\x00\x00\x00\x86\x01\x00\x00\x00\x00\x61\x01\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x8b\x03\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x4d\x01\x00\x00\x00\x00\x00\x00\x53\x03\x0e\x04\x28\x01\x0c\x00\x14\x01\x00\x00\x08\x00\x00\x00\x00\x00\x00\x00\x00\x00\x19\x01\x00\x00\x14\x00\xbd\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x86\x00\xef\x00\x00\x00\x00\x00\x00\x00"# happyDefActions :: HappyAddr -happyDefActions = HappyA# "\xf8\xff\x00\x00\x00\x00\xfd\xff\xa2\xff\xa0\xff\x9f\xff\x00\x00\x94\xff\xc5\xff\xc0\xff\xbe\xff\xbc\xff\xb5\xff\xb3\xff\xb0\xff\xac\xff\xaa\xff\xa8\xff\xa6\xff\xd5\xff\x00\x00\x00\x00\x00\x00\x93\xff\x9e\xff\xa1\xff\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\xfc\xff\xfb\xff\x00\x00\xf7\xff\xf1\xff\x00\x00\xf9\xff\xdf\xff\xf0\xff\xfa\xff\x00\x00\x00\x00\xf8\xff\x9b\xff\x97\xff\xd3\xff\x00\x00\xca\xff\x00\x00\x92\xff\x00\x00\xab\xff\x00\x00\xc4\xff\x00\x00\xc3\xff\xa2\xff\x00\x00\x00\x00\x00\x00\xa9\xff\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\xc1\xff\xc2\xff\xc6\xff\xbf\xff\xbd\xff\xb6\xff\xb7\xff\xb8\xff\xb9\xff\xba\xff\xbb\xff\xb1\xff\xb2\xff\xb4\xff\xad\xff\xae\xff\xaf\xff\xa7\xff\x00\x00\x9d\xff\x00\x00\xa3\xff\x93\xff\x00\x00\x00\x00\x00\x00\x00\x00\xd2\xff\x00\x00\x00\x00\x96\xff\x00\x00\x00\x00\x9a\xff\x00\x00\xf6\xff\x00\x00\x00\x00\xf1\xff\x00\x00\x00\x00\xf4\xff\xe2\xff\xe4\xff\xe3\xff\xde\xff\x00\x00\x00\x00\xe1\xff\xe5\xff\x00\x00\xef\xff\x00\x00\xf2\xff\xa5\xff\x9b\xff\x00\x00\xa4\xff\x97\xff\x00\x00\x00\x00\xd3\xff\x00\x00\x00\x00\xcb\xff\x00\x00\x00\x00\xcf\xff\x91\xff\xc8\xff\x00\x00\x00\x00\xe2\xff\x00\x00\xe9\xff\xe7\xff\xce\xff\x00\x00\x00\x00\xc9\xff\xd6\xff\x00\x00\x00\x00\xd1\xff\x00\x00\x98\xff\x95\xff\x9c\xff\x99\xff\x00\x00\xdc\xff\x00\x00\xf3\xff\xe0\xff\x00\x00\xdb\xff\x00\x00\x00\x00\xd9\xff\x00\x00\xd7\xff\xcc\xff\xd8\xff\xcf\xff\x00\x00\x00\x00\xdf\xff\x00\x00\xc7\xff\xe8\xff\xd0\xff\xea\xff\xcd\xff\xd4\xff\xed\xff\xe6\xff\xdc\xff\x00\x00\xdd\xff\xda\xff\x00\x00\xec\xff\x00\x00\xf5\xff\xed\xff\x00\x00\xee\xff\xeb\xff"# +happyDefActions = HappyA# "\xf7\xff\x00\x00\x00\x00\xfd\xff\xa1\xff\x9f\xff\x9e\xff\x9d\xff\x00\x00\x92\xff\xc4\xff\xbf\xff\xbd\xff\xbb\xff\xb4\xff\xb2\xff\xaf\xff\xab\xff\xa9\xff\xa7\xff\xa5\xff\xd4\xff\x00\x00\x00\x00\x00\x00\x91\xff\x9c\xff\xa0\xff\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\xfc\xff\xfb\xff\xfa\xff\x00\x00\xf6\xff\xf0\xff\x00\x00\xf8\xff\xde\xff\xef\xff\xf9\xff\x00\x00\x00\x00\xf7\xff\x99\xff\x95\xff\xd2\xff\x00\x00\xc9\xff\x00\x00\x90\xff\x00\x00\xaa\xff\x00\x00\xc3\xff\x00\x00\xc2\xff\xa1\xff\x00\x00\x00\x00\x00\x00\xa8\xff\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\xc0\xff\xc1\xff\xc5\xff\xbe\xff\xbc\xff\xb5\xff\xb6\xff\xb7\xff\xb8\xff\xb9\xff\xba\xff\xb0\xff\xb1\xff\xb3\xff\xac\xff\xad\xff\xae\xff\xa6\xff\x00\x00\x9b\xff\x00\x00\xa2\xff\x91\xff\x00\x00\x00\x00\x00\x00\x00\x00\xd1\xff\x00\x00\x00\x00\x94\xff\x00\x00\x00\x00\x98\xff\x00\x00\xf5\xff\x00\x00\x00\x00\xf0\xff\x00\x00\x00\x00\xf3\xff\xe1\xff\xe3\xff\xe2\xff\xdd\xff\x00\x00\x00\x00\xe0\xff\xe4\xff\x00\x00\xee\xff\x00\x00\xf1\xff\xa4\xff\x99\xff\x00\x00\xa3\xff\x95\xff\x00\x00\x00\x00\xd2\xff\x00\x00\x00\x00\xca\xff\x00\x00\x00\x00\xce\xff\x8f\xff\xc7\xff\x00\x00\x00\x00\xe1\xff\x00\x00\xe8\xff\xe6\xff\xcd\xff\x00\x00\x00\x00\xc8\xff\xd5\xff\x00\x00\x00\x00\xd0\xff\x00\x00\x96\xff\x93\xff\x9a\xff\x97\xff\x00\x00\xdb\xff\x00\x00\xf2\xff\xdf\xff\x00\x00\xda\xff\x00\x00\x00\x00\xd8\xff\x00\x00\xd6\xff\xcb\xff\xd7\xff\xce\xff\x00\x00\x00\x00\xde\xff\x00\x00\xc6\xff\xe7\xff\xcf\xff\xe9\xff\xcc\xff\xd3\xff\xec\xff\xe5\xff\xdb\xff\x00\x00\xdc\xff\xd9\xff\x00\x00\xeb\xff\x00\x00\xf4\xff\xec\xff\x00\x00\xed\xff\xea\xff"# happyCheck :: HappyAddr -happyCheck = HappyA# "\xff\xff\x05\x00\x09\x00\x07\x00\x00\x00\x09\x00\x00\x00\x0a\x00\x23\x00\x24\x00\x0d\x00\x0e\x00\x00\x00\x01\x00\x02\x00\x0d\x00\x00\x00\x02\x00\x0d\x00\x00\x00\x00\x00\x30\x00\x0a\x00\x0b\x00\x0c\x00\x07\x00\x0b\x00\x09\x00\x18\x00\x21\x00\x0c\x00\x13\x00\x14\x00\x11\x00\x12\x00\x00\x00\x11\x00\x12\x00\x00\x00\x16\x00\x2c\x00\x30\x00\x18\x00\x00\x00\x30\x00\x31\x00\x32\x00\x1d\x00\x07\x00\x1f\x00\x00\x00\x21\x00\x22\x00\x0c\x00\x00\x00\x25\x00\x30\x00\x27\x00\x26\x00\x27\x00\x2a\x00\x04\x00\x2c\x00\x2d\x00\x01\x00\x18\x00\x30\x00\x31\x00\x32\x00\x02\x00\x1d\x00\x07\x00\x1f\x00\x00\x00\x21\x00\x22\x00\x26\x00\x27\x00\x25\x00\x07\x00\x27\x00\x08\x00\x09\x00\x2a\x00\x00\x00\x2c\x00\x2d\x00\x30\x00\x18\x00\x30\x00\x31\x00\x32\x00\x07\x00\x1d\x00\x09\x00\x1f\x00\x00\x00\x21\x00\x0e\x00\x0f\x00\x00\x00\x1d\x00\x03\x00\x1f\x00\x00\x00\x21\x00\x04\x00\x05\x00\x2c\x00\x2d\x00\x0e\x00\x0f\x00\x30\x00\x31\x00\x32\x00\x04\x00\x2c\x00\x2d\x00\x21\x00\x01\x00\x30\x00\x31\x00\x32\x00\x00\x00\x01\x00\x02\x00\x00\x00\x01\x00\x02\x00\x2c\x00\x00\x00\x01\x00\x02\x00\x30\x00\x31\x00\x32\x00\x24\x00\x25\x00\x05\x00\x10\x00\x24\x00\x25\x00\x0c\x00\x00\x00\x01\x00\x02\x00\x17\x00\x08\x00\x19\x00\x1a\x00\x1b\x00\x1c\x00\x1d\x00\x1e\x00\x1f\x00\x20\x00\x21\x00\x22\x00\x23\x00\x10\x00\x22\x00\x23\x00\x30\x00\x28\x00\x29\x00\x05\x00\x17\x00\x2f\x00\x19\x00\x1a\x00\x1b\x00\x1c\x00\x1d\x00\x1e\x00\x1f\x00\x20\x00\x21\x00\x22\x00\x23\x00\x00\x00\x01\x00\x02\x00\x04\x00\x28\x00\x29\x00\x01\x00\x00\x00\x01\x00\x02\x00\x06\x00\x0a\x00\x00\x00\x01\x00\x02\x00\x04\x00\x10\x00\x0a\x00\x0b\x00\x0c\x00\x0a\x00\x15\x00\x08\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\x00\x00\x01\x00\x02\x00\x0b\x00\x28\x00\x1d\x00\x1e\x00\x1f\x00\x20\x00\x21\x00\x22\x00\x23\x00\x00\x00\x03\x00\x04\x00\x05\x00\x10\x00\x01\x00\x06\x00\x07\x00\x00\x00\x01\x00\x02\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\x10\x00\x16\x00\x17\x00\x18\x00\x28\x00\x26\x00\x30\x00\x17\x00\x30\x00\x19\x00\x1a\x00\x1b\x00\x1c\x00\x1d\x00\x1e\x00\x1f\x00\x20\x00\x21\x00\x22\x00\x23\x00\x00\x00\x01\x00\x02\x00\x29\x00\x28\x00\x03\x00\x02\x00\x00\x00\x01\x00\x02\x00\x04\x00\x30\x00\x00\x00\x01\x00\x02\x00\x01\x00\x10\x00\x0a\x00\x0b\x00\x0c\x00\x00\x00\x01\x00\x02\x00\x17\x00\x0c\x00\x19\x00\x1a\x00\x1b\x00\x1c\x00\x1d\x00\x1e\x00\x1f\x00\x20\x00\x21\x00\x22\x00\x23\x00\x10\x00\x02\x00\x04\x00\x01\x00\x28\x00\x05\x00\x01\x00\x17\x00\x04\x00\x19\x00\x1a\x00\x1b\x00\x1c\x00\x1d\x00\x1e\x00\x1f\x00\x20\x00\x21\x00\x22\x00\x23\x00\x00\x00\x01\x00\x02\x00\x02\x00\x28\x00\x03\x00\x02\x00\x00\x00\x01\x00\x02\x00\x30\x00\x1c\x00\x00\x00\x01\x00\x02\x00\x0a\x00\x10\x00\x0a\x00\x0b\x00\x0c\x00\x00\x00\x01\x00\x02\x00\x17\x00\x0c\x00\x19\x00\x1a\x00\x1b\x00\x1c\x00\x1d\x00\x1e\x00\x1f\x00\x20\x00\x21\x00\x22\x00\x23\x00\x10\x00\x08\x00\x1e\x00\x2b\x00\x28\x00\x20\x00\x30\x00\x17\x00\x2e\x00\x19\x00\x1a\x00\x1b\x00\x1c\x00\x1d\x00\x1e\x00\x1f\x00\x20\x00\x21\x00\x22\x00\x23\x00\x00\x00\x01\x00\x02\x00\x00\x00\x28\x00\x28\x00\x30\x00\x00\x00\x19\x00\x1a\x00\x1b\x00\x08\x00\x09\x00\x06\x00\x07\x00\x01\x00\x10\x00\x02\x00\x30\x00\x01\x00\x00\x00\x01\x00\x02\x00\x17\x00\x34\x00\x19\x00\x1a\x00\x1b\x00\x1c\x00\x1d\x00\x1e\x00\x1f\x00\x20\x00\x21\x00\x22\x00\x23\x00\x10\x00\x03\x00\x03\x00\x03\x00\x28\x00\x03\x00\x0f\x00\x17\x00\x1c\x00\x19\x00\x1a\x00\x1b\x00\x1c\x00\x1d\x00\x1e\x00\x1f\x00\x20\x00\x21\x00\x22\x00\x23\x00\x00\x00\x01\x00\x02\x00\x06\x00\x28\x00\x10\x00\x11\x00\x12\x00\x13\x00\x14\x00\x15\x00\x30\x00\x28\x00\x34\x00\xff\xff\xff\xff\x10\x00\xff\xff\xff\xff\xff\xff\x00\x00\x01\x00\x02\x00\x17\x00\xff\xff\x19\x00\x1a\x00\x1b\x00\x1c\x00\x1d\x00\x1e\x00\x1f\x00\x20\x00\x21\x00\x22\x00\x23\x00\x10\x00\xff\xff\xff\xff\xff\xff\x28\x00\xff\xff\xff\xff\x17\x00\xff\xff\x19\x00\x1a\x00\x1b\x00\x1c\x00\x1d\x00\x1e\x00\x1f\x00\x20\x00\x21\x00\x22\x00\x23\x00\x00\x00\x01\x00\x02\x00\xff\xff\x28\x00\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\x10\x00\xff\xff\xff\xff\xff\xff\x00\x00\x01\x00\x02\x00\x17\x00\xff\xff\x19\x00\x1a\x00\x1b\x00\x1c\x00\x1d\x00\x1e\x00\x1f\x00\x20\x00\x21\x00\x22\x00\x23\x00\x10\x00\xff\xff\xff\xff\xff\xff\x28\x00\xff\xff\xff\xff\x17\x00\xff\xff\x19\x00\x1a\x00\x1b\x00\x1c\x00\x1d\x00\x1e\x00\x1f\x00\x20\x00\x21\x00\x22\x00\x23\x00\x00\x00\x01\x00\x02\x00\xff\xff\x28\x00\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\x10\x00\xff\xff\xff\xff\xff\xff\x00\x00\x01\x00\x02\x00\x17\x00\xff\xff\x19\x00\x1a\x00\x1b\x00\x1c\x00\x1d\x00\x1e\x00\x1f\x00\x20\x00\x21\x00\x22\x00\x23\x00\x10\x00\xff\xff\xff\xff\xff\xff\x28\x00\xff\xff\xff\xff\x17\x00\xff\xff\x19\x00\x1a\x00\x1b\x00\x1c\x00\x1d\x00\x1e\x00\x1f\x00\x20\x00\x21\x00\x22\x00\x23\x00\x00\x00\x01\x00\x02\x00\xff\xff\x28\x00\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\x10\x00\xff\xff\xff\xff\xff\xff\x00\x00\x01\x00\x02\x00\x17\x00\xff\xff\x19\x00\x1a\x00\x1b\x00\x1c\x00\x1d\x00\x1e\x00\x1f\x00\x20\x00\x21\x00\x22\x00\x23\x00\x10\x00\xff\xff\xff\xff\xff\xff\x28\x00\xff\xff\xff\xff\x17\x00\xff\xff\x19\x00\x1a\x00\x1b\x00\x1c\x00\x1d\x00\x1e\x00\x1f\x00\x20\x00\x21\x00\x22\x00\x23\x00\x00\x00\x01\x00\x02\x00\xff\xff\x28\x00\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\x10\x00\xff\xff\xff\xff\xff\xff\x00\x00\x01\x00\x02\x00\x17\x00\xff\xff\x19\x00\x1a\x00\x1b\x00\x1c\x00\x1d\x00\x1e\x00\x1f\x00\x20\x00\x21\x00\x22\x00\x23\x00\x10\x00\xff\xff\xff\xff\xff\xff\x28\x00\xff\xff\xff\xff\x17\x00\xff\xff\x19\x00\x1a\x00\x1b\x00\x1c\x00\x1d\x00\x1e\x00\x1f\x00\x20\x00\x21\x00\x22\x00\x23\x00\x00\x00\x01\x00\x02\x00\xff\xff\x28\x00\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\x10\x00\xff\xff\xff\xff\xff\xff\x00\x00\x01\x00\x02\x00\x17\x00\xff\xff\x19\x00\x1a\x00\x1b\x00\x1c\x00\x1d\x00\x1e\x00\x1f\x00\x20\x00\x21\x00\x22\x00\x23\x00\x10\x00\xff\xff\xff\xff\xff\xff\x28\x00\xff\xff\xff\xff\x17\x00\xff\xff\x19\x00\x1a\x00\x1b\x00\x1c\x00\x1d\x00\x1e\x00\x1f\x00\x20\x00\x21\x00\x22\x00\x23\x00\x00\x00\x01\x00\x02\x00\xff\xff\x28\x00\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\x10\x00\xff\xff\xff\xff\xff\xff\x00\x00\x01\x00\x02\x00\x17\x00\xff\xff\x19\x00\x1a\x00\x1b\x00\x1c\x00\x1d\x00\x1e\x00\x1f\x00\x20\x00\x21\x00\x22\x00\x23\x00\x10\x00\x00\x00\x01\x00\x02\x00\x28\x00\xff\xff\xff\xff\x17\x00\xff\xff\x19\x00\x1a\x00\x1b\x00\x1c\x00\x1d\x00\x1e\x00\x1f\x00\x20\x00\x21\x00\x22\x00\x23\x00\x00\x00\x01\x00\x02\x00\xff\xff\x28\x00\xff\xff\xff\xff\x1a\x00\x1b\x00\x1c\x00\x1d\x00\x1e\x00\x1f\x00\x20\x00\x21\x00\x22\x00\x23\x00\x00\x00\x01\x00\x02\x00\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\x1a\x00\x1b\x00\x1c\x00\x1d\x00\x1e\x00\x1f\x00\x20\x00\x21\x00\x22\x00\x23\x00\x00\x00\x01\x00\x02\x00\xff\xff\xff\xff\xff\xff\xff\xff\x1a\x00\x1b\x00\x1c\x00\x1d\x00\x1e\x00\x1f\x00\x20\x00\x21\x00\x22\x00\x23\x00\x00\x00\x01\x00\x02\x00\xff\xff\xff\xff\xff\xff\xff\xff\x00\x00\x01\x00\x02\x00\x1b\x00\x1c\x00\x1d\x00\x1e\x00\x1f\x00\x20\x00\x21\x00\x22\x00\x23\x00\x00\x00\x01\x00\x02\x00\xff\xff\xff\xff\xff\xff\xff\xff\x00\x00\x01\x00\x02\x00\x1d\x00\x1e\x00\x1f\x00\x20\x00\x21\x00\x22\x00\x23\x00\x1d\x00\x1e\x00\x1f\x00\x20\x00\x21\x00\x22\x00\x23\x00\x00\x00\x01\x00\x02\x00\xff\xff\xff\xff\x1d\x00\x1e\x00\x1f\x00\x20\x00\x21\x00\x22\x00\x23\x00\x1d\x00\x1e\x00\x1f\x00\x20\x00\x21\x00\x22\x00\x23\x00\x00\x00\x01\x00\x02\x00\xff\xff\xff\xff\x00\x00\x01\x00\x02\x00\xff\xff\xff\xff\x1d\x00\x1e\x00\x1f\x00\x20\x00\x21\x00\x22\x00\x23\x00\x00\x00\x01\x00\x02\x00\xff\xff\x00\x00\x01\x00\x02\x00\xff\xff\x00\x00\x01\x00\x02\x00\xff\xff\x1d\x00\x1e\x00\x1f\x00\x20\x00\x21\x00\x22\x00\x23\x00\x1f\x00\x20\x00\x21\x00\x22\x00\x23\x00\x00\x00\x01\x00\x02\x00\xff\xff\x00\x00\x01\x00\x02\x00\x1f\x00\x20\x00\x21\x00\x22\x00\x23\x00\x20\x00\x21\x00\x22\x00\x23\x00\x20\x00\x21\x00\x22\x00\x23\x00\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\x20\x00\x21\x00\x22\x00\x23\x00\x20\x00\x21\x00\x22\x00\x23\x00\x00\x00\x01\x00\x02\x00\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\x0a\x00\x0b\x00\x0c\x00\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\x13\x00\x14\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"# +happyCheck = HappyA# "\xff\xff\x05\x00\x09\x00\x07\x00\x00\x00\x09\x00\x00\x00\x00\x00\x00\x00\x01\x00\x02\x00\x00\x00\x01\x00\x02\x00\x00\x00\x00\x00\x01\x00\x02\x00\x17\x00\x00\x00\x00\x00\x0d\x00\x12\x00\x13\x00\x0d\x00\x07\x00\x0e\x00\x09\x00\x0d\x00\x21\x00\x0c\x00\x19\x00\x12\x00\x13\x00\x02\x00\x0f\x00\x10\x00\x00\x00\x05\x00\x06\x00\x2c\x00\x30\x00\x18\x00\x0b\x00\x30\x00\x31\x00\x32\x00\x1d\x00\x07\x00\x1f\x00\x00\x00\x21\x00\x22\x00\x0c\x00\x00\x00\x25\x00\x00\x00\x27\x00\x27\x00\x28\x00\x2a\x00\x0e\x00\x2c\x00\x2d\x00\x30\x00\x18\x00\x30\x00\x31\x00\x32\x00\x33\x00\x1d\x00\x07\x00\x1f\x00\x00\x00\x21\x00\x22\x00\x27\x00\x28\x00\x25\x00\x07\x00\x27\x00\x00\x00\x00\x00\x2a\x00\x04\x00\x2c\x00\x2d\x00\x01\x00\x18\x00\x30\x00\x31\x00\x32\x00\x33\x00\x1d\x00\x02\x00\x1f\x00\x30\x00\x21\x00\x07\x00\x00\x00\x09\x00\x1d\x00\x04\x00\x1f\x00\x03\x00\x21\x00\x07\x00\x08\x00\x2c\x00\x2d\x00\x25\x00\x26\x00\x30\x00\x31\x00\x32\x00\x33\x00\x2c\x00\x2d\x00\x25\x00\x26\x00\x30\x00\x31\x00\x32\x00\x33\x00\x21\x00\x00\x00\x01\x00\x02\x00\x03\x00\x00\x00\x01\x00\x02\x00\x03\x00\x01\x00\x00\x00\x2c\x00\x05\x00\x23\x00\x24\x00\x30\x00\x31\x00\x32\x00\x11\x00\x09\x00\x0a\x00\x00\x00\x01\x00\x02\x00\x03\x00\x18\x00\x30\x00\x1a\x00\x1b\x00\x1c\x00\x1d\x00\x1e\x00\x1f\x00\x20\x00\x21\x00\x22\x00\x23\x00\x24\x00\x11\x00\x08\x00\x23\x00\x24\x00\x29\x00\x2a\x00\x30\x00\x18\x00\x2f\x00\x1a\x00\x1b\x00\x1c\x00\x1d\x00\x1e\x00\x1f\x00\x20\x00\x21\x00\x22\x00\x23\x00\x24\x00\x00\x00\x01\x00\x02\x00\x03\x00\x29\x00\x2a\x00\x05\x00\x00\x00\x01\x00\x02\x00\x04\x00\x01\x00\x00\x00\x01\x00\x02\x00\x03\x00\x08\x00\x11\x00\x0b\x00\x0c\x00\x0d\x00\x06\x00\x16\x00\x0a\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\x00\x00\x01\x00\x02\x00\x03\x00\x29\x00\x1e\x00\x1f\x00\x20\x00\x21\x00\x22\x00\x23\x00\x24\x00\x0a\x00\x0a\x00\x01\x00\x0d\x00\x0e\x00\x11\x00\x0b\x00\x04\x00\x00\x00\x01\x00\x02\x00\x03\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\x11\x00\x04\x00\x05\x00\x06\x00\x29\x00\x26\x00\x30\x00\x18\x00\x30\x00\x1a\x00\x1b\x00\x1c\x00\x1d\x00\x1e\x00\x1f\x00\x20\x00\x21\x00\x22\x00\x23\x00\x24\x00\x00\x00\x01\x00\x02\x00\x03\x00\x29\x00\x00\x00\x19\x00\x1a\x00\x1b\x00\x29\x00\x03\x00\x00\x00\x02\x00\x30\x00\x09\x00\x0a\x00\x04\x00\x11\x00\x07\x00\x08\x00\x00\x00\x01\x00\x02\x00\x03\x00\x18\x00\x01\x00\x1a\x00\x1b\x00\x1c\x00\x1d\x00\x1e\x00\x1f\x00\x20\x00\x21\x00\x22\x00\x23\x00\x24\x00\x11\x00\x16\x00\x17\x00\x18\x00\x29\x00\x02\x00\x04\x00\x18\x00\x01\x00\x1a\x00\x1b\x00\x1c\x00\x1d\x00\x1e\x00\x1f\x00\x20\x00\x21\x00\x22\x00\x23\x00\x24\x00\x00\x00\x01\x00\x02\x00\x03\x00\x29\x00\x10\x00\x11\x00\x12\x00\x13\x00\x14\x00\x15\x00\x05\x00\x04\x00\x01\x00\x03\x00\x02\x00\x1c\x00\x11\x00\x30\x00\x02\x00\x00\x00\x01\x00\x02\x00\x03\x00\x18\x00\x0a\x00\x1a\x00\x1b\x00\x1c\x00\x1d\x00\x1e\x00\x1f\x00\x20\x00\x21\x00\x22\x00\x23\x00\x24\x00\x11\x00\x08\x00\x1e\x00\x2b\x00\x29\x00\x20\x00\x30\x00\x18\x00\x2e\x00\x1a\x00\x1b\x00\x1c\x00\x1d\x00\x1e\x00\x1f\x00\x20\x00\x21\x00\x22\x00\x23\x00\x24\x00\x00\x00\x01\x00\x02\x00\x03\x00\x29\x00\x28\x00\x01\x00\x30\x00\x02\x00\x30\x00\x01\x00\x03\x00\x1c\x00\x03\x00\x03\x00\x35\x00\x03\x00\x11\x00\x0f\x00\x35\x00\x00\x00\x01\x00\x02\x00\x03\x00\x18\x00\x06\x00\x1a\x00\x1b\x00\x1c\x00\x1d\x00\x1e\x00\x1f\x00\x20\x00\x21\x00\x22\x00\x23\x00\x24\x00\x11\x00\x30\x00\x28\x00\xff\xff\x29\x00\xff\xff\xff\xff\x18\x00\xff\xff\x1a\x00\x1b\x00\x1c\x00\x1d\x00\x1e\x00\x1f\x00\x20\x00\x21\x00\x22\x00\x23\x00\x24\x00\x00\x00\x01\x00\x02\x00\x03\x00\x29\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\x11\x00\xff\xff\xff\xff\x00\x00\x01\x00\x02\x00\x03\x00\x18\x00\xff\xff\x1a\x00\x1b\x00\x1c\x00\x1d\x00\x1e\x00\x1f\x00\x20\x00\x21\x00\x22\x00\x23\x00\x24\x00\x11\x00\xff\xff\xff\xff\xff\xff\x29\x00\xff\xff\xff\xff\x18\x00\xff\xff\x1a\x00\x1b\x00\x1c\x00\x1d\x00\x1e\x00\x1f\x00\x20\x00\x21\x00\x22\x00\x23\x00\x24\x00\x00\x00\x01\x00\x02\x00\x03\x00\x29\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\x11\x00\xff\xff\xff\xff\x00\x00\x01\x00\x02\x00\x03\x00\x18\x00\xff\xff\x1a\x00\x1b\x00\x1c\x00\x1d\x00\x1e\x00\x1f\x00\x20\x00\x21\x00\x22\x00\x23\x00\x24\x00\x11\x00\xff\xff\xff\xff\xff\xff\x29\x00\xff\xff\xff\xff\x18\x00\xff\xff\x1a\x00\x1b\x00\x1c\x00\x1d\x00\x1e\x00\x1f\x00\x20\x00\x21\x00\x22\x00\x23\x00\x24\x00\x00\x00\x01\x00\x02\x00\x03\x00\x29\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\x11\x00\xff\xff\xff\xff\x00\x00\x01\x00\x02\x00\x03\x00\x18\x00\xff\xff\x1a\x00\x1b\x00\x1c\x00\x1d\x00\x1e\x00\x1f\x00\x20\x00\x21\x00\x22\x00\x23\x00\x24\x00\x11\x00\xff\xff\xff\xff\xff\xff\x29\x00\xff\xff\xff\xff\x18\x00\xff\xff\x1a\x00\x1b\x00\x1c\x00\x1d\x00\x1e\x00\x1f\x00\x20\x00\x21\x00\x22\x00\x23\x00\x24\x00\x00\x00\x01\x00\x02\x00\x03\x00\x29\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\x11\x00\xff\xff\xff\xff\x00\x00\x01\x00\x02\x00\x03\x00\x18\x00\xff\xff\x1a\x00\x1b\x00\x1c\x00\x1d\x00\x1e\x00\x1f\x00\x20\x00\x21\x00\x22\x00\x23\x00\x24\x00\x11\x00\xff\xff\xff\xff\xff\xff\x29\x00\xff\xff\xff\xff\x18\x00\xff\xff\x1a\x00\x1b\x00\x1c\x00\x1d\x00\x1e\x00\x1f\x00\x20\x00\x21\x00\x22\x00\x23\x00\x24\x00\x00\x00\x01\x00\x02\x00\x03\x00\x29\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\x11\x00\xff\xff\xff\xff\x00\x00\x01\x00\x02\x00\x03\x00\x18\x00\xff\xff\x1a\x00\x1b\x00\x1c\x00\x1d\x00\x1e\x00\x1f\x00\x20\x00\x21\x00\x22\x00\x23\x00\x24\x00\x11\x00\xff\xff\xff\xff\xff\xff\x29\x00\xff\xff\xff\xff\x18\x00\xff\xff\x1a\x00\x1b\x00\x1c\x00\x1d\x00\x1e\x00\x1f\x00\x20\x00\x21\x00\x22\x00\x23\x00\x24\x00\x00\x00\x01\x00\x02\x00\x03\x00\x29\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\x11\x00\xff\xff\xff\xff\x00\x00\x01\x00\x02\x00\x03\x00\x18\x00\xff\xff\x1a\x00\x1b\x00\x1c\x00\x1d\x00\x1e\x00\x1f\x00\x20\x00\x21\x00\x22\x00\x23\x00\x24\x00\x11\x00\xff\xff\xff\xff\xff\xff\x29\x00\xff\xff\xff\xff\x18\x00\xff\xff\x1a\x00\x1b\x00\x1c\x00\x1d\x00\x1e\x00\x1f\x00\x20\x00\x21\x00\x22\x00\x23\x00\x24\x00\x00\x00\x01\x00\x02\x00\x03\x00\x29\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\x11\x00\xff\xff\xff\xff\x00\x00\x01\x00\x02\x00\x03\x00\x18\x00\xff\xff\x1a\x00\x1b\x00\x1c\x00\x1d\x00\x1e\x00\x1f\x00\x20\x00\x21\x00\x22\x00\x23\x00\x24\x00\x11\x00\xff\xff\xff\xff\xff\xff\x29\x00\xff\xff\xff\xff\x18\x00\xff\xff\x1a\x00\x1b\x00\x1c\x00\x1d\x00\x1e\x00\x1f\x00\x20\x00\x21\x00\x22\x00\x23\x00\x24\x00\x00\x00\x01\x00\x02\x00\x03\x00\x29\x00\x00\x00\x01\x00\x02\x00\xff\xff\xff\xff\x00\x00\x01\x00\x02\x00\x03\x00\xff\xff\xff\xff\x0b\x00\x0c\x00\x0d\x00\xff\xff\x00\x00\x01\x00\x02\x00\x03\x00\xff\xff\x14\x00\x15\x00\x1b\x00\x1c\x00\x1d\x00\x1e\x00\x1f\x00\x20\x00\x21\x00\x22\x00\x23\x00\x24\x00\x1b\x00\x1c\x00\x1d\x00\x1e\x00\x1f\x00\x20\x00\x21\x00\x22\x00\x23\x00\x24\x00\x1b\x00\x1c\x00\x1d\x00\x1e\x00\x1f\x00\x20\x00\x21\x00\x22\x00\x23\x00\x24\x00\x00\x00\x01\x00\x02\x00\x03\x00\x00\x00\xff\xff\xff\xff\x00\x00\x01\x00\x02\x00\x03\x00\xff\xff\xff\xff\xff\xff\x00\x00\x01\x00\x02\x00\x03\x00\xff\xff\x0f\x00\x10\x00\x00\x00\x01\x00\x02\x00\x03\x00\xff\xff\xff\xff\xff\xff\x1c\x00\x1d\x00\x1e\x00\x1f\x00\x20\x00\x21\x00\x22\x00\x23\x00\x24\x00\x1e\x00\x1f\x00\x20\x00\x21\x00\x22\x00\x23\x00\x24\x00\x1e\x00\x1f\x00\x20\x00\x21\x00\x22\x00\x23\x00\x24\x00\x1e\x00\x1f\x00\x20\x00\x21\x00\x22\x00\x23\x00\x24\x00\x00\x00\x01\x00\x02\x00\x03\x00\xff\xff\xff\xff\xff\xff\x00\x00\x01\x00\x02\x00\x03\x00\xff\xff\xff\xff\xff\xff\x00\x00\x01\x00\x02\x00\x03\x00\xff\xff\x00\x00\x01\x00\x02\x00\x03\x00\xff\xff\x00\x00\x01\x00\x02\x00\x03\x00\xff\xff\xff\xff\x1e\x00\x1f\x00\x20\x00\x21\x00\x22\x00\x23\x00\x24\x00\x1e\x00\x1f\x00\x20\x00\x21\x00\x22\x00\x23\x00\x24\x00\x1e\x00\x1f\x00\x20\x00\x21\x00\x22\x00\x23\x00\x24\x00\x20\x00\x21\x00\x22\x00\x23\x00\x24\x00\x20\x00\x21\x00\x22\x00\x23\x00\x24\x00\x00\x00\x01\x00\x02\x00\x03\x00\x00\x00\x01\x00\x02\x00\x03\x00\x00\x00\x01\x00\x02\x00\x03\x00\x00\x00\x01\x00\x02\x00\x03\x00\x00\x00\x01\x00\x02\x00\x00\x00\x01\x00\x02\x00\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\x0b\x00\x0c\x00\x0d\x00\x0b\x00\x0c\x00\x0d\x00\x21\x00\x22\x00\x23\x00\x24\x00\x21\x00\x22\x00\x23\x00\x24\x00\x21\x00\x22\x00\x23\x00\x24\x00\x21\x00\x22\x00\x23\x00\x24\x00\x00\x00\x01\x00\x02\x00\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\x0b\x00\x0c\x00\x0d\x00\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\x14\x00\x15\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"# happyTable :: HappyAddr -happyTable = HappyA# "\x00\x00\x80\x00\x3b\x00\x81\x00\x38\x00\x82\x00\x86\x00\x4f\x00\x2c\x00\x2d\x00\x50\x00\x51\x00\x99\x00\x7c\x00\x7d\x00\xbe\x00\x6b\x00\xc4\xff\x78\x00\x6b\x00\x6e\x00\x04\x00\x9a\x00\x9b\x00\x9c\x00\x16\x00\xc4\xff\x3b\x00\x39\x00\x83\x00\x17\x00\x9d\x00\xc1\x00\x6c\x00\xa4\x00\x62\x00\x6c\x00\x6d\x00\x6e\x00\x69\x00\x84\x00\x04\x00\x18\x00\x75\x00\x04\x00\x22\x00\x23\x00\x19\x00\x16\x00\x1a\x00\x76\x00\x1b\x00\x1c\x00\x17\x00\x27\x00\x1d\x00\x04\x00\x1e\x00\x6f\x00\xa7\x00\x1f\x00\xcd\x00\x20\x00\x21\x00\xce\x00\x18\x00\x04\x00\x22\x00\x23\x00\xcf\x00\x19\x00\x38\x00\x1a\x00\xc9\x00\x1b\x00\x1c\x00\x6f\x00\x70\x00\x1d\x00\x38\x00\x1e\x00\xca\x00\xd0\x00\x1f\x00\xaf\x00\x20\x00\x21\x00\x04\x00\x18\x00\x04\x00\x22\x00\x23\x00\x81\x00\x19\x00\x82\x00\x1a\x00\xaf\x00\x1b\x00\xb0\x00\xc8\x00\x71\x00\x19\x00\xc4\x00\x1a\x00\x71\x00\x1b\x00\x24\x00\x74\x00\x20\x00\x21\x00\xb0\x00\xb1\x00\x04\x00\x22\x00\x23\x00\xc5\x00\x20\x00\x21\x00\x83\x00\xc6\x00\x04\x00\x22\x00\x23\x00\x04\x00\x05\x00\x06\x00\x04\x00\x05\x00\x06\x00\x84\x00\x7b\x00\x7c\x00\x7d\x00\x04\x00\x22\x00\x23\x00\x72\x00\xa9\x00\xc7\x00\x34\x00\x72\x00\x73\x00\x7e\x00\x04\x00\x05\x00\x06\x00\x08\x00\xaf\x00\x09\x00\x0a\x00\x0b\x00\x0c\x00\x0d\x00\x0e\x00\x0f\x00\x10\x00\x11\x00\x12\x00\x13\x00\x34\x00\x3f\x00\x13\x00\x04\x00\x14\x00\x95\x00\xb5\x00\x08\x00\xb3\x00\x09\x00\x0a\x00\x0b\x00\x0c\x00\x0d\x00\x0e\x00\x0f\x00\x10\x00\x11\x00\x12\x00\x13\x00\x3b\x00\x05\x00\x06\x00\xb8\x00\x14\x00\x35\x00\xb9\x00\x99\x00\x7c\x00\x7d\x00\xba\x00\xbb\x00\x04\x00\x05\x00\x06\x00\xa2\x00\x91\x00\xc7\x00\x9b\x00\x9c\x00\xbd\x00\x92\x00\x99\x00\x08\x00\x93\x00\x09\x00\x0a\x00\x0b\x00\x0c\x00\x0d\x00\x0e\x00\x0f\x00\x10\x00\x11\x00\x12\x00\x13\x00\x3b\x00\x05\x00\x06\x00\xa0\x00\x14\x00\x56\x00\x0e\x00\x0f\x00\x10\x00\x11\x00\x12\x00\x13\x00\x28\x00\x23\x00\x24\x00\x25\x00\x3c\x00\xa1\x00\x29\x00\x84\x00\x04\x00\x05\x00\x06\x00\x08\x00\x3d\x00\x09\x00\x0a\x00\x0b\x00\x0c\x00\x0d\x00\x0e\x00\x0f\x00\x10\x00\x11\x00\x12\x00\x13\x00\xcf\x00\x44\x00\x45\x00\x46\x00\x14\x00\xa3\x00\x04\x00\x08\x00\x04\x00\x09\x00\x0a\x00\x0b\x00\x0c\x00\x0d\x00\x0e\x00\x0f\x00\x10\x00\x11\x00\x12\x00\x13\x00\x04\x00\x05\x00\x06\x00\xa6\x00\x14\x00\xac\x00\x86\x00\x99\x00\x7c\x00\x7d\x00\x88\x00\x04\x00\x7b\x00\x7c\x00\x7d\x00\x89\x00\xbd\x00\xc0\x00\x9b\x00\x9c\x00\x04\x00\x05\x00\x06\x00\x08\x00\xbb\x00\x09\x00\x0a\x00\x0b\x00\x0c\x00\x0d\x00\x0e\x00\x0f\x00\x10\x00\x11\x00\x12\x00\x13\x00\xbf\x00\x8a\x00\x8b\x00\x8c\x00\x14\x00\x8d\x00\x8f\x00\x08\x00\x8e\x00\x09\x00\x0a\x00\x0b\x00\x0c\x00\x0d\x00\x0e\x00\x0f\x00\x10\x00\x11\x00\x12\x00\x13\x00\x04\x00\x05\x00\x06\x00\x90\x00\x14\x00\x95\x00\x64\x00\x99\x00\x7c\x00\x7d\x00\x04\x00\x3f\x00\x7b\x00\x7c\x00\x7d\x00\x66\x00\xc2\x00\xac\x00\x9b\x00\x9c\x00\x04\x00\x05\x00\x06\x00\x08\x00\x7e\x00\x09\x00\x0a\x00\x0b\x00\x0c\x00\x0d\x00\x0e\x00\x0f\x00\x10\x00\x11\x00\x12\x00\x13\x00\xb3\x00\x65\x00\x67\x00\x69\x00\x14\x00\x68\x00\x04\x00\x08\x00\x6b\x00\x09\x00\x0a\x00\x0b\x00\x0c\x00\x0d\x00\x0e\x00\x0f\x00\x10\x00\x11\x00\x12\x00\x13\x00\x04\x00\x05\x00\x06\x00\xc9\x00\x14\x00\x27\x00\x04\x00\x28\x00\x41\x00\x42\x00\x43\x00\xca\x00\xcb\x00\x29\x00\x2a\x00\x78\x00\xb5\x00\x7a\x00\x04\x00\x2e\x00\x04\x00\x05\x00\x06\x00\x08\x00\xff\xff\x09\x00\x0a\x00\x0b\x00\x0c\x00\x0d\x00\x0e\x00\x0f\x00\x10\x00\x11\x00\x12\x00\x13\x00\xb6\x00\x2f\x00\x30\x00\x31\x00\x14\x00\x33\x00\x4d\x00\x08\x00\x3f\x00\x09\x00\x0a\x00\x0b\x00\x0c\x00\x0d\x00\x0e\x00\x0f\x00\x10\x00\x11\x00\x12\x00\x13\x00\x04\x00\x05\x00\x06\x00\x4e\x00\x14\x00\x47\x00\x48\x00\x49\x00\x4a\x00\x4b\x00\x4c\x00\x04\x00\x27\x00\xff\xff\x00\x00\x00\x00\xa3\x00\x00\x00\x00\x00\x00\x00\x04\x00\x05\x00\x06\x00\x08\x00\x00\x00\x09\x00\x0a\x00\x0b\x00\x0c\x00\x0d\x00\x0e\x00\x0f\x00\x10\x00\x11\x00\x12\x00\x13\x00\xa6\x00\x00\x00\x00\x00\x00\x00\x14\x00\x00\x00\x00\x00\x08\x00\x00\x00\x09\x00\x0a\x00\x0b\x00\x0c\x00\x0d\x00\x0e\x00\x0f\x00\x10\x00\x11\x00\x12\x00\x13\x00\x04\x00\x05\x00\x06\x00\x00\x00\x14\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\xa8\x00\x00\x00\x00\x00\x00\x00\x04\x00\x05\x00\x06\x00\x08\x00\x00\x00\x09\x00\x0a\x00\x0b\x00\x0c\x00\x0d\x00\x0e\x00\x0f\x00\x10\x00\x11\x00\x12\x00\x13\x00\xaa\x00\x00\x00\x00\x00\x00\x00\x14\x00\x00\x00\x00\x00\x08\x00\x00\x00\x09\x00\x0a\x00\x0b\x00\x0c\x00\x0d\x00\x0e\x00\x0f\x00\x10\x00\x11\x00\x12\x00\x13\x00\x04\x00\x05\x00\x06\x00\x00\x00\x14\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\xad\x00\x00\x00\x00\x00\x00\x00\x04\x00\x05\x00\x06\x00\x08\x00\x00\x00\x09\x00\x0a\x00\x0b\x00\x0c\x00\x0d\x00\x0e\x00\x0f\x00\x10\x00\x11\x00\x12\x00\x13\x00\x7a\x00\x00\x00\x00\x00\x00\x00\x14\x00\x00\x00\x00\x00\x08\x00\x00\x00\x09\x00\x0a\x00\x0b\x00\x0c\x00\x0d\x00\x0e\x00\x0f\x00\x10\x00\x11\x00\x12\x00\x13\x00\x04\x00\x05\x00\x06\x00\x00\x00\x14\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x90\x00\x00\x00\x00\x00\x00\x00\x04\x00\x05\x00\x06\x00\x08\x00\x00\x00\x09\x00\x0a\x00\x0b\x00\x0c\x00\x0d\x00\x0e\x00\x0f\x00\x10\x00\x11\x00\x12\x00\x13\x00\x96\x00\x00\x00\x00\x00\x00\x00\x14\x00\x00\x00\x00\x00\x08\x00\x00\x00\x09\x00\x0a\x00\x0b\x00\x0c\x00\x0d\x00\x0e\x00\x0f\x00\x10\x00\x11\x00\x12\x00\x13\x00\x04\x00\x05\x00\x06\x00\x00\x00\x14\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x97\x00\x00\x00\x00\x00\x00\x00\x04\x00\x05\x00\x06\x00\x08\x00\x00\x00\x09\x00\x0a\x00\x0b\x00\x0c\x00\x0d\x00\x0e\x00\x0f\x00\x10\x00\x11\x00\x12\x00\x13\x00\x53\x00\x00\x00\x00\x00\x00\x00\x14\x00\x00\x00\x00\x00\x08\x00\x00\x00\x09\x00\x0a\x00\x0b\x00\x0c\x00\x0d\x00\x0e\x00\x0f\x00\x10\x00\x11\x00\x12\x00\x13\x00\x04\x00\x05\x00\x06\x00\x00\x00\x14\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x3c\x00\x00\x00\x00\x00\x00\x00\x04\x00\x05\x00\x06\x00\x08\x00\x00\x00\x09\x00\x0a\x00\x0b\x00\x0c\x00\x0d\x00\x0e\x00\x0f\x00\x10\x00\x11\x00\x12\x00\x13\x00\x31\x00\x00\x00\x00\x00\x00\x00\x14\x00\x00\x00\x00\x00\x08\x00\x00\x00\x09\x00\x0a\x00\x0b\x00\x0c\x00\x0d\x00\x0e\x00\x0f\x00\x10\x00\x11\x00\x12\x00\x13\x00\x04\x00\x05\x00\x06\x00\x00\x00\x14\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x33\x00\x00\x00\x00\x00\x00\x00\x04\x00\x05\x00\x06\x00\x08\x00\x00\x00\x09\x00\x0a\x00\x0b\x00\x0c\x00\x0d\x00\x0e\x00\x0f\x00\x10\x00\x11\x00\x12\x00\x13\x00\x07\x00\x04\x00\x05\x00\x06\x00\x14\x00\x00\x00\x00\x00\x08\x00\x00\x00\x09\x00\x0a\x00\x0b\x00\x0c\x00\x0d\x00\x0e\x00\x0f\x00\x10\x00\x11\x00\x12\x00\x13\x00\x04\x00\x05\x00\x06\x00\x00\x00\x14\x00\x00\x00\x00\x00\x51\x00\x0b\x00\x0c\x00\x0d\x00\x0e\x00\x0f\x00\x10\x00\x11\x00\x12\x00\x13\x00\x04\x00\x05\x00\x06\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x52\x00\x0b\x00\x0c\x00\x0d\x00\x0e\x00\x0f\x00\x10\x00\x11\x00\x12\x00\x13\x00\x04\x00\x05\x00\x06\x00\x00\x00\x00\x00\x00\x00\x00\x00\x54\x00\x0b\x00\x0c\x00\x0d\x00\x0e\x00\x0f\x00\x10\x00\x11\x00\x12\x00\x13\x00\x04\x00\x05\x00\x06\x00\x00\x00\x00\x00\x00\x00\x00\x00\x04\x00\x05\x00\x06\x00\x55\x00\x0c\x00\x0d\x00\x0e\x00\x0f\x00\x10\x00\x11\x00\x12\x00\x13\x00\x04\x00\x05\x00\x06\x00\x00\x00\x00\x00\x00\x00\x00\x00\x04\x00\x05\x00\x06\x00\x57\x00\x0e\x00\x0f\x00\x10\x00\x11\x00\x12\x00\x13\x00\x58\x00\x0e\x00\x0f\x00\x10\x00\x11\x00\x12\x00\x13\x00\x04\x00\x05\x00\x06\x00\x00\x00\x00\x00\x59\x00\x0e\x00\x0f\x00\x10\x00\x11\x00\x12\x00\x13\x00\x5a\x00\x0e\x00\x0f\x00\x10\x00\x11\x00\x12\x00\x13\x00\x04\x00\x05\x00\x06\x00\x00\x00\x00\x00\x04\x00\x05\x00\x06\x00\x00\x00\x00\x00\x5b\x00\x0e\x00\x0f\x00\x10\x00\x11\x00\x12\x00\x13\x00\x04\x00\x05\x00\x06\x00\x00\x00\x04\x00\x05\x00\x06\x00\x00\x00\x04\x00\x05\x00\x06\x00\x00\x00\x5e\x00\x0e\x00\x0f\x00\x10\x00\x11\x00\x12\x00\x13\x00\x5c\x00\x10\x00\x11\x00\x12\x00\x13\x00\x04\x00\x05\x00\x06\x00\x00\x00\x04\x00\x05\x00\x06\x00\x5d\x00\x10\x00\x11\x00\x12\x00\x13\x00\x5f\x00\x11\x00\x12\x00\x13\x00\x60\x00\x11\x00\x12\x00\x13\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x61\x00\x11\x00\x12\x00\x13\x00\x36\x00\x11\x00\x12\x00\x13\x00\x99\x00\x7c\x00\x7d\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x9a\x00\x9b\x00\x9c\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x9d\x00\x9e\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\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\x82\x00\x3d\x00\x83\x00\x6d\x00\x84\x00\x3a\x00\x88\x00\x7d\x00\x7e\x00\x7f\x00\x7d\x00\x7e\x00\x7f\x00\x6d\x00\x7d\x00\x7e\x00\x7f\x00\x6b\x00\x70\x00\xb1\x00\x80\x00\x6e\x00\xa6\x00\xbd\x00\x17\x00\xc0\x00\x3d\x00\x80\x00\x85\x00\x18\x00\x3b\x00\x6e\x00\x6f\x00\xc3\xff\xb2\x00\xca\x00\x70\x00\x26\x00\x76\x00\x86\x00\x04\x00\x19\x00\xc3\xff\x04\x00\x23\x00\x24\x00\x1a\x00\x17\x00\x1b\x00\x64\x00\x1c\x00\x1d\x00\x18\x00\x77\x00\x1e\x00\x78\x00\x1f\x00\x71\x00\xa9\x00\x20\x00\x7a\x00\x21\x00\x22\x00\x04\x00\x19\x00\x04\x00\x23\x00\x24\x00\x25\x00\x1a\x00\x3a\x00\x1b\x00\x73\x00\x1c\x00\x1d\x00\x71\x00\x72\x00\x1e\x00\x3a\x00\x1f\x00\x73\x00\x29\x00\x20\x00\xcf\x00\x21\x00\x22\x00\xd0\x00\x19\x00\x04\x00\x23\x00\x24\x00\x25\x00\x1a\x00\xd1\x00\x1b\x00\x04\x00\x1c\x00\x83\x00\x2a\x00\x84\x00\x1a\x00\xc7\x00\x1b\x00\xc6\x00\x1c\x00\x2b\x00\x86\x00\x21\x00\x22\x00\x74\x00\xab\x00\x04\x00\x23\x00\x24\x00\x25\x00\x21\x00\x22\x00\x74\x00\x75\x00\x04\x00\x23\x00\x24\x00\x25\x00\x85\x00\x04\x00\x05\x00\x06\x00\x07\x00\x04\x00\x05\x00\x06\x00\x07\x00\xc8\x00\xcb\x00\x86\x00\xc9\x00\x2e\x00\x2f\x00\x04\x00\x23\x00\x24\x00\x36\x00\xcc\x00\xd2\x00\x04\x00\x05\x00\x06\x00\x07\x00\x09\x00\x04\x00\x0a\x00\x0b\x00\x0c\x00\x0d\x00\x0e\x00\x0f\x00\x10\x00\x11\x00\x12\x00\x13\x00\x14\x00\x36\x00\xb1\x00\x41\x00\x14\x00\x15\x00\x97\x00\x04\x00\x09\x00\xb5\x00\x0a\x00\x0b\x00\x0c\x00\x0d\x00\x0e\x00\x0f\x00\x10\x00\x11\x00\x12\x00\x13\x00\x14\x00\x3d\x00\x05\x00\x06\x00\x07\x00\x15\x00\x37\x00\xb7\x00\x9b\x00\x7e\x00\x7f\x00\xba\x00\xbb\x00\x04\x00\x05\x00\x06\x00\x07\x00\x9b\x00\x93\x00\xc9\x00\x9d\x00\x9e\x00\xbc\x00\x94\x00\xbd\x00\x09\x00\x95\x00\x0a\x00\x0b\x00\x0c\x00\x0d\x00\x0e\x00\x0f\x00\x10\x00\x11\x00\x12\x00\x13\x00\x14\x00\x3d\x00\x05\x00\x06\x00\x07\x00\x15\x00\x58\x00\x0f\x00\x10\x00\x11\x00\x12\x00\x13\x00\x14\x00\x51\x00\xbf\x00\xa3\x00\x52\x00\x53\x00\x3e\x00\xa2\x00\xa4\x00\x04\x00\x05\x00\x06\x00\x07\x00\x09\x00\x3f\x00\x0a\x00\x0b\x00\x0c\x00\x0d\x00\x0e\x00\x0f\x00\x10\x00\x11\x00\x12\x00\x13\x00\x14\x00\xd1\x00\x25\x00\x26\x00\x27\x00\x15\x00\xa5\x00\x04\x00\x09\x00\x04\x00\x0a\x00\x0b\x00\x0c\x00\x0d\x00\x0e\x00\x0f\x00\x10\x00\x11\x00\x12\x00\x13\x00\x14\x00\x04\x00\x05\x00\x06\x00\x07\x00\x15\x00\xcb\x00\x43\x00\x44\x00\x45\x00\xa8\x00\xae\x00\x2a\x00\x88\x00\x04\x00\xcc\x00\xcd\x00\x8a\x00\xbf\x00\x2b\x00\x2c\x00\x04\x00\x05\x00\x06\x00\x07\x00\x09\x00\x8b\x00\x0a\x00\x0b\x00\x0c\x00\x0d\x00\x0e\x00\x0f\x00\x10\x00\x11\x00\x12\x00\x13\x00\x14\x00\xc1\x00\x46\x00\x47\x00\x48\x00\x15\x00\x8c\x00\x8d\x00\x09\x00\x8e\x00\x0a\x00\x0b\x00\x0c\x00\x0d\x00\x0e\x00\x0f\x00\x10\x00\x11\x00\x12\x00\x13\x00\x14\x00\x04\x00\x05\x00\x06\x00\x07\x00\x15\x00\x49\x00\x4a\x00\x4b\x00\x4c\x00\x4d\x00\x4e\x00\x8f\x00\x90\x00\x91\x00\x97\x00\x92\x00\x41\x00\xc4\x00\x04\x00\x66\x00\x04\x00\x05\x00\x06\x00\x07\x00\x09\x00\x68\x00\x0a\x00\x0b\x00\x0c\x00\x0d\x00\x0e\x00\x0f\x00\x10\x00\x11\x00\x12\x00\x13\x00\x14\x00\xb5\x00\x67\x00\x69\x00\x6b\x00\x15\x00\x6a\x00\x04\x00\x09\x00\x6d\x00\x0a\x00\x0b\x00\x0c\x00\x0d\x00\x0e\x00\x0f\x00\x10\x00\x11\x00\x12\x00\x13\x00\x14\x00\x04\x00\x05\x00\x06\x00\x07\x00\x15\x00\x29\x00\x7a\x00\x04\x00\x7c\x00\x04\x00\x30\x00\x31\x00\x41\x00\x32\x00\x33\x00\xff\xff\x35\x00\xb7\x00\x4f\x00\xff\xff\x04\x00\x05\x00\x06\x00\x07\x00\x09\x00\x50\x00\x0a\x00\x0b\x00\x0c\x00\x0d\x00\x0e\x00\x0f\x00\x10\x00\x11\x00\x12\x00\x13\x00\x14\x00\xb8\x00\x04\x00\x29\x00\x00\x00\x15\x00\x00\x00\x00\x00\x09\x00\x00\x00\x0a\x00\x0b\x00\x0c\x00\x0d\x00\x0e\x00\x0f\x00\x10\x00\x11\x00\x12\x00\x13\x00\x14\x00\x04\x00\x05\x00\x06\x00\x07\x00\x15\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\xa5\x00\x00\x00\x00\x00\x04\x00\x05\x00\x06\x00\x07\x00\x09\x00\x00\x00\x0a\x00\x0b\x00\x0c\x00\x0d\x00\x0e\x00\x0f\x00\x10\x00\x11\x00\x12\x00\x13\x00\x14\x00\xa8\x00\x00\x00\x00\x00\x00\x00\x15\x00\x00\x00\x00\x00\x09\x00\x00\x00\x0a\x00\x0b\x00\x0c\x00\x0d\x00\x0e\x00\x0f\x00\x10\x00\x11\x00\x12\x00\x13\x00\x14\x00\x04\x00\x05\x00\x06\x00\x07\x00\x15\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\xaa\x00\x00\x00\x00\x00\x04\x00\x05\x00\x06\x00\x07\x00\x09\x00\x00\x00\x0a\x00\x0b\x00\x0c\x00\x0d\x00\x0e\x00\x0f\x00\x10\x00\x11\x00\x12\x00\x13\x00\x14\x00\xac\x00\x00\x00\x00\x00\x00\x00\x15\x00\x00\x00\x00\x00\x09\x00\x00\x00\x0a\x00\x0b\x00\x0c\x00\x0d\x00\x0e\x00\x0f\x00\x10\x00\x11\x00\x12\x00\x13\x00\x14\x00\x04\x00\x05\x00\x06\x00\x07\x00\x15\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\xaf\x00\x00\x00\x00\x00\x04\x00\x05\x00\x06\x00\x07\x00\x09\x00\x00\x00\x0a\x00\x0b\x00\x0c\x00\x0d\x00\x0e\x00\x0f\x00\x10\x00\x11\x00\x12\x00\x13\x00\x14\x00\x7c\x00\x00\x00\x00\x00\x00\x00\x15\x00\x00\x00\x00\x00\x09\x00\x00\x00\x0a\x00\x0b\x00\x0c\x00\x0d\x00\x0e\x00\x0f\x00\x10\x00\x11\x00\x12\x00\x13\x00\x14\x00\x04\x00\x05\x00\x06\x00\x07\x00\x15\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x92\x00\x00\x00\x00\x00\x04\x00\x05\x00\x06\x00\x07\x00\x09\x00\x00\x00\x0a\x00\x0b\x00\x0c\x00\x0d\x00\x0e\x00\x0f\x00\x10\x00\x11\x00\x12\x00\x13\x00\x14\x00\x98\x00\x00\x00\x00\x00\x00\x00\x15\x00\x00\x00\x00\x00\x09\x00\x00\x00\x0a\x00\x0b\x00\x0c\x00\x0d\x00\x0e\x00\x0f\x00\x10\x00\x11\x00\x12\x00\x13\x00\x14\x00\x04\x00\x05\x00\x06\x00\x07\x00\x15\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x99\x00\x00\x00\x00\x00\x04\x00\x05\x00\x06\x00\x07\x00\x09\x00\x00\x00\x0a\x00\x0b\x00\x0c\x00\x0d\x00\x0e\x00\x0f\x00\x10\x00\x11\x00\x12\x00\x13\x00\x14\x00\x55\x00\x00\x00\x00\x00\x00\x00\x15\x00\x00\x00\x00\x00\x09\x00\x00\x00\x0a\x00\x0b\x00\x0c\x00\x0d\x00\x0e\x00\x0f\x00\x10\x00\x11\x00\x12\x00\x13\x00\x14\x00\x04\x00\x05\x00\x06\x00\x07\x00\x15\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x3e\x00\x00\x00\x00\x00\x04\x00\x05\x00\x06\x00\x07\x00\x09\x00\x00\x00\x0a\x00\x0b\x00\x0c\x00\x0d\x00\x0e\x00\x0f\x00\x10\x00\x11\x00\x12\x00\x13\x00\x14\x00\x33\x00\x00\x00\x00\x00\x00\x00\x15\x00\x00\x00\x00\x00\x09\x00\x00\x00\x0a\x00\x0b\x00\x0c\x00\x0d\x00\x0e\x00\x0f\x00\x10\x00\x11\x00\x12\x00\x13\x00\x14\x00\x04\x00\x05\x00\x06\x00\x07\x00\x15\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x35\x00\x00\x00\x00\x00\x04\x00\x05\x00\x06\x00\x07\x00\x09\x00\x00\x00\x0a\x00\x0b\x00\x0c\x00\x0d\x00\x0e\x00\x0f\x00\x10\x00\x11\x00\x12\x00\x13\x00\x14\x00\x08\x00\x00\x00\x00\x00\x00\x00\x15\x00\x00\x00\x00\x00\x09\x00\x00\x00\x0a\x00\x0b\x00\x0c\x00\x0d\x00\x0e\x00\x0f\x00\x10\x00\x11\x00\x12\x00\x13\x00\x14\x00\x04\x00\x05\x00\x06\x00\x07\x00\x15\x00\x9b\x00\x7e\x00\x7f\x00\x00\x00\x00\x00\x04\x00\x05\x00\x06\x00\x07\x00\x00\x00\x00\x00\x9c\x00\x9d\x00\x9e\x00\x00\x00\x04\x00\x05\x00\x06\x00\x07\x00\x00\x00\x9f\x00\xc3\x00\x53\x00\x0c\x00\x0d\x00\x0e\x00\x0f\x00\x10\x00\x11\x00\x12\x00\x13\x00\x14\x00\x54\x00\x0c\x00\x0d\x00\x0e\x00\x0f\x00\x10\x00\x11\x00\x12\x00\x13\x00\x14\x00\x56\x00\x0c\x00\x0d\x00\x0e\x00\x0f\x00\x10\x00\x11\x00\x12\x00\x13\x00\x14\x00\x04\x00\x05\x00\x06\x00\x07\x00\xb1\x00\x00\x00\x00\x00\x04\x00\x05\x00\x06\x00\x07\x00\x00\x00\x00\x00\x00\x00\x04\x00\x05\x00\x06\x00\x07\x00\x00\x00\xb2\x00\xb3\x00\x04\x00\x05\x00\x06\x00\x07\x00\x00\x00\x00\x00\x00\x00\x57\x00\x0d\x00\x0e\x00\x0f\x00\x10\x00\x11\x00\x12\x00\x13\x00\x14\x00\x59\x00\x0f\x00\x10\x00\x11\x00\x12\x00\x13\x00\x14\x00\x5a\x00\x0f\x00\x10\x00\x11\x00\x12\x00\x13\x00\x14\x00\x5b\x00\x0f\x00\x10\x00\x11\x00\x12\x00\x13\x00\x14\x00\x04\x00\x05\x00\x06\x00\x07\x00\x00\x00\x00\x00\x00\x00\x04\x00\x05\x00\x06\x00\x07\x00\x00\x00\x00\x00\x00\x00\x04\x00\x05\x00\x06\x00\x07\x00\x00\x00\x04\x00\x05\x00\x06\x00\x07\x00\x00\x00\x04\x00\x05\x00\x06\x00\x07\x00\x00\x00\x00\x00\x5c\x00\x0f\x00\x10\x00\x11\x00\x12\x00\x13\x00\x14\x00\x5d\x00\x0f\x00\x10\x00\x11\x00\x12\x00\x13\x00\x14\x00\x60\x00\x0f\x00\x10\x00\x11\x00\x12\x00\x13\x00\x14\x00\x5e\x00\x11\x00\x12\x00\x13\x00\x14\x00\x5f\x00\x11\x00\x12\x00\x13\x00\x14\x00\x04\x00\x05\x00\x06\x00\x07\x00\x04\x00\x05\x00\x06\x00\x07\x00\x04\x00\x05\x00\x06\x00\x07\x00\x04\x00\x05\x00\x06\x00\x07\x00\x9b\x00\x7e\x00\x7f\x00\x9b\x00\x7e\x00\x7f\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\xc2\x00\x9d\x00\x9e\x00\xae\x00\x9d\x00\x9e\x00\x61\x00\x12\x00\x13\x00\x14\x00\x62\x00\x12\x00\x13\x00\x14\x00\x63\x00\x12\x00\x13\x00\x14\x00\x38\x00\x12\x00\x13\x00\x14\x00\x9b\x00\x7e\x00\x7f\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x9c\x00\x9d\x00\x9e\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x9f\x00\xa0\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\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 (2, 110) [ +happyReduceArr = array (2, 112) [ (2 , happyReduce_2), (3 , happyReduce_3), (4 , happyReduce_4), @@ -396,11 +402,13 @@ happyReduceArr = array (2, 110) [ (107 , happyReduce_107), (108 , happyReduce_108), (109 , happyReduce_109), - (110 , happyReduce_110) + (110 , happyReduce_110), + (111 , happyReduce_111), + (112 , happyReduce_112) ] -happy_n_terms = 53 :: Int -happy_n_nonterms = 42 :: Int +happy_n_terms = 54 :: Int +happy_n_nonterms = 43 :: Int happyReduce_2 = happySpecReduce_1 0# happyReduction_2 happyReduction_2 happy_x_1 @@ -423,47 +431,54 @@ happyReduction_4 happy_x_1 ((read happy_var_1) :: Integer )} -happyReduce_5 = happySpecReduce_2 3# happyReduction_5 -happyReduction_5 happy_x_2 - happy_x_1 - = case happyOut10 happy_x_1 of { happy_var_1 -> - case happyOut12 happy_x_2 of { happy_var_2 -> +happyReduce_5 = happySpecReduce_1 3# happyReduction_5 +happyReduction_5 happy_x_1 + = case happyOutTok happy_x_1 of { (PT _ (TD happy_var_1)) -> happyIn8 - (Module happy_var_1 happy_var_2 - )}} + ((read happy_var_1) :: Double + )} happyReduce_6 = happySpecReduce_2 4# happyReduction_6 happyReduction_6 happy_x_2 happy_x_1 - = case happyOut5 happy_x_2 of { happy_var_2 -> + = case happyOut11 happy_x_1 of { happy_var_1 -> + case happyOut13 happy_x_2 of { happy_var_2 -> happyIn9 + (Module happy_var_1 happy_var_2 + )}} + +happyReduce_7 = happySpecReduce_2 5# happyReduction_7 +happyReduction_7 happy_x_2 + happy_x_1 + = case happyOut5 happy_x_2 of { happy_var_2 -> + happyIn10 (Import happy_var_2 )} -happyReduce_7 = happySpecReduce_0 5# happyReduction_7 -happyReduction_7 = happyIn10 +happyReduce_8 = happySpecReduce_0 6# happyReduction_8 +happyReduction_8 = happyIn11 ([] ) -happyReduce_8 = happySpecReduce_1 5# happyReduction_8 -happyReduction_8 happy_x_1 - = case happyOut9 happy_x_1 of { happy_var_1 -> - happyIn10 +happyReduce_9 = happySpecReduce_1 6# happyReduction_9 +happyReduction_9 happy_x_1 + = case happyOut10 happy_x_1 of { happy_var_1 -> + happyIn11 ((:[]) happy_var_1 )} -happyReduce_9 = happySpecReduce_3 5# happyReduction_9 -happyReduction_9 happy_x_3 +happyReduce_10 = happySpecReduce_3 6# happyReduction_10 +happyReduction_10 happy_x_3 happy_x_2 happy_x_1 - = case happyOut9 happy_x_1 of { happy_var_1 -> - case happyOut10 happy_x_3 of { happy_var_3 -> - happyIn10 + = case happyOut10 happy_x_1 of { happy_var_1 -> + case happyOut11 happy_x_3 of { happy_var_3 -> + happyIn11 ((:) happy_var_1 happy_var_3 )}} -happyReduce_10 = happyReduce 8# 6# happyReduction_10 -happyReduction_10 (happy_x_8 `HappyStk` +happyReduce_11 = happyReduce 8# 7# happyReduction_11 +happyReduction_11 (happy_x_8 `HappyStk` happy_x_7 `HappyStk` happy_x_6 `HappyStk` happy_x_5 `HappyStk` @@ -473,410 +488,410 @@ happyReduction_10 (happy_x_8 `HappyStk` happy_x_1 `HappyStk` happyRest) = case happyOut5 happy_x_2 of { happy_var_2 -> - case happyOut21 happy_x_4 of { happy_var_4 -> - case happyOut14 happy_x_7 of { happy_var_7 -> - happyIn11 + case happyOut22 happy_x_4 of { happy_var_4 -> + case happyOut15 happy_x_7 of { happy_var_7 -> + happyIn12 (DataDecl happy_var_2 happy_var_4 happy_var_7 ) `HappyStk` happyRest}}} -happyReduce_11 = happySpecReduce_3 6# happyReduction_11 -happyReduction_11 happy_x_3 +happyReduce_12 = happySpecReduce_3 7# happyReduction_12 +happyReduction_12 happy_x_3 happy_x_2 happy_x_1 = case happyOut5 happy_x_1 of { happy_var_1 -> - case happyOut21 happy_x_3 of { happy_var_3 -> - happyIn11 + case happyOut22 happy_x_3 of { happy_var_3 -> + happyIn12 (TypeDecl happy_var_1 happy_var_3 )}} -happyReduce_12 = happyReduce 4# 6# happyReduction_12 -happyReduction_12 (happy_x_4 `HappyStk` +happyReduce_13 = happyReduce 4# 7# happyReduction_13 +happyReduction_13 (happy_x_4 `HappyStk` happy_x_3 `HappyStk` happy_x_2 `HappyStk` happy_x_1 `HappyStk` happyRest) = case happyOut5 happy_x_1 of { happy_var_1 -> - case happyOut18 happy_x_2 of { happy_var_2 -> - case happyOut21 happy_x_4 of { happy_var_4 -> - happyIn11 + case happyOut19 happy_x_2 of { happy_var_2 -> + case happyOut22 happy_x_4 of { happy_var_4 -> + happyIn12 (ValueDecl happy_var_1 (reverse happy_var_2) happy_var_4 ) `HappyStk` happyRest}}} -happyReduce_13 = happySpecReduce_3 6# happyReduction_13 -happyReduction_13 happy_x_3 +happyReduce_14 = happySpecReduce_3 7# happyReduction_14 +happyReduction_14 happy_x_3 happy_x_2 happy_x_1 = case happyOut5 happy_x_2 of { happy_var_2 -> case happyOut5 happy_x_3 of { happy_var_3 -> - happyIn11 + happyIn12 (DeriveDecl happy_var_2 happy_var_3 )}} -happyReduce_14 = happySpecReduce_0 7# happyReduction_14 -happyReduction_14 = happyIn12 +happyReduce_15 = happySpecReduce_0 8# happyReduction_15 +happyReduction_15 = happyIn13 ([] ) -happyReduce_15 = happySpecReduce_1 7# happyReduction_15 -happyReduction_15 happy_x_1 - = case happyOut11 happy_x_1 of { happy_var_1 -> - happyIn12 +happyReduce_16 = happySpecReduce_1 8# happyReduction_16 +happyReduction_16 happy_x_1 + = case happyOut12 happy_x_1 of { happy_var_1 -> + happyIn13 ((:[]) happy_var_1 )} -happyReduce_16 = happySpecReduce_3 7# happyReduction_16 -happyReduction_16 happy_x_3 +happyReduce_17 = happySpecReduce_3 8# happyReduction_17 +happyReduction_17 happy_x_3 happy_x_2 happy_x_1 - = case happyOut11 happy_x_1 of { happy_var_1 -> - case happyOut12 happy_x_3 of { happy_var_3 -> - happyIn12 + = case happyOut12 happy_x_1 of { happy_var_1 -> + case happyOut13 happy_x_3 of { happy_var_3 -> + happyIn13 ((:) happy_var_1 happy_var_3 )}} -happyReduce_17 = happySpecReduce_3 8# happyReduction_17 -happyReduction_17 happy_x_3 +happyReduce_18 = happySpecReduce_3 9# happyReduction_18 +happyReduction_18 happy_x_3 happy_x_2 happy_x_1 = case happyOut5 happy_x_1 of { happy_var_1 -> - case happyOut21 happy_x_3 of { happy_var_3 -> - happyIn13 + case happyOut22 happy_x_3 of { happy_var_3 -> + happyIn14 (ConsDecl happy_var_1 happy_var_3 )}} -happyReduce_18 = happySpecReduce_0 9# happyReduction_18 -happyReduction_18 = happyIn14 +happyReduce_19 = happySpecReduce_0 10# happyReduction_19 +happyReduction_19 = happyIn15 ([] ) -happyReduce_19 = happySpecReduce_1 9# happyReduction_19 -happyReduction_19 happy_x_1 - = case happyOut13 happy_x_1 of { happy_var_1 -> - happyIn14 +happyReduce_20 = happySpecReduce_1 10# happyReduction_20 +happyReduction_20 happy_x_1 + = case happyOut14 happy_x_1 of { happy_var_1 -> + happyIn15 ((:[]) happy_var_1 )} -happyReduce_20 = happySpecReduce_3 9# happyReduction_20 -happyReduction_20 happy_x_3 +happyReduce_21 = happySpecReduce_3 10# happyReduction_21 +happyReduction_21 happy_x_3 happy_x_2 happy_x_1 - = case happyOut13 happy_x_1 of { happy_var_1 -> - case happyOut14 happy_x_3 of { happy_var_3 -> - happyIn14 + = case happyOut14 happy_x_1 of { happy_var_1 -> + case happyOut15 happy_x_3 of { happy_var_3 -> + happyIn15 ((:) happy_var_1 happy_var_3 )}} -happyReduce_21 = happySpecReduce_3 10# happyReduction_21 -happyReduction_21 happy_x_3 +happyReduce_22 = happySpecReduce_3 11# happyReduction_22 +happyReduction_22 happy_x_3 happy_x_2 happy_x_1 - = case happyOut16 happy_x_1 of { happy_var_1 -> - case happyOut15 happy_x_3 of { happy_var_3 -> - happyIn15 + = case happyOut17 happy_x_1 of { happy_var_1 -> + case happyOut16 happy_x_3 of { happy_var_3 -> + happyIn16 (POr happy_var_1 happy_var_3 )}} -happyReduce_22 = happySpecReduce_1 10# happyReduction_22 -happyReduction_22 happy_x_1 - = case happyOut16 happy_x_1 of { happy_var_1 -> - happyIn15 +happyReduce_23 = happySpecReduce_1 11# happyReduction_23 +happyReduction_23 happy_x_1 + = case happyOut17 happy_x_1 of { happy_var_1 -> + happyIn16 (happy_var_1 )} -happyReduce_23 = happySpecReduce_3 11# happyReduction_23 -happyReduction_23 happy_x_3 +happyReduce_24 = happySpecReduce_3 12# happyReduction_24 +happyReduction_24 happy_x_3 happy_x_2 happy_x_1 = case happyOut5 happy_x_1 of { happy_var_1 -> - case happyOut17 happy_x_2 of { happy_var_2 -> - case happyOut18 happy_x_3 of { happy_var_3 -> - happyIn16 + case happyOut18 happy_x_2 of { happy_var_2 -> + case happyOut19 happy_x_3 of { happy_var_3 -> + happyIn17 (PConsTop happy_var_1 happy_var_2 (reverse happy_var_3) )}}} -happyReduce_24 = happySpecReduce_1 11# happyReduction_24 -happyReduction_24 happy_x_1 - = case happyOut17 happy_x_1 of { happy_var_1 -> - happyIn16 +happyReduce_25 = happySpecReduce_1 12# happyReduction_25 +happyReduction_25 happy_x_1 + = case happyOut18 happy_x_1 of { happy_var_1 -> + happyIn17 (happy_var_1 )} -happyReduce_25 = happyReduce 4# 12# happyReduction_25 -happyReduction_25 (happy_x_4 `HappyStk` +happyReduce_26 = happyReduce 4# 13# happyReduction_26 +happyReduction_26 (happy_x_4 `HappyStk` happy_x_3 `HappyStk` happy_x_2 `HappyStk` happy_x_1 `HappyStk` happyRest) - = case happyOut20 happy_x_3 of { happy_var_3 -> - happyIn17 + = case happyOut21 happy_x_3 of { happy_var_3 -> + happyIn18 (PRec happy_var_3 ) `HappyStk` happyRest} -happyReduce_26 = happySpecReduce_1 12# happyReduction_26 -happyReduction_26 happy_x_1 - = happyIn17 +happyReduce_27 = happySpecReduce_1 13# happyReduction_27 +happyReduction_27 happy_x_1 + = happyIn18 (PType ) -happyReduce_27 = happySpecReduce_1 12# happyReduction_27 -happyReduction_27 happy_x_1 +happyReduce_28 = happySpecReduce_1 13# happyReduction_28 +happyReduction_28 happy_x_1 = case happyOut6 happy_x_1 of { happy_var_1 -> - happyIn17 + happyIn18 (PStr happy_var_1 )} -happyReduce_28 = happySpecReduce_1 12# happyReduction_28 -happyReduction_28 happy_x_1 +happyReduce_29 = happySpecReduce_1 13# happyReduction_29 +happyReduction_29 happy_x_1 = case happyOut7 happy_x_1 of { happy_var_1 -> - happyIn17 + happyIn18 (PInt happy_var_1 )} -happyReduce_29 = happySpecReduce_1 12# happyReduction_29 -happyReduction_29 happy_x_1 +happyReduce_30 = happySpecReduce_1 13# happyReduction_30 +happyReduction_30 happy_x_1 = case happyOut5 happy_x_1 of { happy_var_1 -> - happyIn17 + happyIn18 (PVar happy_var_1 )} -happyReduce_30 = happySpecReduce_1 12# happyReduction_30 -happyReduction_30 happy_x_1 - = happyIn17 +happyReduce_31 = happySpecReduce_1 13# happyReduction_31 +happyReduction_31 happy_x_1 + = happyIn18 (PWild ) -happyReduce_31 = happySpecReduce_3 12# happyReduction_31 -happyReduction_31 happy_x_3 +happyReduce_32 = happySpecReduce_3 13# happyReduction_32 +happyReduction_32 happy_x_3 happy_x_2 happy_x_1 - = case happyOut15 happy_x_2 of { happy_var_2 -> - happyIn17 + = case happyOut16 happy_x_2 of { happy_var_2 -> + happyIn18 (happy_var_2 )} -happyReduce_32 = happySpecReduce_0 13# happyReduction_32 -happyReduction_32 = happyIn18 +happyReduce_33 = happySpecReduce_0 14# happyReduction_33 +happyReduction_33 = happyIn19 ([] ) -happyReduce_33 = happySpecReduce_2 13# happyReduction_33 -happyReduction_33 happy_x_2 +happyReduce_34 = happySpecReduce_2 14# happyReduction_34 +happyReduction_34 happy_x_2 happy_x_1 - = case happyOut18 happy_x_1 of { happy_var_1 -> - case happyOut17 happy_x_2 of { happy_var_2 -> - happyIn18 + = case happyOut19 happy_x_1 of { happy_var_1 -> + case happyOut18 happy_x_2 of { happy_var_2 -> + happyIn19 (flip (:) happy_var_1 happy_var_2 )}} -happyReduce_34 = happySpecReduce_3 14# happyReduction_34 -happyReduction_34 happy_x_3 +happyReduce_35 = happySpecReduce_3 15# happyReduction_35 +happyReduction_35 happy_x_3 happy_x_2 happy_x_1 = case happyOut5 happy_x_1 of { happy_var_1 -> - case happyOut15 happy_x_3 of { happy_var_3 -> - happyIn19 + case happyOut16 happy_x_3 of { happy_var_3 -> + happyIn20 (FieldPattern happy_var_1 happy_var_3 )}} -happyReduce_35 = happySpecReduce_0 15# happyReduction_35 -happyReduction_35 = happyIn20 +happyReduce_36 = happySpecReduce_0 16# happyReduction_36 +happyReduction_36 = happyIn21 ([] ) -happyReduce_36 = happySpecReduce_1 15# happyReduction_36 -happyReduction_36 happy_x_1 - = case happyOut19 happy_x_1 of { happy_var_1 -> - happyIn20 +happyReduce_37 = happySpecReduce_1 16# happyReduction_37 +happyReduction_37 happy_x_1 + = case happyOut20 happy_x_1 of { happy_var_1 -> + happyIn21 ((:[]) happy_var_1 )} -happyReduce_37 = happySpecReduce_3 15# happyReduction_37 -happyReduction_37 happy_x_3 +happyReduce_38 = happySpecReduce_3 16# happyReduction_38 +happyReduction_38 happy_x_3 happy_x_2 happy_x_1 - = case happyOut19 happy_x_1 of { happy_var_1 -> - case happyOut20 happy_x_3 of { happy_var_3 -> - happyIn20 + = case happyOut20 happy_x_1 of { happy_var_1 -> + case happyOut21 happy_x_3 of { happy_var_3 -> + happyIn21 ((:) happy_var_1 happy_var_3 )}} -happyReduce_38 = happyReduce 6# 16# happyReduction_38 -happyReduction_38 (happy_x_6 `HappyStk` +happyReduce_39 = happyReduce 6# 17# happyReduction_39 +happyReduction_39 (happy_x_6 `HappyStk` happy_x_5 `HappyStk` happy_x_4 `HappyStk` happy_x_3 `HappyStk` happy_x_2 `HappyStk` happy_x_1 `HappyStk` happyRest) - = case happyOut23 happy_x_3 of { happy_var_3 -> - case happyOut21 happy_x_6 of { happy_var_6 -> - happyIn21 + = case happyOut24 happy_x_3 of { happy_var_3 -> + case happyOut22 happy_x_6 of { happy_var_6 -> + happyIn22 (ELet happy_var_3 happy_var_6 ) `HappyStk` happyRest}} -happyReduce_39 = happyReduce 6# 16# happyReduction_39 -happyReduction_39 (happy_x_6 `HappyStk` +happyReduce_40 = happyReduce 6# 17# happyReduction_40 +happyReduction_40 (happy_x_6 `HappyStk` happy_x_5 `HappyStk` happy_x_4 `HappyStk` happy_x_3 `HappyStk` happy_x_2 `HappyStk` happy_x_1 `HappyStk` happyRest) - = case happyOut21 happy_x_2 of { happy_var_2 -> - case happyOut25 happy_x_5 of { happy_var_5 -> - happyIn21 + = case happyOut22 happy_x_2 of { happy_var_2 -> + case happyOut26 happy_x_5 of { happy_var_5 -> + happyIn22 (ECase happy_var_2 happy_var_5 ) `HappyStk` happyRest}} -happyReduce_40 = happyReduce 6# 16# happyReduction_40 -happyReduction_40 (happy_x_6 `HappyStk` +happyReduce_41 = happyReduce 6# 17# happyReduction_41 +happyReduction_41 (happy_x_6 `HappyStk` happy_x_5 `HappyStk` happy_x_4 `HappyStk` happy_x_3 `HappyStk` happy_x_2 `HappyStk` happy_x_1 `HappyStk` happyRest) - = case happyOut21 happy_x_2 of { happy_var_2 -> - case happyOut21 happy_x_4 of { happy_var_4 -> - case happyOut21 happy_x_6 of { happy_var_6 -> - happyIn21 + = case happyOut22 happy_x_2 of { happy_var_2 -> + case happyOut22 happy_x_4 of { happy_var_4 -> + case happyOut22 happy_x_6 of { happy_var_6 -> + happyIn22 (EIf happy_var_2 happy_var_4 happy_var_6 ) `HappyStk` happyRest}}} -happyReduce_41 = happyReduce 5# 16# happyReduction_41 -happyReduction_41 (happy_x_5 `HappyStk` +happyReduce_42 = happyReduce 5# 17# happyReduction_42 +happyReduction_42 (happy_x_5 `HappyStk` happy_x_4 `HappyStk` happy_x_3 `HappyStk` happy_x_2 `HappyStk` happy_x_1 `HappyStk` happyRest) - = case happyOut27 happy_x_3 of { happy_var_3 -> - case happyOut21 happy_x_4 of { happy_var_4 -> - happyIn21 + = case happyOut28 happy_x_3 of { happy_var_3 -> + case happyOut22 happy_x_4 of { happy_var_4 -> + happyIn22 (EDo (reverse happy_var_3) happy_var_4 ) `HappyStk` happyRest}} -happyReduce_42 = happySpecReduce_1 16# happyReduction_42 -happyReduction_42 happy_x_1 - = case happyOut45 happy_x_1 of { happy_var_1 -> - happyIn21 +happyReduce_43 = happySpecReduce_1 17# happyReduction_43 +happyReduction_43 happy_x_1 + = case happyOut46 happy_x_1 of { happy_var_1 -> + happyIn22 (happy_var_1 )} -happyReduce_43 = happyReduce 5# 17# happyReduction_43 -happyReduction_43 (happy_x_5 `HappyStk` +happyReduce_44 = happyReduce 5# 18# happyReduction_44 +happyReduction_44 (happy_x_5 `HappyStk` happy_x_4 `HappyStk` happy_x_3 `HappyStk` happy_x_2 `HappyStk` happy_x_1 `HappyStk` happyRest) = case happyOut5 happy_x_1 of { happy_var_1 -> - case happyOut21 happy_x_3 of { happy_var_3 -> - case happyOut21 happy_x_5 of { happy_var_5 -> - happyIn22 + case happyOut22 happy_x_3 of { happy_var_3 -> + case happyOut22 happy_x_5 of { happy_var_5 -> + happyIn23 (LetDef happy_var_1 happy_var_3 happy_var_5 ) `HappyStk` happyRest}}} -happyReduce_44 = happySpecReduce_0 18# happyReduction_44 -happyReduction_44 = happyIn23 +happyReduce_45 = happySpecReduce_0 19# happyReduction_45 +happyReduction_45 = happyIn24 ([] ) -happyReduce_45 = happySpecReduce_1 18# happyReduction_45 -happyReduction_45 happy_x_1 - = case happyOut22 happy_x_1 of { happy_var_1 -> - happyIn23 +happyReduce_46 = happySpecReduce_1 19# happyReduction_46 +happyReduction_46 happy_x_1 + = case happyOut23 happy_x_1 of { happy_var_1 -> + happyIn24 ((:[]) happy_var_1 )} -happyReduce_46 = happySpecReduce_3 18# happyReduction_46 -happyReduction_46 happy_x_3 +happyReduce_47 = happySpecReduce_3 19# happyReduction_47 +happyReduction_47 happy_x_3 happy_x_2 happy_x_1 - = case happyOut22 happy_x_1 of { happy_var_1 -> - case happyOut23 happy_x_3 of { happy_var_3 -> - happyIn23 + = case happyOut23 happy_x_1 of { happy_var_1 -> + case happyOut24 happy_x_3 of { happy_var_3 -> + happyIn24 ((:) happy_var_1 happy_var_3 )}} -happyReduce_47 = happySpecReduce_3 19# happyReduction_47 -happyReduction_47 happy_x_3 +happyReduce_48 = happySpecReduce_3 20# happyReduction_48 +happyReduction_48 happy_x_3 happy_x_2 happy_x_1 - = case happyOut15 happy_x_1 of { happy_var_1 -> - case happyOut21 happy_x_3 of { happy_var_3 -> - happyIn24 + = case happyOut16 happy_x_1 of { happy_var_1 -> + case happyOut22 happy_x_3 of { happy_var_3 -> + happyIn25 (Case happy_var_1 happy_var_3 )}} -happyReduce_48 = happySpecReduce_0 20# happyReduction_48 -happyReduction_48 = happyIn25 +happyReduce_49 = happySpecReduce_0 21# happyReduction_49 +happyReduction_49 = happyIn26 ([] ) -happyReduce_49 = happySpecReduce_1 20# happyReduction_49 -happyReduction_49 happy_x_1 - = case happyOut24 happy_x_1 of { happy_var_1 -> - happyIn25 +happyReduce_50 = happySpecReduce_1 21# happyReduction_50 +happyReduction_50 happy_x_1 + = case happyOut25 happy_x_1 of { happy_var_1 -> + happyIn26 ((:[]) happy_var_1 )} -happyReduce_50 = happySpecReduce_3 20# happyReduction_50 -happyReduction_50 happy_x_3 +happyReduce_51 = happySpecReduce_3 21# happyReduction_51 +happyReduction_51 happy_x_3 happy_x_2 happy_x_1 - = case happyOut24 happy_x_1 of { happy_var_1 -> - case happyOut25 happy_x_3 of { happy_var_3 -> - happyIn25 + = case happyOut25 happy_x_1 of { happy_var_1 -> + case happyOut26 happy_x_3 of { happy_var_3 -> + happyIn26 ((:) happy_var_1 happy_var_3 )}} -happyReduce_51 = happySpecReduce_3 21# happyReduction_51 -happyReduction_51 happy_x_3 +happyReduce_52 = happySpecReduce_3 22# happyReduction_52 +happyReduction_52 happy_x_3 happy_x_2 happy_x_1 - = case happyOut29 happy_x_1 of { happy_var_1 -> - case happyOut21 happy_x_3 of { happy_var_3 -> - happyIn26 + = case happyOut30 happy_x_1 of { happy_var_1 -> + case happyOut22 happy_x_3 of { happy_var_3 -> + happyIn27 (BindVar happy_var_1 happy_var_3 )}} -happyReduce_52 = happySpecReduce_1 21# happyReduction_52 -happyReduction_52 happy_x_1 - = case happyOut21 happy_x_1 of { happy_var_1 -> - happyIn26 +happyReduce_53 = happySpecReduce_1 22# happyReduction_53 +happyReduction_53 happy_x_1 + = case happyOut22 happy_x_1 of { happy_var_1 -> + happyIn27 (BindNoVar happy_var_1 )} -happyReduce_53 = happySpecReduce_0 22# happyReduction_53 -happyReduction_53 = happyIn27 +happyReduce_54 = happySpecReduce_0 23# happyReduction_54 +happyReduction_54 = happyIn28 ([] ) -happyReduce_54 = happySpecReduce_3 22# happyReduction_54 -happyReduction_54 happy_x_3 +happyReduce_55 = happySpecReduce_3 23# happyReduction_55 +happyReduction_55 happy_x_3 happy_x_2 happy_x_1 - = case happyOut27 happy_x_1 of { happy_var_1 -> - case happyOut26 happy_x_2 of { happy_var_2 -> - happyIn27 + = case happyOut28 happy_x_1 of { happy_var_1 -> + case happyOut27 happy_x_2 of { happy_var_2 -> + happyIn28 (flip (:) happy_var_1 happy_var_2 )}} -happyReduce_55 = happyReduce 4# 23# happyReduction_55 -happyReduction_55 (happy_x_4 `HappyStk` +happyReduce_56 = happyReduce 4# 24# happyReduction_56 +happyReduction_56 (happy_x_4 `HappyStk` happy_x_3 `HappyStk` happy_x_2 `HappyStk` happy_x_1 `HappyStk` happyRest) - = case happyOut29 happy_x_2 of { happy_var_2 -> - case happyOut21 happy_x_4 of { happy_var_4 -> - happyIn28 + = case happyOut30 happy_x_2 of { happy_var_2 -> + case happyOut22 happy_x_4 of { happy_var_4 -> + happyIn29 (EAbs happy_var_2 happy_var_4 ) `HappyStk` happyRest}} -happyReduce_56 = happyReduce 7# 23# happyReduction_56 -happyReduction_56 (happy_x_7 `HappyStk` +happyReduce_57 = happyReduce 7# 24# happyReduction_57 +happyReduction_57 (happy_x_7 `HappyStk` happy_x_6 `HappyStk` happy_x_5 `HappyStk` happy_x_4 `HappyStk` @@ -884,468 +899,475 @@ happyReduction_56 (happy_x_7 `HappyStk` happy_x_2 `HappyStk` happy_x_1 `HappyStk` happyRest) - = case happyOut29 happy_x_2 of { happy_var_2 -> - case happyOut21 happy_x_4 of { happy_var_4 -> - case happyOut21 happy_x_7 of { happy_var_7 -> - happyIn28 + = case happyOut30 happy_x_2 of { happy_var_2 -> + case happyOut22 happy_x_4 of { happy_var_4 -> + case happyOut22 happy_x_7 of { happy_var_7 -> + happyIn29 (EPi happy_var_2 happy_var_4 happy_var_7 ) `HappyStk` happyRest}}} -happyReduce_57 = happySpecReduce_3 23# happyReduction_57 -happyReduction_57 happy_x_3 +happyReduce_58 = happySpecReduce_3 24# happyReduction_58 +happyReduction_58 happy_x_3 happy_x_2 happy_x_1 - = case happyOut30 happy_x_1 of { happy_var_1 -> - case happyOut21 happy_x_3 of { happy_var_3 -> - happyIn28 + = case happyOut31 happy_x_1 of { happy_var_1 -> + case happyOut22 happy_x_3 of { happy_var_3 -> + happyIn29 (EPiNoVar happy_var_1 happy_var_3 )}} -happyReduce_58 = happySpecReduce_1 23# happyReduction_58 -happyReduction_58 happy_x_1 - = case happyOut30 happy_x_1 of { happy_var_1 -> - happyIn28 +happyReduce_59 = happySpecReduce_1 24# happyReduction_59 +happyReduction_59 happy_x_1 + = case happyOut31 happy_x_1 of { happy_var_1 -> + happyIn29 (happy_var_1 )} -happyReduce_59 = happySpecReduce_1 24# happyReduction_59 -happyReduction_59 happy_x_1 +happyReduce_60 = happySpecReduce_1 25# happyReduction_60 +happyReduction_60 happy_x_1 = case happyOut5 happy_x_1 of { happy_var_1 -> - happyIn29 + happyIn30 (VVar happy_var_1 )} -happyReduce_60 = happySpecReduce_1 24# happyReduction_60 -happyReduction_60 happy_x_1 - = happyIn29 +happyReduce_61 = happySpecReduce_1 25# happyReduction_61 +happyReduction_61 happy_x_1 + = happyIn30 (VWild ) -happyReduce_61 = happySpecReduce_3 25# happyReduction_61 -happyReduction_61 happy_x_3 +happyReduce_62 = happySpecReduce_3 26# happyReduction_62 +happyReduction_62 happy_x_3 happy_x_2 happy_x_1 - = case happyOut30 happy_x_1 of { happy_var_1 -> - case happyOut31 happy_x_3 of { happy_var_3 -> - happyIn30 + = case happyOut31 happy_x_1 of { happy_var_1 -> + case happyOut32 happy_x_3 of { happy_var_3 -> + happyIn31 (EBind happy_var_1 happy_var_3 )}} -happyReduce_62 = happySpecReduce_3 25# happyReduction_62 -happyReduction_62 happy_x_3 +happyReduce_63 = happySpecReduce_3 26# happyReduction_63 +happyReduction_63 happy_x_3 happy_x_2 happy_x_1 - = case happyOut30 happy_x_1 of { happy_var_1 -> - case happyOut31 happy_x_3 of { happy_var_3 -> - happyIn30 - (EBindC happy_var_1 happy_var_3 - )}} - -happyReduce_63 = happySpecReduce_1 25# happyReduction_63 -happyReduction_63 happy_x_1 = case happyOut31 happy_x_1 of { happy_var_1 -> - happyIn30 - (happy_var_1 - )} - -happyReduce_64 = happySpecReduce_3 26# happyReduction_64 -happyReduction_64 happy_x_3 - happy_x_2 - happy_x_1 - = case happyOut32 happy_x_1 of { happy_var_1 -> - case happyOut31 happy_x_3 of { happy_var_3 -> + case happyOut32 happy_x_3 of { happy_var_3 -> happyIn31 - (EOr happy_var_1 happy_var_3 + (EBindC happy_var_1 happy_var_3 )}} -happyReduce_65 = happySpecReduce_1 26# happyReduction_65 -happyReduction_65 happy_x_1 +happyReduce_64 = happySpecReduce_1 26# happyReduction_64 +happyReduction_64 happy_x_1 = case happyOut32 happy_x_1 of { happy_var_1 -> happyIn31 (happy_var_1 )} -happyReduce_66 = happySpecReduce_3 27# happyReduction_66 -happyReduction_66 happy_x_3 +happyReduce_65 = happySpecReduce_3 27# happyReduction_65 +happyReduction_65 happy_x_3 happy_x_2 happy_x_1 = case happyOut33 happy_x_1 of { happy_var_1 -> case happyOut32 happy_x_3 of { happy_var_3 -> happyIn32 - (EAnd happy_var_1 happy_var_3 + (EOr happy_var_1 happy_var_3 )}} -happyReduce_67 = happySpecReduce_1 27# happyReduction_67 -happyReduction_67 happy_x_1 +happyReduce_66 = happySpecReduce_1 27# happyReduction_66 +happyReduction_66 happy_x_1 = case happyOut33 happy_x_1 of { happy_var_1 -> happyIn32 (happy_var_1 )} -happyReduce_68 = happySpecReduce_3 28# happyReduction_68 -happyReduction_68 happy_x_3 +happyReduce_67 = happySpecReduce_3 28# happyReduction_67 +happyReduction_67 happy_x_3 happy_x_2 happy_x_1 = case happyOut34 happy_x_1 of { happy_var_1 -> - case happyOut34 happy_x_3 of { happy_var_3 -> + case happyOut33 happy_x_3 of { happy_var_3 -> happyIn33 - (EEq happy_var_1 happy_var_3 + (EAnd happy_var_1 happy_var_3 )}} -happyReduce_69 = happySpecReduce_3 28# happyReduction_69 +happyReduce_68 = happySpecReduce_1 28# happyReduction_68 +happyReduction_68 happy_x_1 + = case happyOut34 happy_x_1 of { happy_var_1 -> + happyIn33 + (happy_var_1 + )} + +happyReduce_69 = happySpecReduce_3 29# happyReduction_69 happyReduction_69 happy_x_3 happy_x_2 happy_x_1 - = case happyOut34 happy_x_1 of { happy_var_1 -> - case happyOut34 happy_x_3 of { happy_var_3 -> - happyIn33 - (ENe happy_var_1 happy_var_3 + = case happyOut35 happy_x_1 of { happy_var_1 -> + case happyOut35 happy_x_3 of { happy_var_3 -> + happyIn34 + (EEq happy_var_1 happy_var_3 )}} -happyReduce_70 = happySpecReduce_3 28# happyReduction_70 +happyReduce_70 = happySpecReduce_3 29# happyReduction_70 happyReduction_70 happy_x_3 happy_x_2 happy_x_1 - = case happyOut34 happy_x_1 of { happy_var_1 -> - case happyOut34 happy_x_3 of { happy_var_3 -> - happyIn33 - (ELt happy_var_1 happy_var_3 + = case happyOut35 happy_x_1 of { happy_var_1 -> + case happyOut35 happy_x_3 of { happy_var_3 -> + happyIn34 + (ENe happy_var_1 happy_var_3 )}} -happyReduce_71 = happySpecReduce_3 28# happyReduction_71 +happyReduce_71 = happySpecReduce_3 29# happyReduction_71 happyReduction_71 happy_x_3 happy_x_2 happy_x_1 - = case happyOut34 happy_x_1 of { happy_var_1 -> - case happyOut34 happy_x_3 of { happy_var_3 -> - happyIn33 - (ELe happy_var_1 happy_var_3 + = case happyOut35 happy_x_1 of { happy_var_1 -> + case happyOut35 happy_x_3 of { happy_var_3 -> + happyIn34 + (ELt happy_var_1 happy_var_3 )}} -happyReduce_72 = happySpecReduce_3 28# happyReduction_72 +happyReduce_72 = happySpecReduce_3 29# happyReduction_72 happyReduction_72 happy_x_3 happy_x_2 happy_x_1 - = case happyOut34 happy_x_1 of { happy_var_1 -> - case happyOut34 happy_x_3 of { happy_var_3 -> - happyIn33 - (EGt happy_var_1 happy_var_3 + = case happyOut35 happy_x_1 of { happy_var_1 -> + case happyOut35 happy_x_3 of { happy_var_3 -> + happyIn34 + (ELe happy_var_1 happy_var_3 )}} -happyReduce_73 = happySpecReduce_3 28# happyReduction_73 +happyReduce_73 = happySpecReduce_3 29# happyReduction_73 happyReduction_73 happy_x_3 happy_x_2 happy_x_1 - = case happyOut34 happy_x_1 of { happy_var_1 -> - case happyOut34 happy_x_3 of { happy_var_3 -> - happyIn33 - (EGe happy_var_1 happy_var_3 + = case happyOut35 happy_x_1 of { happy_var_1 -> + case happyOut35 happy_x_3 of { happy_var_3 -> + happyIn34 + (EGt happy_var_1 happy_var_3 )}} -happyReduce_74 = happySpecReduce_1 28# happyReduction_74 -happyReduction_74 happy_x_1 - = case happyOut34 happy_x_1 of { happy_var_1 -> - happyIn33 - (happy_var_1 - )} - -happyReduce_75 = happySpecReduce_3 29# happyReduction_75 -happyReduction_75 happy_x_3 +happyReduce_74 = happySpecReduce_3 29# happyReduction_74 +happyReduction_74 happy_x_3 happy_x_2 happy_x_1 = case happyOut35 happy_x_1 of { happy_var_1 -> - case happyOut34 happy_x_3 of { happy_var_3 -> + case happyOut35 happy_x_3 of { happy_var_3 -> happyIn34 - (EListCons happy_var_1 happy_var_3 + (EGe happy_var_1 happy_var_3 )}} -happyReduce_76 = happySpecReduce_1 29# happyReduction_76 -happyReduction_76 happy_x_1 +happyReduce_75 = happySpecReduce_1 29# happyReduction_75 +happyReduction_75 happy_x_1 = case happyOut35 happy_x_1 of { happy_var_1 -> happyIn34 (happy_var_1 )} -happyReduce_77 = happySpecReduce_3 30# happyReduction_77 -happyReduction_77 happy_x_3 +happyReduce_76 = happySpecReduce_3 30# happyReduction_76 +happyReduction_76 happy_x_3 happy_x_2 happy_x_1 - = case happyOut35 happy_x_1 of { happy_var_1 -> - case happyOut36 happy_x_3 of { happy_var_3 -> - happyIn35 - (EAdd happy_var_1 happy_var_3 - )}} - -happyReduce_78 = happySpecReduce_3 30# happyReduction_78 -happyReduction_78 happy_x_3 - happy_x_2 - happy_x_1 - = case happyOut35 happy_x_1 of { happy_var_1 -> - case happyOut36 happy_x_3 of { happy_var_3 -> + = case happyOut36 happy_x_1 of { happy_var_1 -> + case happyOut35 happy_x_3 of { happy_var_3 -> happyIn35 - (ESub happy_var_1 happy_var_3 + (EListCons happy_var_1 happy_var_3 )}} -happyReduce_79 = happySpecReduce_1 30# happyReduction_79 -happyReduction_79 happy_x_1 +happyReduce_77 = happySpecReduce_1 30# happyReduction_77 +happyReduction_77 happy_x_1 = case happyOut36 happy_x_1 of { happy_var_1 -> happyIn35 (happy_var_1 )} -happyReduce_80 = happySpecReduce_3 31# happyReduction_80 -happyReduction_80 happy_x_3 +happyReduce_78 = happySpecReduce_3 31# happyReduction_78 +happyReduction_78 happy_x_3 happy_x_2 happy_x_1 = case happyOut36 happy_x_1 of { happy_var_1 -> case happyOut37 happy_x_3 of { happy_var_3 -> happyIn36 - (EMul happy_var_1 happy_var_3 + (EAdd happy_var_1 happy_var_3 )}} -happyReduce_81 = happySpecReduce_3 31# happyReduction_81 -happyReduction_81 happy_x_3 +happyReduce_79 = happySpecReduce_3 31# happyReduction_79 +happyReduction_79 happy_x_3 happy_x_2 happy_x_1 = case happyOut36 happy_x_1 of { happy_var_1 -> case happyOut37 happy_x_3 of { happy_var_3 -> happyIn36 - (EDiv happy_var_1 happy_var_3 + (ESub happy_var_1 happy_var_3 )}} -happyReduce_82 = happySpecReduce_3 31# happyReduction_82 -happyReduction_82 happy_x_3 +happyReduce_80 = happySpecReduce_1 31# happyReduction_80 +happyReduction_80 happy_x_1 + = case happyOut37 happy_x_1 of { happy_var_1 -> + happyIn36 + (happy_var_1 + )} + +happyReduce_81 = happySpecReduce_3 32# happyReduction_81 +happyReduction_81 happy_x_3 happy_x_2 happy_x_1 - = case happyOut36 happy_x_1 of { happy_var_1 -> - case happyOut37 happy_x_3 of { happy_var_3 -> - happyIn36 - (EMod happy_var_1 happy_var_3 + = case happyOut37 happy_x_1 of { happy_var_1 -> + case happyOut38 happy_x_3 of { happy_var_3 -> + happyIn37 + (EMul happy_var_1 happy_var_3 )}} -happyReduce_83 = happySpecReduce_1 31# happyReduction_83 -happyReduction_83 happy_x_1 +happyReduce_82 = happySpecReduce_3 32# happyReduction_82 +happyReduction_82 happy_x_3 + happy_x_2 + happy_x_1 = case happyOut37 happy_x_1 of { happy_var_1 -> - happyIn36 - (happy_var_1 - )} + case happyOut38 happy_x_3 of { happy_var_3 -> + happyIn37 + (EDiv happy_var_1 happy_var_3 + )}} -happyReduce_84 = happySpecReduce_2 32# happyReduction_84 -happyReduction_84 happy_x_2 +happyReduce_83 = happySpecReduce_3 32# happyReduction_83 +happyReduction_83 happy_x_3 + happy_x_2 happy_x_1 - = case happyOut37 happy_x_2 of { happy_var_2 -> + = case happyOut37 happy_x_1 of { happy_var_1 -> + case happyOut38 happy_x_3 of { happy_var_3 -> happyIn37 - (ENeg happy_var_2 - )} + (EMod happy_var_1 happy_var_3 + )}} -happyReduce_85 = happySpecReduce_1 32# happyReduction_85 -happyReduction_85 happy_x_1 +happyReduce_84 = happySpecReduce_1 32# happyReduction_84 +happyReduction_84 happy_x_1 = case happyOut38 happy_x_1 of { happy_var_1 -> happyIn37 (happy_var_1 )} -happyReduce_86 = happySpecReduce_2 33# happyReduction_86 -happyReduction_86 happy_x_2 +happyReduce_85 = happySpecReduce_2 33# happyReduction_85 +happyReduction_85 happy_x_2 happy_x_1 - = case happyOut38 happy_x_1 of { happy_var_1 -> - case happyOut39 happy_x_2 of { happy_var_2 -> + = case happyOut38 happy_x_2 of { happy_var_2 -> happyIn38 - (EApp happy_var_1 happy_var_2 - )}} + (ENeg happy_var_2 + )} -happyReduce_87 = happySpecReduce_1 33# happyReduction_87 -happyReduction_87 happy_x_1 +happyReduce_86 = happySpecReduce_1 33# happyReduction_86 +happyReduction_86 happy_x_1 = case happyOut39 happy_x_1 of { happy_var_1 -> happyIn38 (happy_var_1 )} -happyReduce_88 = happySpecReduce_3 34# happyReduction_88 -happyReduction_88 happy_x_3 - happy_x_2 +happyReduce_87 = happySpecReduce_2 34# happyReduction_87 +happyReduction_87 happy_x_2 happy_x_1 = case happyOut39 happy_x_1 of { happy_var_1 -> - case happyOut5 happy_x_3 of { happy_var_3 -> + case happyOut40 happy_x_2 of { happy_var_2 -> happyIn39 - (EProj happy_var_1 happy_var_3 + (EApp happy_var_1 happy_var_2 )}} -happyReduce_89 = happySpecReduce_1 34# happyReduction_89 -happyReduction_89 happy_x_1 +happyReduce_88 = happySpecReduce_1 34# happyReduction_88 +happyReduction_88 happy_x_1 = case happyOut40 happy_x_1 of { happy_var_1 -> happyIn39 (happy_var_1 )} -happyReduce_90 = happyReduce 4# 35# happyReduction_90 -happyReduction_90 (happy_x_4 `HappyStk` +happyReduce_89 = happySpecReduce_3 35# happyReduction_89 +happyReduction_89 happy_x_3 + happy_x_2 + happy_x_1 + = case happyOut40 happy_x_1 of { happy_var_1 -> + case happyOut5 happy_x_3 of { happy_var_3 -> + happyIn40 + (EProj happy_var_1 happy_var_3 + )}} + +happyReduce_90 = happySpecReduce_1 35# happyReduction_90 +happyReduction_90 happy_x_1 + = case happyOut41 happy_x_1 of { happy_var_1 -> + happyIn40 + (happy_var_1 + )} + +happyReduce_91 = happyReduce 4# 36# happyReduction_91 +happyReduction_91 (happy_x_4 `HappyStk` happy_x_3 `HappyStk` happy_x_2 `HappyStk` happy_x_1 `HappyStk` happyRest) - = case happyOut42 happy_x_3 of { happy_var_3 -> - happyIn40 + = case happyOut43 happy_x_3 of { happy_var_3 -> + happyIn41 (ERecType happy_var_3 ) `HappyStk` happyRest} -happyReduce_91 = happyReduce 4# 35# happyReduction_91 -happyReduction_91 (happy_x_4 `HappyStk` +happyReduce_92 = happyReduce 4# 36# happyReduction_92 +happyReduction_92 (happy_x_4 `HappyStk` happy_x_3 `HappyStk` happy_x_2 `HappyStk` happy_x_1 `HappyStk` happyRest) - = case happyOut44 happy_x_3 of { happy_var_3 -> - happyIn40 + = case happyOut45 happy_x_3 of { happy_var_3 -> + happyIn41 (ERec happy_var_3 ) `HappyStk` happyRest} -happyReduce_92 = happySpecReduce_3 35# happyReduction_92 -happyReduction_92 happy_x_3 +happyReduce_93 = happySpecReduce_3 36# happyReduction_93 +happyReduction_93 happy_x_3 happy_x_2 happy_x_1 - = case happyOut46 happy_x_2 of { happy_var_2 -> - happyIn40 + = case happyOut47 happy_x_2 of { happy_var_2 -> + happyIn41 (EList happy_var_2 )} -happyReduce_93 = happySpecReduce_1 35# happyReduction_93 -happyReduction_93 happy_x_1 +happyReduce_94 = happySpecReduce_1 36# happyReduction_94 +happyReduction_94 happy_x_1 = case happyOut5 happy_x_1 of { happy_var_1 -> - happyIn40 + happyIn41 (EVar happy_var_1 )} -happyReduce_94 = happySpecReduce_1 35# happyReduction_94 -happyReduction_94 happy_x_1 - = happyIn40 +happyReduce_95 = happySpecReduce_1 36# happyReduction_95 +happyReduction_95 happy_x_1 + = happyIn41 (EType ) -happyReduce_95 = happySpecReduce_1 35# happyReduction_95 -happyReduction_95 happy_x_1 +happyReduce_96 = happySpecReduce_1 36# happyReduction_96 +happyReduction_96 happy_x_1 = case happyOut6 happy_x_1 of { happy_var_1 -> - happyIn40 + happyIn41 (EStr happy_var_1 )} -happyReduce_96 = happySpecReduce_1 35# happyReduction_96 -happyReduction_96 happy_x_1 +happyReduce_97 = happySpecReduce_1 36# happyReduction_97 +happyReduction_97 happy_x_1 = case happyOut7 happy_x_1 of { happy_var_1 -> - happyIn40 - (EInt happy_var_1 + happyIn41 + (EInteger happy_var_1 )} -happyReduce_97 = happySpecReduce_1 35# happyReduction_97 -happyReduction_97 happy_x_1 - = happyIn40 +happyReduce_98 = happySpecReduce_1 36# happyReduction_98 +happyReduction_98 happy_x_1 + = case happyOut8 happy_x_1 of { happy_var_1 -> + happyIn41 + (EDouble happy_var_1 + )} + +happyReduce_99 = happySpecReduce_1 36# happyReduction_99 +happyReduction_99 happy_x_1 + = happyIn41 (EMeta ) -happyReduce_98 = happySpecReduce_3 35# happyReduction_98 -happyReduction_98 happy_x_3 +happyReduce_100 = happySpecReduce_3 36# happyReduction_100 +happyReduction_100 happy_x_3 happy_x_2 happy_x_1 - = case happyOut21 happy_x_2 of { happy_var_2 -> - happyIn40 + = case happyOut22 happy_x_2 of { happy_var_2 -> + happyIn41 (happy_var_2 )} -happyReduce_99 = happySpecReduce_3 36# happyReduction_99 -happyReduction_99 happy_x_3 +happyReduce_101 = happySpecReduce_3 37# happyReduction_101 +happyReduction_101 happy_x_3 happy_x_2 happy_x_1 = case happyOut5 happy_x_1 of { happy_var_1 -> - case happyOut21 happy_x_3 of { happy_var_3 -> - happyIn41 + case happyOut22 happy_x_3 of { happy_var_3 -> + happyIn42 (FieldType happy_var_1 happy_var_3 )}} -happyReduce_100 = happySpecReduce_0 37# happyReduction_100 -happyReduction_100 = happyIn42 +happyReduce_102 = happySpecReduce_0 38# happyReduction_102 +happyReduction_102 = happyIn43 ([] ) -happyReduce_101 = happySpecReduce_1 37# happyReduction_101 -happyReduction_101 happy_x_1 - = case happyOut41 happy_x_1 of { happy_var_1 -> - happyIn42 +happyReduce_103 = happySpecReduce_1 38# happyReduction_103 +happyReduction_103 happy_x_1 + = case happyOut42 happy_x_1 of { happy_var_1 -> + happyIn43 ((:[]) happy_var_1 )} -happyReduce_102 = happySpecReduce_3 37# happyReduction_102 -happyReduction_102 happy_x_3 +happyReduce_104 = happySpecReduce_3 38# happyReduction_104 +happyReduction_104 happy_x_3 happy_x_2 happy_x_1 - = case happyOut41 happy_x_1 of { happy_var_1 -> - case happyOut42 happy_x_3 of { happy_var_3 -> - happyIn42 + = case happyOut42 happy_x_1 of { happy_var_1 -> + case happyOut43 happy_x_3 of { happy_var_3 -> + happyIn43 ((:) happy_var_1 happy_var_3 )}} -happyReduce_103 = happySpecReduce_3 38# happyReduction_103 -happyReduction_103 happy_x_3 +happyReduce_105 = happySpecReduce_3 39# happyReduction_105 +happyReduction_105 happy_x_3 happy_x_2 happy_x_1 = case happyOut5 happy_x_1 of { happy_var_1 -> - case happyOut21 happy_x_3 of { happy_var_3 -> - happyIn43 + case happyOut22 happy_x_3 of { happy_var_3 -> + happyIn44 (FieldValue happy_var_1 happy_var_3 )}} -happyReduce_104 = happySpecReduce_0 39# happyReduction_104 -happyReduction_104 = happyIn44 +happyReduce_106 = happySpecReduce_0 40# happyReduction_106 +happyReduction_106 = happyIn45 ([] ) -happyReduce_105 = happySpecReduce_1 39# happyReduction_105 -happyReduction_105 happy_x_1 - = case happyOut43 happy_x_1 of { happy_var_1 -> - happyIn44 +happyReduce_107 = happySpecReduce_1 40# happyReduction_107 +happyReduction_107 happy_x_1 + = case happyOut44 happy_x_1 of { happy_var_1 -> + happyIn45 ((:[]) happy_var_1 )} -happyReduce_106 = happySpecReduce_3 39# happyReduction_106 -happyReduction_106 happy_x_3 +happyReduce_108 = happySpecReduce_3 40# happyReduction_108 +happyReduction_108 happy_x_3 happy_x_2 happy_x_1 - = case happyOut43 happy_x_1 of { happy_var_1 -> - case happyOut44 happy_x_3 of { happy_var_3 -> - happyIn44 + = case happyOut44 happy_x_1 of { happy_var_1 -> + case happyOut45 happy_x_3 of { happy_var_3 -> + happyIn45 ((:) happy_var_1 happy_var_3 )}} -happyReduce_107 = happySpecReduce_1 40# happyReduction_107 -happyReduction_107 happy_x_1 - = case happyOut28 happy_x_1 of { happy_var_1 -> - happyIn45 +happyReduce_109 = happySpecReduce_1 41# happyReduction_109 +happyReduction_109 happy_x_1 + = case happyOut29 happy_x_1 of { happy_var_1 -> + happyIn46 (happy_var_1 )} -happyReduce_108 = happySpecReduce_0 41# happyReduction_108 -happyReduction_108 = happyIn46 +happyReduce_110 = happySpecReduce_0 42# happyReduction_110 +happyReduction_110 = happyIn47 ([] ) -happyReduce_109 = happySpecReduce_1 41# happyReduction_109 -happyReduction_109 happy_x_1 - = case happyOut21 happy_x_1 of { happy_var_1 -> - happyIn46 +happyReduce_111 = happySpecReduce_1 42# happyReduction_111 +happyReduction_111 happy_x_1 + = case happyOut22 happy_x_1 of { happy_var_1 -> + happyIn47 ((:[]) happy_var_1 )} -happyReduce_110 = happySpecReduce_3 41# happyReduction_110 -happyReduction_110 happy_x_3 +happyReduce_112 = happySpecReduce_3 42# happyReduction_112 +happyReduction_112 happy_x_3 happy_x_2 happy_x_1 - = case happyOut21 happy_x_1 of { happy_var_1 -> - case happyOut46 happy_x_3 of { happy_var_3 -> - happyIn46 + = case happyOut22 happy_x_1 of { happy_var_1 -> + case happyOut47 happy_x_3 of { happy_var_3 -> + happyIn47 ((:) happy_var_1 happy_var_3 )}} happyNewToken action sts stk [] = - happyDoAction 52# (error "reading EOF!") action sts stk [] + happyDoAction 53# (error "reading EOF!") action sts stk [] happyNewToken action sts stk (tk:tks) = let cont i = happyDoAction i tk action sts stk tks in @@ -1400,7 +1422,8 @@ happyNewToken action sts stk (tk:tks) = PT _ (TV happy_dollar_dollar) -> cont 48#; PT _ (TL happy_dollar_dollar) -> cont 49#; PT _ (TI happy_dollar_dollar) -> cont 50#; - _ -> cont 51#; + PT _ (TD happy_dollar_dollar) -> cont 51#; + _ -> cont 52#; _ -> happyError' (tk:tks) } @@ -1417,10 +1440,10 @@ happyError' :: () => [Token] -> Err a happyError' = happyError pModule tks = happySomeParser where - happySomeParser = happyThen (happyParse 0# tks) (\x -> happyReturn (happyOut8 x)) + happySomeParser = happyThen (happyParse 0# tks) (\x -> happyReturn (happyOut9 x)) pExp tks = happySomeParser where - happySomeParser = happyThen (happyParse 1# tks) (\x -> happyReturn (happyOut21 x)) + happySomeParser = happyThen (happyParse 1# tks) (\x -> happyReturn (happyOut22 x)) happySeq = happyDontSeq diff --git a/src/Transfer/Syntax/Par.y b/src/Transfer/Syntax/Par.y index 3ed2c3141..48e9daa55 100644 --- a/src/Transfer/Syntax/Par.y +++ b/src/Transfer/Syntax/Par.y @@ -65,6 +65,7 @@ import Transfer.ErrM L_ident { PT _ (TV $$) } L_quoted { PT _ (TL $$) } L_integ { PT _ (TI $$) } +L_doubl { PT _ (TD $$) } L_err { _ } @@ -73,6 +74,7 @@ L_err { _ } Ident :: { Ident } : L_ident { Ident $1 } String :: { String } : L_quoted { $1 } Integer :: { Integer } : L_integ { (read $1) :: Integer } +Double :: { Double } : L_doubl { (read $1) :: Double } Module :: { Module } Module : ListImport ListDecl { Module $1 $2 } @@ -262,7 +264,8 @@ Exp13 : 'sig' '{' ListFieldType '}' { ERecType $3 } | Ident { EVar $1 } | 'Type' { EType } | String { EStr $1 } - | Integer { EInt $1 } + | Integer { EInteger $1 } + | Double { EDouble $1 } | '?' { EMeta } | '(' Exp ')' { $2 } diff --git a/src/Transfer/Syntax/Print.hs b/src/Transfer/Syntax/Print.hs index cd0975fa8..5e17c4491 100644 --- a/src/Transfer/Syntax/Print.hs +++ b/src/Transfer/Syntax/Print.hs @@ -129,7 +129,8 @@ instance Print (Tree c) where EVar i -> prPrec _i 13 (concatD [prt 0 i]) EType -> prPrec _i 13 (concatD [doc (showString "Type")]) EStr str -> prPrec _i 13 (concatD [prt 0 str]) - EInt n -> prPrec _i 13 (concatD [prt 0 n]) + EInteger n -> prPrec _i 13 (concatD [prt 0 n]) + EDouble d -> prPrec _i 13 (concatD [prt 0 d]) EMeta -> prPrec _i 13 (concatD [doc (showString "?")]) LetDef i exp0 exp1 -> prPrec _i 0 (concatD [prt 0 i , doc (showString ":") , prt 0 exp0 , doc (showString "=") , prt 0 exp1]) Case pattern exp -> prPrec _i 0 (concatD [prt 0 pattern , doc (showString "->") , prt 0 exp]) diff --git a/src/Transfer/Syntax/Skel.hs b/src/Transfer/Syntax/Skel.hs index d9e51e9f6..a28e4a46a 100644 --- a/src/Transfer/Syntax/Skel.hs +++ b/src/Transfer/Syntax/Skel.hs @@ -60,7 +60,8 @@ transTree t = case t of EVar i -> failure t EType -> failure t EStr str -> failure t - EInt n -> failure t + EInteger n -> failure t + EDouble d -> failure t EMeta -> failure t LetDef i exp0 exp1 -> failure t Case pattern exp -> failure t @@ -141,7 +142,8 @@ transExp t = case t of EVar i -> failure t EType -> failure t EStr str -> failure t - EInt n -> failure t + EInteger n -> failure t + EDouble d -> failure t EMeta -> failure t transLetDef :: LetDef -> Result diff --git a/src/Transfer/Syntax/Syntax.cf b/src/Transfer/Syntax/Syntax.cf index 3550786d5..71fdfc84a 100644 --- a/src/Transfer/Syntax/Syntax.cf +++ b/src/Transfer/Syntax/Syntax.cf @@ -115,7 +115,8 @@ EList. Exp13 ::= "[" [Exp] "]" ; EVar. Exp13 ::= Ident ; EType. Exp13 ::= "Type" ; EStr. Exp13 ::= String ; -EInt. Exp13 ::= Integer ; +EInteger. Exp13 ::= Integer ; +EDouble. Exp13 ::= Double ; EMeta. Exp13 ::= "?" ; coercions Exp 13 ; -- cgit v1.2.3