module GF.Grammar.Parser
( P, runP
, pModDef
, pModHeader
, pExp
, pTopDef
, pCFRules
, pEBNFRules
) where
import GF.Infra.Ident
import GF.Infra.Option
import GF.Data.Operations
import GF.Grammar.Predef
import GF.Grammar.Grammar
import GF.Grammar.CFG
import GF.Grammar.EBNF
import GF.Grammar.Macros
import GF.Grammar.Lexer
import GF.Compile.Update (buildAnyTree)
import Data.List(intersperse)
import Data.Char(isAlphaNum)
import PGF(mkCId)
import qualified Data.Array as Happy_Data_Array
import qualified GHC.Exts as Happy_GHC_Exts
import Control.Applicative(Applicative(..))
newtype HappyAbsSyn = HappyAbsSyn HappyAny
#if __GLASGOW_HASKELL__ >= 607
type HappyAny = Happy_GHC_Exts.Any
#else
type HappyAny = forall a . a
#endif
happyIn9 :: (SourceModule) -> (HappyAbsSyn )
happyIn9 x = Happy_GHC_Exts.unsafeCoerce# x
happyOut9 :: (HappyAbsSyn ) -> (SourceModule)
happyOut9 x = Happy_GHC_Exts.unsafeCoerce# x
happyIn10 :: (SourceModule) -> (HappyAbsSyn )
happyIn10 x = Happy_GHC_Exts.unsafeCoerce# x
happyOut10 :: (HappyAbsSyn ) -> (SourceModule)
happyOut10 x = Happy_GHC_Exts.unsafeCoerce# x
happyIn11 :: (ModuleStatus) -> (HappyAbsSyn )
happyIn11 x = Happy_GHC_Exts.unsafeCoerce# x
happyOut11 :: (HappyAbsSyn ) -> (ModuleStatus)
happyOut11 x = Happy_GHC_Exts.unsafeCoerce# x
happyIn12 :: ((ModuleType,ModuleName)) -> (HappyAbsSyn )
happyIn12 x = Happy_GHC_Exts.unsafeCoerce# x
happyOut12 :: (HappyAbsSyn ) -> ((ModuleType,ModuleName))
happyOut12 x = Happy_GHC_Exts.unsafeCoerce# x
happyIn13 :: (( [(ModuleName,MInclude)]
, Maybe (ModuleName,MInclude,[(ModuleName,ModuleName)])
, [OpenSpec]
)) -> (HappyAbsSyn )
happyIn13 x = Happy_GHC_Exts.unsafeCoerce# x
happyOut13 :: (HappyAbsSyn ) -> (( [(ModuleName,MInclude)]
, Maybe (ModuleName,MInclude,[(ModuleName,ModuleName)])
, [OpenSpec]
))
happyOut13 x = Happy_GHC_Exts.unsafeCoerce# x
happyIn14 :: ([OpenSpec]) -> (HappyAbsSyn )
happyIn14 x = Happy_GHC_Exts.unsafeCoerce# x
happyOut14 :: (HappyAbsSyn ) -> ([OpenSpec])
happyOut14 x = Happy_GHC_Exts.unsafeCoerce# x
happyIn15 :: (( [(ModuleName,MInclude)]
, Maybe (ModuleName,MInclude,[(ModuleName,ModuleName)])
, Maybe ([OpenSpec],[(Ident,Info)],Options)
)) -> (HappyAbsSyn )
happyIn15 x = Happy_GHC_Exts.unsafeCoerce# x
happyOut15 :: (HappyAbsSyn ) -> (( [(ModuleName,MInclude)]
, Maybe (ModuleName,MInclude,[(ModuleName,ModuleName)])
, Maybe ([OpenSpec],[(Ident,Info)],Options)
))
happyOut15 x = Happy_GHC_Exts.unsafeCoerce# x
happyIn16 :: (([OpenSpec],[(Ident,Info)],Options)) -> (HappyAbsSyn )
happyIn16 x = Happy_GHC_Exts.unsafeCoerce# x
happyOut16 :: (HappyAbsSyn ) -> (([OpenSpec],[(Ident,Info)],Options))
happyOut16 x = Happy_GHC_Exts.unsafeCoerce# x
happyIn17 :: ([Either [(Ident,Info)] Options]) -> (HappyAbsSyn )
happyIn17 x = Happy_GHC_Exts.unsafeCoerce# x
happyOut17 :: (HappyAbsSyn ) -> ([Either [(Ident,Info)] Options])
happyOut17 x = Happy_GHC_Exts.unsafeCoerce# x
happyIn18 :: ([OpenSpec]) -> (HappyAbsSyn )
happyIn18 x = Happy_GHC_Exts.unsafeCoerce# x
happyOut18 :: (HappyAbsSyn ) -> ([OpenSpec])
happyOut18 x = Happy_GHC_Exts.unsafeCoerce# x
happyIn19 :: (OpenSpec) -> (HappyAbsSyn )
happyIn19 x = Happy_GHC_Exts.unsafeCoerce# x
happyOut19 :: (HappyAbsSyn ) -> (OpenSpec)
happyOut19 x = Happy_GHC_Exts.unsafeCoerce# x
happyIn20 :: ([(ModuleName,ModuleName)]) -> (HappyAbsSyn )
happyIn20 x = Happy_GHC_Exts.unsafeCoerce# x
happyOut20 :: (HappyAbsSyn ) -> ([(ModuleName,ModuleName)])
happyOut20 x = Happy_GHC_Exts.unsafeCoerce# x
happyIn21 :: ((ModuleName,ModuleName)) -> (HappyAbsSyn )
happyIn21 x = Happy_GHC_Exts.unsafeCoerce# x
happyOut21 :: (HappyAbsSyn ) -> ((ModuleName,ModuleName))
happyOut21 x = Happy_GHC_Exts.unsafeCoerce# x
happyIn22 :: ([(ModuleName,MInclude)]) -> (HappyAbsSyn )
happyIn22 x = Happy_GHC_Exts.unsafeCoerce# x
happyOut22 :: (HappyAbsSyn ) -> ([(ModuleName,MInclude)])
happyOut22 x = Happy_GHC_Exts.unsafeCoerce# x
happyIn23 :: ((ModuleName,MInclude)) -> (HappyAbsSyn )
happyIn23 x = Happy_GHC_Exts.unsafeCoerce# x
happyOut23 :: (HappyAbsSyn ) -> ((ModuleName,MInclude))
happyOut23 x = Happy_GHC_Exts.unsafeCoerce# x
happyIn24 :: (Either [(Ident,Info)] Options) -> (HappyAbsSyn )
happyIn24 x = Happy_GHC_Exts.unsafeCoerce# x
happyOut24 :: (HappyAbsSyn ) -> (Either [(Ident,Info)] Options)
happyOut24 x = Happy_GHC_Exts.unsafeCoerce# x
happyIn25 :: ([(Ident,Info)]) -> (HappyAbsSyn )
happyIn25 x = Happy_GHC_Exts.unsafeCoerce# x
happyOut25 :: (HappyAbsSyn ) -> ([(Ident,Info)])
happyOut25 x = Happy_GHC_Exts.unsafeCoerce# x
happyIn26 :: ([(Ident,Info)]) -> (HappyAbsSyn )
happyIn26 x = Happy_GHC_Exts.unsafeCoerce# x
happyOut26 :: (HappyAbsSyn ) -> ([(Ident,Info)])
happyOut26 x = Happy_GHC_Exts.unsafeCoerce# x
happyIn27 :: ([(Ident,Info)]) -> (HappyAbsSyn )
happyIn27 x = Happy_GHC_Exts.unsafeCoerce# x
happyOut27 :: (HappyAbsSyn ) -> ([(Ident,Info)])
happyOut27 x = Happy_GHC_Exts.unsafeCoerce# x
happyIn28 :: ([(Ident,Info)]) -> (HappyAbsSyn )
happyIn28 x = Happy_GHC_Exts.unsafeCoerce# x
happyOut28 :: (HappyAbsSyn ) -> ([(Ident,Info)])
happyOut28 x = Happy_GHC_Exts.unsafeCoerce# x
happyIn29 :: ([(Ident,Info)]) -> (HappyAbsSyn )
happyIn29 x = Happy_GHC_Exts.unsafeCoerce# x
happyOut29 :: (HappyAbsSyn ) -> ([(Ident,Info)])
happyOut29 x = Happy_GHC_Exts.unsafeCoerce# x
happyIn30 :: ([(Ident,Info)]) -> (HappyAbsSyn )
happyIn30 x = Happy_GHC_Exts.unsafeCoerce# x
happyOut30 :: (HappyAbsSyn ) -> ([(Ident,Info)])
happyOut30 x = Happy_GHC_Exts.unsafeCoerce# x
happyIn31 :: ([(Ident,Info)]) -> (HappyAbsSyn )
happyIn31 x = Happy_GHC_Exts.unsafeCoerce# x
happyOut31 :: (HappyAbsSyn ) -> ([(Ident,Info)])
happyOut31 x = Happy_GHC_Exts.unsafeCoerce# x
happyIn32 :: ([(Ident,L Term)]) -> (HappyAbsSyn )
happyIn32 x = Happy_GHC_Exts.unsafeCoerce# x
happyOut32 :: (HappyAbsSyn ) -> ([(Ident,L Term)])
happyOut32 x = Happy_GHC_Exts.unsafeCoerce# x
happyIn33 :: (Options) -> (HappyAbsSyn )
happyIn33 x = Happy_GHC_Exts.unsafeCoerce# x
happyOut33 :: (HappyAbsSyn ) -> (Options)
happyOut33 x = Happy_GHC_Exts.unsafeCoerce# x
happyIn34 :: ([Ident]) -> (HappyAbsSyn )
happyIn34 x = Happy_GHC_Exts.unsafeCoerce# x
happyOut34 :: (HappyAbsSyn ) -> ([Ident])
happyOut34 x = Happy_GHC_Exts.unsafeCoerce# x
happyIn35 :: (L Param) -> (HappyAbsSyn )
happyIn35 x = Happy_GHC_Exts.unsafeCoerce# x
happyOut35 :: (HappyAbsSyn ) -> (L Param)
happyOut35 x = Happy_GHC_Exts.unsafeCoerce# x
happyIn36 :: ([(Ident,Info)]) -> (HappyAbsSyn )
happyIn36 x = Happy_GHC_Exts.unsafeCoerce# x
happyOut36 :: (HappyAbsSyn ) -> ([(Ident,Info)])
happyOut36 x = Happy_GHC_Exts.unsafeCoerce# x
happyIn37 :: ([(Ident,Info)]) -> (HappyAbsSyn )
happyIn37 x = Happy_GHC_Exts.unsafeCoerce# x
happyOut37 :: (HappyAbsSyn ) -> ([(Ident,Info)])
happyOut37 x = Happy_GHC_Exts.unsafeCoerce# x
happyIn38 :: ([(Ident,Info)]) -> (HappyAbsSyn )
happyIn38 x = Happy_GHC_Exts.unsafeCoerce# x
happyOut38 :: (HappyAbsSyn ) -> ([(Ident,Info)])
happyOut38 x = Happy_GHC_Exts.unsafeCoerce# x
happyIn39 :: ([(Ident,Info)]) -> (HappyAbsSyn )
happyIn39 x = Happy_GHC_Exts.unsafeCoerce# x
happyOut39 :: (HappyAbsSyn ) -> ([(Ident,Info)])
happyOut39 x = Happy_GHC_Exts.unsafeCoerce# x
happyIn40 :: ([(Ident,Info)]) -> (HappyAbsSyn )
happyIn40 x = Happy_GHC_Exts.unsafeCoerce# x
happyOut40 :: (HappyAbsSyn ) -> ([(Ident,Info)])
happyOut40 x = Happy_GHC_Exts.unsafeCoerce# x
happyIn41 :: ([(Ident,Info)]) -> (HappyAbsSyn )
happyIn41 x = Happy_GHC_Exts.unsafeCoerce# x
happyOut41 :: (HappyAbsSyn ) -> ([(Ident,Info)])
happyOut41 x = Happy_GHC_Exts.unsafeCoerce# x
happyIn42 :: ([(Ident,Info)]) -> (HappyAbsSyn )
happyIn42 x = Happy_GHC_Exts.unsafeCoerce# x
happyOut42 :: (HappyAbsSyn ) -> ([(Ident,Info)])
happyOut42 x = Happy_GHC_Exts.unsafeCoerce# x
happyIn43 :: ([(Ident,L Term)]) -> (HappyAbsSyn )
happyIn43 x = Happy_GHC_Exts.unsafeCoerce# x
happyOut43 :: (HappyAbsSyn ) -> ([(Ident,L Term)])
happyOut43 x = Happy_GHC_Exts.unsafeCoerce# x
happyIn44 :: (Options) -> (HappyAbsSyn )
happyIn44 x = Happy_GHC_Exts.unsafeCoerce# x
happyOut44 :: (HappyAbsSyn ) -> (Options)
happyOut44 x = Happy_GHC_Exts.unsafeCoerce# x
happyIn45 :: ([L Param]) -> (HappyAbsSyn )
happyIn45 x = Happy_GHC_Exts.unsafeCoerce# x
happyOut45 :: (HappyAbsSyn ) -> ([L Param])
happyOut45 x = Happy_GHC_Exts.unsafeCoerce# x
happyIn46 :: ([Ident]) -> (HappyAbsSyn )
happyIn46 x = Happy_GHC_Exts.unsafeCoerce# x
happyOut46 :: (HappyAbsSyn ) -> ([Ident])
happyOut46 x = Happy_GHC_Exts.unsafeCoerce# x
happyIn47 :: ([Ident]) -> (HappyAbsSyn )
happyIn47 x = Happy_GHC_Exts.unsafeCoerce# x
happyOut47 :: (HappyAbsSyn ) -> ([Ident])
happyOut47 x = Happy_GHC_Exts.unsafeCoerce# x
happyIn48 :: (Ident) -> (HappyAbsSyn )
happyIn48 x = Happy_GHC_Exts.unsafeCoerce# x
happyOut48 :: (HappyAbsSyn ) -> (Ident)
happyOut48 x = Happy_GHC_Exts.unsafeCoerce# x
happyIn49 :: (Ident) -> (HappyAbsSyn )
happyIn49 x = Happy_GHC_Exts.unsafeCoerce# x
happyOut49 :: (HappyAbsSyn ) -> (Ident)
happyOut49 x = Happy_GHC_Exts.unsafeCoerce# x
happyIn50 :: ([Ident]) -> (HappyAbsSyn )
happyIn50 x = Happy_GHC_Exts.unsafeCoerce# x
happyOut50 :: (HappyAbsSyn ) -> ([Ident])
happyOut50 x = Happy_GHC_Exts.unsafeCoerce# x
happyIn51 :: ([(Ident, Maybe Type, Maybe Term)]) -> (HappyAbsSyn )
happyIn51 x = Happy_GHC_Exts.unsafeCoerce# x
happyOut51 :: (HappyAbsSyn ) -> ([(Ident, Maybe Type, Maybe Term)])
happyOut51 x = Happy_GHC_Exts.unsafeCoerce# x
happyIn52 :: ([(Ident, Maybe Type, Maybe Term)]) -> (HappyAbsSyn )
happyIn52 x = Happy_GHC_Exts.unsafeCoerce# x
happyOut52 :: (HappyAbsSyn ) -> ([(Ident, Maybe Type, Maybe Term)])
happyOut52 x = Happy_GHC_Exts.unsafeCoerce# x
happyIn53 :: (Term) -> (HappyAbsSyn )
happyIn53 x = Happy_GHC_Exts.unsafeCoerce# x
happyOut53 :: (HappyAbsSyn ) -> (Term)
happyOut53 x = Happy_GHC_Exts.unsafeCoerce# x
happyIn54 :: (Term) -> (HappyAbsSyn )
happyIn54 x = Happy_GHC_Exts.unsafeCoerce# x
happyOut54 :: (HappyAbsSyn ) -> (Term)
happyOut54 x = Happy_GHC_Exts.unsafeCoerce# x
happyIn55 :: (Term) -> (HappyAbsSyn )
happyIn55 x = Happy_GHC_Exts.unsafeCoerce# x
happyOut55 :: (HappyAbsSyn ) -> (Term)
happyOut55 x = Happy_GHC_Exts.unsafeCoerce# x
happyIn56 :: (Term) -> (HappyAbsSyn )
happyIn56 x = Happy_GHC_Exts.unsafeCoerce# x
happyOut56 :: (HappyAbsSyn ) -> (Term)
happyOut56 x = Happy_GHC_Exts.unsafeCoerce# x
happyIn57 :: (Term) -> (HappyAbsSyn )
happyIn57 x = Happy_GHC_Exts.unsafeCoerce# x
happyOut57 :: (HappyAbsSyn ) -> (Term)
happyOut57 x = Happy_GHC_Exts.unsafeCoerce# x
happyIn58 :: (Term) -> (HappyAbsSyn )
happyIn58 x = Happy_GHC_Exts.unsafeCoerce# x
happyOut58 :: (HappyAbsSyn ) -> (Term)
happyOut58 x = Happy_GHC_Exts.unsafeCoerce# x
happyIn59 :: (Term) -> (HappyAbsSyn )
happyIn59 x = Happy_GHC_Exts.unsafeCoerce# x
happyOut59 :: (HappyAbsSyn ) -> (Term)
happyOut59 x = Happy_GHC_Exts.unsafeCoerce# x
happyIn60 :: ([Term]) -> (HappyAbsSyn )
happyIn60 x = Happy_GHC_Exts.unsafeCoerce# x
happyOut60 :: (HappyAbsSyn ) -> ([Term])
happyOut60 x = Happy_GHC_Exts.unsafeCoerce# x
happyIn61 :: ([Term]) -> (HappyAbsSyn )
happyIn61 x = Happy_GHC_Exts.unsafeCoerce# x
happyOut61 :: (HappyAbsSyn ) -> ([Term])
happyOut61 x = Happy_GHC_Exts.unsafeCoerce# x
happyIn62 :: (Patt) -> (HappyAbsSyn )
happyIn62 x = Happy_GHC_Exts.unsafeCoerce# x
happyOut62 :: (HappyAbsSyn ) -> (Patt)
happyOut62 x = Happy_GHC_Exts.unsafeCoerce# x
happyIn63 :: (Patt) -> (HappyAbsSyn )
happyIn63 x = Happy_GHC_Exts.unsafeCoerce# x
happyOut63 :: (HappyAbsSyn ) -> (Patt)
happyOut63 x = Happy_GHC_Exts.unsafeCoerce# x
happyIn64 :: (Patt) -> (HappyAbsSyn )
happyIn64 x = Happy_GHC_Exts.unsafeCoerce# x
happyOut64 :: (HappyAbsSyn ) -> (Patt)
happyOut64 x = Happy_GHC_Exts.unsafeCoerce# x
happyIn65 :: (Patt) -> (HappyAbsSyn )
happyIn65 x = Happy_GHC_Exts.unsafeCoerce# x
happyOut65 :: (HappyAbsSyn ) -> (Patt)
happyOut65 x = Happy_GHC_Exts.unsafeCoerce# x
happyIn66 :: ([(Label,Patt)]) -> (HappyAbsSyn )
happyIn66 x = Happy_GHC_Exts.unsafeCoerce# x
happyOut66 :: (HappyAbsSyn ) -> ([(Label,Patt)])
happyOut66 x = Happy_GHC_Exts.unsafeCoerce# x
happyIn67 :: (Label) -> (HappyAbsSyn )
happyIn67 x = Happy_GHC_Exts.unsafeCoerce# x
happyOut67 :: (HappyAbsSyn ) -> (Label)
happyOut67 x = Happy_GHC_Exts.unsafeCoerce# x
happyIn68 :: (Ident) -> (HappyAbsSyn )
happyIn68 x = Happy_GHC_Exts.unsafeCoerce# x
happyOut68 :: (HappyAbsSyn ) -> (Ident)
happyOut68 x = Happy_GHC_Exts.unsafeCoerce# x
happyIn69 :: ([(Label,Patt)]) -> (HappyAbsSyn )
happyIn69 x = Happy_GHC_Exts.unsafeCoerce# x
happyOut69 :: (HappyAbsSyn ) -> ([(Label,Patt)])
happyOut69 x = Happy_GHC_Exts.unsafeCoerce# x
happyIn70 :: ([Patt]) -> (HappyAbsSyn )
happyIn70 x = Happy_GHC_Exts.unsafeCoerce# x
happyOut70 :: (HappyAbsSyn ) -> ([Patt])
happyOut70 x = Happy_GHC_Exts.unsafeCoerce# x
happyIn71 :: (Patt) -> (HappyAbsSyn )
happyIn71 x = Happy_GHC_Exts.unsafeCoerce# x
happyOut71 :: (HappyAbsSyn ) -> (Patt)
happyOut71 x = Happy_GHC_Exts.unsafeCoerce# x
happyIn72 :: ([(BindType,Ident)]) -> (HappyAbsSyn )
happyIn72 x = Happy_GHC_Exts.unsafeCoerce# x
happyOut72 :: (HappyAbsSyn ) -> ([(BindType,Ident)])
happyOut72 x = Happy_GHC_Exts.unsafeCoerce# x
happyIn73 :: ([(BindType,Ident)]) -> (HappyAbsSyn )
happyIn73 x = Happy_GHC_Exts.unsafeCoerce# x
happyOut73 :: (HappyAbsSyn ) -> ([(BindType,Ident)])
happyOut73 x = Happy_GHC_Exts.unsafeCoerce# x
happyIn74 :: ([(BindType,Ident)]) -> (HappyAbsSyn )
happyIn74 x = Happy_GHC_Exts.unsafeCoerce# x
happyOut74 :: (HappyAbsSyn ) -> ([(BindType,Ident)])
happyOut74 x = Happy_GHC_Exts.unsafeCoerce# x
happyIn75 :: ([(BindType,Ident)]) -> (HappyAbsSyn )
happyIn75 x = Happy_GHC_Exts.unsafeCoerce# x
happyOut75 :: (HappyAbsSyn ) -> ([(BindType,Ident)])
happyOut75 x = Happy_GHC_Exts.unsafeCoerce# x
happyIn76 :: ([Hypo]) -> (HappyAbsSyn )
happyIn76 x = Happy_GHC_Exts.unsafeCoerce# x
happyOut76 :: (HappyAbsSyn ) -> ([Hypo])
happyOut76 x = Happy_GHC_Exts.unsafeCoerce# x
happyIn77 :: ([Term]) -> (HappyAbsSyn )
happyIn77 x = Happy_GHC_Exts.unsafeCoerce# x
happyOut77 :: (HappyAbsSyn ) -> ([Term])
happyOut77 x = Happy_GHC_Exts.unsafeCoerce# x
happyIn78 :: ([Patt]) -> (HappyAbsSyn )
happyIn78 x = Happy_GHC_Exts.unsafeCoerce# x
happyOut78 :: (HappyAbsSyn ) -> ([Patt])
happyOut78 x = Happy_GHC_Exts.unsafeCoerce# x
happyIn79 :: (Case) -> (HappyAbsSyn )
happyIn79 x = Happy_GHC_Exts.unsafeCoerce# x
happyOut79 :: (HappyAbsSyn ) -> (Case)
happyOut79 x = Happy_GHC_Exts.unsafeCoerce# x
happyIn80 :: ([Case]) -> (HappyAbsSyn )
happyIn80 x = Happy_GHC_Exts.unsafeCoerce# x
happyOut80 :: (HappyAbsSyn ) -> ([Case])
happyOut80 x = Happy_GHC_Exts.unsafeCoerce# x
happyIn81 :: ((Term,Term)) -> (HappyAbsSyn )
happyIn81 x = Happy_GHC_Exts.unsafeCoerce# x
happyOut81 :: (HappyAbsSyn ) -> ((Term,Term))
happyOut81 x = Happy_GHC_Exts.unsafeCoerce# x
happyIn82 :: ([(Term,Term)]) -> (HappyAbsSyn )
happyIn82 x = Happy_GHC_Exts.unsafeCoerce# x
happyOut82 :: (HappyAbsSyn ) -> ([(Term,Term)])
happyOut82 x = Happy_GHC_Exts.unsafeCoerce# x
happyIn83 :: ([Hypo]) -> (HappyAbsSyn )
happyIn83 x = Happy_GHC_Exts.unsafeCoerce# x
happyOut83 :: (HappyAbsSyn ) -> ([Hypo])
happyOut83 x = Happy_GHC_Exts.unsafeCoerce# x
happyIn84 :: ([Hypo]) -> (HappyAbsSyn )
happyIn84 x = Happy_GHC_Exts.unsafeCoerce# x
happyOut84 :: (HappyAbsSyn ) -> ([Hypo])
happyOut84 x = Happy_GHC_Exts.unsafeCoerce# x
happyIn85 :: ([CFRule]) -> (HappyAbsSyn )
happyIn85 x = Happy_GHC_Exts.unsafeCoerce# x
happyOut85 :: (HappyAbsSyn ) -> ([CFRule])
happyOut85 x = Happy_GHC_Exts.unsafeCoerce# x
happyIn86 :: ([CFRule]) -> (HappyAbsSyn )
happyIn86 x = Happy_GHC_Exts.unsafeCoerce# x
happyOut86 :: (HappyAbsSyn ) -> ([CFRule])
happyOut86 x = Happy_GHC_Exts.unsafeCoerce# x
happyIn87 :: ([[CFSymbol]]) -> (HappyAbsSyn )
happyIn87 x = Happy_GHC_Exts.unsafeCoerce# x
happyOut87 :: (HappyAbsSyn ) -> ([[CFSymbol]])
happyOut87 x = Happy_GHC_Exts.unsafeCoerce# x
happyIn88 :: ([CFSymbol]) -> (HappyAbsSyn )
happyIn88 x = Happy_GHC_Exts.unsafeCoerce# x
happyOut88 :: (HappyAbsSyn ) -> ([CFSymbol])
happyOut88 x = Happy_GHC_Exts.unsafeCoerce# x
happyIn89 :: (CFSymbol) -> (HappyAbsSyn )
happyIn89 x = Happy_GHC_Exts.unsafeCoerce# x
happyOut89 :: (HappyAbsSyn ) -> (CFSymbol)
happyOut89 x = Happy_GHC_Exts.unsafeCoerce# x
happyIn90 :: ([ERule]) -> (HappyAbsSyn )
happyIn90 x = Happy_GHC_Exts.unsafeCoerce# x
happyOut90 :: (HappyAbsSyn ) -> ([ERule])
happyOut90 x = Happy_GHC_Exts.unsafeCoerce# x
happyIn91 :: (ERule) -> (HappyAbsSyn )
happyIn91 x = Happy_GHC_Exts.unsafeCoerce# x
happyOut91 :: (HappyAbsSyn ) -> (ERule)
happyOut91 x = Happy_GHC_Exts.unsafeCoerce# x
happyIn92 :: (ERHS) -> (HappyAbsSyn )
happyIn92 x = Happy_GHC_Exts.unsafeCoerce# x
happyOut92 :: (HappyAbsSyn ) -> (ERHS)
happyOut92 x = Happy_GHC_Exts.unsafeCoerce# x
happyIn93 :: (ERHS) -> (HappyAbsSyn )
happyIn93 x = Happy_GHC_Exts.unsafeCoerce# x
happyOut93 :: (HappyAbsSyn ) -> (ERHS)
happyOut93 x = Happy_GHC_Exts.unsafeCoerce# x
happyIn94 :: (ERHS) -> (HappyAbsSyn )
happyIn94 x = Happy_GHC_Exts.unsafeCoerce# x
happyOut94 :: (HappyAbsSyn ) -> (ERHS)
happyOut94 x = Happy_GHC_Exts.unsafeCoerce# x
happyIn95 :: (ERHS) -> (HappyAbsSyn )
happyIn95 x = Happy_GHC_Exts.unsafeCoerce# x
happyOut95 :: (HappyAbsSyn ) -> (ERHS)
happyOut95 x = Happy_GHC_Exts.unsafeCoerce# x
happyIn96 :: (ModuleName) -> (HappyAbsSyn )
happyIn96 x = Happy_GHC_Exts.unsafeCoerce# x
happyOut96 :: (HappyAbsSyn ) -> (ModuleName)
happyOut96 x = Happy_GHC_Exts.unsafeCoerce# x
happyIn97 :: (Posn) -> (HappyAbsSyn )
happyIn97 x = Happy_GHC_Exts.unsafeCoerce# x
happyOut97 :: (HappyAbsSyn ) -> (Posn)
happyOut97 x = Happy_GHC_Exts.unsafeCoerce# x
happyInTok :: (Token) -> (HappyAbsSyn )
happyInTok x = Happy_GHC_Exts.unsafeCoerce# x
happyOutTok :: (HappyAbsSyn ) -> (Token)
happyOutTok x = Happy_GHC_Exts.unsafeCoerce# x
happyActOffsets :: HappyAddr
happyActOffsets = HappyA# "\x30\x05\xe6\x06\x30\x05\xf7\x00\x0d\x05\x0c\x05\x2f\x05\xea\x01\x00\x00\x07\x05\x09\x05\x2e\x05\xfc\x04\xfa\x04\x21\x00\xfb\x04\x23\x05\x27\x05\x3f\x00\x74\x03\x22\x05\x00\x00\x00\x00\x21\x05\xc6\x02\x55\x00\xf7\x00\x00\x00\xf3\x00\xf9\x04\x51\x01\x51\x01\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\xf7\x00\x5f\x03\xd6\x00\xec\x04\xeb\x04\x5f\x03\x25\x05\x24\x05\x5a\x03\x12\x05\x00\x00\x00\x00\x00\x00\x00\x00\x14\x05\xea\x01\xe7\x04\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x1c\x02\xe7\x04\x00\x00\x00\x00\x19\x05\x00\x00\xe4\x04\x18\x05\x00\x00\xa3\x00\x17\x05\x00\x00\xa3\x00\x00\x00\x00\x00\x16\x05\x00\x00\xa3\x00\x15\x05\x00\x00\xd4\x04\x0b\x05\x00\x00\xd3\x04\x08\x05\x00\x00\xa3\x00\x06\x05\x00\x00\xd1\x04\x05\x05\x00\x00\x8e\x00\x00\x05\xcb\x04\xcb\x04\xcb\x04\xcb\x04\xcb\x04\xf7\x00\x16\x02\xf7\x00\xbd\x02\xf7\x00\xa8\x02\x03\x05\x24\x03\x24\x03\x62\x02\xfe\x04\xe2\x04\xc7\x04\xf8\x04\x15\x00\xcd\x04\xf7\x04\xed\x04\xb8\x04\x00\x00\x00\x00\xf3\x04\xe1\x04\x00\x00\xe5\x04\x24\x03\x25\x01\xe6\x04\xe3\x04\xea\x04\xb2\x04\xbe\x00\x00\x00\xe9\x04\xb1\x04\x87\x02\x87\x02\x00\x00\xb0\x04\xa3\x04\x00\x00\x00\x00\x00\x00\x00\x00\xd9\x04\xf7\x00\x2d\x00\xd8\x04\xc1\x00\x63\x01\x63\x01\x63\x01\x2d\x01\x8b\x00\xc9\x04\x2d\x01\x8b\x00\xa2\x04\xca\x03\x00\x00\x37\x00\x00\x00\xcf\x04\xc7\x00\xd0\x04\xc5\x04\x37\x00\xf7\x01\x37\x00\x00\x00\x00\x00\xcc\x04\xc1\x04\xca\x03\x00\x00\x00\x00\xbf\x04\x00\x00\x00\x00\x9b\x02\x89\x04\x00\x00\x00\x00\x0f\x03\x0f\x03\x0f\x03\xc3\x04\x13\x03\x00\x00\x8e\x04\x00\x00\x00\x00\xbe\x04\xbd\x04\xb4\x04\xb3\x04\xc4\x01\x00\x00\x00\x00\xc4\x04\xb5\x04\xbb\x04\x0a\x03\xc6\x02\xe5\x01\x3f\x01\xba\x04\xb9\x04\x75\x04\x24\x02\x8b\x00\x00\x00\x00\x00\x8b\x00\x8b\x00\x0a\x03\xa1\x04\x00\x00\x00\x00\x8b\x00\xa0\x04\x8b\x00\x39\x01\x9f\x04\x00\x00\x71\x04\x9c\x04\x8b\x00\x65\x04\x8b\x00\x8b\x00\x9b\x04\x9b\x04\x26\x02\x97\x04\x8c\x04\x95\x04\xc0\x01\x8b\x04\x7e\x04\x7d\x04\xa9\x01\x8b\x00\x87\x02\x6e\x04\x00\x00\x00\x00\x00\x00\x60\x04\x5f\x04\x00\x00\x14\x01\x45\x04\xd0\x02\xf0\x03\x6c\x04\xf8\x00\x41\x04\x00\x00\x06\x02\x74\x04\xd9\x02\x3f\x04\x00\x00\xd9\x03\x68\x04\x33\x04\x69\x04\x31\x04\xa6\x00\x64\x04\xc2\x03\x6b\x04\x59\x04\xab\x03\xa6\x00\xd5\x01\x94\x03\x57\x04\x6a\x01\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x8b\x00\x8b\x00\x70\x00\x56\x04\x7a\x00\x21\x04\x00\x00\x00\x00\x00\x00\x8b\x00\x00\x00\x8b\x00\x53\x04\x00\x00\x8b\x00\x00\x00\x71\x01\x00\x00\x4c\x04\x00\x00\x8b\x00\x00\x00\x00\x00\x47\x04\x72\x02\x51\x02\x36\x00\x00\x00\x12\x04\x8b\x00\x00\x00\x00\x00\xd0\x02\x00\x00\x55\x00\xd0\x02\x00\x00\x00\x00\x50\x04\x2b\x00\x0f\x00\x1a\x00\x0f\x04\x0f\x04\x00\x00\x38\x04\x36\x04\x00\x00\xc6\x02\x00\x00\x00\x00\x8b\x00\x8b\x00\x8b\x00\x00\x00\x3c\x02\x3c\x02\x8b\x00\x3c\x02\x00\x00\x3a\x04\x00\x00\x00\x00\x20\x04\x00\x00\x3c\x02\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x35\x04\x2c\x04\x00\x00\x3c\x04\x00\x00\xfb\x03\x00\x00\x00\x00\x00\x00\xf7\x03\x00\x00\x00\x00\x3c\x02\x00\x00\x00\x00\xf6\x03\x3c\x02\x00\x00\x00\x00\x1b\x04\xca\x03\x00\x00\xca\x03\x00\x00\x26\x04\x00\x00\x00\x00\x00\x00\x00\x00\x37\x00\x00\x00\x17\x04\x00\x00\x1f\x04\x29\x00\xe6\x06\x1a\x00\xfe\x03\x15\x04\x00\x00\xdb\x03\x03\x04\xe6\x06\xd8\x03\x13\x04\xa0\x00\x00\x00\x00\x00\x00\x00\x00\x00\x08\x04\x00\x00\x09\x01\x00\x00\x00\x00\x1b\x02\x00\x00\x00\x00\x00\x00\xfa\x03\x8b\x00\x8b\x00\x00\x00\x00\x00\x00\x00\x00\x00\x05\x04\xf8\x03\xe7\x03\xe5\x03\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\xda\x03\xa2\x03\xd7\x03\x14\x01\xb9\x03\xbf\x03\x00\x00\x00\x00\x00\x00\x00\x00\xa6\x03\xd3\x00\x00\x00\x8b\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x8b\x00\x00\x00\x00\x00\xa7\x03\x76\x03\x00\x00\x8b\x00\x00\x00\x00\x00\x81\x03\x70\x03\x00\x00\x42\x03\xd0\x02\x00\x00\x00\x00\x00\x00\x8b\x00\x00\x00\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\x03\x00\x00\x00\x00\x8b\x00\x5c\x03\x00\x00\x30\x03\x67\x03\x57\x03\xf6\x02\x40\x03\xf4\x02\x00\x00\x00\x00\x8b\x00\x8b\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\xf2\x02\x15\x03\x00\x00\x1f\x03\x00\x00\x00\x00\xdd\x02\x1a\x00\xd1\x02\xe6\x06\x00\x00\xc2\x02\xa2\x00\xe5\x02\x00\x00\x00\x00\xce\x02\x00\x00\xd2\x02\xdf\x02\xa9\x02\xdb\x02\x00\x00\x99\x02\xd4\x02\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\xbb\x02\xca\x02\x00\x00\x00\x00\x80\x02\x00\x00\xb5\x02\x00\x00\xb6\x02\x92\x02\x00\x00\x00\x00\xa2\x00\xb0\x02\x73\x02\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00"#
happyGotoOffsets :: HappyAddr
happyGotoOffsets = HappyA# "\x49\x00\x9a\x02\x06\x04\xda\x06\xb1\x03\xa8\x03\x9c\x02\x9d\x02\x00\x00\x00\x00\x95\x03\x00\x00\x00\x00\x96\x03\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x9f\x02\x00\x00\x00\x00\x00\x00\x00\x00\xa7\x00\xaa\x04\x82\x04\x00\x00\x00\x00\xc6\x03\x98\x03\x8a\x03\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\xca\x06\x81\x02\x68\x03\x00\x00\x00\x00\x60\x02\x00\x00\x00\x00\x44\x01\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x97\x02\x00\x00\x0a\x00\x11\x00\x10\x00\x93\x00\x0c\x00\x27\x00\x88\x00\x7c\x00\x75\x00\x1d\x00\x12\x00\x00\x00\x00\x00\x2e\x00\x2c\x00\x00\x00\x00\x00\x5b\x00\x00\x00\x00\x00\x3b\x01\x00\x00\x00\x00\x31\x01\x00\x00\x00\x00\x00\x00\x00\x00\x22\x01\x00\x00\x00\x00\x5a\x02\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x05\x01\x00\x00\x00\x00\x4e\x02\x00\x00\x00\x00\x00\x00\x00\x00\x3d\x02\x30\x02\x2e\x02\x20\x02\x19\x02\x0a\x05\x00\x00\xba\x06\x7d\x03\xf2\x04\xfd\x03\x00\x00\x2a\x02\x1e\x02\x00\x00\x00\x00\x00\x00\x66\x03\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x47\x02\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x36\x02\x00\x00\x00\x00\x00\x00\x00\x00\x3a\x03\x00\x00\x00\x00\x00\x00\x01\x02\xaa\x01\x10\x04\x00\x00\x00\x00\xa0\x01\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\xaa\x06\x34\x02\x00\x00\x32\x04\x76\x02\x0b\x02\x6b\x01\x4b\x02\x9a\x06\x00\x00\x12\x03\x8a\x06\x00\x00\xfc\x02\x00\x00\x56\x03\x00\x00\x00\x00\x01\x00\x00\x00\x00\x00\xe3\x02\x00\x00\x47\x03\x00\x00\x00\x00\x00\x00\x00\x00\x5e\x03\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x2d\x03\x00\x00\x00\x00\x24\x01\x24\x01\x24\x01\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\xbf\x00\x4d\x00\x14\x04\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x7a\x06\x00\x00\x00\x00\x72\x04\x6a\x06\x32\x02\x00\x00\x00\x00\x00\x00\x5a\x06\x00\x00\x4a\x06\x46\x03\x00\x00\x00\x00\x2c\x02\x00\x00\x3a\x06\xe4\x01\x2a\x06\x1a\x06\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x14\x04\x00\x00\x00\x00\x00\x00\x14\x04\xda\x04\xf9\x03\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\xfd\xff\x00\x00\xab\x01\xf9\xff\x00\x00\x00\x00\x0e\x00\x00\x00\x79\x03\x00\x00\x23\x02\x33\x00\x00\x00\x0d\x00\x00\x00\x91\x00\x00\x00\x0b\x00\x2e\x03\x00\x00\x23\x00\x00\x00\x00\x00\x28\x00\x27\x03\x00\x00\x18\x00\xef\x01\x04\x00\x00\x00\x00\x00\x00\x00\x00\x00\x9e\x00\x00\x00\x0a\x06\xfa\x05\x1d\x03\x00\x00\xee\x00\x1d\x02\x00\x00\x00\x00\x00\x00\xea\x05\x00\x00\xda\x05\x00\x00\x00\x00\xca\x05\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\xba\x05\x00\x00\x00\x00\x00\x00\x23\x03\xeb\x00\x00\x00\x00\x00\x28\x02\xaa\x05\x00\x00\x00\x00\x73\x01\xe0\x01\x92\x04\x68\x01\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x09\x00\xdb\x01\x06\x00\x00\x00\x00\x00\x00\x00\x00\x00\xe1\xff\x00\x00\x00\x00\xc2\x04\x62\x04\x52\x04\x00\x00\xc1\x02\xc2\x01\x9a\x05\x9d\x01\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\xdf\x01\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x04\x04\x00\x00\x00\x00\x59\x01\x93\x01\x00\x00\x00\x00\x00\x00\x75\x02\x00\x00\xcb\x02\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\xbc\x02\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x91\x01\x07\x00\x00\x00\x00\x00\x00\x00\xb4\x01\x00\x00\x74\x01\x08\x00\xa4\x02\xff\xff\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\xc8\x02\x00\x00\x00\x00\x00\x00\x00\x00\x8a\x05\x7a\x05\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\xdd\x01\x83\x02\xfe\xff\x00\x00\x00\x00\x00\x00\x00\x00\x9a\x01\x94\x01\x00\x00\x00\x00\x00\x00\x6a\x05\x8c\x01\x00\x00\x83\x01\x78\x01\x62\x01\x5a\x05\x58\x01\x54\x01\x00\x00\x7b\x01\x00\x00\x4a\x05\x00\x00\x3c\x01\x2a\x01\x00\x00\x1f\x01\x00\x00\x46\x01\x00\x00\x7e\x00\x00\x00\x3a\x05\x00\x00\x18\x01\x00\x00\x00\x00\x00\x00\x00\x00\x12\x01\x00\x00\x00\x00\x00\x00\x00\x00\x0e\x01\x00\x00\x43\x01\x00\x00\x00\x00\x2a\x05\xf5\x00\x00\x00\x00\x00\x00\x00\x00\x00\xb3\x00\x00\x00\x0f\x01\x00\x00\x00\x00\x42\x04\x1a\x05\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\xfb\xff\x00\x00\x17\x01\x00\x00\xad\x00\xe5\x00\x17\x02\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x35\x01\xc3\x00\xec\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x5d\x00\x00\x00\x48\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\xf8\xff\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x35\x00\x00\x00\x32\x00\xc8\xff\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00"#
happyDefActions :: HappyAddr
happyDefActions = HappyA# "\xf7\xff\x00\x00\xf7\xff\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\xf6\xff\x00\x00\x05\xff\x00\x00\x00\x00\x0f\xff\x00\x00\x00\x00\x7f\xff\x7d\xff\x7b\xff\x74\xff\x67\xff\x65\xff\x63\xff\x00\x00\x00\x00\x00\x00\x1f\xff\x5f\xff\x00\x00\x8b\xff\x00\x00\x00\x00\x36\xff\x34\xff\x33\xff\x35\xff\x37\xff\x00\x00\x00\x00\x8b\xff\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x61\xff\x60\xff\x62\xff\x64\xff\x00\x00\x00\x00\x00\x00\xf6\xfe\xf6\xfe\xf6\xfe\xf6\xfe\xf6\xfe\xf6\xfe\xf6\xfe\xf6\xfe\xf6\xfe\xf6\xfe\xf6\xfe\x00\x00\x00\x00\xf6\xfe\xf6\xfe\x00\x00\xcb\xff\xf6\xfe\x00\x00\xca\xff\xf6\xfe\x00\x00\xc7\xff\xf6\xfe\xc8\xff\xc9\xff\x00\x00\xc6\xff\xf6\xfe\x00\x00\xce\xff\x00\x00\x00\x00\xc3\xff\x00\x00\x00\x00\xcd\xff\xf6\xfe\x00\x00\xcc\xff\x00\x00\x00\x00\xcf\xff\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x57\xff\x00\x00\x00\x00\x8b\xff\x57\xff\x00\x00\x6a\xff\x00\x00\x00\x00\x00\x00\x8a\xff\x00\x00\x8b\xff\x98\xff\x00\x00\x00\x00\x23\xff\x00\x00\x00\x00\x25\xff\x26\xff\x00\x00\x00\x00\x5e\xff\x00\x00\x54\xff\x1e\xff\x00\x00\x00\x00\x00\x00\x8b\xff\x64\xff\x6b\xff\x00\x00\x00\x00\x00\x00\x1c\xff\x47\xff\x00\x00\x32\xff\x43\xff\x40\xff\x3f\xff\x3e\xff\x42\xff\x00\x00\x00\x00\x73\xff\x8b\xff\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x09\xff\x0e\xff\x00\x00\x04\xff\x00\x00\x00\x00\x00\x00\x02\xff\x00\xff\xfb\xfe\x00\x00\xfa\xfe\xf9\xfe\x00\x00\x0b\xff\x09\xff\x07\xff\x06\xff\x00\x00\x88\xff\x7e\xff\x7b\xff\x8b\xff\x84\xff\x7c\xff\x75\xff\x76\xff\x7a\xff\x00\x00\x64\xff\x66\xff\x00\x00\x39\xff\x85\xff\x00\x00\x31\xff\x00\x00\x00\x00\x1b\xff\x50\xff\x4c\xff\x48\xff\x00\x00\x00\x00\x00\x00\x00\x00\x42\xff\x00\x00\x00\x00\x45\xff\x00\x00\x00\x00\x00\x00\x58\xff\x5a\xff\x1f\xff\x00\x00\x54\xff\x00\x00\x5c\xff\x5b\xff\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x80\xff\x00\x00\x00\x00\x00\x00\x8b\xff\x00\x00\x00\x00\x68\xff\x69\xff\x00\x00\x18\xff\x00\x00\x3e\xff\x42\xff\x56\xff\x00\x00\x00\x00\x42\xff\x57\xff\x00\x00\x00\x00\xf4\xff\xf7\xfe\xf3\xff\x00\x00\x00\x00\xf5\xff\xe9\xff\x00\x00\x11\xff\xf6\xfe\x00\x00\x98\xff\xa2\xff\x92\xff\x90\xff\x00\x00\x00\x00\xf6\xfe\x94\xff\xf6\xfe\x00\x00\x9c\xff\x00\x00\xa4\xff\x90\xff\x00\x00\xf6\xfe\x90\xff\x00\x00\xf6\xfe\x90\xff\x00\x00\xf6\xfe\xf6\xfe\xa0\xff\xc4\xff\xc5\xff\x9f\xff\xb9\xff\xf6\xfe\xa7\xff\x00\x00\x00\x00\x28\xff\x00\x00\xf6\xfe\x00\x00\x2a\xff\x2b\xff\x9d\xff\x00\x00\xab\xff\x00\x00\x00\x00\xa3\xff\x00\x00\x9b\xff\x00\x00\xa9\xff\x00\x00\x93\xff\x00\x00\x2d\xff\x48\xff\x00\x00\x2f\xff\x32\xff\x42\xff\xa1\xff\x00\x00\x00\x00\xa5\xff\x12\xff\x11\xff\xf6\xfe\x00\x00\x11\xff\xf8\xff\xea\xff\xed\xff\xd4\xff\xd2\xff\x00\x00\x00\x00\x00\x00\x70\xff\x00\x00\x00\x00\x4f\xff\x00\x00\x79\xff\x6c\xff\x57\xff\x00\x00\x00\x00\x6f\xff\x00\x00\x00\x00\x00\x00\x00\x00\x8d\xff\x8e\xff\x89\xff\x82\xff\x00\x00\x97\xff\x00\x00\x22\xff\x86\xff\x24\xff\x87\xff\x5d\xff\x53\xff\x00\x00\x1e\xff\x1d\xff\x00\x00\x41\xff\x00\x00\x3b\xff\x4a\xff\x49\xff\x00\x00\x3c\xff\x4d\xff\x1c\xff\x46\xff\x3d\xff\x32\xff\x00\x00\x38\xff\x72\xff\x00\x00\x09\xff\x08\xff\x09\xff\x0c\xff\x00\x00\xfe\xfe\xfd\xfe\xfc\xfe\xff\xfe\x00\x00\x03\xff\xf9\xff\xe1\xff\xe4\xff\xd4\xff\xdd\xff\x00\x00\x00\x00\xdb\xff\xd9\xff\x00\x00\x00\x00\xdd\xff\x00\x00\x00\x00\x00\x00\xe0\xff\x01\xff\xf8\xfe\x0a\xff\x00\x00\x81\xff\x3a\xff\x30\xff\x1a\xff\x41\xff\x44\xff\x21\xff\x59\xff\x00\x00\x00\x00\x00\x00\x52\xff\x19\xff\x51\xff\x17\xff\x00\x00\x15\xff\x00\x00\x00\x00\x55\xff\x4b\xff\x77\xff\x78\xff\xf1\xff\xf2\xff\xe8\xff\x00\x00\x00\x00\x00\x00\xe9\xff\x00\x00\x00\x00\xc2\xff\x10\xff\xf6\xfe\xf6\xfe\xaf\xff\x00\x00\x2e\xff\x00\x00\xf6\xfe\x91\xff\xf6\xfe\xf6\xfe\xf6\xfe\x00\x00\xf6\xfe\xf6\xfe\x00\x00\x96\xff\x8f\xff\x00\x00\x27\xff\xf6\xfe\xf6\xfe\x9a\xff\xf6\xfe\x00\x00\x11\xff\xba\xff\xf6\xfe\xb8\xff\x00\x00\xb7\xff\xf6\xfe\x95\xff\x29\xff\xb2\xff\xb4\xff\xf6\xfe\xbf\xff\xb1\xff\xb0\xff\xbe\xff\xf6\xfe\x2c\xff\x00\x00\xbc\xff\xbb\xff\x00\x00\xf6\xfe\xee\xff\x00\x00\xeb\xff\xd7\xff\x00\x00\x00\x00\x00\x00\x6d\xff\x6e\xff\x00\x00\x00\x00\x8c\xff\x83\xff\x71\xff\x4e\xff\x0d\xff\xe5\xff\x00\x00\xe2\xff\xd3\xff\xd4\xff\xdc\xff\xdf\xff\x00\x00\x00\x00\x00\x00\xdd\xff\xda\xff\x00\x00\x00\x00\x00\x00\x16\xff\x14\xff\x00\x00\xd1\xff\x00\x00\x00\x00\xe9\xff\x00\x00\xc1\xff\x00\x00\x00\x00\xae\xff\xbd\xff\xb3\xff\xb6\xff\xf6\xfe\x99\xff\xf6\xfe\xad\xff\xb5\xff\x13\xff\x00\x00\xef\xff\xec\xff\xd6\xff\x00\x00\xd0\xff\xe6\xff\xe3\xff\x00\x00\x00\x00\xde\xff\xd8\xff\x00\x00\x00\x00\xe9\xff\xf6\xfe\xc0\xff\xf0\xff\xd5\xff\xe7\xff"#
happyCheck :: HappyAddr
happyCheck = HappyA# "\xff\xff\x04\x00\x05\x00\x05\x00\x09\x00\x0a\x00\x07\x00\x06\x00\x07\x00\x10\x00\x0d\x00\x0e\x00\x0e\x00\x0e\x00\x0d\x00\x0e\x00\x09\x00\x0a\x00\x09\x00\x0a\x00\x0e\x00\x0d\x00\x0e\x00\x1e\x00\x14\x00\x38\x00\x10\x00\x0c\x00\x11\x00\x11\x00\x04\x00\x12\x00\x58\x00\x13\x00\x12\x00\x0e\x00\x13\x00\x21\x00\x14\x00\x18\x00\x1e\x00\x1c\x00\x1f\x00\x1f\x00\x1c\x00\x15\x00\x20\x00\x0e\x00\x03\x00\x20\x00\x15\x00\x21\x00\x0b\x00\x1d\x00\x0b\x00\x05\x00\x57\x00\x16\x00\x1d\x00\x04\x00\x07\x00\x16\x00\x1b\x00\x17\x00\x01\x00\x20\x00\x1b\x00\x17\x00\x0e\x00\x17\x00\x07\x00\x08\x00\x09\x00\x00\x00\x22\x00\x02\x00\x0d\x00\x17\x00\x22\x00\x57\x00\x22\x00\x58\x00\x57\x00\x14\x00\x57\x00\x57\x00\x57\x00\x02\x00\x57\x00\x04\x00\x27\x00\x46\x00\x58\x00\x57\x00\x57\x00\x57\x00\x57\x00\x47\x00\x58\x00\x58\x00\x58\x00\x58\x00\x58\x00\x12\x00\x58\x00\x58\x00\x58\x00\x16\x00\x43\x00\x18\x00\x43\x00\x1a\x00\x58\x00\x1c\x00\x1d\x00\x1e\x00\x47\x00\x58\x00\x21\x00\x22\x00\x23\x00\x24\x00\x25\x00\x58\x00\x27\x00\x46\x00\x47\x00\x58\x00\x58\x00\x42\x00\x27\x00\x2e\x00\x58\x00\x38\x00\x58\x00\x32\x00\x33\x00\x34\x00\x1a\x00\x58\x00\x17\x00\x02\x00\x1e\x00\x04\x00\x3b\x00\x3c\x00\x18\x00\x17\x00\x3f\x00\x40\x00\x41\x00\x22\x00\x1a\x00\x44\x00\x45\x00\x46\x00\x47\x00\x12\x00\x22\x00\x17\x00\x58\x00\x16\x00\x24\x00\x18\x00\x57\x00\x1a\x00\x18\x00\x1c\x00\x1d\x00\x18\x00\x22\x00\x18\x00\x21\x00\x22\x00\x23\x00\x24\x00\x25\x00\x0b\x00\x27\x00\x58\x00\x23\x00\x58\x00\x23\x00\x47\x00\x1a\x00\x2e\x00\x1a\x00\x18\x00\x1a\x00\x32\x00\x33\x00\x34\x00\x1a\x00\x47\x00\x24\x00\x02\x00\x1e\x00\x04\x00\x3b\x00\x3c\x00\x05\x00\x0b\x00\x3f\x00\x40\x00\x41\x00\x58\x00\x10\x00\x44\x00\x45\x00\x46\x00\x47\x00\x12\x00\x58\x00\x47\x00\x58\x00\x16\x00\x38\x00\x18\x00\x38\x00\x1a\x00\x09\x00\x1c\x00\x1d\x00\x38\x00\x58\x00\x1a\x00\x21\x00\x22\x00\x23\x00\x24\x00\x25\x00\x47\x00\x27\x00\x58\x00\x47\x00\x58\x00\x07\x00\x47\x00\x1b\x00\x2e\x00\x1a\x00\x32\x00\x1f\x00\x32\x00\x33\x00\x34\x00\x58\x00\x0b\x00\x0c\x00\x02\x00\x3b\x00\x04\x00\x3b\x00\x3c\x00\x57\x00\x38\x00\x3f\x00\x40\x00\x41\x00\x0b\x00\x57\x00\x44\x00\x45\x00\x46\x00\x47\x00\x12\x00\x57\x00\x13\x00\x19\x00\x16\x00\x47\x00\x18\x00\x25\x00\x1a\x00\x09\x00\x1c\x00\x1d\x00\x27\x00\x28\x00\x29\x00\x21\x00\x22\x00\x23\x00\x24\x00\x25\x00\x47\x00\x27\x00\x08\x00\x35\x00\x36\x00\x37\x00\x38\x00\x39\x00\x2e\x00\x0f\x00\x3c\x00\x1f\x00\x32\x00\x33\x00\x34\x00\x27\x00\x28\x00\x29\x00\x02\x00\x0b\x00\x04\x00\x3b\x00\x3c\x00\x25\x00\x10\x00\x3f\x00\x40\x00\x41\x00\x46\x00\x47\x00\x44\x00\x45\x00\x46\x00\x47\x00\x12\x00\x0b\x00\x0c\x00\x57\x00\x16\x00\x05\x00\x18\x00\x58\x00\x1a\x00\x09\x00\x27\x00\x28\x00\x29\x00\x38\x00\x58\x00\x21\x00\x22\x00\x23\x00\x24\x00\x25\x00\x1a\x00\x27\x00\x31\x00\x32\x00\x1e\x00\x27\x00\x28\x00\x29\x00\x47\x00\x19\x00\x58\x00\x1f\x00\x3b\x00\x33\x00\x34\x00\x27\x00\x28\x00\x29\x00\x02\x00\x58\x00\x04\x00\x3b\x00\x3c\x00\x58\x00\x1a\x00\x3f\x00\x40\x00\x41\x00\x1e\x00\x58\x00\x44\x00\x45\x00\x46\x00\x47\x00\x12\x00\x32\x00\x58\x00\x32\x00\x16\x00\x58\x00\x18\x00\x08\x00\x1a\x00\x25\x00\x3b\x00\x47\x00\x3b\x00\x58\x00\x0f\x00\x21\x00\x22\x00\x23\x00\x24\x00\x25\x00\x58\x00\x27\x00\x21\x00\x22\x00\x23\x00\x24\x00\x25\x00\x4a\x00\x4b\x00\x39\x00\x58\x00\x58\x00\x3c\x00\x33\x00\x34\x00\x47\x00\x08\x00\x32\x00\x30\x00\x31\x00\x32\x00\x3b\x00\x3c\x00\x0f\x00\x26\x00\x3f\x00\x3b\x00\x41\x00\x32\x00\x3b\x00\x44\x00\x45\x00\x46\x00\x47\x00\x02\x00\x58\x00\x04\x00\x3b\x00\x06\x00\x58\x00\x47\x00\x4a\x00\x4b\x00\x0b\x00\x0c\x00\x45\x00\x0e\x00\x47\x00\x10\x00\x58\x00\x12\x00\x13\x00\x4a\x00\x4b\x00\x16\x00\x17\x00\x18\x00\x02\x00\x1a\x00\x04\x00\x25\x00\x06\x00\x1e\x00\x35\x00\x36\x00\x37\x00\x38\x00\x0c\x00\x09\x00\x0e\x00\x0b\x00\x58\x00\x11\x00\x12\x00\x36\x00\x37\x00\x38\x00\x16\x00\x17\x00\x18\x00\x39\x00\x1a\x00\x58\x00\x3c\x00\x32\x00\x1e\x00\x35\x00\x36\x00\x37\x00\x38\x00\x1f\x00\x58\x00\x10\x00\x3b\x00\x02\x00\x13\x00\x04\x00\x57\x00\x06\x00\x58\x00\x44\x00\x45\x00\x46\x00\x47\x00\x0c\x00\x58\x00\x0e\x00\x57\x00\x4a\x00\x4b\x00\x12\x00\x36\x00\x37\x00\x38\x00\x16\x00\x17\x00\x18\x00\x07\x00\x1a\x00\x09\x00\x57\x00\x25\x00\x1e\x00\x44\x00\x45\x00\x46\x00\x47\x00\x02\x00\x25\x00\x04\x00\x57\x00\x06\x00\x16\x00\x2a\x00\x2b\x00\x26\x00\x0b\x00\x0c\x00\x29\x00\x35\x00\x36\x00\x37\x00\x38\x00\x12\x00\x57\x00\x30\x00\x31\x00\x16\x00\x02\x00\x18\x00\x04\x00\x1a\x00\x06\x00\x0b\x00\x0c\x00\x1e\x00\x46\x00\x47\x00\x0c\x00\x3e\x00\x44\x00\x45\x00\x46\x00\x47\x00\x12\x00\x18\x00\x09\x00\x1a\x00\x16\x00\x57\x00\x18\x00\x10\x00\x1a\x00\x57\x00\x13\x00\x58\x00\x1e\x00\x14\x00\x30\x00\x31\x00\x32\x00\x02\x00\x1b\x00\x04\x00\x19\x00\x06\x00\x26\x00\x28\x00\x1f\x00\x3b\x00\x58\x00\x0c\x00\x2d\x00\x44\x00\x45\x00\x46\x00\x47\x00\x12\x00\x31\x00\x32\x00\x25\x00\x16\x00\x02\x00\x18\x00\x04\x00\x1a\x00\x06\x00\x57\x00\x3b\x00\x1e\x00\x31\x00\x32\x00\x0c\x00\x3b\x00\x44\x00\x45\x00\x46\x00\x47\x00\x12\x00\x32\x00\x3b\x00\x34\x00\x16\x00\x32\x00\x18\x00\x34\x00\x1a\x00\x25\x00\x3b\x00\x3a\x00\x1e\x00\x57\x00\x3b\x00\x10\x00\x25\x00\x02\x00\x13\x00\x04\x00\x57\x00\x06\x00\x2e\x00\x2f\x00\x30\x00\x31\x00\x32\x00\x0c\x00\x25\x00\x44\x00\x45\x00\x46\x00\x47\x00\x12\x00\x57\x00\x3b\x00\x57\x00\x16\x00\x02\x00\x18\x00\x04\x00\x1a\x00\x06\x00\x0b\x00\x0c\x00\x1e\x00\x31\x00\x32\x00\x0c\x00\x57\x00\x44\x00\x45\x00\x46\x00\x47\x00\x12\x00\x03\x00\x3b\x00\x01\x00\x16\x00\x02\x00\x18\x00\x03\x00\x1a\x00\x07\x00\x08\x00\x09\x00\x1e\x00\x30\x00\x31\x00\x32\x00\x0f\x00\x02\x00\x38\x00\x04\x00\x1b\x00\x06\x00\x0b\x00\x0c\x00\x3b\x00\x31\x00\x32\x00\x0c\x00\x05\x00\x44\x00\x45\x00\x46\x00\x47\x00\x12\x00\x05\x00\x3b\x00\x08\x00\x16\x00\x02\x00\x18\x00\x04\x00\x1a\x00\x06\x00\x4f\x00\x50\x00\x1e\x00\x47\x00\x02\x00\x0c\x00\x04\x00\x44\x00\x45\x00\x46\x00\x47\x00\x12\x00\x31\x00\x32\x00\x08\x00\x16\x00\x04\x00\x18\x00\x1b\x00\x1a\x00\x12\x00\x05\x00\x3b\x00\x1e\x00\x16\x00\x44\x00\x18\x00\x04\x00\x1a\x00\x38\x00\x12\x00\x04\x00\x1e\x00\x13\x00\x16\x00\x19\x00\x18\x00\x04\x00\x1a\x00\x1a\x00\x44\x00\x45\x00\x46\x00\x47\x00\x13\x00\x21\x00\x22\x00\x23\x00\x24\x00\x25\x00\x35\x00\x36\x00\x37\x00\x38\x00\x21\x00\x22\x00\x23\x00\x24\x00\x25\x00\x37\x00\x38\x00\x44\x00\x45\x00\x46\x00\x47\x00\x3d\x00\x3e\x00\x46\x00\x47\x00\x47\x00\x44\x00\x45\x00\x46\x00\x47\x00\x04\x00\x53\x00\x54\x00\x55\x00\x56\x00\x04\x00\x44\x00\x45\x00\x46\x00\x47\x00\x57\x00\x4e\x00\x4f\x00\x50\x00\x12\x00\x08\x00\x0b\x00\x57\x00\x16\x00\x12\x00\x18\x00\x10\x00\x1a\x00\x16\x00\x13\x00\x18\x00\x04\x00\x1a\x00\x0b\x00\x21\x00\x22\x00\x23\x00\x24\x00\x25\x00\x21\x00\x22\x00\x23\x00\x24\x00\x25\x00\x43\x00\x12\x00\x54\x00\x55\x00\x56\x00\x16\x00\x47\x00\x18\x00\x47\x00\x1a\x00\x2d\x00\x2e\x00\x2f\x00\x30\x00\x31\x00\x32\x00\x21\x00\x22\x00\x23\x00\x24\x00\x25\x00\x4e\x00\x4f\x00\x50\x00\x3b\x00\x44\x00\x45\x00\x46\x00\x47\x00\x25\x00\x44\x00\x45\x00\x46\x00\x47\x00\x2a\x00\x2b\x00\x19\x00\x37\x00\x38\x00\x3f\x00\x40\x00\x04\x00\x25\x00\x3d\x00\x3e\x00\x0b\x00\x04\x00\x2a\x00\x2b\x00\x3f\x00\x40\x00\x44\x00\x45\x00\x46\x00\x47\x00\x12\x00\x3f\x00\x40\x00\x08\x00\x16\x00\x12\x00\x18\x00\x43\x00\x1a\x00\x16\x00\x1a\x00\x18\x00\x04\x00\x1a\x00\x57\x00\x21\x00\x22\x00\x23\x00\x24\x00\x25\x00\x21\x00\x22\x00\x23\x00\x24\x00\x25\x00\x47\x00\x12\x00\x41\x00\x42\x00\x47\x00\x16\x00\x25\x00\x18\x00\x25\x00\x1a\x00\x1f\x00\x2a\x00\x2b\x00\x2a\x00\x2b\x00\x13\x00\x21\x00\x22\x00\x23\x00\x24\x00\x25\x00\x53\x00\x54\x00\x55\x00\x56\x00\x44\x00\x45\x00\x46\x00\x47\x00\x25\x00\x44\x00\x45\x00\x46\x00\x47\x00\x2a\x00\x2b\x00\x53\x00\x54\x00\x55\x00\x56\x00\x4f\x00\x50\x00\x1b\x00\x37\x00\x38\x00\x35\x00\x36\x00\x37\x00\x38\x00\x3d\x00\x3e\x00\x44\x00\x45\x00\x46\x00\x47\x00\x28\x00\x47\x00\x2a\x00\x2b\x00\x2c\x00\x2d\x00\x1b\x00\x46\x00\x47\x00\x1f\x00\x1b\x00\x33\x00\x34\x00\x35\x00\x36\x00\x41\x00\x42\x00\x39\x00\x3a\x00\x10\x00\x57\x00\x3d\x00\x19\x00\x28\x00\x57\x00\x2a\x00\x2b\x00\x2c\x00\x2d\x00\x41\x00\x42\x00\x04\x00\x48\x00\x1b\x00\x33\x00\x34\x00\x35\x00\x36\x00\x4c\x00\x4d\x00\x39\x00\x3a\x00\x51\x00\x52\x00\x3d\x00\x47\x00\x28\x00\x25\x00\x2a\x00\x2b\x00\x2c\x00\x2d\x00\x2a\x00\x2b\x00\x18\x00\x48\x00\x1b\x00\x33\x00\x34\x00\x35\x00\x36\x00\x51\x00\x52\x00\x39\x00\x3a\x00\x4c\x00\x4d\x00\x3d\x00\x1b\x00\x28\x00\x1b\x00\x2a\x00\x2b\x00\x2c\x00\x2d\x00\x01\x00\x02\x00\x11\x00\x48\x00\x1b\x00\x33\x00\x34\x00\x35\x00\x36\x00\x46\x00\x47\x00\x39\x00\x3a\x00\x0f\x00\x1b\x00\x3d\x00\x04\x00\x28\x00\x11\x00\x2a\x00\x2b\x00\x2c\x00\x2d\x00\x1b\x00\x47\x00\x0b\x00\x48\x00\x47\x00\x33\x00\x34\x00\x35\x00\x36\x00\x08\x00\x11\x00\x39\x00\x3a\x00\x05\x00\x2e\x00\x3d\x00\x35\x00\x36\x00\x37\x00\x38\x00\x35\x00\x36\x00\x37\x00\x38\x00\x1b\x00\x0b\x00\x48\x00\x35\x00\x36\x00\x37\x00\x38\x00\x47\x00\x47\x00\x46\x00\x47\x00\x05\x00\x47\x00\x46\x00\x47\x00\x35\x00\x36\x00\x37\x00\x38\x00\x45\x00\x15\x00\x37\x00\x38\x00\x13\x00\x2e\x00\x19\x00\x57\x00\x3d\x00\x3e\x00\x1b\x00\x57\x00\x45\x00\x47\x00\x25\x00\x08\x00\x47\x00\x13\x00\x57\x00\x2a\x00\x2b\x00\x2c\x00\x2d\x00\x2e\x00\x2f\x00\x30\x00\x31\x00\x32\x00\x19\x00\x13\x00\x57\x00\x47\x00\x13\x00\x13\x00\x57\x00\x13\x00\x3b\x00\x2c\x00\x2d\x00\x2e\x00\x2f\x00\x30\x00\x31\x00\x32\x00\x43\x00\x0b\x00\x13\x00\x47\x00\x10\x00\x47\x00\x13\x00\x10\x00\x3b\x00\x2c\x00\x2d\x00\x2e\x00\x2f\x00\x30\x00\x31\x00\x32\x00\x43\x00\x47\x00\x13\x00\x47\x00\x1b\x00\x48\x00\x49\x00\x47\x00\x3b\x00\x2c\x00\x2d\x00\x2e\x00\x2f\x00\x30\x00\x31\x00\x32\x00\x43\x00\x37\x00\x37\x00\x1b\x00\x1b\x00\x48\x00\x49\x00\x11\x00\x3b\x00\x2c\x00\x2d\x00\x2e\x00\x2f\x00\x30\x00\x31\x00\x32\x00\x43\x00\x11\x00\x1b\x00\x11\x00\x0e\x00\x48\x00\x49\x00\x47\x00\x3b\x00\x2c\x00\x2d\x00\x2e\x00\x2f\x00\x30\x00\x31\x00\x32\x00\x43\x00\x44\x00\x1b\x00\x47\x00\x1a\x00\x19\x00\x1b\x00\x47\x00\x3b\x00\x2c\x00\x2d\x00\x2e\x00\x2f\x00\x30\x00\x31\x00\x32\x00\x43\x00\x44\x00\x0e\x00\x0e\x00\x0e\x00\x15\x00\x07\x00\x19\x00\x3b\x00\x11\x00\x1b\x00\x47\x00\x13\x00\x44\x00\x41\x00\x42\x00\x43\x00\x2c\x00\x2d\x00\x2e\x00\x2f\x00\x30\x00\x31\x00\x32\x00\x11\x00\x1b\x00\x20\x00\x1f\x00\x11\x00\x13\x00\x1a\x00\x1f\x00\x3b\x00\x0e\x00\x0e\x00\x05\x00\x47\x00\x47\x00\x41\x00\x42\x00\x43\x00\x2c\x00\x2d\x00\x2e\x00\x2f\x00\x30\x00\x31\x00\x32\x00\x33\x00\x46\x00\x0e\x00\x47\x00\x47\x00\x10\x00\x15\x00\x1b\x00\x3b\x00\x19\x00\x47\x00\x0d\x00\x14\x00\x0b\x00\x0b\x00\x37\x00\x43\x00\x2c\x00\x2d\x00\x2e\x00\x2f\x00\x30\x00\x31\x00\x32\x00\x33\x00\x47\x00\x11\x00\x2e\x00\x0e\x00\x47\x00\x13\x00\x00\x00\x3b\x00\x11\x00\x11\x00\x47\x00\x11\x00\x47\x00\x47\x00\x11\x00\x43\x00\x2c\x00\x2d\x00\x2e\x00\x2f\x00\x30\x00\x31\x00\x32\x00\x33\x00\x11\x00\x11\x00\x11\x00\x11\x00\x11\x00\x47\x00\x1a\x00\x3b\x00\x0d\x00\x48\x00\x0e\x00\x0a\x00\x47\x00\x47\x00\xff\xff\x43\x00\x2c\x00\x2d\x00\x2e\x00\x2f\x00\x30\x00\x31\x00\x32\x00\x33\x00\x1a\x00\x1a\x00\x47\x00\x47\x00\x1f\x00\x48\x00\x48\x00\x3b\x00\x2c\x00\x2d\x00\x2e\x00\x2f\x00\x30\x00\x31\x00\x32\x00\x43\x00\x20\x00\x48\x00\x47\x00\xff\xff\xff\xff\x47\x00\x47\x00\x3b\x00\x2c\x00\x2d\x00\x2e\x00\x2f\x00\x30\x00\x31\x00\x32\x00\x43\x00\x2f\x00\x2f\x00\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\x3b\x00\x2c\x00\x2d\x00\x2e\x00\x2f\x00\x30\x00\x31\x00\x32\x00\x43\x00\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\x3b\x00\x2c\x00\x2d\x00\x2e\x00\x2f\x00\x30\x00\x31\x00\x32\x00\x43\x00\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\x3b\x00\x2c\x00\x2d\x00\x2e\x00\x2f\x00\x30\x00\x31\x00\x32\x00\x43\x00\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\x3b\x00\x2c\x00\x2d\x00\x2e\x00\x2f\x00\x30\x00\x31\x00\x32\x00\x43\x00\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\x3b\x00\x2c\x00\x2d\x00\x2e\x00\x2f\x00\x30\x00\x31\x00\x32\x00\x43\x00\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\x3b\x00\x2c\x00\x2d\x00\x2e\x00\x2f\x00\x30\x00\x31\x00\x32\x00\x43\x00\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\x3b\x00\x2c\x00\x2d\x00\x2e\x00\x2f\x00\x30\x00\x31\x00\x32\x00\x43\x00\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\x3b\x00\x2c\x00\x2d\x00\x2e\x00\x2f\x00\x30\x00\x31\x00\x32\x00\x43\x00\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\x3b\x00\x2c\x00\x2d\x00\x2e\x00\x2f\x00\x30\x00\x31\x00\x32\x00\x43\x00\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\x3b\x00\x2c\x00\x2d\x00\x2e\x00\x2f\x00\x30\x00\x31\x00\x32\x00\x43\x00\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\x3b\x00\x2c\x00\x2d\x00\x2e\x00\x2f\x00\x30\x00\x31\x00\x32\x00\x43\x00\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\x3b\x00\x2c\x00\x2d\x00\x2e\x00\x2f\x00\x30\x00\x31\x00\x32\x00\x43\x00\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\x3b\x00\x2c\x00\x2d\x00\x2e\x00\x2f\x00\x30\x00\x31\x00\x32\x00\x43\x00\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\x3b\x00\x2c\x00\x2d\x00\x2e\x00\x2f\x00\x30\x00\x31\x00\x32\x00\x43\x00\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\x3b\x00\x2c\x00\x2d\x00\x2e\x00\x2f\x00\x30\x00\x31\x00\x32\x00\x43\x00\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\x3b\x00\x2c\x00\x2d\x00\x2e\x00\x2f\x00\x30\x00\x31\x00\x32\x00\x43\x00\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\x3b\x00\x2c\x00\x2d\x00\x2e\x00\x2f\x00\x30\x00\x31\x00\x32\x00\x43\x00\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\x3b\x00\x2c\x00\x2d\x00\x2e\x00\x2f\x00\x30\x00\x31\x00\x32\x00\x43\x00\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\x3b\x00\x2c\x00\x2d\x00\x2e\x00\x2f\x00\x30\x00\x31\x00\x32\x00\x43\x00\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\x3b\x00\x2c\x00\x2d\x00\x2e\x00\x2f\x00\x30\x00\x31\x00\x32\x00\x43\x00\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\x3b\x00\x2c\x00\x2d\x00\x2e\x00\x2f\x00\x30\x00\x31\x00\x32\x00\x43\x00\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\x3b\x00\x2c\x00\x2d\x00\x2e\x00\x2f\x00\x30\x00\x31\x00\x32\x00\x43\x00\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\x3b\x00\x2c\x00\x2d\x00\x2e\x00\x2f\x00\x30\x00\x31\x00\x32\x00\x43\x00\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\x3b\x00\x2c\x00\x2d\x00\x2e\x00\x2f\x00\x30\x00\x31\x00\x32\x00\x43\x00\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\x3b\x00\x2c\x00\x2d\x00\x2e\x00\x2f\x00\x30\x00\x31\x00\x32\x00\x43\x00\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\x3b\x00\x2c\x00\x2d\x00\x2e\x00\x2f\x00\x30\x00\x31\x00\x32\x00\x43\x00\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\x3b\x00\x2c\x00\x2d\x00\x2e\x00\x2f\x00\x30\x00\x31\x00\x32\x00\x43\x00\x28\x00\xff\xff\x2a\x00\x2b\x00\x2c\x00\x2d\x00\xff\xff\x3b\x00\xff\xff\xff\xff\xff\xff\x33\x00\x34\x00\x35\x00\x36\x00\x43\x00\xff\xff\x39\x00\x3a\x00\xff\xff\xff\xff\x3d\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"#
happyTable :: HappyAddr
happyTable = HappyA# "\x00\x00\x46\x01\x47\x01\xee\x01\x09\x02\x90\x01\xfe\x01\x89\x01\x8a\x01\x5f\x00\x48\x01\x49\x01\xef\x01\xff\x01\x8b\x01\x8c\x01\x8f\x01\x90\x01\xb6\x01\x90\x01\xb4\x01\x01\x02\x02\x02\x40\x01\x45\x00\xb1\x01\x5f\x00\xb8\x01\x53\x00\x53\x00\x93\x01\x59\x00\x32\x02\x5c\x00\x59\x00\x97\x00\x5c\x00\x1e\x01\x45\x00\xb9\x01\x60\x00\x33\x01\x2f\x01\x54\x00\x5a\x00\x48\x00\x3d\x01\xa2\x00\xc2\x00\x5d\x00\x48\x00\x46\x00\x96\x01\x21\x01\x96\x01\x33\x02\x89\x00\x50\x00\x49\x00\xad\x00\x35\x02\x50\x00\x2c\x01\x4b\x00\x9a\x00\xa3\x00\x51\x00\x4b\x00\xf7\xfe\x4b\x00\x9b\x00\x9c\x00\x9d\x00\x42\x00\x2a\x01\x07\x00\x20\xff\x53\x01\x1c\x01\x2f\x02\x1d\x01\x61\x00\x91\x01\x9e\x00\x4a\x01\x4a\x01\x4a\x01\x19\x00\x4a\x01\x1a\x00\x34\x01\xe5\x00\x47\x00\x4a\x01\x91\x01\x4a\x01\x91\x01\xfb\x00\x61\x00\x55\x00\x55\x00\x5b\x00\x5e\x00\x1b\x00\x5b\x00\x5e\x00\x47\x00\x1c\x00\x97\x01\x1d\x00\xba\x01\x87\x00\x4a\x00\x1f\x00\x20\x00\x7c\x00\xc3\x00\x4a\x00\x21\x00\x22\x00\x23\x00\x24\x00\x25\x00\x52\x00\x26\x00\xae\x00\xaf\x00\x52\x00\x4d\x00\x9f\x00\x1a\x01\x27\x00\x4d\x00\x71\x01\x4d\x00\x28\x00\x29\x00\x2a\x00\x28\x01\x09\x01\x4b\x00\x19\x00\x29\x01\x1a\x00\x2b\x00\x2c\x00\x0b\x01\x4b\x00\x2d\x00\x2e\x00\x2f\x00\x4c\x00\xd4\x01\x30\x00\x31\x00\x32\x00\x88\x00\x1b\x00\x4e\x00\x4b\x00\x1f\x02\x1c\x00\x1d\x02\x1d\x00\x89\x00\x1e\x00\x01\x01\x1f\x00\x20\x00\x56\x00\x4f\x00\x56\x00\x21\x00\x22\x00\x23\x00\x24\x00\x25\x00\x27\x01\x26\x00\x09\x01\x31\x01\x20\x02\x57\x00\x2a\x01\xd4\x01\x27\x00\x8e\x01\x0b\x01\x8e\x01\x28\x00\x29\x00\x2a\x00\x28\x01\x0c\x01\xd5\x01\x19\x00\x29\x01\x1a\x00\x2b\x00\x2c\x00\x24\x02\x26\xff\x2d\x00\x2e\x00\x2f\x00\x4d\x00\x26\xff\x30\x00\x31\x00\x32\x00\x33\x00\x1b\x00\x4d\x00\x02\x01\xd6\x01\x1c\x00\x8f\x01\x1d\x00\x8f\x01\x1e\x00\x5b\x01\x1f\x00\x20\x00\x88\x00\x4d\x00\x8e\x01\x21\x00\x22\x00\x23\x00\x24\x00\x25\x00\xfb\x00\x26\x00\x58\x00\x0c\x01\x58\x00\x29\x02\x2a\x01\xe9\x01\x27\x00\x75\x00\x72\x01\x5d\x01\x28\x00\x29\x00\x2a\x00\xd6\x01\x23\x02\xf1\x01\x19\x00\x16\x00\x1a\x00\x2b\x00\x2c\x00\x89\x00\x8f\x01\x2d\x00\x2e\x00\x2f\x00\xe6\x00\x2a\x02\x30\x00\x31\x00\x32\x00\xc0\x00\x1b\x00\x11\x02\x3f\x01\x80\x00\x1c\x00\xfb\x00\x1d\x00\xc4\x00\x1e\x00\x5b\x01\x1f\x00\x20\x00\x06\x01\x14\x01\xcf\x01\x21\x00\x22\x00\x23\x00\x24\x00\x25\x00\x76\x00\x26\x00\x2b\x02\xc2\x01\xc9\x00\xca\x00\xcb\x00\xc5\x00\x27\x00\x94\x01\xc6\x00\x5d\x01\x28\x00\x29\x00\x2a\x00\x06\x01\x07\x01\x08\x01\x19\x00\xda\x00\x6b\x00\x2b\x00\x2c\x00\x0f\x02\xdb\x00\x2d\x00\x2e\x00\x2f\x00\x81\x00\x82\x00\x30\x00\x31\x00\x32\x00\x33\x00\x1b\x00\x25\x02\xf1\x01\xcd\x00\x1c\x00\x71\x01\x1d\x00\x09\x01\x1e\x00\x5b\x01\x06\x01\x11\x01\x12\x01\x4c\x01\x15\x02\x21\x00\x22\x00\x23\x00\x24\x00\x25\x00\x7b\x00\x26\x00\x97\x00\x15\x00\x7c\x00\x06\x01\x14\x01\x15\x01\xfb\x00\x18\x02\x09\x01\x5d\x01\x16\x00\x29\x00\x2a\x00\x06\x01\x17\x01\x18\x01\x19\x00\x19\x02\x6b\x00\x2b\x00\x2c\x00\x1a\x02\x7b\x00\x2d\x00\x2e\x00\x2f\x00\x7c\x00\x1b\x02\x30\x00\x31\x00\x32\x00\x33\x00\x1b\x00\x69\x00\xd8\x01\x41\x01\x1c\x00\x09\x01\x1d\x00\x03\x02\x1e\x00\xc4\x00\x16\x00\x7d\x00\x16\x00\xda\x01\x94\x01\x21\x00\x22\x00\x23\x00\x24\x00\x25\x00\x09\x01\x26\x00\xf6\xfe\xf6\xfe\xf6\xfe\xf6\xfe\xf6\xfe\x42\x01\x1e\x02\xc5\x00\x09\x01\xdc\x01\x9f\x01\x29\x00\x2a\x00\x7d\x00\x93\x01\x41\x01\xbb\x00\x14\x00\x15\x00\x2b\x00\x2c\x00\x94\x01\xde\x01\x2d\x00\x16\x00\x2f\x00\x41\x01\x16\x00\x30\x00\x31\x00\x32\x00\x33\x00\x8b\x00\xe0\x01\x8c\x00\x16\x00\xcf\x00\xe1\x01\xf6\xfe\x42\x01\xbb\x01\xe6\x00\xd0\x00\xc8\x01\xf7\xfe\xc9\x01\x98\xff\xe3\x01\x8d\x00\x98\xff\x42\x01\xbe\x01\x8e\x00\x53\x01\x8f\x00\x8b\x00\x3c\x01\x8c\x00\xc4\x00\xcf\x00\x91\x00\x9e\x01\xc9\x00\xca\x00\xcb\x00\xd0\x00\x5b\x01\xf7\xfe\x77\x01\xe4\x01\x57\x01\x8d\x00\xa8\x01\xca\x00\xcb\x00\x8e\x00\x53\x01\x8f\x00\xc5\x00\x3c\x01\xe5\x01\xc6\x00\x41\x01\x91\x00\xd1\x00\xc9\x00\xca\x00\xcb\x00\x5d\x01\xe6\x01\x23\x01\x16\x00\x8b\x00\x24\x01\x8c\x00\xcd\x00\xcf\x00\xea\x01\x92\x00\x93\x00\x94\x00\x3d\x01\xd0\x00\xeb\x01\xf7\xfe\xcd\x00\x42\x01\x43\x01\x8d\x00\xaa\x01\xca\x00\xcb\x00\x8e\x00\x53\x01\x8f\x00\x84\x01\x3c\x01\x85\x01\xcd\x00\xf3\x01\x91\x00\x92\x00\x93\x00\x94\x00\x3d\x01\x8b\x00\x71\x00\x8c\x00\x05\x02\xcf\x00\x86\x01\x72\x00\x5f\x01\x64\x00\x27\x01\xd0\x00\x65\x00\xed\x00\xc9\x00\xca\x00\xcb\x00\x8d\x00\xcd\x00\x66\x00\x67\x00\x8e\x00\x8b\x00\x8f\x00\x8c\x00\x3c\x01\xcf\x00\x28\x02\xf1\x01\x91\x00\xee\x00\xa5\x01\xd0\x00\x68\x00\x92\x00\x93\x00\x94\x00\x3d\x01\x8d\x00\xf7\x00\x5b\x01\xf8\x00\x8e\x00\xb5\x01\x8f\x00\xea\x00\x3c\x01\xcd\x00\xeb\x00\xbd\x01\x91\x00\x5c\x01\xbc\x00\x14\x00\x15\x00\x8b\x00\x67\x01\x8c\x00\xc0\x01\xcf\x00\xcd\x01\x44\x00\x5d\x01\x16\x00\x1f\x01\xd0\x00\x45\x00\x92\x00\x93\x00\x94\x00\x3d\x01\x8d\x00\xeb\x00\x15\x00\x62\x01\x8e\x00\x8b\x00\x8f\x00\x8c\x00\x90\x00\xcf\x00\xd2\x00\x16\x00\x91\x00\xec\x00\x15\x00\xd0\x00\x35\x01\x92\x00\x93\x00\x94\x00\x3d\x01\x8d\x00\xdb\x00\x16\x00\x69\x01\x8e\x00\xdb\x00\x8f\x00\xdc\x00\x90\x00\xe0\x00\x16\x00\xc0\x00\x91\x00\xf9\x00\x16\x00\xea\x00\x03\x01\x8b\x00\xeb\x00\x8c\x00\xfb\x00\xcf\x00\xba\x00\xb7\x00\x13\x00\x14\x00\x15\x00\xd0\x00\x0f\x01\x92\x00\x93\x00\x94\x00\xd1\x00\x8d\x00\xfc\x00\x16\x00\xfd\x00\x8e\x00\x8b\x00\x8f\x00\x8c\x00\x3c\x01\xcf\x00\xf0\x01\xf1\x01\x91\x00\x6e\x00\x15\x00\xd0\x00\xfe\x00\x92\x00\x93\x00\x94\x00\xf6\x00\x8d\x00\x62\x00\x16\x00\x9a\x00\x8e\x00\x07\x00\x8f\x00\xa6\x00\x90\x00\x9b\x00\x9c\x00\x9d\x00\x91\x00\xbd\x00\x14\x00\x15\x00\x35\x00\x8b\x00\x4c\x01\x8c\x00\x2d\x02\xcf\x00\x00\x02\xf1\x01\x16\x00\x76\x00\x15\x00\xd0\x00\x35\x02\x92\x00\x93\x00\x94\x00\x3d\x01\x8d\x00\x2e\x02\x16\x00\x2f\x02\x8e\x00\x8b\x00\x8f\x00\x8c\x00\x90\x00\xcf\x00\x9c\x01\xb1\x00\x91\x00\xfb\x00\x8b\x00\xd0\x00\x8c\x00\x92\x00\x93\x00\x94\x00\xd1\x00\x8d\x00\x97\x00\x15\x00\x31\x02\x8e\x00\x45\x01\x8f\x00\x32\x02\x90\x00\x8d\x00\x22\x02\x16\x00\x91\x00\x8e\x00\x23\x02\x8f\x00\xf3\x01\x90\x00\x4c\x01\x1b\x00\xf3\x01\x91\x00\x27\x02\x1c\x00\x28\x02\x1d\x00\xf3\x01\x1e\x00\x09\x02\x92\x00\x93\x00\xf1\x00\xf2\x00\x0b\x02\x21\x00\x22\x00\x23\x00\x24\x00\x25\x00\xed\x00\xc9\x00\xca\x00\xcb\x00\x21\x00\x22\x00\x23\x00\x24\x00\x25\x00\x37\x01\x38\x01\x92\x00\x93\x00\x94\x00\xf6\x00\xfc\x01\x3a\x01\xee\x00\xab\x01\xfb\x00\x92\x00\x93\x00\x94\x00\x95\x00\x6b\x00\x99\x01\xa9\x00\xaa\x00\xab\x00\x6b\x00\x30\x00\x31\x00\x32\x00\x33\x00\xcd\x00\x9b\x01\xb0\x00\xb1\x00\x1b\x00\x0c\x02\xe6\x00\x89\x00\x1c\x00\x1b\x00\x1d\x00\x98\xff\x1e\x00\x1c\x00\x98\xff\x1d\x00\x6b\x00\x99\x00\x96\x01\x21\x00\x22\x00\x23\x00\x24\x00\x25\x00\x21\x00\x22\x00\x23\x00\x24\x00\x25\x00\x0d\x02\x1b\x00\x86\x01\xaa\x00\xab\x00\x1c\x00\x76\x00\x1d\x00\xfb\x00\x1e\x00\xb6\x00\x11\x00\xb7\x00\x13\x00\x14\x00\x15\x00\x21\x00\x22\x00\x23\x00\x24\x00\x25\x00\xaf\x00\xb0\x00\xb1\x00\x16\x00\x30\x00\x31\x00\x32\x00\x33\x00\x71\x00\x30\x00\x31\x00\x32\x00\x33\x00\x72\x00\x7d\x01\x11\x02\x37\x01\x38\x01\x24\x01\xd1\x01\x6b\x00\xd5\x00\xc3\x01\x3a\x01\x13\x02\x6b\x00\x72\x00\x7e\x00\x24\x01\x25\x01\x30\x00\x31\x00\x32\x00\x33\x00\x1b\x00\x24\x01\x2e\x01\x14\x02\x1c\x00\x1b\x00\x1d\x00\x15\x02\x6c\x00\x1c\x00\x17\x02\x1d\x00\x6b\x00\x1e\x00\x89\x00\x21\x00\x22\x00\x23\x00\x24\x00\x25\x00\x21\x00\x22\x00\x23\x00\x24\x00\x25\x00\xc2\x01\x1b\x00\x78\x00\x64\x01\xd8\x01\x1c\x00\x71\x00\x1d\x00\x71\x00\x99\x00\xda\x01\x72\x00\xe6\x00\x72\x00\x73\x00\xdc\x01\x21\x00\x22\x00\x23\x00\x24\x00\x25\x00\x82\x01\xa9\x00\xaa\x00\xab\x00\x30\x00\x31\x00\x32\x00\x33\x00\x71\x00\x30\x00\x31\x00\x32\x00\x33\x00\x72\x00\x7e\x00\xa8\x00\xa9\x00\xaa\x00\xab\x00\x7f\x01\xb1\x00\xa8\xff\x37\x01\x38\x01\xed\x00\xc9\x00\xca\x00\xcb\x00\x39\x01\x3a\x01\x30\x00\x31\x00\x32\x00\x33\x00\xa8\xff\xcf\x01\xa8\xff\xa8\xff\xa8\xff\xa8\xff\xe0\x01\xee\x00\xf4\x00\xea\x01\x9e\xff\xa8\xff\xa8\xff\xa8\xff\xa8\xff\x78\x00\x79\x00\xa8\xff\xa8\xff\xed\x01\x89\x00\xa8\xff\xee\x01\x9e\xff\xcd\x00\x9e\xff\x9e\xff\x9e\xff\x9e\xff\x78\x00\x7d\x00\xf3\x01\xa8\xff\xac\xff\x9e\xff\x9e\xff\x9e\xff\x9e\xff\xa3\x00\x0d\x00\x9e\xff\x9e\xff\xa5\x00\x0a\x00\x9e\xff\x76\x00\xac\xff\x71\x00\xac\xff\xac\xff\xac\xff\xac\xff\x72\x00\x7e\x00\xf5\x01\x9e\xff\xaa\xff\xac\xff\xac\xff\xac\xff\xac\xff\x09\x00\x0a\x00\xac\xff\xac\xff\x0c\x00\x0d\x00\xac\xff\xf6\x01\xaa\xff\xf7\x01\xaa\xff\xaa\xff\xaa\xff\xaa\xff\x33\x00\x34\x00\xf8\x01\xac\xff\xa6\xff\xaa\xff\xaa\xff\xaa\xff\xaa\xff\xb3\x00\xb4\x00\xaa\xff\xaa\xff\xf9\x01\xfc\x01\xaa\xff\xf3\x01\xa6\xff\xfe\x01\xa6\xff\xa6\xff\xa6\xff\xa6\xff\x05\x02\xfb\x00\x07\x02\xaa\xff\xfb\x00\xa6\xff\xa6\xff\xa6\xff\xa6\xff\x98\x01\x99\x01\xa6\xff\xa6\xff\x9b\x01\x08\x02\xa6\xff\xed\x00\xc9\x00\xca\x00\xcb\x00\xed\x00\xc9\x00\xca\x00\xcb\x00\x9e\x01\xda\x00\xa6\xff\xc8\x00\xc9\x00\xca\x00\xcb\x00\x76\x00\xa2\x01\xee\x00\x4f\x01\xa4\x01\xa3\x01\xee\x00\xef\x00\xc8\x00\xc9\x00\xca\x00\xcb\x00\xa0\x01\xa5\x01\x37\x01\x38\x01\xa8\x01\xa7\x01\xb3\x01\xcd\x00\x51\x01\x3a\x01\xb4\x01\xcd\x00\xcc\x00\xfb\x00\x71\x00\xbb\x01\xc2\x01\xc5\x01\xcd\x00\x72\x00\x7e\x00\xbe\x00\x10\x00\x11\x00\x12\x00\x13\x00\x14\x00\x15\x00\xc7\x01\xcb\x01\xcd\x00\xcf\x01\xd1\x01\x21\x01\x89\x00\x2c\x01\x16\x00\xac\x01\x10\x00\x11\x00\x12\x00\x13\x00\x14\x00\x15\x00\x17\x00\x27\x01\x2e\x01\xf6\xfe\x31\x01\xf6\xfe\x33\x01\x40\x01\x16\x00\xac\x01\x10\x00\x11\x00\x12\x00\x13\x00\x14\x00\x15\x00\x17\x00\x0c\x01\x37\x01\xf6\xfe\x4f\x01\xad\x01\x0e\x02\x46\x01\x16\x00\xac\x01\x10\x00\x11\x00\x12\x00\x13\x00\x14\x00\x15\x00\x17\x00\x4d\x01\x4e\x01\x54\x01\x55\x01\xad\x01\xae\x01\x56\x01\x16\x00\x6b\x01\x10\x00\x11\x00\x12\x00\x13\x00\x14\x00\x15\x00\x17\x00\x58\x01\x59\x01\x5a\x01\x97\x00\xad\x01\xaf\x01\x76\x00\x16\x00\x82\x00\x10\x00\x11\x00\x12\x00\x13\x00\x14\x00\x15\x00\x17\x00\x6c\x01\x62\x01\x76\x00\x64\x01\x69\x01\x67\x01\x6f\x01\x16\x00\x84\x00\x10\x00\x11\x00\x12\x00\x13\x00\x14\x00\x15\x00\x17\x00\x83\x00\xf7\xfe\x70\x01\x74\x01\x75\x01\x76\x01\x78\x01\x16\x00\x7a\x01\x79\x01\x76\x00\x7b\x01\x7c\x01\x78\x00\xbc\x01\x17\x00\x84\x00\x10\x00\x11\x00\x12\x00\x13\x00\x14\x00\x15\x00\x82\x01\x7d\x01\x7f\x01\x81\x01\x89\x01\xa8\x00\xb9\x00\x88\x01\x16\x00\x97\x00\xf7\xfe\xd8\x00\xb5\x00\x76\x00\x78\x00\x85\x00\x17\x00\xf2\x00\x10\x00\x11\x00\x12\x00\x13\x00\x14\x00\x15\x00\xb0\x01\xc8\x00\xd5\x00\xd4\x00\x76\x00\xd7\x00\xd9\x00\xdf\x00\x16\x00\xde\x00\x76\x00\xe0\x00\xe2\x00\xe3\x00\xe6\x00\xe4\x00\x17\x00\xf2\x00\x10\x00\x11\x00\x12\x00\x13\x00\x14\x00\x15\x00\x50\x01\x76\x00\xe9\x00\xe8\x00\x97\x00\xfb\x00\x00\x01\xff\xff\x16\x00\x03\x01\x06\x01\x05\x01\x0d\x01\x0e\x01\x76\x00\x0f\x01\x17\x00\xf2\x00\x10\x00\x11\x00\x12\x00\x13\x00\x14\x00\x15\x00\xf3\x00\x11\x01\x14\x01\x17\x01\x1a\x01\x1c\x01\x0c\x01\x69\x00\x16\x00\x96\x00\xff\xff\x97\x00\xa0\x00\x70\x00\x71\x00\x00\x00\x17\x00\xf2\x00\x10\x00\x11\x00\x12\x00\x13\x00\x14\x00\x15\x00\xf8\x00\x6d\x00\x6e\x00\x76\x00\x0f\x00\xa1\x00\xff\xff\xff\xff\x16\x00\x0d\x02\x10\x00\x11\x00\x12\x00\x13\x00\x14\x00\x15\x00\x17\x00\xa5\x00\xff\xff\x0c\x00\x00\x00\x00\x00\x0c\x00\x0f\x00\x16\x00\x17\x02\x10\x00\x11\x00\x12\x00\x13\x00\x14\x00\x15\x00\x17\x00\x09\x00\x09\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x16\x00\x1c\x02\x10\x00\x11\x00\x12\x00\x13\x00\x14\x00\x15\x00\x17\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x16\x00\xdd\x01\x10\x00\x11\x00\x12\x00\x13\x00\x14\x00\x15\x00\x17\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x16\x00\xe2\x01\x10\x00\x11\x00\x12\x00\x13\x00\x14\x00\x15\x00\x17\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x16\x00\xe7\x01\x10\x00\x11\x00\x12\x00\x13\x00\x14\x00\x15\x00\x17\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x16\x00\xf9\x01\x10\x00\x11\x00\x12\x00\x13\x00\x14\x00\x15\x00\x17\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x16\x00\xfa\x01\x10\x00\x11\x00\x12\x00\x13\x00\x14\x00\x15\x00\x17\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x16\x00\xa9\x01\x10\x00\x11\x00\x12\x00\x13\x00\x14\x00\x15\x00\x17\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x16\x00\xbf\x01\x10\x00\x11\x00\x12\x00\x13\x00\x14\x00\x15\x00\x17\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x16\x00\xc5\x01\x10\x00\x11\x00\x12\x00\x13\x00\x14\x00\x15\x00\x17\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x16\x00\xc9\x01\x10\x00\x11\x00\x12\x00\x13\x00\x14\x00\x15\x00\x17\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x16\x00\xcb\x01\x10\x00\x11\x00\x12\x00\x13\x00\x14\x00\x15\x00\x17\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x16\x00\xcc\x01\x10\x00\x11\x00\x12\x00\x13\x00\x14\x00\x15\x00\x17\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x16\x00\xd2\x01\x10\x00\x11\x00\x12\x00\x13\x00\x14\x00\x15\x00\x17\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x16\x00\xd3\x01\x10\x00\x11\x00\x12\x00\x13\x00\x14\x00\x15\x00\x17\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x16\x00\x5d\x01\x10\x00\x11\x00\x12\x00\x13\x00\x14\x00\x15\x00\x17\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x16\x00\x5e\x01\x10\x00\x11\x00\x12\x00\x13\x00\x14\x00\x15\x00\x17\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x16\x00\x60\x01\x10\x00\x11\x00\x12\x00\x13\x00\x14\x00\x15\x00\x17\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x16\x00\x65\x01\x10\x00\x11\x00\x12\x00\x13\x00\x14\x00\x15\x00\x17\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x16\x00\x67\x01\x10\x00\x11\x00\x12\x00\x13\x00\x14\x00\x15\x00\x17\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x16\x00\x6a\x01\x10\x00\x11\x00\x12\x00\x13\x00\x14\x00\x15\x00\x17\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x16\x00\x6d\x01\x10\x00\x11\x00\x12\x00\x13\x00\x14\x00\x15\x00\x17\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x16\x00\xb5\x00\x10\x00\x11\x00\x12\x00\x13\x00\x14\x00\x15\x00\x17\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x16\x00\xb9\x00\x10\x00\x11\x00\x12\x00\x13\x00\x14\x00\x15\x00\x17\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x16\x00\xc3\x00\x10\x00\x11\x00\x12\x00\x13\x00\x14\x00\x15\x00\x17\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x16\x00\x84\x00\x10\x00\x11\x00\x12\x00\x13\x00\x14\x00\x15\x00\x17\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x16\x00\x77\x00\x10\x00\x11\x00\x12\x00\x13\x00\x14\x00\x15\x00\x17\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x16\x00\x0f\x00\x10\x00\x11\x00\x12\x00\x13\x00\x14\x00\x15\x00\x17\x00\x37\x00\x00\x00\x38\x00\x39\x00\x3a\x00\x3b\x00\x00\x00\x16\x00\x00\x00\x00\x00\x00\x00\x3c\x00\x3d\x00\x3e\x00\x3f\x00\x17\x00\x00\x00\x40\x00\x41\x00\x00\x00\x00\x00\x42\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\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 = Happy_Data_Array.array (6, 265) [
(6 , happyReduce_6),
(7 , happyReduce_7),
(8 , happyReduce_8),
(9 , happyReduce_9),
(10 , happyReduce_10),
(11 , happyReduce_11),
(12 , happyReduce_12),
(13 , happyReduce_13),
(14 , happyReduce_14),
(15 , happyReduce_15),
(16 , happyReduce_16),
(17 , happyReduce_17),
(18 , happyReduce_18),
(19 , happyReduce_19),
(20 , happyReduce_20),
(21 , happyReduce_21),
(22 , happyReduce_22),
(23 , happyReduce_23),
(24 , happyReduce_24),
(25 , happyReduce_25),
(26 , happyReduce_26),
(27 , happyReduce_27),
(28 , happyReduce_28),
(29 , happyReduce_29),
(30 , happyReduce_30),
(31 , happyReduce_31),
(32 , happyReduce_32),
(33 , happyReduce_33),
(34 , happyReduce_34),
(35 , happyReduce_35),
(36 , happyReduce_36),
(37 , happyReduce_37),
(38 , happyReduce_38),
(39 , happyReduce_39),
(40 , happyReduce_40),
(41 , happyReduce_41),
(42 , happyReduce_42),
(43 , happyReduce_43),
(44 , happyReduce_44),
(45 , happyReduce_45),
(46 , happyReduce_46),
(47 , happyReduce_47),
(48 , happyReduce_48),
(49 , happyReduce_49),
(50 , happyReduce_50),
(51 , happyReduce_51),
(52 , happyReduce_52),
(53 , happyReduce_53),
(54 , happyReduce_54),
(55 , happyReduce_55),
(56 , happyReduce_56),
(57 , happyReduce_57),
(58 , happyReduce_58),
(59 , happyReduce_59),
(60 , happyReduce_60),
(61 , happyReduce_61),
(62 , happyReduce_62),
(63 , happyReduce_63),
(64 , happyReduce_64),
(65 , happyReduce_65),
(66 , happyReduce_66),
(67 , happyReduce_67),
(68 , happyReduce_68),
(69 , happyReduce_69),
(70 , happyReduce_70),
(71 , happyReduce_71),
(72 , happyReduce_72),
(73 , happyReduce_73),
(74 , happyReduce_74),
(75 , happyReduce_75),
(76 , happyReduce_76),
(77 , happyReduce_77),
(78 , happyReduce_78),
(79 , happyReduce_79),
(80 , happyReduce_80),
(81 , happyReduce_81),
(82 , happyReduce_82),
(83 , happyReduce_83),
(84 , happyReduce_84),
(85 , happyReduce_85),
(86 , happyReduce_86),
(87 , happyReduce_87),
(88 , happyReduce_88),
(89 , happyReduce_89),
(90 , happyReduce_90),
(91 , happyReduce_91),
(92 , happyReduce_92),
(93 , happyReduce_93),
(94 , happyReduce_94),
(95 , happyReduce_95),
(96 , happyReduce_96),
(97 , happyReduce_97),
(98 , happyReduce_98),
(99 , happyReduce_99),
(100 , happyReduce_100),
(101 , happyReduce_101),
(102 , happyReduce_102),
(103 , happyReduce_103),
(104 , happyReduce_104),
(105 , happyReduce_105),
(106 , happyReduce_106),
(107 , happyReduce_107),
(108 , happyReduce_108),
(109 , happyReduce_109),
(110 , happyReduce_110),
(111 , happyReduce_111),
(112 , happyReduce_112),
(113 , happyReduce_113),
(114 , happyReduce_114),
(115 , happyReduce_115),
(116 , happyReduce_116),
(117 , happyReduce_117),
(118 , happyReduce_118),
(119 , happyReduce_119),
(120 , happyReduce_120),
(121 , happyReduce_121),
(122 , happyReduce_122),
(123 , happyReduce_123),
(124 , happyReduce_124),
(125 , happyReduce_125),
(126 , happyReduce_126),
(127 , happyReduce_127),
(128 , happyReduce_128),
(129 , happyReduce_129),
(130 , happyReduce_130),
(131 , happyReduce_131),
(132 , happyReduce_132),
(133 , happyReduce_133),
(134 , happyReduce_134),
(135 , happyReduce_135),
(136 , happyReduce_136),
(137 , happyReduce_137),
(138 , happyReduce_138),
(139 , happyReduce_139),
(140 , happyReduce_140),
(141 , happyReduce_141),
(142 , happyReduce_142),
(143 , happyReduce_143),
(144 , happyReduce_144),
(145 , happyReduce_145),
(146 , happyReduce_146),
(147 , happyReduce_147),
(148 , happyReduce_148),
(149 , happyReduce_149),
(150 , happyReduce_150),
(151 , happyReduce_151),
(152 , happyReduce_152),
(153 , happyReduce_153),
(154 , happyReduce_154),
(155 , happyReduce_155),
(156 , happyReduce_156),
(157 , happyReduce_157),
(158 , happyReduce_158),
(159 , happyReduce_159),
(160 , happyReduce_160),
(161 , happyReduce_161),
(162 , happyReduce_162),
(163 , happyReduce_163),
(164 , happyReduce_164),
(165 , happyReduce_165),
(166 , happyReduce_166),
(167 , happyReduce_167),
(168 , happyReduce_168),
(169 , happyReduce_169),
(170 , happyReduce_170),
(171 , happyReduce_171),
(172 , happyReduce_172),
(173 , happyReduce_173),
(174 , happyReduce_174),
(175 , happyReduce_175),
(176 , happyReduce_176),
(177 , happyReduce_177),
(178 , happyReduce_178),
(179 , happyReduce_179),
(180 , happyReduce_180),
(181 , happyReduce_181),
(182 , happyReduce_182),
(183 , happyReduce_183),
(184 , happyReduce_184),
(185 , happyReduce_185),
(186 , happyReduce_186),
(187 , happyReduce_187),
(188 , happyReduce_188),
(189 , happyReduce_189),
(190 , happyReduce_190),
(191 , happyReduce_191),
(192 , happyReduce_192),
(193 , happyReduce_193),
(194 , happyReduce_194),
(195 , happyReduce_195),
(196 , happyReduce_196),
(197 , happyReduce_197),
(198 , happyReduce_198),
(199 , happyReduce_199),
(200 , happyReduce_200),
(201 , happyReduce_201),
(202 , happyReduce_202),
(203 , happyReduce_203),
(204 , happyReduce_204),
(205 , happyReduce_205),
(206 , happyReduce_206),
(207 , happyReduce_207),
(208 , happyReduce_208),
(209 , happyReduce_209),
(210 , happyReduce_210),
(211 , happyReduce_211),
(212 , happyReduce_212),
(213 , happyReduce_213),
(214 , happyReduce_214),
(215 , happyReduce_215),
(216 , happyReduce_216),
(217 , happyReduce_217),
(218 , happyReduce_218),
(219 , happyReduce_219),
(220 , happyReduce_220),
(221 , happyReduce_221),
(222 , happyReduce_222),
(223 , happyReduce_223),
(224 , happyReduce_224),
(225 , happyReduce_225),
(226 , happyReduce_226),
(227 , happyReduce_227),
(228 , happyReduce_228),
(229 , happyReduce_229),
(230 , happyReduce_230),
(231 , happyReduce_231),
(232 , happyReduce_232),
(233 , happyReduce_233),
(234 , happyReduce_234),
(235 , happyReduce_235),
(236 , happyReduce_236),
(237 , happyReduce_237),
(238 , happyReduce_238),
(239 , happyReduce_239),
(240 , happyReduce_240),
(241 , happyReduce_241),
(242 , happyReduce_242),
(243 , happyReduce_243),
(244 , happyReduce_244),
(245 , happyReduce_245),
(246 , happyReduce_246),
(247 , happyReduce_247),
(248 , happyReduce_248),
(249 , happyReduce_249),
(250 , happyReduce_250),
(251 , happyReduce_251),
(252 , happyReduce_252),
(253 , happyReduce_253),
(254 , happyReduce_254),
(255 , happyReduce_255),
(256 , happyReduce_256),
(257 , happyReduce_257),
(258 , happyReduce_258),
(259 , happyReduce_259),
(260 , happyReduce_260),
(261 , happyReduce_261),
(262 , happyReduce_262),
(263 , happyReduce_263),
(264 , happyReduce_264),
(265 , happyReduce_265)
]
happy_n_terms = 73 :: Int
happy_n_nonterms = 89 :: Int
happyReduce_6 = happyMonadReduce 4# 0# happyReduction_6
happyReduction_6 (happy_x_4 `HappyStk`
happy_x_3 `HappyStk`
happy_x_2 `HappyStk`
happy_x_1 `HappyStk`
happyRest) tk
= happyThen (case happyOut11 happy_x_1 of { happy_var_1 ->
case happyOut12 happy_x_2 of { happy_var_2 ->
case happyOut15 happy_x_4 of { happy_var_4 ->
(
do let mstat = happy_var_1
(mtype,id) = happy_var_2
(extends,with,content) = happy_var_4
(opens,jments,opts) = case content of { Just c -> c; Nothing -> ([],[],noOptions) }
jments <- mapM (checkInfoType mtype) jments
defs <- buildAnyTree id jments
return (id, ModInfo mtype mstat opts extends with opens [] "" Nothing defs))}}}
) (\r -> happyReturn (happyIn9 r))
happyReduce_7 = happyReduce 4# 1# happyReduction_7
happyReduction_7 (happy_x_4 `HappyStk`
happy_x_3 `HappyStk`
happy_x_2 `HappyStk`
happy_x_1 `HappyStk`
happyRest)
= case happyOut11 happy_x_1 of { happy_var_1 ->
case happyOut12 happy_x_2 of { happy_var_2 ->
case happyOut13 happy_x_4 of { happy_var_4 ->
happyIn10
(let { mstat = happy_var_1 ;
(mtype,id) = happy_var_2 ;
(extends,with,opens) = happy_var_4 }
in (id, ModInfo mtype mstat noOptions extends with opens [] "" Nothing emptyBinTree)
) `HappyStk` happyRest}}}
happyReduce_8 = happySpecReduce_0 2# happyReduction_8
happyReduction_8 = happyIn11
(MSComplete
)
happyReduce_9 = happySpecReduce_1 2# happyReduction_9
happyReduction_9 happy_x_1
= happyIn11
(MSIncomplete
)
happyReduce_10 = happySpecReduce_2 3# happyReduction_10
happyReduction_10 happy_x_2
happy_x_1
= case happyOut96 happy_x_2 of { happy_var_2 ->
happyIn12
((MTAbstract, happy_var_2)
)}
happyReduce_11 = happySpecReduce_2 3# happyReduction_11
happyReduction_11 happy_x_2
happy_x_1
= case happyOut96 happy_x_2 of { happy_var_2 ->
happyIn12
((MTResource, happy_var_2)
)}
happyReduce_12 = happySpecReduce_2 3# happyReduction_12
happyReduction_12 happy_x_2
happy_x_1
= case happyOut96 happy_x_2 of { happy_var_2 ->
happyIn12
((MTInterface, happy_var_2)
)}
happyReduce_13 = happyReduce 4# 3# happyReduction_13
happyReduction_13 (happy_x_4 `HappyStk`
happy_x_3 `HappyStk`
happy_x_2 `HappyStk`
happy_x_1 `HappyStk`
happyRest)
= case happyOut96 happy_x_2 of { happy_var_2 ->
case happyOut96 happy_x_4 of { happy_var_4 ->
happyIn12
((MTConcrete happy_var_4, happy_var_2)
) `HappyStk` happyRest}}
happyReduce_14 = happyReduce 4# 3# happyReduction_14
happyReduction_14 (happy_x_4 `HappyStk`
happy_x_3 `HappyStk`
happy_x_2 `HappyStk`
happy_x_1 `HappyStk`
happyRest)
= case happyOut96 happy_x_2 of { happy_var_2 ->
case happyOut23 happy_x_4 of { happy_var_4 ->
happyIn12
((MTInstance happy_var_4, happy_var_2)
) `HappyStk` happyRest}}
happyReduce_15 = happyReduce 7# 4# happyReduction_15
happyReduction_15 (happy_x_7 `HappyStk`
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 happyOut22 happy_x_1 of { happy_var_1 ->
case happyOut23 happy_x_3 of { happy_var_3 ->
case happyOut20 happy_x_5 of { happy_var_5 ->
case happyOut14 happy_x_7 of { happy_var_7 ->
happyIn13
((happy_var_1, Just (fst happy_var_3,snd happy_var_3,happy_var_5), happy_var_7)
) `HappyStk` happyRest}}}}
happyReduce_16 = happyReduce 5# 4# happyReduction_16
happyReduction_16 (happy_x_5 `HappyStk`
happy_x_4 `HappyStk`
happy_x_3 `HappyStk`
happy_x_2 `HappyStk`
happy_x_1 `HappyStk`
happyRest)
= case happyOut22 happy_x_1 of { happy_var_1 ->
case happyOut23 happy_x_3 of { happy_var_3 ->
case happyOut20 happy_x_5 of { happy_var_5 ->
happyIn13
((happy_var_1, Just (fst happy_var_3,snd happy_var_3,happy_var_5), [])
) `HappyStk` happyRest}}}
happyReduce_17 = happySpecReduce_3 4# happyReduction_17
happyReduction_17 happy_x_3
happy_x_2
happy_x_1
= case happyOut22 happy_x_1 of { happy_var_1 ->
case happyOut14 happy_x_3 of { happy_var_3 ->
happyIn13
((happy_var_1, Nothing, happy_var_3)
)}}
happyReduce_18 = happySpecReduce_1 4# happyReduction_18
happyReduction_18 happy_x_1
= case happyOut22 happy_x_1 of { happy_var_1 ->
happyIn13
((happy_var_1, Nothing, [])
)}
happyReduce_19 = happyReduce 5# 4# happyReduction_19
happyReduction_19 (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_1 of { happy_var_1 ->
case happyOut20 happy_x_3 of { happy_var_3 ->
case happyOut14 happy_x_5 of { happy_var_5 ->
happyIn13
(([], Just (fst happy_var_1,snd happy_var_1,happy_var_3), happy_var_5)
) `HappyStk` happyRest}}}
happyReduce_20 = happySpecReduce_3 4# happyReduction_20
happyReduction_20 happy_x_3
happy_x_2
happy_x_1
= case happyOut23 happy_x_1 of { happy_var_1 ->
case happyOut20 happy_x_3 of { happy_var_3 ->
happyIn13
(([], Just (fst happy_var_1,snd happy_var_1,happy_var_3), [])
)}}
happyReduce_21 = happySpecReduce_1 4# happyReduction_21
happyReduction_21 happy_x_1
= case happyOut14 happy_x_1 of { happy_var_1 ->
happyIn13
(([], Nothing, happy_var_1)
)}
happyReduce_22 = happySpecReduce_0 5# happyReduction_22
happyReduction_22 = happyIn14
([]
)
happyReduce_23 = happySpecReduce_2 5# happyReduction_23
happyReduction_23 happy_x_2
happy_x_1
= case happyOut18 happy_x_2 of { happy_var_2 ->
happyIn14
(happy_var_2
)}
happyReduce_24 = happyReduce 7# 6# happyReduction_24
happyReduction_24 (happy_x_7 `HappyStk`
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 happyOut22 happy_x_1 of { happy_var_1 ->
case happyOut23 happy_x_3 of { happy_var_3 ->
case happyOut20 happy_x_5 of { happy_var_5 ->
case happyOut16 happy_x_7 of { happy_var_7 ->
happyIn15
((happy_var_1, Just (fst happy_var_3,snd happy_var_3,happy_var_5), Just happy_var_7)
) `HappyStk` happyRest}}}}
happyReduce_25 = happyReduce 5# 6# happyReduction_25
happyReduction_25 (happy_x_5 `HappyStk`
happy_x_4 `HappyStk`
happy_x_3 `HappyStk`
happy_x_2 `HappyStk`
happy_x_1 `HappyStk`
happyRest)
= case happyOut22 happy_x_1 of { happy_var_1 ->
case happyOut23 happy_x_3 of { happy_var_3 ->
case happyOut20 happy_x_5 of { happy_var_5 ->
happyIn15
((happy_var_1, Just (fst happy_var_3,snd happy_var_3,happy_var_5), Nothing)
) `HappyStk` happyRest}}}
happyReduce_26 = happySpecReduce_3 6# happyReduction_26
happyReduction_26 happy_x_3
happy_x_2
happy_x_1
= case happyOut22 happy_x_1 of { happy_var_1 ->
case happyOut16 happy_x_3 of { happy_var_3 ->
happyIn15
((happy_var_1, Nothing, Just happy_var_3)
)}}
happyReduce_27 = happySpecReduce_1 6# happyReduction_27
happyReduction_27 happy_x_1
= case happyOut22 happy_x_1 of { happy_var_1 ->
happyIn15
((happy_var_1, Nothing, Nothing)
)}
happyReduce_28 = happyReduce 5# 6# happyReduction_28
happyReduction_28 (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_1 of { happy_var_1 ->
case happyOut20 happy_x_3 of { happy_var_3 ->
case happyOut16 happy_x_5 of { happy_var_5 ->
happyIn15
(([], Just (fst happy_var_1,snd happy_var_1,happy_var_3), Just happy_var_5)
) `HappyStk` happyRest}}}
happyReduce_29 = happySpecReduce_3 6# happyReduction_29
happyReduction_29 happy_x_3
happy_x_2
happy_x_1
= case happyOut23 happy_x_1 of { happy_var_1 ->
case happyOut20 happy_x_3 of { happy_var_3 ->
happyIn15
(([], Just (fst happy_var_1,snd happy_var_1,happy_var_3), Nothing)
)}}
happyReduce_30 = happySpecReduce_1 6# happyReduction_30
happyReduction_30 happy_x_1
= case happyOut16 happy_x_1 of { happy_var_1 ->
happyIn15
(([], Nothing, Just happy_var_1)
)}
happyReduce_31 = happySpecReduce_2 6# happyReduction_31
happyReduction_31 happy_x_2
happy_x_1
= case happyOut15 happy_x_1 of { happy_var_1 ->
happyIn15
(happy_var_1
)}
happyReduce_32 = happySpecReduce_3 7# happyReduction_32
happyReduction_32 happy_x_3
happy_x_2
happy_x_1
= case happyOut17 happy_x_2 of { happy_var_2 ->
happyIn16
(([],[d | Left ds <- happy_var_2, d <- ds],concatOptions [o | Right o <- happy_var_2])
)}
happyReduce_33 = happyReduce 6# 7# happyReduction_33
happyReduction_33 (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 happyOut18 happy_x_2 of { happy_var_2 ->
case happyOut17 happy_x_5 of { happy_var_5 ->
happyIn16
((happy_var_2,[d | Left ds <- happy_var_5, d <- ds],concatOptions [o | Right o <- happy_var_5])
) `HappyStk` happyRest}}
happyReduce_34 = happySpecReduce_0 8# happyReduction_34
happyReduction_34 = happyIn17
([]
)
happyReduce_35 = happySpecReduce_2 8# happyReduction_35
happyReduction_35 happy_x_2
happy_x_1
= case happyOut24 happy_x_1 of { happy_var_1 ->
case happyOut17 happy_x_2 of { happy_var_2 ->
happyIn17
(happy_var_1 : happy_var_2
)}}
happyReduce_36 = happySpecReduce_1 9# happyReduction_36
happyReduction_36 happy_x_1
= case happyOut19 happy_x_1 of { happy_var_1 ->
happyIn18
([happy_var_1]
)}
happyReduce_37 = happySpecReduce_3 9# happyReduction_37
happyReduction_37 happy_x_3
happy_x_2
happy_x_1
= case happyOut19 happy_x_1 of { happy_var_1 ->
case happyOut18 happy_x_3 of { happy_var_3 ->
happyIn18
(happy_var_1 : happy_var_3
)}}
happyReduce_38 = happySpecReduce_1 10# happyReduction_38
happyReduction_38 happy_x_1
= case happyOut96 happy_x_1 of { happy_var_1 ->
happyIn19
(OSimple happy_var_1
)}
happyReduce_39 = happyReduce 5# 10# happyReduction_39
happyReduction_39 (happy_x_5 `HappyStk`
happy_x_4 `HappyStk`
happy_x_3 `HappyStk`
happy_x_2 `HappyStk`
happy_x_1 `HappyStk`
happyRest)
= case happyOut96 happy_x_2 of { happy_var_2 ->
case happyOut96 happy_x_4 of { happy_var_4 ->
happyIn19
(OQualif happy_var_2 happy_var_4
) `HappyStk` happyRest}}
happyReduce_40 = happySpecReduce_1 11# happyReduction_40
happyReduction_40 happy_x_1
= case happyOut21 happy_x_1 of { happy_var_1 ->
happyIn20
([happy_var_1]
)}
happyReduce_41 = happySpecReduce_3 11# happyReduction_41
happyReduction_41 happy_x_3
happy_x_2
happy_x_1
= case happyOut21 happy_x_1 of { happy_var_1 ->
case happyOut20 happy_x_3 of { happy_var_3 ->
happyIn20
(happy_var_1 : happy_var_3
)}}
happyReduce_42 = happyReduce 5# 12# 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 happyOut96 happy_x_2 of { happy_var_2 ->
case happyOut96 happy_x_4 of { happy_var_4 ->
happyIn21
((happy_var_2,happy_var_4)
) `HappyStk` happyRest}}
happyReduce_43 = happySpecReduce_1 13# happyReduction_43
happyReduction_43 happy_x_1
= case happyOut23 happy_x_1 of { happy_var_1 ->
happyIn22
([happy_var_1]
)}
happyReduce_44 = happySpecReduce_3 13# happyReduction_44
happyReduction_44 happy_x_3
happy_x_2
happy_x_1
= case happyOut23 happy_x_1 of { happy_var_1 ->
case happyOut22 happy_x_3 of { happy_var_3 ->
happyIn22
(happy_var_1 : happy_var_3
)}}
happyReduce_45 = happySpecReduce_1 14# happyReduction_45
happyReduction_45 happy_x_1
= case happyOut96 happy_x_1 of { happy_var_1 ->
happyIn23
((happy_var_1,MIAll )
)}
happyReduce_46 = happyReduce 4# 14# happyReduction_46
happyReduction_46 (happy_x_4 `HappyStk`
happy_x_3 `HappyStk`
happy_x_2 `HappyStk`
happy_x_1 `HappyStk`
happyRest)
= case happyOut96 happy_x_1 of { happy_var_1 ->
case happyOut46 happy_x_3 of { happy_var_3 ->
happyIn23
((happy_var_1,MIOnly happy_var_3)
) `HappyStk` happyRest}}
happyReduce_47 = happyReduce 5# 14# happyReduction_47
happyReduction_47 (happy_x_5 `HappyStk`
happy_x_4 `HappyStk`
happy_x_3 `HappyStk`
happy_x_2 `HappyStk`
happy_x_1 `HappyStk`
happyRest)
= case happyOut96 happy_x_1 of { happy_var_1 ->
case happyOut46 happy_x_4 of { happy_var_4 ->
happyIn23
((happy_var_1,MIExcept happy_var_4)
) `HappyStk` happyRest}}
happyReduce_48 = happySpecReduce_2 15# happyReduction_48
happyReduction_48 happy_x_2
happy_x_1
= case happyOut39 happy_x_2 of { happy_var_2 ->
happyIn24
(Left happy_var_2
)}
happyReduce_49 = happySpecReduce_2 15# happyReduction_49
happyReduction_49 happy_x_2
happy_x_1
= case happyOut40 happy_x_2 of { happy_var_2 ->
happyIn24
(Left happy_var_2
)}
happyReduce_50 = happySpecReduce_2 15# happyReduction_50
happyReduction_50 happy_x_2
happy_x_1
= case happyOut37 happy_x_2 of { happy_var_2 ->
happyIn24
(Left happy_var_2
)}
happyReduce_51 = happySpecReduce_2 15# happyReduction_51
happyReduction_51 happy_x_2
happy_x_1
= case happyOut41 happy_x_2 of { happy_var_2 ->
happyIn24
(Left happy_var_2
)}
happyReduce_52 = happySpecReduce_2 15# happyReduction_52
happyReduction_52 happy_x_2
happy_x_1
= case happyOut42 happy_x_2 of { happy_var_2 ->
happyIn24
(Left happy_var_2
)}
happyReduce_53 = happySpecReduce_2 15# happyReduction_53
happyReduction_53 happy_x_2
happy_x_1
= case happyOut38 happy_x_2 of { happy_var_2 ->
happyIn24
(Left happy_var_2
)}
happyReduce_54 = happySpecReduce_2 15# happyReduction_54
happyReduction_54 happy_x_2
happy_x_1
= case happyOut43 happy_x_2 of { happy_var_2 ->
happyIn24
(Left [(f, CncCat (Just e) Nothing Nothing Nothing Nothing) | (f,e) <- happy_var_2]
)}
happyReduce_55 = happySpecReduce_2 15# happyReduction_55
happyReduction_55 happy_x_2
happy_x_1
= case happyOut43 happy_x_2 of { happy_var_2 ->
happyIn24
(Left [(f, CncCat Nothing (Just e) Nothing Nothing Nothing) | (f,e) <- happy_var_2]
)}
happyReduce_56 = happySpecReduce_2 15# happyReduction_56
happyReduction_56 happy_x_2
happy_x_1
= case happyOut43 happy_x_2 of { happy_var_2 ->
happyIn24
(Left [(f, CncCat Nothing Nothing (Just e) Nothing Nothing) | (f,e) <- happy_var_2]
)}
happyReduce_57 = happySpecReduce_2 15# happyReduction_57
happyReduction_57 happy_x_2
happy_x_1
= case happyOut36 happy_x_2 of { happy_var_2 ->
happyIn24
(Left happy_var_2
)}
happyReduce_58 = happySpecReduce_3 15# happyReduction_58
happyReduction_58 happy_x_3
happy_x_2
happy_x_1
= case happyOut43 happy_x_3 of { happy_var_3 ->
happyIn24
(Left [(f, CncCat Nothing Nothing Nothing (Just e) Nothing) | (f,e) <- happy_var_3]
)}
happyReduce_59 = happySpecReduce_3 15# happyReduction_59
happyReduction_59 happy_x_3
happy_x_2
happy_x_1
= case happyOut43 happy_x_3 of { happy_var_3 ->
happyIn24
(Left [(f, CncFun Nothing Nothing (Just e) Nothing) | (f,e) <- happy_var_3]
)}
happyReduce_60 = happySpecReduce_2 15# happyReduction_60
happyReduction_60 happy_x_2
happy_x_1
= case happyOut44 happy_x_2 of { happy_var_2 ->
happyIn24
(Right happy_var_2
)}
happyReduce_61 = happyReduce 4# 16# happyReduction_61
happyReduction_61 (happy_x_4 `HappyStk`
happy_x_3 `HappyStk`
happy_x_2 `HappyStk`
happy_x_1 `HappyStk`
happyRest)
= case happyOut97 happy_x_1 of { happy_var_1 ->
case happyOutTok happy_x_2 of { ((T_Ident happy_var_2)) ->
case happyOut84 happy_x_3 of { happy_var_3 ->
case happyOut97 happy_x_4 of { happy_var_4 ->
happyIn25
([(happy_var_2, AbsCat (Just (mkL happy_var_1 happy_var_4 happy_var_3)))]
) `HappyStk` happyRest}}}}
happyReduce_62 = happyReduce 6# 16# happyReduction_62
happyReduction_62 (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 happyOut97 happy_x_1 of { happy_var_1 ->
case happyOutTok happy_x_3 of { ((T_Ident happy_var_3)) ->
case happyOut84 happy_x_4 of { happy_var_4 ->
case happyOut97 happy_x_6 of { happy_var_6 ->
happyIn25
(listCatDef (mkL happy_var_1 happy_var_6 (happy_var_3,happy_var_4,0))
) `HappyStk` happyRest}}}}
happyReduce_63 = happyReduce 9# 16# happyReduction_63
happyReduction_63 (happy_x_9 `HappyStk`
happy_x_8 `HappyStk`
happy_x_7 `HappyStk`
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 happyOut97 happy_x_1 of { happy_var_1 ->
case happyOutTok happy_x_3 of { ((T_Ident happy_var_3)) ->
case happyOut84 happy_x_4 of { happy_var_4 ->
case happyOutTok happy_x_7 of { ((T_Integer happy_var_7)) ->
case happyOut97 happy_x_9 of { happy_var_9 ->
happyIn25
(listCatDef (mkL happy_var_1 happy_var_9 (happy_var_3,happy_var_4,fromIntegral happy_var_7))
) `HappyStk` happyRest}}}}}
happyReduce_64 = happyReduce 5# 17# happyReduction_64
happyReduction_64 (happy_x_5 `HappyStk`
happy_x_4 `HappyStk`
happy_x_3 `HappyStk`
happy_x_2 `HappyStk`
happy_x_1 `HappyStk`
happyRest)
= case happyOut97 happy_x_1 of { happy_var_1 ->
case happyOut46 happy_x_2 of { happy_var_2 ->
case happyOut53 happy_x_4 of { happy_var_4 ->
case happyOut97 happy_x_5 of { happy_var_5 ->
happyIn26
([(fun, AbsFun (Just (mkL happy_var_1 happy_var_5 happy_var_4)) Nothing (Just []) (Just True)) | fun <- happy_var_2]
) `HappyStk` happyRest}}}}
happyReduce_65 = happyReduce 5# 18# happyReduction_65
happyReduction_65 (happy_x_5 `HappyStk`
happy_x_4 `HappyStk`
happy_x_3 `HappyStk`
happy_x_2 `HappyStk`
happy_x_1 `HappyStk`
happyRest)
= case happyOut97 happy_x_1 of { happy_var_1 ->
case happyOut50 happy_x_2 of { happy_var_2 ->
case happyOut53 happy_x_4 of { happy_var_4 ->
case happyOut97 happy_x_5 of { happy_var_5 ->
happyIn27
([(f, AbsFun Nothing (Just 0) (Just [mkL happy_var_1 happy_var_5 ([],happy_var_4)]) Nothing) | f <- happy_var_2]
) `HappyStk` happyRest}}}}
happyReduce_66 = happyReduce 6# 18# happyReduction_66
happyReduction_66 (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 happyOut97 happy_x_1 of { happy_var_1 ->
case happyOut49 happy_x_2 of { happy_var_2 ->
case happyOut70 happy_x_3 of { happy_var_3 ->
case happyOut53 happy_x_5 of { happy_var_5 ->
case happyOut97 happy_x_6 of { happy_var_6 ->
happyIn27
([(happy_var_2,AbsFun Nothing (Just (length happy_var_3)) (Just [mkL happy_var_1 happy_var_6 (happy_var_3,happy_var_5)]) Nothing)]
) `HappyStk` happyRest}}}}}
happyReduce_67 = happyReduce 5# 19# happyReduction_67
happyReduction_67 (happy_x_5 `HappyStk`
happy_x_4 `HappyStk`
happy_x_3 `HappyStk`
happy_x_2 `HappyStk`
happy_x_1 `HappyStk`
happyRest)
= case happyOutTok happy_x_2 of { ((T_Ident happy_var_2)) ->
case happyOut34 happy_x_4 of { happy_var_4 ->
happyIn28
((happy_var_2, AbsCat Nothing) :
[(fun, AbsFun Nothing Nothing Nothing (Just True)) | fun <- happy_var_4]
) `HappyStk` happyRest}}
happyReduce_68 = happyReduce 5# 19# happyReduction_68
happyReduction_68 (happy_x_5 `HappyStk`
happy_x_4 `HappyStk`
happy_x_3 `HappyStk`
happy_x_2 `HappyStk`
happy_x_1 `HappyStk`
happyRest)
= case happyOut97 happy_x_1 of { happy_var_1 ->
case happyOut46 happy_x_2 of { happy_var_2 ->
case happyOut53 happy_x_4 of { happy_var_4 ->
case happyOut97 happy_x_5 of { happy_var_5 ->
happyIn28
(
[(fun, AbsFun (Just (mkL happy_var_1 happy_var_5 happy_var_4)) Nothing Nothing (Just True)) | fun <- happy_var_2]
) `HappyStk` happyRest}}}}
happyReduce_69 = happyReduce 5# 20# happyReduction_69
happyReduction_69 (happy_x_5 `HappyStk`
happy_x_4 `HappyStk`
happy_x_3 `HappyStk`
happy_x_2 `HappyStk`
happy_x_1 `HappyStk`
happyRest)
= case happyOut97 happy_x_1 of { happy_var_1 ->
case happyOut48 happy_x_2 of { happy_var_2 ->
case happyOut45 happy_x_4 of { happy_var_4 ->
case happyOut97 happy_x_5 of { happy_var_5 ->
happyIn29
((happy_var_2, ResParam (Just (mkL happy_var_1 happy_var_5 [param | L loc param <- happy_var_4])) Nothing) :
[(f, ResValue (L loc (mkProdSimple co (Cn happy_var_2)))) | L loc (f,co) <- happy_var_4]
) `HappyStk` happyRest}}}}
happyReduce_70 = happySpecReduce_3 20# happyReduction_70
happyReduction_70 happy_x_3
happy_x_2
happy_x_1
= case happyOut48 happy_x_2 of { happy_var_2 ->
happyIn29
([(happy_var_2, ResParam Nothing Nothing)]
)}
happyReduce_71 = happyReduce 5# 21# happyReduction_71
happyReduction_71 (happy_x_5 `HappyStk`
happy_x_4 `HappyStk`
happy_x_3 `HappyStk`
happy_x_2 `HappyStk`
happy_x_1 `HappyStk`
happyRest)
= case happyOut97 happy_x_1 of { happy_var_1 ->
case happyOut50 happy_x_2 of { happy_var_2 ->
case happyOut53 happy_x_4 of { happy_var_4 ->
case happyOut97 happy_x_5 of { happy_var_5 ->
happyIn30
([(i, info) | i <- happy_var_2, info <- mkOverload (Just (mkL happy_var_1 happy_var_5 happy_var_4)) Nothing ]
) `HappyStk` happyRest}}}}
happyReduce_72 = happyReduce 5# 21# happyReduction_72
happyReduction_72 (happy_x_5 `HappyStk`
happy_x_4 `HappyStk`
happy_x_3 `HappyStk`
happy_x_2 `HappyStk`
happy_x_1 `HappyStk`
happyRest)
= case happyOut97 happy_x_1 of { happy_var_1 ->
case happyOut50 happy_x_2 of { happy_var_2 ->
case happyOut53 happy_x_4 of { happy_var_4 ->
case happyOut97 happy_x_5 of { happy_var_5 ->
happyIn30
([(i, info) | i <- happy_var_2, info <- mkOverload Nothing (Just (mkL happy_var_1 happy_var_5 happy_var_4))]
) `HappyStk` happyRest}}}}
happyReduce_73 = happyReduce 6# 21# happyReduction_73
happyReduction_73 (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 happyOut97 happy_x_1 of { happy_var_1 ->
case happyOut49 happy_x_2 of { happy_var_2 ->
case happyOut73 happy_x_3 of { happy_var_3 ->
case happyOut53 happy_x_5 of { happy_var_5 ->
case happyOut97 happy_x_6 of { happy_var_6 ->
happyIn30
([(i, info) | i <- [happy_var_2], info <- mkOverload Nothing (Just (mkL happy_var_1 happy_var_6 (mkAbs happy_var_3 happy_var_5)))]
) `HappyStk` happyRest}}}}}
happyReduce_74 = happyReduce 7# 21# happyReduction_74
happyReduction_74 (happy_x_7 `HappyStk`
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 happyOut97 happy_x_1 of { happy_var_1 ->
case happyOut50 happy_x_2 of { happy_var_2 ->
case happyOut53 happy_x_4 of { happy_var_4 ->
case happyOut53 happy_x_6 of { happy_var_6 ->
case happyOut97 happy_x_7 of { happy_var_7 ->
happyIn30
([(i, info) | i <- happy_var_2, info <- mkOverload (Just (mkL happy_var_1 happy_var_7 happy_var_4)) (Just (mkL happy_var_1 happy_var_7 happy_var_6))]
) `HappyStk` happyRest}}}}}
happyReduce_75 = happyReduce 5# 22# happyReduction_75
happyReduction_75 (happy_x_5 `HappyStk`
happy_x_4 `HappyStk`
happy_x_3 `HappyStk`
happy_x_2 `HappyStk`
happy_x_1 `HappyStk`
happyRest)
= case happyOut97 happy_x_1 of { happy_var_1 ->
case happyOut50 happy_x_2 of { happy_var_2 ->
case happyOut53 happy_x_4 of { happy_var_4 ->
case happyOut97 happy_x_5 of { happy_var_5 ->
happyIn31
([(f, CncFun Nothing (Just (mkL happy_var_1 happy_var_5 happy_var_4)) Nothing Nothing) | f <- happy_var_2]
) `HappyStk` happyRest}}}}
happyReduce_76 = happyReduce 6# 22# happyReduction_76
happyReduction_76 (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 happyOut97 happy_x_1 of { happy_var_1 ->
case happyOut49 happy_x_2 of { happy_var_2 ->
case happyOut73 happy_x_3 of { happy_var_3 ->
case happyOut53 happy_x_5 of { happy_var_5 ->
case happyOut97 happy_x_6 of { happy_var_6 ->
happyIn31
([(happy_var_2, CncFun Nothing (Just (mkL happy_var_1 happy_var_6 (mkAbs happy_var_3 happy_var_5))) Nothing Nothing)]
) `HappyStk` happyRest}}}}}
happyReduce_77 = happyReduce 5# 23# happyReduction_77
happyReduction_77 (happy_x_5 `HappyStk`
happy_x_4 `HappyStk`
happy_x_3 `HappyStk`
happy_x_2 `HappyStk`
happy_x_1 `HappyStk`
happyRest)
= case happyOut97 happy_x_1 of { happy_var_1 ->
case happyOut50 happy_x_2 of { happy_var_2 ->
case happyOut53 happy_x_4 of { happy_var_4 ->
case happyOut97 happy_x_5 of { happy_var_5 ->
happyIn32
([(i,mkL happy_var_1 happy_var_5 happy_var_4) | i <- happy_var_2]
) `HappyStk` happyRest}}}}
happyReduce_78 = happyMonadReduce 5# 24# happyReduction_78
happyReduction_78 (happy_x_5 `HappyStk`
happy_x_4 `HappyStk`
happy_x_3 `HappyStk`
happy_x_2 `HappyStk`
happy_x_1 `HappyStk`
happyRest) tk
= happyThen (case happyOut97 happy_x_1 of { happy_var_1 ->
case happyOutTok happy_x_2 of { ((T_Ident happy_var_2)) ->
case happyOutTok happy_x_4 of { ((T_Ident happy_var_4)) ->
( case parseModuleOptions ["--" ++ showIdent happy_var_2 ++ "=" ++ showIdent happy_var_4] of
Ok x -> return x
Bad msg -> failLoc happy_var_1 msg)}}}
) (\r -> happyReturn (happyIn33 r))
happyReduce_79 = happyMonadReduce 5# 24# happyReduction_79
happyReduction_79 (happy_x_5 `HappyStk`
happy_x_4 `HappyStk`
happy_x_3 `HappyStk`
happy_x_2 `HappyStk`
happy_x_1 `HappyStk`
happyRest) tk
= happyThen (case happyOut97 happy_x_1 of { happy_var_1 ->
case happyOutTok happy_x_2 of { ((T_Ident happy_var_2)) ->
case happyOutTok happy_x_4 of { ((T_Double happy_var_4)) ->
( case parseModuleOptions ["--" ++ showIdent happy_var_2 ++ "=" ++ show happy_var_4] of
Ok x -> return x
Bad msg -> failLoc happy_var_1 msg)}}}
) (\r -> happyReturn (happyIn33 r))
happyReduce_80 = happySpecReduce_1 25# happyReduction_80
happyReduction_80 happy_x_1
= case happyOutTok happy_x_1 of { ((T_Ident happy_var_1)) ->
happyIn34
([happy_var_1]
)}
happyReduce_81 = happySpecReduce_3 25# happyReduction_81
happyReduction_81 happy_x_3
happy_x_2
happy_x_1
= case happyOutTok happy_x_1 of { ((T_Ident happy_var_1)) ->
case happyOut34 happy_x_3 of { happy_var_3 ->
happyIn34
(happy_var_1 : happy_var_3
)}}
happyReduce_82 = happyReduce 4# 26# happyReduction_82
happyReduction_82 (happy_x_4 `HappyStk`
happy_x_3 `HappyStk`
happy_x_2 `HappyStk`
happy_x_1 `HappyStk`
happyRest)
= case happyOut97 happy_x_1 of { happy_var_1 ->
case happyOutTok happy_x_2 of { ((T_Ident happy_var_2)) ->
case happyOut84 happy_x_3 of { happy_var_3 ->
case happyOut97 happy_x_4 of { happy_var_4 ->
happyIn35
(mkL happy_var_1 happy_var_4 (happy_var_2,happy_var_3)
) `HappyStk` happyRest}}}}
happyReduce_83 = happySpecReduce_2 27# happyReduction_83
happyReduction_83 happy_x_2
happy_x_1
= case happyOut31 happy_x_1 of { happy_var_1 ->
happyIn36
(happy_var_1
)}
happyReduce_84 = happySpecReduce_3 27# happyReduction_84
happyReduction_84 happy_x_3
happy_x_2
happy_x_1
= case happyOut31 happy_x_1 of { happy_var_1 ->
case happyOut36 happy_x_3 of { happy_var_3 ->
happyIn36
(happy_var_1 ++ happy_var_3
)}}
happyReduce_85 = happySpecReduce_2 28# happyReduction_85
happyReduction_85 happy_x_2
happy_x_1
= case happyOut27 happy_x_1 of { happy_var_1 ->
happyIn37
(happy_var_1
)}
happyReduce_86 = happySpecReduce_3 28# happyReduction_86
happyReduction_86 happy_x_3
happy_x_2
happy_x_1
= case happyOut27 happy_x_1 of { happy_var_1 ->
case happyOut37 happy_x_3 of { happy_var_3 ->
happyIn37
(happy_var_1 ++ happy_var_3
)}}
happyReduce_87 = happySpecReduce_2 29# happyReduction_87
happyReduction_87 happy_x_2
happy_x_1
= case happyOut30 happy_x_1 of { happy_var_1 ->
happyIn38
(happy_var_1
)}
happyReduce_88 = happySpecReduce_3 29# happyReduction_88
happyReduction_88 happy_x_3
happy_x_2
happy_x_1
= case happyOut30 happy_x_1 of { happy_var_1 ->
case happyOut38 happy_x_3 of { happy_var_3 ->
happyIn38
(happy_var_1 ++ happy_var_3
)}}
happyReduce_89 = happySpecReduce_2 30# happyReduction_89
happyReduction_89 happy_x_2
happy_x_1
= case happyOut25 happy_x_1 of { happy_var_1 ->
happyIn39
(happy_var_1
)}
happyReduce_90 = happySpecReduce_3 30# happyReduction_90
happyReduction_90 happy_x_3
happy_x_2
happy_x_1
= case happyOut25 happy_x_1 of { happy_var_1 ->
case happyOut39 happy_x_3 of { happy_var_3 ->
happyIn39
(happy_var_1 ++ happy_var_3
)}}
happyReduce_91 = happySpecReduce_2 31# happyReduction_91
happyReduction_91 happy_x_2
happy_x_1
= case happyOut26 happy_x_1 of { happy_var_1 ->
happyIn40
(happy_var_1
)}
happyReduce_92 = happySpecReduce_3 31# happyReduction_92
happyReduction_92 happy_x_3
happy_x_2
happy_x_1
= case happyOut26 happy_x_1 of { happy_var_1 ->
case happyOut40 happy_x_3 of { happy_var_3 ->
happyIn40
(happy_var_1 ++ happy_var_3
)}}
happyReduce_93 = happySpecReduce_2 32# happyReduction_93
happyReduction_93 happy_x_2
happy_x_1
= case happyOut28 happy_x_1 of { happy_var_1 ->
happyIn41
(happy_var_1
)}
happyReduce_94 = happySpecReduce_3 32# happyReduction_94
happyReduction_94 happy_x_3
happy_x_2
happy_x_1
= case happyOut28 happy_x_1 of { happy_var_1 ->
case happyOut41 happy_x_3 of { happy_var_3 ->
happyIn41
(happy_var_1 ++ happy_var_3
)}}
happyReduce_95 = happySpecReduce_2 33# happyReduction_95
happyReduction_95 happy_x_2
happy_x_1
= case happyOut29 happy_x_1 of { happy_var_1 ->
happyIn42
(happy_var_1
)}
happyReduce_96 = happySpecReduce_3 33# happyReduction_96
happyReduction_96 happy_x_3
happy_x_2
happy_x_1
= case happyOut29 happy_x_1 of { happy_var_1 ->
case happyOut42 happy_x_3 of { happy_var_3 ->
happyIn42
(happy_var_1 ++ happy_var_3
)}}
happyReduce_97 = happySpecReduce_2 34# happyReduction_97
happyReduction_97 happy_x_2
happy_x_1
= case happyOut32 happy_x_1 of { happy_var_1 ->
happyIn43
(happy_var_1
)}
happyReduce_98 = happySpecReduce_3 34# happyReduction_98
happyReduction_98 happy_x_3
happy_x_2
happy_x_1
= case happyOut32 happy_x_1 of { happy_var_1 ->
case happyOut43 happy_x_3 of { happy_var_3 ->
happyIn43
(happy_var_1 ++ happy_var_3
)}}
happyReduce_99 = happySpecReduce_2 35# happyReduction_99
happyReduction_99 happy_x_2
happy_x_1
= case happyOut33 happy_x_1 of { happy_var_1 ->
happyIn44
(happy_var_1
)}
happyReduce_100 = happySpecReduce_3 35# happyReduction_100
happyReduction_100 happy_x_3
happy_x_2
happy_x_1
= case happyOut33 happy_x_1 of { happy_var_1 ->
case happyOut44 happy_x_3 of { happy_var_3 ->
happyIn44
(addOptions happy_var_1 happy_var_3
)}}
happyReduce_101 = happySpecReduce_1 36# happyReduction_101
happyReduction_101 happy_x_1
= case happyOut35 happy_x_1 of { happy_var_1 ->
happyIn45
([happy_var_1]
)}
happyReduce_102 = happySpecReduce_3 36# happyReduction_102
happyReduction_102 happy_x_3
happy_x_2
happy_x_1
= case happyOut35 happy_x_1 of { happy_var_1 ->
case happyOut45 happy_x_3 of { happy_var_3 ->
happyIn45
(happy_var_1 : happy_var_3
)}}
happyReduce_103 = happySpecReduce_1 37# happyReduction_103
happyReduction_103 happy_x_1
= case happyOutTok happy_x_1 of { ((T_Ident happy_var_1)) ->
happyIn46
([happy_var_1]
)}
happyReduce_104 = happySpecReduce_3 37# happyReduction_104
happyReduction_104 happy_x_3
happy_x_2
happy_x_1
= case happyOutTok happy_x_1 of { ((T_Ident happy_var_1)) ->
case happyOut46 happy_x_3 of { happy_var_3 ->
happyIn46
(happy_var_1 : happy_var_3
)}}
happyReduce_105 = happySpecReduce_1 38# happyReduction_105
happyReduction_105 happy_x_1
= case happyOutTok happy_x_1 of { ((T_Ident happy_var_1)) ->
happyIn47
([happy_var_1]
)}
happyReduce_106 = happySpecReduce_2 38# happyReduction_106
happyReduction_106 happy_x_2
happy_x_1
= case happyOutTok happy_x_1 of { ((T_Ident happy_var_1)) ->
case happyOut47 happy_x_2 of { happy_var_2 ->
happyIn47
(happy_var_1 : happy_var_2
)}}
happyReduce_107 = happySpecReduce_1 39# happyReduction_107
happyReduction_107 happy_x_1
= case happyOutTok happy_x_1 of { ((T_Ident happy_var_1)) ->
happyIn48
(happy_var_1
)}
happyReduce_108 = happyMonadReduce 2# 39# happyReduction_108
happyReduction_108 (happy_x_2 `HappyStk`
happy_x_1 `HappyStk`
happyRest) tk
= happyThen (case happyOut97 happy_x_1 of { happy_var_1 ->
case happyOut68 happy_x_2 of { happy_var_2 ->
( failLoc happy_var_1 (showIdent happy_var_2++ " is a predefined constant, it can not be redefined"))}}
) (\r -> happyReturn (happyIn48 r))
happyReduce_109 = happySpecReduce_1 40# happyReduction_109
happyReduction_109 happy_x_1
= case happyOut48 happy_x_1 of { happy_var_1 ->
happyIn49
(happy_var_1
)}
happyReduce_110 = happySpecReduce_3 40# happyReduction_110
happyReduction_110 happy_x_3
happy_x_2
happy_x_1
= case happyOut48 happy_x_2 of { happy_var_2 ->
happyIn49
(mkListId happy_var_2
)}
happyReduce_111 = happySpecReduce_1 41# happyReduction_111
happyReduction_111 happy_x_1
= case happyOut49 happy_x_1 of { happy_var_1 ->
happyIn50
([happy_var_1]
)}
happyReduce_112 = happySpecReduce_3 41# happyReduction_112
happyReduction_112 happy_x_3
happy_x_2
happy_x_1
= case happyOut49 happy_x_1 of { happy_var_1 ->
case happyOut50 happy_x_3 of { happy_var_3 ->
happyIn50
(happy_var_1 : happy_var_3
)}}
happyReduce_113 = happySpecReduce_3 42# happyReduction_113
happyReduction_113 happy_x_3
happy_x_2
happy_x_1
= case happyOut46 happy_x_1 of { happy_var_1 ->
case happyOut53 happy_x_3 of { happy_var_3 ->
happyIn51
([(lab,Just happy_var_3,Nothing) | lab <- happy_var_1]
)}}
happyReduce_114 = happySpecReduce_3 42# happyReduction_114
happyReduction_114 happy_x_3
happy_x_2
happy_x_1
= case happyOut46 happy_x_1 of { happy_var_1 ->
case happyOut53 happy_x_3 of { happy_var_3 ->
happyIn51
([(lab,Nothing,Just happy_var_3) | lab <- happy_var_1]
)}}
happyReduce_115 = happyReduce 5# 42# happyReduction_115
happyReduction_115 (happy_x_5 `HappyStk`
happy_x_4 `HappyStk`
happy_x_3 `HappyStk`
happy_x_2 `HappyStk`
happy_x_1 `HappyStk`
happyRest)
= case happyOut46 happy_x_1 of { happy_var_1 ->
case happyOut53 happy_x_3 of { happy_var_3 ->
case happyOut53 happy_x_5 of { happy_var_5 ->
happyIn51
([(lab,Just happy_var_3,Just happy_var_5) | lab <- happy_var_1]
) `HappyStk` happyRest}}}
happyReduce_116 = happySpecReduce_0 43# happyReduction_116
happyReduction_116 = happyIn52
([]
)
happyReduce_117 = happySpecReduce_1 43# happyReduction_117
happyReduction_117 happy_x_1
= case happyOut51 happy_x_1 of { happy_var_1 ->
happyIn52
(happy_var_1
)}
happyReduce_118 = happySpecReduce_3 43# happyReduction_118
happyReduction_118 happy_x_3
happy_x_2
happy_x_1
= case happyOut51 happy_x_1 of { happy_var_1 ->
case happyOut52 happy_x_3 of { happy_var_3 ->
happyIn52
(happy_var_1 ++ happy_var_3
)}}
happyReduce_119 = happySpecReduce_3 44# happyReduction_119
happyReduction_119 happy_x_3
happy_x_2
happy_x_1
= case happyOut54 happy_x_1 of { happy_var_1 ->
case happyOut53 happy_x_3 of { happy_var_3 ->
happyIn53
(FV [happy_var_1,happy_var_3]
)}}
happyReduce_120 = happyReduce 4# 44# happyReduction_120
happyReduction_120 (happy_x_4 `HappyStk`
happy_x_3 `HappyStk`
happy_x_2 `HappyStk`
happy_x_1 `HappyStk`
happyRest)
= case happyOut75 happy_x_2 of { happy_var_2 ->
case happyOut53 happy_x_4 of { happy_var_4 ->
happyIn53
(mkAbs happy_var_2 happy_var_4
) `HappyStk` happyRest}}
happyReduce_121 = happyReduce 4# 44# happyReduction_121
happyReduction_121 (happy_x_4 `HappyStk`
happy_x_3 `HappyStk`
happy_x_2 `HappyStk`
happy_x_1 `HappyStk`
happyRest)
= case happyOut75 happy_x_2 of { happy_var_2 ->
case happyOut53 happy_x_4 of { happy_var_4 ->
happyIn53
(mkCTable happy_var_2 happy_var_4
) `HappyStk` happyRest}}
happyReduce_122 = happySpecReduce_3 44# happyReduction_122
happyReduction_122 happy_x_3
happy_x_2
happy_x_1
= case happyOut76 happy_x_1 of { happy_var_1 ->
case happyOut53 happy_x_3 of { happy_var_3 ->
happyIn53
(mkProdSimple happy_var_1 happy_var_3
)}}
happyReduce_123 = happySpecReduce_3 44# happyReduction_123
happyReduction_123 happy_x_3
happy_x_2
happy_x_1
= case happyOut56 happy_x_1 of { happy_var_1 ->
case happyOut53 happy_x_3 of { happy_var_3 ->
happyIn53
(Table happy_var_1 happy_var_3
)}}
happyReduce_124 = happyMonadReduce 6# 44# happyReduction_124
happyReduction_124 (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) tk
= happyThen (case happyOut52 happy_x_3 of { happy_var_3 ->
case happyOut53 happy_x_6 of { happy_var_6 ->
(
do defs <- mapM tryLoc happy_var_3
return $ mkLet defs happy_var_6)}}
) (\r -> happyReturn (happyIn53 r))
happyReduce_125 = happyMonadReduce 4# 44# happyReduction_125
happyReduction_125 (happy_x_4 `HappyStk`
happy_x_3 `HappyStk`
happy_x_2 `HappyStk`
happy_x_1 `HappyStk`
happyRest) tk
= happyThen (case happyOut52 happy_x_2 of { happy_var_2 ->
case happyOut53 happy_x_4 of { happy_var_4 ->
(
do defs <- mapM tryLoc happy_var_2
return $ mkLet defs happy_var_4)}}
) (\r -> happyReturn (happyIn53 r))
happyReduce_126 = happyMonadReduce 5# 44# happyReduction_126
happyReduction_126 (happy_x_5 `HappyStk`
happy_x_4 `HappyStk`
happy_x_3 `HappyStk`
happy_x_2 `HappyStk`
happy_x_1 `HappyStk`
happyRest) tk
= happyThen (case happyOut56 happy_x_1 of { happy_var_1 ->
case happyOut52 happy_x_4 of { happy_var_4 ->
(
do defs <- mapM tryLoc happy_var_4
return $ mkLet defs happy_var_1)}}
) (\r -> happyReturn (happyIn53 r))
happyReduce_127 = happySpecReduce_3 44# happyReduction_127
happyReduction_127 happy_x_3
happy_x_2
happy_x_1
= case happyOut58 happy_x_2 of { happy_var_2 ->
case happyOutTok happy_x_3 of { ((T_String happy_var_3)) ->
happyIn53
(Example happy_var_2 happy_var_3
)}}
happyReduce_128 = happySpecReduce_1 44# happyReduction_128
happyReduction_128 happy_x_1
= case happyOut54 happy_x_1 of { happy_var_1 ->
happyIn53
(happy_var_1
)}
happyReduce_129 = happySpecReduce_3 45# happyReduction_129
happyReduction_129 happy_x_3
happy_x_2
happy_x_1
= case happyOut55 happy_x_1 of { happy_var_1 ->
case happyOut54 happy_x_3 of { happy_var_3 ->
happyIn54
(C happy_var_1 happy_var_3
)}}
happyReduce_130 = happySpecReduce_1 45# happyReduction_130
happyReduction_130 happy_x_1
= case happyOut55 happy_x_1 of { happy_var_1 ->
happyIn54
(happy_var_1
)}
happyReduce_131 = happySpecReduce_3 46# happyReduction_131
happyReduction_131 happy_x_3
happy_x_2
happy_x_1
= case happyOut56 happy_x_1 of { happy_var_1 ->
case happyOut55 happy_x_3 of { happy_var_3 ->
happyIn55
(Glue happy_var_1 happy_var_3
)}}
happyReduce_132 = happySpecReduce_1 46# happyReduction_132
happyReduction_132 happy_x_1
= case happyOut56 happy_x_1 of { happy_var_1 ->
happyIn55
(happy_var_1
)}
happyReduce_133 = happySpecReduce_3 47# happyReduction_133
happyReduction_133 happy_x_3
happy_x_2
happy_x_1
= case happyOut56 happy_x_1 of { happy_var_1 ->
case happyOut57 happy_x_3 of { happy_var_3 ->
happyIn56
(S happy_var_1 happy_var_3
)}}
happyReduce_134 = happyReduce 4# 47# happyReduction_134
happyReduction_134 (happy_x_4 `HappyStk`
happy_x_3 `HappyStk`
happy_x_2 `HappyStk`
happy_x_1 `HappyStk`
happyRest)
= case happyOut80 happy_x_3 of { happy_var_3 ->
happyIn56
(T TRaw happy_var_3
) `HappyStk` happyRest}
happyReduce_135 = happyReduce 5# 47# happyReduction_135
happyReduction_135 (happy_x_5 `HappyStk`
happy_x_4 `HappyStk`
happy_x_3 `HappyStk`
happy_x_2 `HappyStk`
happy_x_1 `HappyStk`
happyRest)
= case happyOut59 happy_x_2 of { happy_var_2 ->
case happyOut80 happy_x_4 of { happy_var_4 ->
happyIn56
(T (TTyped happy_var_2) happy_var_4
) `HappyStk` happyRest}}
happyReduce_136 = happyReduce 5# 47# happyReduction_136
happyReduction_136 (happy_x_5 `HappyStk`
happy_x_4 `HappyStk`
happy_x_3 `HappyStk`
happy_x_2 `HappyStk`
happy_x_1 `HappyStk`
happyRest)
= case happyOut59 happy_x_2 of { happy_var_2 ->
case happyOut60 happy_x_4 of { happy_var_4 ->
happyIn56
(V happy_var_2 happy_var_4
) `HappyStk` happyRest}}
happyReduce_137 = happySpecReduce_3 47# happyReduction_137
happyReduction_137 happy_x_3
happy_x_2
happy_x_1
= case happyOut56 happy_x_1 of { happy_var_1 ->
case happyOut57 happy_x_3 of { happy_var_3 ->
happyIn56
(case happy_var_1 of
RecType xs -> RecType (xs ++ [(tupleLabel (length xs+1),happy_var_3)])
t -> RecType [(tupleLabel 1,happy_var_1), (tupleLabel 2,happy_var_3)]
)}}
happyReduce_138 = happySpecReduce_3 47# happyReduction_138
happyReduction_138 happy_x_3
happy_x_2
happy_x_1
= case happyOut56 happy_x_1 of { happy_var_1 ->
case happyOut57 happy_x_3 of { happy_var_3 ->
happyIn56
(ExtR happy_var_1 happy_var_3
)}}
happyReduce_139 = happySpecReduce_1 47# happyReduction_139
happyReduction_139 happy_x_1
= case happyOut57 happy_x_1 of { happy_var_1 ->
happyIn56
(happy_var_1
)}
happyReduce_140 = happySpecReduce_2 48# happyReduction_140
happyReduction_140 happy_x_2
happy_x_1
= case happyOut57 happy_x_1 of { happy_var_1 ->
case happyOut58 happy_x_2 of { happy_var_2 ->
happyIn57
(App happy_var_1 happy_var_2
)}}
happyReduce_141 = happyReduce 4# 48# happyReduction_141
happyReduction_141 (happy_x_4 `HappyStk`
happy_x_3 `HappyStk`
happy_x_2 `HappyStk`
happy_x_1 `HappyStk`
happyRest)
= case happyOut57 happy_x_1 of { happy_var_1 ->
case happyOut53 happy_x_3 of { happy_var_3 ->
happyIn57
(App happy_var_1 (ImplArg happy_var_3)
) `HappyStk` happyRest}}
happyReduce_142 = happyReduce 6# 48# happyReduction_142
happyReduction_142 (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 happyOut53 happy_x_2 of { happy_var_2 ->
case happyOut80 happy_x_5 of { happy_var_5 ->
happyIn57
(let annot = case happy_var_2 of
Typed _ t -> TTyped t
_ -> TRaw
in S (T annot happy_var_5) happy_var_2
) `HappyStk` happyRest}}
happyReduce_143 = happyReduce 4# 48# happyReduction_143
happyReduction_143 (happy_x_4 `HappyStk`
happy_x_3 `HappyStk`
happy_x_2 `HappyStk`
happy_x_1 `HappyStk`
happyRest)
= case happyOut60 happy_x_3 of { happy_var_3 ->
happyIn57
(FV happy_var_3
) `HappyStk` happyRest}
happyReduce_144 = happyMonadReduce 4# 48# happyReduction_144
happyReduction_144 (happy_x_4 `HappyStk`
happy_x_3 `HappyStk`
happy_x_2 `HappyStk`
happy_x_1 `HappyStk`
happyRest) tk
= happyThen (case happyOut80 happy_x_3 of { happy_var_3 ->
( mkAlts happy_var_3)}
) (\r -> happyReturn (happyIn57 r))
happyReduce_145 = happyReduce 6# 48# happyReduction_145
happyReduction_145 (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 happyOutTok happy_x_3 of { ((T_String happy_var_3)) ->
case happyOut82 happy_x_5 of { happy_var_5 ->
happyIn57
(Alts (K happy_var_3) happy_var_5
) `HappyStk` happyRest}}
happyReduce_146 = happyReduce 6# 48# happyReduction_146
happyReduction_146 (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 happyOutTok happy_x_3 of { ((T_Ident happy_var_3)) ->
case happyOut82 happy_x_5 of { happy_var_5 ->
happyIn57
(Alts (Vr happy_var_3) happy_var_5
) `HappyStk` happyRest}}
happyReduce_147 = happyReduce 4# 48# happyReduction_147
happyReduction_147 (happy_x_4 `HappyStk`
happy_x_3 `HappyStk`
happy_x_2 `HappyStk`
happy_x_1 `HappyStk`
happyRest)
= case happyOut60 happy_x_3 of { happy_var_3 ->
happyIn57
(Strs happy_var_3
) `HappyStk` happyRest}
happyReduce_148 = happySpecReduce_2 48# happyReduction_148
happyReduction_148 happy_x_2
happy_x_1
= case happyOut65 happy_x_2 of { happy_var_2 ->
happyIn57
(EPatt happy_var_2
)}
happyReduce_149 = happySpecReduce_2 48# happyReduction_149
happyReduction_149 happy_x_2
happy_x_1
= case happyOut58 happy_x_2 of { happy_var_2 ->
happyIn57
(EPattType happy_var_2
)}
happyReduce_150 = happySpecReduce_3 48# happyReduction_150
happyReduction_150 happy_x_3
happy_x_2
happy_x_1
= case happyOutTok happy_x_2 of { ((T_Ident happy_var_2)) ->
case happyOut58 happy_x_3 of { happy_var_3 ->
happyIn57
(ELincat happy_var_2 happy_var_3
)}}
happyReduce_151 = happySpecReduce_3 48# happyReduction_151
happyReduction_151 happy_x_3
happy_x_2
happy_x_1
= case happyOutTok happy_x_2 of { ((T_Ident happy_var_2)) ->
case happyOut58 happy_x_3 of { happy_var_3 ->
happyIn57
(ELin happy_var_2 happy_var_3
)}}
happyReduce_152 = happySpecReduce_1 48# happyReduction_152
happyReduction_152 happy_x_1
= case happyOut58 happy_x_1 of { happy_var_1 ->
happyIn57
(happy_var_1
)}
happyReduce_153 = happySpecReduce_3 49# happyReduction_153
happyReduction_153 happy_x_3
happy_x_2
happy_x_1
= case happyOut58 happy_x_1 of { happy_var_1 ->
case happyOut67 happy_x_3 of { happy_var_3 ->
happyIn58
(P happy_var_1 happy_var_3
)}}
happyReduce_154 = happySpecReduce_1 49# happyReduction_154
happyReduction_154 happy_x_1
= case happyOut59 happy_x_1 of { happy_var_1 ->
happyIn58
(happy_var_1
)}
happyReduce_155 = happySpecReduce_1 50# happyReduction_155
happyReduction_155 happy_x_1
= case happyOutTok happy_x_1 of { ((T_Ident happy_var_1)) ->
happyIn59
(Vr happy_var_1
)}
happyReduce_156 = happySpecReduce_1 50# happyReduction_156
happyReduction_156 happy_x_1
= case happyOut68 happy_x_1 of { happy_var_1 ->
happyIn59
(Sort happy_var_1
)}
happyReduce_157 = happySpecReduce_1 50# happyReduction_157
happyReduction_157 happy_x_1
= case happyOutTok happy_x_1 of { ((T_String happy_var_1)) ->
happyIn59
(K happy_var_1
)}
happyReduce_158 = happySpecReduce_1 50# happyReduction_158
happyReduction_158 happy_x_1
= case happyOutTok happy_x_1 of { ((T_Integer happy_var_1)) ->
happyIn59
(EInt happy_var_1
)}
happyReduce_159 = happySpecReduce_1 50# happyReduction_159
happyReduction_159 happy_x_1
= case happyOutTok happy_x_1 of { ((T_Double happy_var_1)) ->
happyIn59
(EFloat happy_var_1
)}
happyReduce_160 = happySpecReduce_1 50# happyReduction_160
happyReduction_160 happy_x_1
= happyIn59
(Meta 0
)
happyReduce_161 = happySpecReduce_2 50# happyReduction_161
happyReduction_161 happy_x_2
happy_x_1
= happyIn59
(Empty
)
happyReduce_162 = happyReduce 4# 50# happyReduction_162
happyReduction_162 (happy_x_4 `HappyStk`
happy_x_3 `HappyStk`
happy_x_2 `HappyStk`
happy_x_1 `HappyStk`
happyRest)
= case happyOutTok happy_x_2 of { ((T_Ident happy_var_2)) ->
case happyOut61 happy_x_3 of { happy_var_3 ->
happyIn59
(foldl App (Vr (mkListId happy_var_2)) happy_var_3
) `HappyStk` happyRest}}
happyReduce_163 = happySpecReduce_3 50# happyReduction_163
happyReduction_163 happy_x_3
happy_x_2
happy_x_1
= case happyOutTok happy_x_2 of { ((T_String happy_var_2)) ->
happyIn59
(K happy_var_2
)}
happyReduce_164 = happyMonadReduce 3# 50# happyReduction_164
happyReduction_164 (happy_x_3 `HappyStk`
happy_x_2 `HappyStk`
happy_x_1 `HappyStk`
happyRest) tk
= happyThen (case happyOut52 happy_x_2 of { happy_var_2 ->
( mkR happy_var_2)}
) (\r -> happyReturn (happyIn59 r))
happyReduce_165 = happySpecReduce_3 50# happyReduction_165
happyReduction_165 happy_x_3
happy_x_2
happy_x_1
= case happyOut77 happy_x_2 of { happy_var_2 ->
happyIn59
(R (tuple2record happy_var_2)
)}
happyReduce_166 = happyReduce 5# 50# happyReduction_166
happyReduction_166 (happy_x_5 `HappyStk`
happy_x_4 `HappyStk`
happy_x_3 `HappyStk`
happy_x_2 `HappyStk`
happy_x_1 `HappyStk`
happyRest)
= case happyOut53 happy_x_2 of { happy_var_2 ->
case happyOut53 happy_x_4 of { happy_var_4 ->
happyIn59
(Typed happy_var_2 happy_var_4
) `HappyStk` happyRest}}
happyReduce_167 = happySpecReduce_3 50# happyReduction_167
happyReduction_167 happy_x_3
happy_x_2
happy_x_1
= case happyOut53 happy_x_2 of { happy_var_2 ->
happyIn59
(happy_var_2
)}
happyReduce_168 = happySpecReduce_0 51# happyReduction_168
happyReduction_168 = happyIn60
([]
)
happyReduce_169 = happySpecReduce_1 51# happyReduction_169
happyReduction_169 happy_x_1
= case happyOut53 happy_x_1 of { happy_var_1 ->
happyIn60
([happy_var_1]
)}
happyReduce_170 = happySpecReduce_3 51# happyReduction_170
happyReduction_170 happy_x_3
happy_x_2
happy_x_1
= case happyOut53 happy_x_1 of { happy_var_1 ->
case happyOut60 happy_x_3 of { happy_var_3 ->
happyIn60
(happy_var_1 : happy_var_3
)}}
happyReduce_171 = happySpecReduce_0 52# happyReduction_171
happyReduction_171 = happyIn61
([]
)
happyReduce_172 = happySpecReduce_2 52# happyReduction_172
happyReduction_172 happy_x_2
happy_x_1
= case happyOut59 happy_x_1 of { happy_var_1 ->
case happyOut61 happy_x_2 of { happy_var_2 ->
happyIn61
(happy_var_1 : happy_var_2
)}}
happyReduce_173 = happySpecReduce_3 53# happyReduction_173
happyReduction_173 happy_x_3
happy_x_2
happy_x_1
= case happyOut62 happy_x_1 of { happy_var_1 ->
case happyOut63 happy_x_3 of { happy_var_3 ->
happyIn62
(PAlt happy_var_1 happy_var_3
)}}
happyReduce_174 = happySpecReduce_3 53# happyReduction_174
happyReduction_174 happy_x_3
happy_x_2
happy_x_1
= case happyOut62 happy_x_1 of { happy_var_1 ->
case happyOut63 happy_x_3 of { happy_var_3 ->
happyIn62
(PSeq happy_var_1 happy_var_3
)}}
happyReduce_175 = happySpecReduce_1 53# happyReduction_175
happyReduction_175 happy_x_1
= case happyOut63 happy_x_1 of { happy_var_1 ->
happyIn62
(happy_var_1
)}
happyReduce_176 = happySpecReduce_2 54# happyReduction_176
happyReduction_176 happy_x_2
happy_x_1
= case happyOutTok happy_x_1 of { ((T_Ident happy_var_1)) ->
case happyOut70 happy_x_2 of { happy_var_2 ->
happyIn63
(PC happy_var_1 happy_var_2
)}}
happyReduce_177 = happyReduce 4# 54# happyReduction_177
happyReduction_177 (happy_x_4 `HappyStk`
happy_x_3 `HappyStk`
happy_x_2 `HappyStk`
happy_x_1 `HappyStk`
happyRest)
= case happyOut96 happy_x_1 of { happy_var_1 ->
case happyOutTok happy_x_3 of { ((T_Ident happy_var_3)) ->
case happyOut70 happy_x_4 of { happy_var_4 ->
happyIn63
(PP (happy_var_1,happy_var_3) happy_var_4
) `HappyStk` happyRest}}}
happyReduce_178 = happySpecReduce_2 54# happyReduction_178
happyReduction_178 happy_x_2
happy_x_1
= case happyOut65 happy_x_1 of { happy_var_1 ->
happyIn63
(PRep happy_var_1
)}
happyReduce_179 = happySpecReduce_1 54# happyReduction_179
happyReduction_179 happy_x_1
= case happyOut64 happy_x_1 of { happy_var_1 ->
happyIn63
(happy_var_1
)}
happyReduce_180 = happySpecReduce_3 55# happyReduction_180
happyReduction_180 happy_x_3
happy_x_2
happy_x_1
= case happyOutTok happy_x_1 of { ((T_Ident happy_var_1)) ->
case happyOut65 happy_x_3 of { happy_var_3 ->
happyIn64
(PAs happy_var_1 happy_var_3
)}}
happyReduce_181 = happySpecReduce_2 55# happyReduction_181
happyReduction_181 happy_x_2
happy_x_1
= case happyOut65 happy_x_2 of { happy_var_2 ->
happyIn64
(PNeg happy_var_2
)}
happyReduce_182 = happySpecReduce_2 55# happyReduction_182
happyReduction_182 happy_x_2
happy_x_1
= case happyOut59 happy_x_2 of { happy_var_2 ->
happyIn64
(PTilde happy_var_2
)}
happyReduce_183 = happySpecReduce_1 55# happyReduction_183
happyReduction_183 happy_x_1
= case happyOut65 happy_x_1 of { happy_var_1 ->
happyIn64
(happy_var_1
)}
happyReduce_184 = happySpecReduce_1 56# happyReduction_184
happyReduction_184 happy_x_1
= happyIn65
(PChar
)
happyReduce_185 = happySpecReduce_3 56# happyReduction_185
happyReduction_185 happy_x_3
happy_x_2
happy_x_1
= case happyOutTok happy_x_2 of { ((T_String happy_var_2)) ->
happyIn65
(PChars happy_var_2
)}
happyReduce_186 = happySpecReduce_2 56# happyReduction_186
happyReduction_186 happy_x_2
happy_x_1
= case happyOutTok happy_x_2 of { ((T_Ident happy_var_2)) ->
happyIn65
(PMacro happy_var_2
)}
happyReduce_187 = happyReduce 4# 56# happyReduction_187
happyReduction_187 (happy_x_4 `HappyStk`
happy_x_3 `HappyStk`
happy_x_2 `HappyStk`
happy_x_1 `HappyStk`
happyRest)
= case happyOut96 happy_x_2 of { happy_var_2 ->
case happyOutTok happy_x_4 of { ((T_Ident happy_var_4)) ->
happyIn65
(PM (happy_var_2,happy_var_4)
) `HappyStk` happyRest}}
happyReduce_188 = happySpecReduce_1 56# happyReduction_188
happyReduction_188 happy_x_1
= happyIn65
(PW
)
happyReduce_189 = happySpecReduce_1 56# happyReduction_189
happyReduction_189 happy_x_1
= case happyOutTok happy_x_1 of { ((T_Ident happy_var_1)) ->
happyIn65
(PV happy_var_1
)}
happyReduce_190 = happySpecReduce_3 56# happyReduction_190
happyReduction_190 happy_x_3
happy_x_2
happy_x_1
= case happyOut96 happy_x_1 of { happy_var_1 ->
case happyOutTok happy_x_3 of { ((T_Ident happy_var_3)) ->
happyIn65
(PP (happy_var_1,happy_var_3) []
)}}
happyReduce_191 = happySpecReduce_1 56# happyReduction_191
happyReduction_191 happy_x_1
= case happyOutTok happy_x_1 of { ((T_Integer happy_var_1)) ->
happyIn65
(PInt happy_var_1
)}
happyReduce_192 = happySpecReduce_1 56# happyReduction_192
happyReduction_192 happy_x_1
= case happyOutTok happy_x_1 of { ((T_Double happy_var_1)) ->
happyIn65
(PFloat happy_var_1
)}
happyReduce_193 = happySpecReduce_1 56# happyReduction_193
happyReduction_193 happy_x_1
= case happyOutTok happy_x_1 of { ((T_String happy_var_1)) ->
happyIn65
(PString happy_var_1
)}
happyReduce_194 = happySpecReduce_3 56# happyReduction_194
happyReduction_194 happy_x_3
happy_x_2
happy_x_1
= case happyOut69 happy_x_2 of { happy_var_2 ->
happyIn65
(PR happy_var_2
)}
happyReduce_195 = happySpecReduce_3 56# happyReduction_195
happyReduction_195 happy_x_3
happy_x_2
happy_x_1
= case happyOut78 happy_x_2 of { happy_var_2 ->
happyIn65
((PR . tuple2recordPatt) happy_var_2
)}
happyReduce_196 = happySpecReduce_3 56# happyReduction_196
happyReduction_196 happy_x_3
happy_x_2
happy_x_1
= case happyOut62 happy_x_2 of { happy_var_2 ->
happyIn65
(happy_var_2
)}
happyReduce_197 = happySpecReduce_3 57# happyReduction_197
happyReduction_197 happy_x_3
happy_x_2
happy_x_1
= case happyOut46 happy_x_1 of { happy_var_1 ->
case happyOut62 happy_x_3 of { happy_var_3 ->
happyIn66
([(LIdent (ident2raw i),happy_var_3) | i <- happy_var_1]
)}}
happyReduce_198 = happySpecReduce_1 58# happyReduction_198
happyReduction_198 happy_x_1
= case happyOutTok happy_x_1 of { ((T_Ident happy_var_1)) ->
happyIn67
(LIdent (ident2raw happy_var_1)
)}
happyReduce_199 = happySpecReduce_2 58# happyReduction_199
happyReduction_199 happy_x_2
happy_x_1
= case happyOutTok happy_x_2 of { ((T_Integer happy_var_2)) ->
happyIn67
(LVar (fromIntegral happy_var_2)
)}
happyReduce_200 = happySpecReduce_1 59# happyReduction_200
happyReduction_200 happy_x_1
= happyIn68
(cType
)
happyReduce_201 = happySpecReduce_1 59# happyReduction_201
happyReduction_201 happy_x_1
= happyIn68
(cPType
)
happyReduce_202 = happySpecReduce_1 59# happyReduction_202
happyReduction_202 happy_x_1
= happyIn68
(cTok
)
happyReduce_203 = happySpecReduce_1 59# happyReduction_203
happyReduction_203 happy_x_1
= happyIn68
(cStr
)
happyReduce_204 = happySpecReduce_1 59# happyReduction_204
happyReduction_204 happy_x_1
= happyIn68
(cStrs
)
happyReduce_205 = happySpecReduce_0 60# happyReduction_205
happyReduction_205 = happyIn69
([]
)
happyReduce_206 = happySpecReduce_1 60# happyReduction_206
happyReduction_206 happy_x_1
= case happyOut66 happy_x_1 of { happy_var_1 ->
happyIn69
(happy_var_1
)}
happyReduce_207 = happySpecReduce_3 60# happyReduction_207
happyReduction_207 happy_x_3
happy_x_2
happy_x_1
= case happyOut66 happy_x_1 of { happy_var_1 ->
case happyOut69 happy_x_3 of { happy_var_3 ->
happyIn69
(happy_var_1 ++ happy_var_3
)}}
happyReduce_208 = happySpecReduce_1 61# happyReduction_208
happyReduction_208 happy_x_1
= case happyOut71 happy_x_1 of { happy_var_1 ->
happyIn70
([happy_var_1]
)}
happyReduce_209 = happySpecReduce_2 61# happyReduction_209
happyReduction_209 happy_x_2
happy_x_1
= case happyOut71 happy_x_1 of { happy_var_1 ->
case happyOut70 happy_x_2 of { happy_var_2 ->
happyIn70
(happy_var_1 : happy_var_2
)}}
happyReduce_210 = happySpecReduce_1 62# happyReduction_210
happyReduction_210 happy_x_1
= case happyOut64 happy_x_1 of { happy_var_1 ->
happyIn71
(happy_var_1
)}
happyReduce_211 = happySpecReduce_3 62# happyReduction_211
happyReduction_211 happy_x_3
happy_x_2
happy_x_1
= case happyOut62 happy_x_2 of { happy_var_2 ->
happyIn71
(PImplArg happy_var_2
)}
happyReduce_212 = happySpecReduce_1 63# happyReduction_212
happyReduction_212 happy_x_1
= case happyOutTok happy_x_1 of { ((T_Ident happy_var_1)) ->
happyIn72
([(Explicit,happy_var_1 )]
)}
happyReduce_213 = happySpecReduce_1 63# happyReduction_213
happyReduction_213 happy_x_1
= happyIn72
([(Explicit,identW)]
)
happyReduce_214 = happySpecReduce_3 63# happyReduction_214
happyReduction_214 happy_x_3
happy_x_2
happy_x_1
= case happyOut47 happy_x_2 of { happy_var_2 ->
happyIn72
([(Implicit,v) | v <- happy_var_2]
)}
happyReduce_215 = happySpecReduce_1 64# happyReduction_215
happyReduction_215 happy_x_1
= case happyOut72 happy_x_1 of { happy_var_1 ->
happyIn73
(happy_var_1
)}
happyReduce_216 = happySpecReduce_2 64# happyReduction_216
happyReduction_216 happy_x_2
happy_x_1
= case happyOut72 happy_x_1 of { happy_var_1 ->
case happyOut73 happy_x_2 of { happy_var_2 ->
happyIn73
(happy_var_1 ++ happy_var_2
)}}
happyReduce_217 = happySpecReduce_1 65# happyReduction_217
happyReduction_217 happy_x_1
= case happyOutTok happy_x_1 of { ((T_Ident happy_var_1)) ->
happyIn74
([(Explicit,happy_var_1 )]
)}
happyReduce_218 = happySpecReduce_1 65# happyReduction_218
happyReduction_218 happy_x_1
= happyIn74
([(Explicit,identW)]
)
happyReduce_219 = happySpecReduce_3 65# happyReduction_219
happyReduction_219 happy_x_3
happy_x_2
happy_x_1
= case happyOut46 happy_x_2 of { happy_var_2 ->
happyIn74
([(Implicit,v) | v <- happy_var_2]
)}
happyReduce_220 = happySpecReduce_1 66# happyReduction_220
happyReduction_220 happy_x_1
= case happyOut74 happy_x_1 of { happy_var_1 ->
happyIn75
(happy_var_1
)}
happyReduce_221 = happySpecReduce_3 66# happyReduction_221
happyReduction_221 happy_x_3
happy_x_2
happy_x_1
= case happyOut74 happy_x_1 of { happy_var_1 ->
case happyOut75 happy_x_3 of { happy_var_3 ->
happyIn75
(happy_var_1 ++ happy_var_3
)}}
happyReduce_222 = happyReduce 5# 67# happyReduction_222
happyReduction_222 (happy_x_5 `HappyStk`
happy_x_4 `HappyStk`
happy_x_3 `HappyStk`
happy_x_2 `HappyStk`
happy_x_1 `HappyStk`
happyRest)
= case happyOut75 happy_x_2 of { happy_var_2 ->
case happyOut53 happy_x_4 of { happy_var_4 ->
happyIn76
([(b,x,happy_var_4) | (b,x) <- happy_var_2]
) `HappyStk` happyRest}}
happyReduce_223 = happySpecReduce_1 67# happyReduction_223
happyReduction_223 happy_x_1
= case happyOut56 happy_x_1 of { happy_var_1 ->
happyIn76
([mkHypo happy_var_1]
)}
happyReduce_224 = happySpecReduce_0 68# happyReduction_224
happyReduction_224 = happyIn77
([]
)
happyReduce_225 = happySpecReduce_1 68# happyReduction_225
happyReduction_225 happy_x_1
= case happyOut53 happy_x_1 of { happy_var_1 ->
happyIn77
([happy_var_1]
)}
happyReduce_226 = happySpecReduce_3 68# happyReduction_226
happyReduction_226 happy_x_3
happy_x_2
happy_x_1
= case happyOut53 happy_x_1 of { happy_var_1 ->
case happyOut77 happy_x_3 of { happy_var_3 ->
happyIn77
(happy_var_1 : happy_var_3
)}}
happyReduce_227 = happySpecReduce_0 69# happyReduction_227
happyReduction_227 = happyIn78
([]
)
happyReduce_228 = happySpecReduce_1 69# happyReduction_228
happyReduction_228 happy_x_1
= case happyOut62 happy_x_1 of { happy_var_1 ->
happyIn78
([happy_var_1]
)}
happyReduce_229 = happySpecReduce_3 69# happyReduction_229
happyReduction_229 happy_x_3
happy_x_2
happy_x_1
= case happyOut62 happy_x_1 of { happy_var_1 ->
case happyOut78 happy_x_3 of { happy_var_3 ->
happyIn78
(happy_var_1 : happy_var_3
)}}
happyReduce_230 = happySpecReduce_3 70# happyReduction_230
happyReduction_230 happy_x_3
happy_x_2
happy_x_1
= case happyOut62 happy_x_1 of { happy_var_1 ->
case happyOut53 happy_x_3 of { happy_var_3 ->
happyIn79
((happy_var_1,happy_var_3)
)}}
happyReduce_231 = happySpecReduce_1 71# happyReduction_231
happyReduction_231 happy_x_1
= case happyOut79 happy_x_1 of { happy_var_1 ->
happyIn80
([happy_var_1]
)}
happyReduce_232 = happySpecReduce_3 71# happyReduction_232
happyReduction_232 happy_x_3
happy_x_2
happy_x_1
= case happyOut79 happy_x_1 of { happy_var_1 ->
case happyOut80 happy_x_3 of { happy_var_3 ->
happyIn80
(happy_var_1 : happy_var_3
)}}
happyReduce_233 = happySpecReduce_3 72# happyReduction_233
happyReduction_233 happy_x_3
happy_x_2
happy_x_1
= case happyOut53 happy_x_1 of { happy_var_1 ->
case happyOut53 happy_x_3 of { happy_var_3 ->
happyIn81
((happy_var_1,happy_var_3)
)}}
happyReduce_234 = happySpecReduce_1 73# happyReduction_234
happyReduction_234 happy_x_1
= case happyOut81 happy_x_1 of { happy_var_1 ->
happyIn82
([happy_var_1]
)}
happyReduce_235 = happySpecReduce_3 73# happyReduction_235
happyReduction_235 happy_x_3
happy_x_2
happy_x_1
= case happyOut81 happy_x_1 of { happy_var_1 ->
case happyOut82 happy_x_3 of { happy_var_3 ->
happyIn82
(happy_var_1 : happy_var_3
)}}
happyReduce_236 = happyReduce 5# 74# happyReduction_236
happyReduction_236 (happy_x_5 `HappyStk`
happy_x_4 `HappyStk`
happy_x_3 `HappyStk`
happy_x_2 `HappyStk`
happy_x_1 `HappyStk`
happyRest)
= case happyOut75 happy_x_2 of { happy_var_2 ->
case happyOut53 happy_x_4 of { happy_var_4 ->
happyIn83
([(b,x,happy_var_4) | (b,x) <- happy_var_2]
) `HappyStk` happyRest}}
happyReduce_237 = happySpecReduce_1 74# happyReduction_237
happyReduction_237 happy_x_1
= case happyOut59 happy_x_1 of { happy_var_1 ->
happyIn83
([mkHypo happy_var_1]
)}
happyReduce_238 = happySpecReduce_0 75# happyReduction_238
happyReduction_238 = happyIn84
([]
)
happyReduce_239 = happySpecReduce_2 75# happyReduction_239
happyReduction_239 happy_x_2
happy_x_1
= case happyOut83 happy_x_1 of { happy_var_1 ->
case happyOut84 happy_x_2 of { happy_var_2 ->
happyIn84
(happy_var_1 ++ happy_var_2
)}}
happyReduce_240 = happySpecReduce_1 76# happyReduction_240
happyReduction_240 happy_x_1
= case happyOut86 happy_x_1 of { happy_var_1 ->
happyIn85
(happy_var_1
)}
happyReduce_241 = happySpecReduce_2 76# happyReduction_241
happyReduction_241 happy_x_2
happy_x_1
= case happyOut86 happy_x_1 of { happy_var_1 ->
case happyOut85 happy_x_2 of { happy_var_2 ->
happyIn85
(happy_var_1 ++ happy_var_2
)}}
happyReduce_242 = happyReduce 6# 77# happyReduction_242
happyReduction_242 (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 happyOutTok happy_x_1 of { ((T_Ident happy_var_1)) ->
case happyOutTok happy_x_3 of { ((T_Ident happy_var_3)) ->
case happyOut88 happy_x_5 of { happy_var_5 ->
happyIn86
([CFRule (showIdent happy_var_3) happy_var_5 (CFObj (mkCId (showIdent happy_var_1)) [])]
) `HappyStk` happyRest}}}
happyReduce_243 = happyReduce 4# 77# happyReduction_243
happyReduction_243 (happy_x_4 `HappyStk`
happy_x_3 `HappyStk`
happy_x_2 `HappyStk`
happy_x_1 `HappyStk`
happyRest)
= case happyOutTok happy_x_1 of { ((T_Ident happy_var_1)) ->
case happyOut87 happy_x_3 of { happy_var_3 ->
happyIn86
(let { cat = showIdent happy_var_1;
mkFun cat its =
case its of {
[] -> cat ++ "_";
_ -> concat $ intersperse "_" (cat : filter (not . null) (map clean its))
};
clean sym =
case sym of {
Terminal c -> filter isAlphaNum c;
NonTerminal t -> t
}
} in map (\rhs -> CFRule cat rhs (CFObj (mkCId (mkFun cat rhs)) [])) happy_var_3
) `HappyStk` happyRest}}
happyReduce_244 = happySpecReduce_1 78# happyReduction_244
happyReduction_244 happy_x_1
= case happyOut88 happy_x_1 of { happy_var_1 ->
happyIn87
([happy_var_1]
)}
happyReduce_245 = happySpecReduce_3 78# happyReduction_245
happyReduction_245 happy_x_3
happy_x_2
happy_x_1
= case happyOut88 happy_x_1 of { happy_var_1 ->
case happyOut87 happy_x_3 of { happy_var_3 ->
happyIn87
(happy_var_1 : happy_var_3
)}}
happyReduce_246 = happySpecReduce_0 79# happyReduction_246
happyReduction_246 = happyIn88
([]
)
happyReduce_247 = happySpecReduce_2 79# happyReduction_247
happyReduction_247 happy_x_2
happy_x_1
= case happyOut89 happy_x_1 of { happy_var_1 ->
case happyOut88 happy_x_2 of { happy_var_2 ->
happyIn88
(happy_var_1 : happy_var_2
)}}
happyReduce_248 = happySpecReduce_1 80# happyReduction_248
happyReduction_248 happy_x_1
= case happyOutTok happy_x_1 of { ((T_String happy_var_1)) ->
happyIn89
(Terminal happy_var_1
)}
happyReduce_249 = happySpecReduce_1 80# happyReduction_249
happyReduction_249 happy_x_1
= case happyOutTok happy_x_1 of { ((T_Ident happy_var_1)) ->
happyIn89
(NonTerminal (showIdent happy_var_1)
)}
happyReduce_250 = happySpecReduce_1 81# happyReduction_250
happyReduction_250 happy_x_1
= case happyOut91 happy_x_1 of { happy_var_1 ->
happyIn90
([happy_var_1]
)}
happyReduce_251 = happySpecReduce_2 81# happyReduction_251
happyReduction_251 happy_x_2
happy_x_1
= case happyOut91 happy_x_1 of { happy_var_1 ->
case happyOut90 happy_x_2 of { happy_var_2 ->
happyIn90
(happy_var_1 : happy_var_2
)}}
happyReduce_252 = happyReduce 4# 82# happyReduction_252
happyReduction_252 (happy_x_4 `HappyStk`
happy_x_3 `HappyStk`
happy_x_2 `HappyStk`
happy_x_1 `HappyStk`
happyRest)
= case happyOutTok happy_x_1 of { ((T_Ident happy_var_1)) ->
case happyOut92 happy_x_3 of { happy_var_3 ->
happyIn91
(((showIdent happy_var_1,[]),happy_var_3)
) `HappyStk` happyRest}}
happyReduce_253 = happySpecReduce_1 83# happyReduction_253
happyReduction_253 happy_x_1
= case happyOut93 happy_x_1 of { happy_var_1 ->
happyIn92
(happy_var_1
)}
happyReduce_254 = happySpecReduce_3 83# happyReduction_254
happyReduction_254 happy_x_3
happy_x_2
happy_x_1
= case happyOut93 happy_x_1 of { happy_var_1 ->
case happyOut92 happy_x_3 of { happy_var_3 ->
happyIn92
(EAlt happy_var_1 happy_var_3
)}}
happyReduce_255 = happySpecReduce_1 84# happyReduction_255
happyReduction_255 happy_x_1
= case happyOut94 happy_x_1 of { happy_var_1 ->
happyIn93
(happy_var_1
)}
happyReduce_256 = happySpecReduce_2 84# happyReduction_256
happyReduction_256 happy_x_2
happy_x_1
= case happyOut94 happy_x_1 of { happy_var_1 ->
case happyOut93 happy_x_2 of { happy_var_2 ->
happyIn93
(ESeq happy_var_1 happy_var_2
)}}
happyReduce_257 = happySpecReduce_2 85# happyReduction_257
happyReduction_257 happy_x_2
happy_x_1
= case happyOut95 happy_x_1 of { happy_var_1 ->
happyIn94
(EStar happy_var_1
)}
happyReduce_258 = happySpecReduce_2 85# happyReduction_258
happyReduction_258 happy_x_2
happy_x_1
= case happyOut95 happy_x_1 of { happy_var_1 ->
happyIn94
(EPlus happy_var_1
)}
happyReduce_259 = happySpecReduce_2 85# happyReduction_259
happyReduction_259 happy_x_2
happy_x_1
= case happyOut95 happy_x_1 of { happy_var_1 ->
happyIn94
(EOpt happy_var_1
)}
happyReduce_260 = happySpecReduce_1 85# happyReduction_260
happyReduction_260 happy_x_1
= case happyOut95 happy_x_1 of { happy_var_1 ->
happyIn94
(happy_var_1
)}
happyReduce_261 = happySpecReduce_1 86# happyReduction_261
happyReduction_261 happy_x_1
= case happyOutTok happy_x_1 of { ((T_String happy_var_1)) ->
happyIn95
(ETerm happy_var_1
)}
happyReduce_262 = happySpecReduce_1 86# happyReduction_262
happyReduction_262 happy_x_1
= case happyOutTok happy_x_1 of { ((T_Ident happy_var_1)) ->
happyIn95
(ENonTerm (showIdent happy_var_1,[])
)}
happyReduce_263 = happySpecReduce_3 86# happyReduction_263
happyReduction_263 happy_x_3
happy_x_2
happy_x_1
= case happyOut92 happy_x_2 of { happy_var_2 ->
happyIn95
(happy_var_2
)}
happyReduce_264 = happySpecReduce_1 87# happyReduction_264
happyReduction_264 happy_x_1
= case happyOutTok happy_x_1 of { ((T_Ident happy_var_1)) ->
happyIn96
(MN happy_var_1
)}
happyReduce_265 = happyMonadReduce 0# 88# happyReduction_265
happyReduction_265 (happyRest) tk
= happyThen (( getPosn)
) (\r -> happyReturn (happyIn97 r))
happyNewToken action sts stk
= lexer(\tk ->
let cont i = happyDoAction i tk action sts stk in
case tk of {
T_EOF -> happyDoAction 72# tk action sts stk;
T_exclmark -> cont 1#;
T_patt -> cont 2#;
T_int_label -> cont 3#;
T_oparen -> cont 4#;
T_cparen -> cont 5#;
T_tilde -> cont 6#;
T_star -> cont 7#;
T_starstar -> cont 8#;
T_plus -> cont 9#;
T_plusplus -> cont 10#;
T_comma -> cont 11#;
T_minus -> cont 12#;
T_rarrow -> cont 13#;
T_dot -> cont 14#;
T_alt -> cont 15#;
T_colon -> cont 16#;
T_semicolon -> cont 17#;
T_less -> cont 18#;
T_equal -> cont 19#;
T_big_rarrow -> cont 20#;
T_great -> cont 21#;
T_questmark -> cont 22#;
T_at -> cont 23#;
T_obrack -> cont 24#;
T_cbrack -> cont 25#;
T_ocurly -> cont 26#;
T_ccurly -> cont 27#;
T_lam -> cont 28#;
T_lamlam -> cont 29#;
T_underscore -> cont 30#;
T_bar -> cont 31#;
T_cfarrow -> cont 32#;
T_PType -> cont 33#;
T_Str -> cont 34#;
T_Strs -> cont 35#;
T_Tok -> cont 36#;
T_Type -> cont 37#;
T_abstract -> cont 38#;
T_case -> cont 39#;
T_cat -> cont 40#;
T_concrete -> cont 41#;
T_data -> cont 42#;
T_def -> cont 43#;
T_flags -> cont 44#;
T_fun -> cont 45#;
T_in -> cont 46#;
T_incomplete -> cont 47#;
T_instance -> cont 48#;
T_interface -> cont 49#;
T_let -> cont 50#;
T_lin -> cont 51#;
T_lincat -> cont 52#;
T_lindef -> cont 53#;
T_linref -> cont 54#;
T_of -> cont 55#;
T_open -> cont 56#;
T_oper -> cont 57#;
T_param -> cont 58#;
T_pattern -> cont 59#;
T_pre -> cont 60#;
T_printname -> cont 61#;
T_resource -> cont 62#;
T_strs -> cont 63#;
T_table -> cont 64#;
T_variants -> cont 65#;
T_where -> cont 66#;
T_with -> cont 67#;
(T_Integer happy_dollar_dollar) -> cont 68#;
(T_Double happy_dollar_dollar) -> cont 69#;
(T_String happy_dollar_dollar) -> cont 70#;
(T_Ident happy_dollar_dollar) -> cont 71#;
_ -> happyError' tk
})
happyError_ 72# tk = happyError' tk
happyError_ _ tk = happyError' tk
happyThen :: () => P a -> (a -> P b) -> P b
happyThen = (>>=)
happyReturn :: () => a -> P a
happyReturn = (return)
happyThen1 = happyThen
happyReturn1 :: () => a -> P a
happyReturn1 = happyReturn
happyError' :: () => (Token) -> P a
happyError' tk = (\token -> happyError) tk
pModDef = happySomeParser where
happySomeParser = happyThen (happyParse 0#) (\x -> happyReturn (happyOut9 x))
pTopDef = happySomeParser where
happySomeParser = happyThen (happyParse 1#) (\x -> happyReturn (happyOut24 x))
pModHeader = happySomeParser where
happySomeParser = happyThen (happyParse 2#) (\x -> happyReturn (happyOut10 x))
pExp = happySomeParser where
happySomeParser = happyThen (happyParse 3#) (\x -> happyReturn (happyOut53 x))
pCFRules = happySomeParser where
happySomeParser = happyThen (happyParse 4#) (\x -> happyReturn (happyOut85 x))
pEBNFRules = happySomeParser where
happySomeParser = happyThen (happyParse 5#) (\x -> happyReturn (happyOut90 x))
happySeq = happyDontSeq
happyError :: P a
happyError = fail "syntax error"
mkListId,mkConsId,mkBaseId :: Ident -> Ident
mkListId = prefixIdent "List"
mkConsId = prefixIdent "Cons"
mkBaseId = prefixIdent "Base"
listCatDef :: L (Ident, Context, Int) -> [(Ident,Info)]
listCatDef (L loc (id,cont,size)) = [catd,nilfund,consfund]
where
listId = mkListId id
baseId = mkBaseId id
consId = mkConsId id
catd = (listId, AbsCat (Just (L loc cont')))
nilfund = (baseId, AbsFun (Just (L loc niltyp)) Nothing Nothing (Just True))
consfund = (consId, AbsFun (Just (L loc constyp)) Nothing Nothing (Just True))
cont' = [(b,mkId x i,ty) | (i,(b,x,ty)) <- zip [0..] cont]
xs = map (\(b,x,t) -> Vr x) cont'
cd = mkHypo (mkApp (Vr id) xs)
lc = mkApp (Vr listId) xs
niltyp = mkProdSimple (cont' ++ replicate size cd) lc
constyp = mkProdSimple (cont' ++ [cd, mkHypo lc]) lc
mkId x i = if isWildIdent x then (varX i) else x
tryLoc (c,mty,Just e) = return (c,(mty,e))
tryLoc (c,_ ,_ ) = fail ("local definition of" +++ showIdent c +++ "without value")
mkR [] = return $ RecType []
mkR fs@(f:_) =
case f of
(lab,Just ty,Nothing) -> mapM tryRT fs >>= return . RecType
_ -> mapM tryR fs >>= return . R
where
tryRT (lab,Just ty,Nothing) = return (ident2label lab,ty)
tryRT (lab,_ ,_ ) = fail $ "illegal record type field" +++ showIdent lab
tryR (lab,mty,Just t) = return (ident2label lab,(mty,t))
tryR (lab,_ ,_ ) = fail $ "illegal record field" +++ showIdent lab
mkOverload pdt pdf@(Just (L loc df)) =
case appForm df of
(keyw, ts@(_:_)) | isOverloading keyw ->
case last ts of
R fs -> [ResOverload [MN m | Vr m <- ts] [(L loc ty,L loc fu) | (_,(Just ty,fu)) <- fs]]
_ -> [ResOper pdt pdf]
_ -> [ResOper pdt pdf]
mkOverload pdt@(Just (L _ df)) pdf =
case appForm df of
(keyw, ts@(_:_)) | isOverloading keyw ->
case last ts of
RecType _ -> []
_ -> [ResOper pdt pdf]
_ -> [ResOper pdt pdf]
mkOverload pdt pdf = [ResOper pdt pdf]
isOverloading t =
case t of
Vr keyw | showIdent keyw == "overload" -> True
_ -> False
checkInfoType mt jment@(id,info) =
case info of
AbsCat pcont -> ifAbstract mt (locPerh pcont)
AbsFun pty _ pde _ -> ifAbstract mt (locPerh pty ++ maybe [] locAll pde)
CncCat pty pd pr ppn _->ifConcrete mt (locPerh pty ++ locPerh pd ++ locPerh pr ++ locPerh ppn)
CncFun _ pd ppn _ -> ifConcrete mt (locPerh pd ++ locPerh ppn)
ResParam pparam _ -> ifResource mt (locPerh pparam)
ResValue ty -> ifResource mt (locL ty)
ResOper pty pt -> ifOper mt pty pt
ResOverload _ xs -> ifResource mt (concat [[loc1,loc2] | (L loc1 _,L loc2 _) <- xs])
where
locPerh = maybe [] locL
locAll xs = [loc | L loc x <- xs]
locL (L loc x) = [loc]
illegal (Local s e:_) = failLoc (Pn s 0) "illegal definition"
illegal _ = return jment
ifAbstract MTAbstract locs = return jment
ifAbstract _ locs = illegal locs
ifConcrete (MTConcrete _) locs = return jment
ifConcrete _ locs = illegal locs
ifResource (MTConcrete _) locs = return jment
ifResource (MTInstance _) locs = return jment
ifResource MTInterface locs = return jment
ifResource MTResource locs = return jment
ifResource _ locs = illegal locs
ifOper MTAbstract pty pt = return (id,AbsFun pty (fmap (const 0) pt) (Just (maybe [] (\(L l t) -> [L l ([],t)]) pt)) (Just False))
ifOper _ pty pt = return jment
mkAlts cs = case cs of
_:_ -> do
def <- mkDef (last cs)
alts <- mapM mkAlt (init cs)
return (Alts def alts)
_ -> fail "empty alts"
where
mkDef (_,t) = return t
mkAlt (p,t) = do
ss <- mkStrs p
return (t,ss)
mkStrs p = case p of
PAlt a b -> do
Strs as <- mkStrs a
Strs bs <- mkStrs b
return $ Strs $ as ++ bs
PString s -> return $ Strs [K s]
PV x -> return (Vr x)
PMacro x -> return (Vr x)
PM c -> return (Q c)
_ -> fail "no strs from pattern"
mkL :: Posn -> Posn -> x -> L x
mkL (Pn l1 _) (Pn l2 _) x = L (Local l1 l2) x
# 1 "/usr/include/stdc-predef.h" 1 3 4
# 17 "/usr/include/stdc-predef.h" 3 4
#if __GLASGOW_HASKELL__ > 706
#define LT(n,m) ((Happy_GHC_Exts.tagToEnum# (n Happy_GHC_Exts.<# m)) :: Bool)
#define GTE(n,m) ((Happy_GHC_Exts.tagToEnum# (n Happy_GHC_Exts.>=# m)) :: Bool)
#define EQ(n,m) ((Happy_GHC_Exts.tagToEnum# (n Happy_GHC_Exts.==# m)) :: Bool)
#else
#define LT(n,m) (n Happy_GHC_Exts.<# m)
#define GTE(n,m) (n Happy_GHC_Exts.>=# m)
#define EQ(n,m) (n Happy_GHC_Exts.==# m)
#endif
data Happy_IntList = HappyCons Happy_GHC_Exts.Int# Happy_IntList
infixr 9 `HappyStk`
data HappyStk a = HappyStk a (HappyStk a)
happyParse start_state = happyNewToken start_state notHappyAtAll notHappyAtAll
happyAccept 0# tk st sts (_ `HappyStk` ans `HappyStk` _) =
happyReturn1 ans
happyAccept j tk st sts (HappyStk ans _) =
(happyTcHack j (happyTcHack st)) (happyReturn1 ans)
happyDoAction i tk st
=
case action of
0# ->
happyFail i tk st
1# ->
happyAccept i tk st
n | LT(n,(0# :: Happy_GHC_Exts.Int#)) ->
(happyReduceArr Happy_Data_Array.! rule) i tk st
where rule = (Happy_GHC_Exts.I# ((Happy_GHC_Exts.negateInt# ((n Happy_GHC_Exts.+# (1# :: Happy_GHC_Exts.Int#))))))
n ->
happyShift new_state i tk st
where new_state = (n Happy_GHC_Exts.-# (1# :: Happy_GHC_Exts.Int#))
where off = indexShortOffAddr happyActOffsets st
off_i = (off Happy_GHC_Exts.+# i)
check = if GTE(off_i,(0# :: Happy_GHC_Exts.Int#))
then EQ(indexShortOffAddr happyCheck off_i, i)
else False
action
| check = indexShortOffAddr happyTable off_i
| otherwise = indexShortOffAddr happyDefActions st
indexShortOffAddr (HappyA# arr) off =
Happy_GHC_Exts.narrow16Int# i
where
i = Happy_GHC_Exts.word2Int# (Happy_GHC_Exts.or# (Happy_GHC_Exts.uncheckedShiftL# high 8#) low)
high = Happy_GHC_Exts.int2Word# (Happy_GHC_Exts.ord# (Happy_GHC_Exts.indexCharOffAddr# arr (off' Happy_GHC_Exts.+# 1#)))
low = Happy_GHC_Exts.int2Word# (Happy_GHC_Exts.ord# (Happy_GHC_Exts.indexCharOffAddr# arr off'))
off' = off Happy_GHC_Exts.*# 2#
data HappyAddr = HappyA# Happy_GHC_Exts.Addr#
happyShift new_state 0# tk st sts stk@(x `HappyStk` _) =
let i = (case Happy_GHC_Exts.unsafeCoerce# x of { (Happy_GHC_Exts.I# (i)) -> i }) in
happyDoAction i tk new_state (HappyCons (st) (sts)) (stk)
happyShift new_state i tk st sts stk =
happyNewToken new_state (HappyCons (st) (sts)) ((happyInTok (tk))`HappyStk`stk)
happySpecReduce_0 i fn 0# tk st sts stk
= happyFail 0# tk st sts stk
happySpecReduce_0 nt fn j tk st@((action)) sts stk
= happyGoto nt j tk st (HappyCons (st) (sts)) (fn `HappyStk` stk)
happySpecReduce_1 i fn 0# tk st sts stk
= happyFail 0# tk st sts stk
happySpecReduce_1 nt fn j tk _ sts@((HappyCons (st@(action)) (_))) (v1`HappyStk`stk')
= let r = fn v1 in
happySeq r (happyGoto nt j tk st sts (r `HappyStk` stk'))
happySpecReduce_2 i fn 0# tk st sts stk
= happyFail 0# tk st sts stk
happySpecReduce_2 nt fn j tk _ (HappyCons (_) (sts@((HappyCons (st@(action)) (_))))) (v1`HappyStk`v2`HappyStk`stk')
= let r = fn v1 v2 in
happySeq r (happyGoto nt j tk st sts (r `HappyStk` stk'))
happySpecReduce_3 i fn 0# tk st sts stk
= happyFail 0# tk st sts stk
happySpecReduce_3 nt fn j tk _ (HappyCons (_) ((HappyCons (_) (sts@((HappyCons (st@(action)) (_))))))) (v1`HappyStk`v2`HappyStk`v3`HappyStk`stk')
= let r = fn v1 v2 v3 in
happySeq r (happyGoto nt j tk st sts (r `HappyStk` stk'))
happyReduce k i fn 0# tk st sts stk
= happyFail 0# tk st sts stk
happyReduce k nt fn j tk st sts stk
= case happyDrop (k Happy_GHC_Exts.-# (1# :: Happy_GHC_Exts.Int#)) sts of
sts1@((HappyCons (st1@(action)) (_))) ->
let r = fn stk in
happyDoSeq r (happyGoto nt j tk st1 sts1 r)
happyMonadReduce k nt fn 0# tk st sts stk
= happyFail 0# tk st sts stk
happyMonadReduce k nt fn j tk st sts stk =
case happyDrop k (HappyCons (st) (sts)) of
sts1@((HappyCons (st1@(action)) (_))) ->
let drop_stk = happyDropStk k stk in
happyThen1 (fn stk tk) (\r -> happyGoto nt j tk st1 sts1 (r `HappyStk` drop_stk))
happyMonad2Reduce k nt fn 0# tk st sts stk
= happyFail 0# tk st sts stk
happyMonad2Reduce k nt fn j tk st sts stk =
case happyDrop k (HappyCons (st) (sts)) of
sts1@((HappyCons (st1@(action)) (_))) ->
let drop_stk = happyDropStk k stk
off = indexShortOffAddr happyGotoOffsets st1
off_i = (off Happy_GHC_Exts.+# nt)
new_state = indexShortOffAddr happyTable off_i
in
happyThen1 (fn stk tk) (\r -> happyNewToken new_state sts1 (r `HappyStk` drop_stk))
happyDrop 0# l = l
happyDrop n (HappyCons (_) (t)) = happyDrop (n Happy_GHC_Exts.-# (1# :: Happy_GHC_Exts.Int#)) t
happyDropStk 0# l = l
happyDropStk n (x `HappyStk` xs) = happyDropStk (n Happy_GHC_Exts.-# (1#::Happy_GHC_Exts.Int#)) xs
happyGoto nt j tk st =
happyDoAction j tk new_state
where off = indexShortOffAddr happyGotoOffsets st
off_i = (off Happy_GHC_Exts.+# nt)
new_state = indexShortOffAddr happyTable off_i
happyFail 0# tk old_st _ stk@(x `HappyStk` _) =
let i = (case Happy_GHC_Exts.unsafeCoerce# x of { (Happy_GHC_Exts.I# (i)) -> i }) in
happyError_ i tk
happyFail i tk (action) sts stk =
happyDoAction 0# tk action sts ( (Happy_GHC_Exts.unsafeCoerce# (Happy_GHC_Exts.I# (i))) `HappyStk` stk)
notHappyAtAll :: a
notHappyAtAll = error "Internal Happy error\n"
happyTcHack :: Happy_GHC_Exts.Int# -> a -> a
happyTcHack x y = y
happyDoSeq, happyDontSeq :: a -> b -> b
happyDoSeq a b = a `seq` b
happyDontSeq a b = b