pec 0.2.2 → 0.2.3
raw patch · 21 files changed
+970/−2403 lines, 21 filesdep ~shake
Dependency ranges changed: shake
Files
- dist/build/Language/Pec/Par.hs +0/−2397
- pec.cabal +6/−6
- test_cases/TestDeque.pec +91/−0
- test_cases/TestEmptyAlts.pec +16/−0
- test_cases/TestFun.pec +45/−0
- test_cases/TestQueue.pec +60/−0
- test_cases/euler/Euler1.pec +17/−0
- test_cases/euler/Euler10.pec +38/−0
- test_cases/euler/Euler11.pec +67/−0
- test_cases/euler/Euler12.pec +78/−0
- test_cases/euler/Euler13.pec +225/−0
- test_cases/euler/Euler14.pec +35/−0
- test_cases/euler/Euler145.pec +30/−0
- test_cases/euler/Euler2.pec +24/−0
- test_cases/euler/Euler3.pec +34/−0
- test_cases/euler/Euler4.pec +35/−0
- test_cases/euler/Euler5.pec +28/−0
- test_cases/euler/Euler6.pec +20/−0
- test_cases/euler/Euler7.pec +28/−0
- test_cases/euler/Euler8.pec +54/−0
- test_cases/euler/Euler9.pec +39/−0
− dist/build/Language/Pec/Par.hs
@@ -1,2397 +0,0 @@-{-# OPTIONS_GHC -w #-} -{-# OPTIONS -fglasgow-exts -cpp #-} -{-# OPTIONS -w #-} --- Haskell module generated by grm *** DO NOT EDIT *** - - -module Language.Pec.Par where -import Grm.Prims -import Grm.Lex -import Language.Pec.Abs -import qualified Data.Array as Happy_Data_Array -import qualified GHC.Exts as Happy_GHC_Exts - --- parser produced by Happy Version 1.18.6 - -newtype HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37 t38 t39 t40 t41 t42 t43 t44 t45 t46 t47 t48 t49 t50 t51 t52 t53 t54 t55 t56 t57 t58 t59 t60 t61 t62 t63 t64 t65 t66 t67 t68 t69 t70 t71 t72 t73 t74 t75 t76 = HappyAbsSyn HappyAny -#if __GLASGOW_HASKELL__ >= 607 -type HappyAny = Happy_GHC_Exts.Any -#else -type HappyAny = forall a . a -#endif -happyIn4 :: t4 -> (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37 t38 t39 t40 t41 t42 t43 t44 t45 t46 t47 t48 t49 t50 t51 t52 t53 t54 t55 t56 t57 t58 t59 t60 t61 t62 t63 t64 t65 t66 t67 t68 t69 t70 t71 t72 t73 t74 t75 t76) -happyIn4 x = Happy_GHC_Exts.unsafeCoerce# x -{-# INLINE happyIn4 #-} -happyOut4 :: (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37 t38 t39 t40 t41 t42 t43 t44 t45 t46 t47 t48 t49 t50 t51 t52 t53 t54 t55 t56 t57 t58 t59 t60 t61 t62 t63 t64 t65 t66 t67 t68 t69 t70 t71 t72 t73 t74 t75 t76) -> t4 -happyOut4 x = Happy_GHC_Exts.unsafeCoerce# x -{-# INLINE happyOut4 #-} -happyIn5 :: t5 -> (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37 t38 t39 t40 t41 t42 t43 t44 t45 t46 t47 t48 t49 t50 t51 t52 t53 t54 t55 t56 t57 t58 t59 t60 t61 t62 t63 t64 t65 t66 t67 t68 t69 t70 t71 t72 t73 t74 t75 t76) -happyIn5 x = Happy_GHC_Exts.unsafeCoerce# x -{-# INLINE happyIn5 #-} -happyOut5 :: (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37 t38 t39 t40 t41 t42 t43 t44 t45 t46 t47 t48 t49 t50 t51 t52 t53 t54 t55 t56 t57 t58 t59 t60 t61 t62 t63 t64 t65 t66 t67 t68 t69 t70 t71 t72 t73 t74 t75 t76) -> t5 -happyOut5 x = Happy_GHC_Exts.unsafeCoerce# x -{-# INLINE happyOut5 #-} -happyIn6 :: t6 -> (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37 t38 t39 t40 t41 t42 t43 t44 t45 t46 t47 t48 t49 t50 t51 t52 t53 t54 t55 t56 t57 t58 t59 t60 t61 t62 t63 t64 t65 t66 t67 t68 t69 t70 t71 t72 t73 t74 t75 t76) -happyIn6 x = Happy_GHC_Exts.unsafeCoerce# x -{-# INLINE happyIn6 #-} -happyOut6 :: (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37 t38 t39 t40 t41 t42 t43 t44 t45 t46 t47 t48 t49 t50 t51 t52 t53 t54 t55 t56 t57 t58 t59 t60 t61 t62 t63 t64 t65 t66 t67 t68 t69 t70 t71 t72 t73 t74 t75 t76) -> t6 -happyOut6 x = Happy_GHC_Exts.unsafeCoerce# x -{-# INLINE happyOut6 #-} -happyIn7 :: t7 -> (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37 t38 t39 t40 t41 t42 t43 t44 t45 t46 t47 t48 t49 t50 t51 t52 t53 t54 t55 t56 t57 t58 t59 t60 t61 t62 t63 t64 t65 t66 t67 t68 t69 t70 t71 t72 t73 t74 t75 t76) -happyIn7 x = Happy_GHC_Exts.unsafeCoerce# x -{-# INLINE happyIn7 #-} -happyOut7 :: (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37 t38 t39 t40 t41 t42 t43 t44 t45 t46 t47 t48 t49 t50 t51 t52 t53 t54 t55 t56 t57 t58 t59 t60 t61 t62 t63 t64 t65 t66 t67 t68 t69 t70 t71 t72 t73 t74 t75 t76) -> t7 -happyOut7 x = Happy_GHC_Exts.unsafeCoerce# x -{-# INLINE happyOut7 #-} -happyIn8 :: t8 -> (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37 t38 t39 t40 t41 t42 t43 t44 t45 t46 t47 t48 t49 t50 t51 t52 t53 t54 t55 t56 t57 t58 t59 t60 t61 t62 t63 t64 t65 t66 t67 t68 t69 t70 t71 t72 t73 t74 t75 t76) -happyIn8 x = Happy_GHC_Exts.unsafeCoerce# x -{-# INLINE happyIn8 #-} -happyOut8 :: (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37 t38 t39 t40 t41 t42 t43 t44 t45 t46 t47 t48 t49 t50 t51 t52 t53 t54 t55 t56 t57 t58 t59 t60 t61 t62 t63 t64 t65 t66 t67 t68 t69 t70 t71 t72 t73 t74 t75 t76) -> t8 -happyOut8 x = Happy_GHC_Exts.unsafeCoerce# x -{-# INLINE happyOut8 #-} -happyIn9 :: t9 -> (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37 t38 t39 t40 t41 t42 t43 t44 t45 t46 t47 t48 t49 t50 t51 t52 t53 t54 t55 t56 t57 t58 t59 t60 t61 t62 t63 t64 t65 t66 t67 t68 t69 t70 t71 t72 t73 t74 t75 t76) -happyIn9 x = Happy_GHC_Exts.unsafeCoerce# x -{-# INLINE happyIn9 #-} -happyOut9 :: (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37 t38 t39 t40 t41 t42 t43 t44 t45 t46 t47 t48 t49 t50 t51 t52 t53 t54 t55 t56 t57 t58 t59 t60 t61 t62 t63 t64 t65 t66 t67 t68 t69 t70 t71 t72 t73 t74 t75 t76) -> t9 -happyOut9 x = Happy_GHC_Exts.unsafeCoerce# x -{-# INLINE happyOut9 #-} -happyIn10 :: t10 -> (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37 t38 t39 t40 t41 t42 t43 t44 t45 t46 t47 t48 t49 t50 t51 t52 t53 t54 t55 t56 t57 t58 t59 t60 t61 t62 t63 t64 t65 t66 t67 t68 t69 t70 t71 t72 t73 t74 t75 t76) -happyIn10 x = Happy_GHC_Exts.unsafeCoerce# x -{-# INLINE happyIn10 #-} -happyOut10 :: (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37 t38 t39 t40 t41 t42 t43 t44 t45 t46 t47 t48 t49 t50 t51 t52 t53 t54 t55 t56 t57 t58 t59 t60 t61 t62 t63 t64 t65 t66 t67 t68 t69 t70 t71 t72 t73 t74 t75 t76) -> t10 -happyOut10 x = Happy_GHC_Exts.unsafeCoerce# x -{-# INLINE happyOut10 #-} -happyIn11 :: t11 -> (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37 t38 t39 t40 t41 t42 t43 t44 t45 t46 t47 t48 t49 t50 t51 t52 t53 t54 t55 t56 t57 t58 t59 t60 t61 t62 t63 t64 t65 t66 t67 t68 t69 t70 t71 t72 t73 t74 t75 t76) -happyIn11 x = Happy_GHC_Exts.unsafeCoerce# x -{-# INLINE happyIn11 #-} -happyOut11 :: (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37 t38 t39 t40 t41 t42 t43 t44 t45 t46 t47 t48 t49 t50 t51 t52 t53 t54 t55 t56 t57 t58 t59 t60 t61 t62 t63 t64 t65 t66 t67 t68 t69 t70 t71 t72 t73 t74 t75 t76) -> t11 -happyOut11 x = Happy_GHC_Exts.unsafeCoerce# x -{-# INLINE happyOut11 #-} -happyIn12 :: t12 -> (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37 t38 t39 t40 t41 t42 t43 t44 t45 t46 t47 t48 t49 t50 t51 t52 t53 t54 t55 t56 t57 t58 t59 t60 t61 t62 t63 t64 t65 t66 t67 t68 t69 t70 t71 t72 t73 t74 t75 t76) -happyIn12 x = Happy_GHC_Exts.unsafeCoerce# x -{-# INLINE happyIn12 #-} -happyOut12 :: (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37 t38 t39 t40 t41 t42 t43 t44 t45 t46 t47 t48 t49 t50 t51 t52 t53 t54 t55 t56 t57 t58 t59 t60 t61 t62 t63 t64 t65 t66 t67 t68 t69 t70 t71 t72 t73 t74 t75 t76) -> t12 -happyOut12 x = Happy_GHC_Exts.unsafeCoerce# x -{-# INLINE happyOut12 #-} -happyIn13 :: t13 -> (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37 t38 t39 t40 t41 t42 t43 t44 t45 t46 t47 t48 t49 t50 t51 t52 t53 t54 t55 t56 t57 t58 t59 t60 t61 t62 t63 t64 t65 t66 t67 t68 t69 t70 t71 t72 t73 t74 t75 t76) -happyIn13 x = Happy_GHC_Exts.unsafeCoerce# x -{-# INLINE happyIn13 #-} -happyOut13 :: (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37 t38 t39 t40 t41 t42 t43 t44 t45 t46 t47 t48 t49 t50 t51 t52 t53 t54 t55 t56 t57 t58 t59 t60 t61 t62 t63 t64 t65 t66 t67 t68 t69 t70 t71 t72 t73 t74 t75 t76) -> t13 -happyOut13 x = Happy_GHC_Exts.unsafeCoerce# x -{-# INLINE happyOut13 #-} -happyIn14 :: t14 -> (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37 t38 t39 t40 t41 t42 t43 t44 t45 t46 t47 t48 t49 t50 t51 t52 t53 t54 t55 t56 t57 t58 t59 t60 t61 t62 t63 t64 t65 t66 t67 t68 t69 t70 t71 t72 t73 t74 t75 t76) -happyIn14 x = Happy_GHC_Exts.unsafeCoerce# x -{-# INLINE happyIn14 #-} -happyOut14 :: (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37 t38 t39 t40 t41 t42 t43 t44 t45 t46 t47 t48 t49 t50 t51 t52 t53 t54 t55 t56 t57 t58 t59 t60 t61 t62 t63 t64 t65 t66 t67 t68 t69 t70 t71 t72 t73 t74 t75 t76) -> t14 -happyOut14 x = Happy_GHC_Exts.unsafeCoerce# x -{-# INLINE happyOut14 #-} -happyIn15 :: t15 -> (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37 t38 t39 t40 t41 t42 t43 t44 t45 t46 t47 t48 t49 t50 t51 t52 t53 t54 t55 t56 t57 t58 t59 t60 t61 t62 t63 t64 t65 t66 t67 t68 t69 t70 t71 t72 t73 t74 t75 t76) -happyIn15 x = Happy_GHC_Exts.unsafeCoerce# x -{-# INLINE happyIn15 #-} -happyOut15 :: (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37 t38 t39 t40 t41 t42 t43 t44 t45 t46 t47 t48 t49 t50 t51 t52 t53 t54 t55 t56 t57 t58 t59 t60 t61 t62 t63 t64 t65 t66 t67 t68 t69 t70 t71 t72 t73 t74 t75 t76) -> t15 -happyOut15 x = Happy_GHC_Exts.unsafeCoerce# x -{-# INLINE happyOut15 #-} -happyIn16 :: t16 -> (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37 t38 t39 t40 t41 t42 t43 t44 t45 t46 t47 t48 t49 t50 t51 t52 t53 t54 t55 t56 t57 t58 t59 t60 t61 t62 t63 t64 t65 t66 t67 t68 t69 t70 t71 t72 t73 t74 t75 t76) -happyIn16 x = Happy_GHC_Exts.unsafeCoerce# x -{-# INLINE happyIn16 #-} -happyOut16 :: (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37 t38 t39 t40 t41 t42 t43 t44 t45 t46 t47 t48 t49 t50 t51 t52 t53 t54 t55 t56 t57 t58 t59 t60 t61 t62 t63 t64 t65 t66 t67 t68 t69 t70 t71 t72 t73 t74 t75 t76) -> t16 -happyOut16 x = Happy_GHC_Exts.unsafeCoerce# x -{-# INLINE happyOut16 #-} -happyIn17 :: t17 -> (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37 t38 t39 t40 t41 t42 t43 t44 t45 t46 t47 t48 t49 t50 t51 t52 t53 t54 t55 t56 t57 t58 t59 t60 t61 t62 t63 t64 t65 t66 t67 t68 t69 t70 t71 t72 t73 t74 t75 t76) -happyIn17 x = Happy_GHC_Exts.unsafeCoerce# x -{-# INLINE happyIn17 #-} -happyOut17 :: (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37 t38 t39 t40 t41 t42 t43 t44 t45 t46 t47 t48 t49 t50 t51 t52 t53 t54 t55 t56 t57 t58 t59 t60 t61 t62 t63 t64 t65 t66 t67 t68 t69 t70 t71 t72 t73 t74 t75 t76) -> t17 -happyOut17 x = Happy_GHC_Exts.unsafeCoerce# x -{-# INLINE happyOut17 #-} -happyIn18 :: t18 -> (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37 t38 t39 t40 t41 t42 t43 t44 t45 t46 t47 t48 t49 t50 t51 t52 t53 t54 t55 t56 t57 t58 t59 t60 t61 t62 t63 t64 t65 t66 t67 t68 t69 t70 t71 t72 t73 t74 t75 t76) -happyIn18 x = Happy_GHC_Exts.unsafeCoerce# x -{-# INLINE happyIn18 #-} -happyOut18 :: (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37 t38 t39 t40 t41 t42 t43 t44 t45 t46 t47 t48 t49 t50 t51 t52 t53 t54 t55 t56 t57 t58 t59 t60 t61 t62 t63 t64 t65 t66 t67 t68 t69 t70 t71 t72 t73 t74 t75 t76) -> t18 -happyOut18 x = Happy_GHC_Exts.unsafeCoerce# x -{-# INLINE happyOut18 #-} -happyIn19 :: t19 -> (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37 t38 t39 t40 t41 t42 t43 t44 t45 t46 t47 t48 t49 t50 t51 t52 t53 t54 t55 t56 t57 t58 t59 t60 t61 t62 t63 t64 t65 t66 t67 t68 t69 t70 t71 t72 t73 t74 t75 t76) -happyIn19 x = Happy_GHC_Exts.unsafeCoerce# x -{-# INLINE happyIn19 #-} -happyOut19 :: (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37 t38 t39 t40 t41 t42 t43 t44 t45 t46 t47 t48 t49 t50 t51 t52 t53 t54 t55 t56 t57 t58 t59 t60 t61 t62 t63 t64 t65 t66 t67 t68 t69 t70 t71 t72 t73 t74 t75 t76) -> t19 -happyOut19 x = Happy_GHC_Exts.unsafeCoerce# x -{-# INLINE happyOut19 #-} -happyIn20 :: t20 -> (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37 t38 t39 t40 t41 t42 t43 t44 t45 t46 t47 t48 t49 t50 t51 t52 t53 t54 t55 t56 t57 t58 t59 t60 t61 t62 t63 t64 t65 t66 t67 t68 t69 t70 t71 t72 t73 t74 t75 t76) -happyIn20 x = Happy_GHC_Exts.unsafeCoerce# x -{-# INLINE happyIn20 #-} -happyOut20 :: (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37 t38 t39 t40 t41 t42 t43 t44 t45 t46 t47 t48 t49 t50 t51 t52 t53 t54 t55 t56 t57 t58 t59 t60 t61 t62 t63 t64 t65 t66 t67 t68 t69 t70 t71 t72 t73 t74 t75 t76) -> t20 -happyOut20 x = Happy_GHC_Exts.unsafeCoerce# x -{-# INLINE happyOut20 #-} -happyIn21 :: t21 -> (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37 t38 t39 t40 t41 t42 t43 t44 t45 t46 t47 t48 t49 t50 t51 t52 t53 t54 t55 t56 t57 t58 t59 t60 t61 t62 t63 t64 t65 t66 t67 t68 t69 t70 t71 t72 t73 t74 t75 t76) -happyIn21 x = Happy_GHC_Exts.unsafeCoerce# x -{-# INLINE happyIn21 #-} -happyOut21 :: (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37 t38 t39 t40 t41 t42 t43 t44 t45 t46 t47 t48 t49 t50 t51 t52 t53 t54 t55 t56 t57 t58 t59 t60 t61 t62 t63 t64 t65 t66 t67 t68 t69 t70 t71 t72 t73 t74 t75 t76) -> t21 -happyOut21 x = Happy_GHC_Exts.unsafeCoerce# x -{-# INLINE happyOut21 #-} -happyIn22 :: t22 -> (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37 t38 t39 t40 t41 t42 t43 t44 t45 t46 t47 t48 t49 t50 t51 t52 t53 t54 t55 t56 t57 t58 t59 t60 t61 t62 t63 t64 t65 t66 t67 t68 t69 t70 t71 t72 t73 t74 t75 t76) -happyIn22 x = Happy_GHC_Exts.unsafeCoerce# x -{-# INLINE happyIn22 #-} -happyOut22 :: (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37 t38 t39 t40 t41 t42 t43 t44 t45 t46 t47 t48 t49 t50 t51 t52 t53 t54 t55 t56 t57 t58 t59 t60 t61 t62 t63 t64 t65 t66 t67 t68 t69 t70 t71 t72 t73 t74 t75 t76) -> t22 -happyOut22 x = Happy_GHC_Exts.unsafeCoerce# x -{-# INLINE happyOut22 #-} -happyIn23 :: t23 -> (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37 t38 t39 t40 t41 t42 t43 t44 t45 t46 t47 t48 t49 t50 t51 t52 t53 t54 t55 t56 t57 t58 t59 t60 t61 t62 t63 t64 t65 t66 t67 t68 t69 t70 t71 t72 t73 t74 t75 t76) -happyIn23 x = Happy_GHC_Exts.unsafeCoerce# x -{-# INLINE happyIn23 #-} -happyOut23 :: (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37 t38 t39 t40 t41 t42 t43 t44 t45 t46 t47 t48 t49 t50 t51 t52 t53 t54 t55 t56 t57 t58 t59 t60 t61 t62 t63 t64 t65 t66 t67 t68 t69 t70 t71 t72 t73 t74 t75 t76) -> t23 -happyOut23 x = Happy_GHC_Exts.unsafeCoerce# x -{-# INLINE happyOut23 #-} -happyIn24 :: t24 -> (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37 t38 t39 t40 t41 t42 t43 t44 t45 t46 t47 t48 t49 t50 t51 t52 t53 t54 t55 t56 t57 t58 t59 t60 t61 t62 t63 t64 t65 t66 t67 t68 t69 t70 t71 t72 t73 t74 t75 t76) -happyIn24 x = Happy_GHC_Exts.unsafeCoerce# x -{-# INLINE happyIn24 #-} -happyOut24 :: (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37 t38 t39 t40 t41 t42 t43 t44 t45 t46 t47 t48 t49 t50 t51 t52 t53 t54 t55 t56 t57 t58 t59 t60 t61 t62 t63 t64 t65 t66 t67 t68 t69 t70 t71 t72 t73 t74 t75 t76) -> t24 -happyOut24 x = Happy_GHC_Exts.unsafeCoerce# x -{-# INLINE happyOut24 #-} -happyIn25 :: t25 -> (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37 t38 t39 t40 t41 t42 t43 t44 t45 t46 t47 t48 t49 t50 t51 t52 t53 t54 t55 t56 t57 t58 t59 t60 t61 t62 t63 t64 t65 t66 t67 t68 t69 t70 t71 t72 t73 t74 t75 t76) -happyIn25 x = Happy_GHC_Exts.unsafeCoerce# x -{-# INLINE happyIn25 #-} -happyOut25 :: (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37 t38 t39 t40 t41 t42 t43 t44 t45 t46 t47 t48 t49 t50 t51 t52 t53 t54 t55 t56 t57 t58 t59 t60 t61 t62 t63 t64 t65 t66 t67 t68 t69 t70 t71 t72 t73 t74 t75 t76) -> t25 -happyOut25 x = Happy_GHC_Exts.unsafeCoerce# x -{-# INLINE happyOut25 #-} -happyIn26 :: t26 -> (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37 t38 t39 t40 t41 t42 t43 t44 t45 t46 t47 t48 t49 t50 t51 t52 t53 t54 t55 t56 t57 t58 t59 t60 t61 t62 t63 t64 t65 t66 t67 t68 t69 t70 t71 t72 t73 t74 t75 t76) -happyIn26 x = Happy_GHC_Exts.unsafeCoerce# x -{-# INLINE happyIn26 #-} -happyOut26 :: (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37 t38 t39 t40 t41 t42 t43 t44 t45 t46 t47 t48 t49 t50 t51 t52 t53 t54 t55 t56 t57 t58 t59 t60 t61 t62 t63 t64 t65 t66 t67 t68 t69 t70 t71 t72 t73 t74 t75 t76) -> t26 -happyOut26 x = Happy_GHC_Exts.unsafeCoerce# x -{-# INLINE happyOut26 #-} -happyIn27 :: t27 -> (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37 t38 t39 t40 t41 t42 t43 t44 t45 t46 t47 t48 t49 t50 t51 t52 t53 t54 t55 t56 t57 t58 t59 t60 t61 t62 t63 t64 t65 t66 t67 t68 t69 t70 t71 t72 t73 t74 t75 t76) -happyIn27 x = Happy_GHC_Exts.unsafeCoerce# x -{-# INLINE happyIn27 #-} -happyOut27 :: (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37 t38 t39 t40 t41 t42 t43 t44 t45 t46 t47 t48 t49 t50 t51 t52 t53 t54 t55 t56 t57 t58 t59 t60 t61 t62 t63 t64 t65 t66 t67 t68 t69 t70 t71 t72 t73 t74 t75 t76) -> t27 -happyOut27 x = Happy_GHC_Exts.unsafeCoerce# x -{-# INLINE happyOut27 #-} -happyIn28 :: t28 -> (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37 t38 t39 t40 t41 t42 t43 t44 t45 t46 t47 t48 t49 t50 t51 t52 t53 t54 t55 t56 t57 t58 t59 t60 t61 t62 t63 t64 t65 t66 t67 t68 t69 t70 t71 t72 t73 t74 t75 t76) -happyIn28 x = Happy_GHC_Exts.unsafeCoerce# x -{-# INLINE happyIn28 #-} -happyOut28 :: (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37 t38 t39 t40 t41 t42 t43 t44 t45 t46 t47 t48 t49 t50 t51 t52 t53 t54 t55 t56 t57 t58 t59 t60 t61 t62 t63 t64 t65 t66 t67 t68 t69 t70 t71 t72 t73 t74 t75 t76) -> t28 -happyOut28 x = Happy_GHC_Exts.unsafeCoerce# x -{-# INLINE happyOut28 #-} -happyIn29 :: t29 -> (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37 t38 t39 t40 t41 t42 t43 t44 t45 t46 t47 t48 t49 t50 t51 t52 t53 t54 t55 t56 t57 t58 t59 t60 t61 t62 t63 t64 t65 t66 t67 t68 t69 t70 t71 t72 t73 t74 t75 t76) -happyIn29 x = Happy_GHC_Exts.unsafeCoerce# x -{-# INLINE happyIn29 #-} -happyOut29 :: (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37 t38 t39 t40 t41 t42 t43 t44 t45 t46 t47 t48 t49 t50 t51 t52 t53 t54 t55 t56 t57 t58 t59 t60 t61 t62 t63 t64 t65 t66 t67 t68 t69 t70 t71 t72 t73 t74 t75 t76) -> t29 -happyOut29 x = Happy_GHC_Exts.unsafeCoerce# x -{-# INLINE happyOut29 #-} -happyIn30 :: t30 -> (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37 t38 t39 t40 t41 t42 t43 t44 t45 t46 t47 t48 t49 t50 t51 t52 t53 t54 t55 t56 t57 t58 t59 t60 t61 t62 t63 t64 t65 t66 t67 t68 t69 t70 t71 t72 t73 t74 t75 t76) -happyIn30 x = Happy_GHC_Exts.unsafeCoerce# x -{-# INLINE happyIn30 #-} -happyOut30 :: (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37 t38 t39 t40 t41 t42 t43 t44 t45 t46 t47 t48 t49 t50 t51 t52 t53 t54 t55 t56 t57 t58 t59 t60 t61 t62 t63 t64 t65 t66 t67 t68 t69 t70 t71 t72 t73 t74 t75 t76) -> t30 -happyOut30 x = Happy_GHC_Exts.unsafeCoerce# x -{-# INLINE happyOut30 #-} -happyIn31 :: t31 -> (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37 t38 t39 t40 t41 t42 t43 t44 t45 t46 t47 t48 t49 t50 t51 t52 t53 t54 t55 t56 t57 t58 t59 t60 t61 t62 t63 t64 t65 t66 t67 t68 t69 t70 t71 t72 t73 t74 t75 t76) -happyIn31 x = Happy_GHC_Exts.unsafeCoerce# x -{-# INLINE happyIn31 #-} -happyOut31 :: (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37 t38 t39 t40 t41 t42 t43 t44 t45 t46 t47 t48 t49 t50 t51 t52 t53 t54 t55 t56 t57 t58 t59 t60 t61 t62 t63 t64 t65 t66 t67 t68 t69 t70 t71 t72 t73 t74 t75 t76) -> t31 -happyOut31 x = Happy_GHC_Exts.unsafeCoerce# x -{-# INLINE happyOut31 #-} -happyIn32 :: t32 -> (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37 t38 t39 t40 t41 t42 t43 t44 t45 t46 t47 t48 t49 t50 t51 t52 t53 t54 t55 t56 t57 t58 t59 t60 t61 t62 t63 t64 t65 t66 t67 t68 t69 t70 t71 t72 t73 t74 t75 t76) -happyIn32 x = Happy_GHC_Exts.unsafeCoerce# x -{-# INLINE happyIn32 #-} -happyOut32 :: (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37 t38 t39 t40 t41 t42 t43 t44 t45 t46 t47 t48 t49 t50 t51 t52 t53 t54 t55 t56 t57 t58 t59 t60 t61 t62 t63 t64 t65 t66 t67 t68 t69 t70 t71 t72 t73 t74 t75 t76) -> t32 -happyOut32 x = Happy_GHC_Exts.unsafeCoerce# x -{-# INLINE happyOut32 #-} -happyIn33 :: t33 -> (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37 t38 t39 t40 t41 t42 t43 t44 t45 t46 t47 t48 t49 t50 t51 t52 t53 t54 t55 t56 t57 t58 t59 t60 t61 t62 t63 t64 t65 t66 t67 t68 t69 t70 t71 t72 t73 t74 t75 t76) -happyIn33 x = Happy_GHC_Exts.unsafeCoerce# x -{-# INLINE happyIn33 #-} -happyOut33 :: (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37 t38 t39 t40 t41 t42 t43 t44 t45 t46 t47 t48 t49 t50 t51 t52 t53 t54 t55 t56 t57 t58 t59 t60 t61 t62 t63 t64 t65 t66 t67 t68 t69 t70 t71 t72 t73 t74 t75 t76) -> t33 -happyOut33 x = Happy_GHC_Exts.unsafeCoerce# x -{-# INLINE happyOut33 #-} -happyIn34 :: t34 -> (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37 t38 t39 t40 t41 t42 t43 t44 t45 t46 t47 t48 t49 t50 t51 t52 t53 t54 t55 t56 t57 t58 t59 t60 t61 t62 t63 t64 t65 t66 t67 t68 t69 t70 t71 t72 t73 t74 t75 t76) -happyIn34 x = Happy_GHC_Exts.unsafeCoerce# x -{-# INLINE happyIn34 #-} -happyOut34 :: (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37 t38 t39 t40 t41 t42 t43 t44 t45 t46 t47 t48 t49 t50 t51 t52 t53 t54 t55 t56 t57 t58 t59 t60 t61 t62 t63 t64 t65 t66 t67 t68 t69 t70 t71 t72 t73 t74 t75 t76) -> t34 -happyOut34 x = Happy_GHC_Exts.unsafeCoerce# x -{-# INLINE happyOut34 #-} -happyIn35 :: t35 -> (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37 t38 t39 t40 t41 t42 t43 t44 t45 t46 t47 t48 t49 t50 t51 t52 t53 t54 t55 t56 t57 t58 t59 t60 t61 t62 t63 t64 t65 t66 t67 t68 t69 t70 t71 t72 t73 t74 t75 t76) -happyIn35 x = Happy_GHC_Exts.unsafeCoerce# x -{-# INLINE happyIn35 #-} -happyOut35 :: (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37 t38 t39 t40 t41 t42 t43 t44 t45 t46 t47 t48 t49 t50 t51 t52 t53 t54 t55 t56 t57 t58 t59 t60 t61 t62 t63 t64 t65 t66 t67 t68 t69 t70 t71 t72 t73 t74 t75 t76) -> t35 -happyOut35 x = Happy_GHC_Exts.unsafeCoerce# x -{-# INLINE happyOut35 #-} -happyIn36 :: t36 -> (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37 t38 t39 t40 t41 t42 t43 t44 t45 t46 t47 t48 t49 t50 t51 t52 t53 t54 t55 t56 t57 t58 t59 t60 t61 t62 t63 t64 t65 t66 t67 t68 t69 t70 t71 t72 t73 t74 t75 t76) -happyIn36 x = Happy_GHC_Exts.unsafeCoerce# x -{-# INLINE happyIn36 #-} -happyOut36 :: (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37 t38 t39 t40 t41 t42 t43 t44 t45 t46 t47 t48 t49 t50 t51 t52 t53 t54 t55 t56 t57 t58 t59 t60 t61 t62 t63 t64 t65 t66 t67 t68 t69 t70 t71 t72 t73 t74 t75 t76) -> t36 -happyOut36 x = Happy_GHC_Exts.unsafeCoerce# x -{-# INLINE happyOut36 #-} -happyIn37 :: t37 -> (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37 t38 t39 t40 t41 t42 t43 t44 t45 t46 t47 t48 t49 t50 t51 t52 t53 t54 t55 t56 t57 t58 t59 t60 t61 t62 t63 t64 t65 t66 t67 t68 t69 t70 t71 t72 t73 t74 t75 t76) -happyIn37 x = Happy_GHC_Exts.unsafeCoerce# x -{-# INLINE happyIn37 #-} -happyOut37 :: (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37 t38 t39 t40 t41 t42 t43 t44 t45 t46 t47 t48 t49 t50 t51 t52 t53 t54 t55 t56 t57 t58 t59 t60 t61 t62 t63 t64 t65 t66 t67 t68 t69 t70 t71 t72 t73 t74 t75 t76) -> t37 -happyOut37 x = Happy_GHC_Exts.unsafeCoerce# x -{-# INLINE happyOut37 #-} -happyIn38 :: t38 -> (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37 t38 t39 t40 t41 t42 t43 t44 t45 t46 t47 t48 t49 t50 t51 t52 t53 t54 t55 t56 t57 t58 t59 t60 t61 t62 t63 t64 t65 t66 t67 t68 t69 t70 t71 t72 t73 t74 t75 t76) -happyIn38 x = Happy_GHC_Exts.unsafeCoerce# x -{-# INLINE happyIn38 #-} -happyOut38 :: (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37 t38 t39 t40 t41 t42 t43 t44 t45 t46 t47 t48 t49 t50 t51 t52 t53 t54 t55 t56 t57 t58 t59 t60 t61 t62 t63 t64 t65 t66 t67 t68 t69 t70 t71 t72 t73 t74 t75 t76) -> t38 -happyOut38 x = Happy_GHC_Exts.unsafeCoerce# x -{-# INLINE happyOut38 #-} -happyIn39 :: t39 -> (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37 t38 t39 t40 t41 t42 t43 t44 t45 t46 t47 t48 t49 t50 t51 t52 t53 t54 t55 t56 t57 t58 t59 t60 t61 t62 t63 t64 t65 t66 t67 t68 t69 t70 t71 t72 t73 t74 t75 t76) -happyIn39 x = Happy_GHC_Exts.unsafeCoerce# x -{-# INLINE happyIn39 #-} -happyOut39 :: (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37 t38 t39 t40 t41 t42 t43 t44 t45 t46 t47 t48 t49 t50 t51 t52 t53 t54 t55 t56 t57 t58 t59 t60 t61 t62 t63 t64 t65 t66 t67 t68 t69 t70 t71 t72 t73 t74 t75 t76) -> t39 -happyOut39 x = Happy_GHC_Exts.unsafeCoerce# x -{-# INLINE happyOut39 #-} -happyIn40 :: t40 -> (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37 t38 t39 t40 t41 t42 t43 t44 t45 t46 t47 t48 t49 t50 t51 t52 t53 t54 t55 t56 t57 t58 t59 t60 t61 t62 t63 t64 t65 t66 t67 t68 t69 t70 t71 t72 t73 t74 t75 t76) -happyIn40 x = Happy_GHC_Exts.unsafeCoerce# x -{-# INLINE happyIn40 #-} -happyOut40 :: (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37 t38 t39 t40 t41 t42 t43 t44 t45 t46 t47 t48 t49 t50 t51 t52 t53 t54 t55 t56 t57 t58 t59 t60 t61 t62 t63 t64 t65 t66 t67 t68 t69 t70 t71 t72 t73 t74 t75 t76) -> t40 -happyOut40 x = Happy_GHC_Exts.unsafeCoerce# x -{-# INLINE happyOut40 #-} -happyIn41 :: t41 -> (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37 t38 t39 t40 t41 t42 t43 t44 t45 t46 t47 t48 t49 t50 t51 t52 t53 t54 t55 t56 t57 t58 t59 t60 t61 t62 t63 t64 t65 t66 t67 t68 t69 t70 t71 t72 t73 t74 t75 t76) -happyIn41 x = Happy_GHC_Exts.unsafeCoerce# x -{-# INLINE happyIn41 #-} -happyOut41 :: (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37 t38 t39 t40 t41 t42 t43 t44 t45 t46 t47 t48 t49 t50 t51 t52 t53 t54 t55 t56 t57 t58 t59 t60 t61 t62 t63 t64 t65 t66 t67 t68 t69 t70 t71 t72 t73 t74 t75 t76) -> t41 -happyOut41 x = Happy_GHC_Exts.unsafeCoerce# x -{-# INLINE happyOut41 #-} -happyIn42 :: t42 -> (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37 t38 t39 t40 t41 t42 t43 t44 t45 t46 t47 t48 t49 t50 t51 t52 t53 t54 t55 t56 t57 t58 t59 t60 t61 t62 t63 t64 t65 t66 t67 t68 t69 t70 t71 t72 t73 t74 t75 t76) -happyIn42 x = Happy_GHC_Exts.unsafeCoerce# x -{-# INLINE happyIn42 #-} -happyOut42 :: (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37 t38 t39 t40 t41 t42 t43 t44 t45 t46 t47 t48 t49 t50 t51 t52 t53 t54 t55 t56 t57 t58 t59 t60 t61 t62 t63 t64 t65 t66 t67 t68 t69 t70 t71 t72 t73 t74 t75 t76) -> t42 -happyOut42 x = Happy_GHC_Exts.unsafeCoerce# x -{-# INLINE happyOut42 #-} -happyIn43 :: t43 -> (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37 t38 t39 t40 t41 t42 t43 t44 t45 t46 t47 t48 t49 t50 t51 t52 t53 t54 t55 t56 t57 t58 t59 t60 t61 t62 t63 t64 t65 t66 t67 t68 t69 t70 t71 t72 t73 t74 t75 t76) -happyIn43 x = Happy_GHC_Exts.unsafeCoerce# x -{-# INLINE happyIn43 #-} -happyOut43 :: (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37 t38 t39 t40 t41 t42 t43 t44 t45 t46 t47 t48 t49 t50 t51 t52 t53 t54 t55 t56 t57 t58 t59 t60 t61 t62 t63 t64 t65 t66 t67 t68 t69 t70 t71 t72 t73 t74 t75 t76) -> t43 -happyOut43 x = Happy_GHC_Exts.unsafeCoerce# x -{-# INLINE happyOut43 #-} -happyIn44 :: t44 -> (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37 t38 t39 t40 t41 t42 t43 t44 t45 t46 t47 t48 t49 t50 t51 t52 t53 t54 t55 t56 t57 t58 t59 t60 t61 t62 t63 t64 t65 t66 t67 t68 t69 t70 t71 t72 t73 t74 t75 t76) -happyIn44 x = Happy_GHC_Exts.unsafeCoerce# x -{-# INLINE happyIn44 #-} -happyOut44 :: (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37 t38 t39 t40 t41 t42 t43 t44 t45 t46 t47 t48 t49 t50 t51 t52 t53 t54 t55 t56 t57 t58 t59 t60 t61 t62 t63 t64 t65 t66 t67 t68 t69 t70 t71 t72 t73 t74 t75 t76) -> t44 -happyOut44 x = Happy_GHC_Exts.unsafeCoerce# x -{-# INLINE happyOut44 #-} -happyIn45 :: t45 -> (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37 t38 t39 t40 t41 t42 t43 t44 t45 t46 t47 t48 t49 t50 t51 t52 t53 t54 t55 t56 t57 t58 t59 t60 t61 t62 t63 t64 t65 t66 t67 t68 t69 t70 t71 t72 t73 t74 t75 t76) -happyIn45 x = Happy_GHC_Exts.unsafeCoerce# x -{-# INLINE happyIn45 #-} -happyOut45 :: (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37 t38 t39 t40 t41 t42 t43 t44 t45 t46 t47 t48 t49 t50 t51 t52 t53 t54 t55 t56 t57 t58 t59 t60 t61 t62 t63 t64 t65 t66 t67 t68 t69 t70 t71 t72 t73 t74 t75 t76) -> t45 -happyOut45 x = Happy_GHC_Exts.unsafeCoerce# x -{-# INLINE happyOut45 #-} -happyIn46 :: t46 -> (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37 t38 t39 t40 t41 t42 t43 t44 t45 t46 t47 t48 t49 t50 t51 t52 t53 t54 t55 t56 t57 t58 t59 t60 t61 t62 t63 t64 t65 t66 t67 t68 t69 t70 t71 t72 t73 t74 t75 t76) -happyIn46 x = Happy_GHC_Exts.unsafeCoerce# x -{-# INLINE happyIn46 #-} -happyOut46 :: (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37 t38 t39 t40 t41 t42 t43 t44 t45 t46 t47 t48 t49 t50 t51 t52 t53 t54 t55 t56 t57 t58 t59 t60 t61 t62 t63 t64 t65 t66 t67 t68 t69 t70 t71 t72 t73 t74 t75 t76) -> t46 -happyOut46 x = Happy_GHC_Exts.unsafeCoerce# x -{-# INLINE happyOut46 #-} -happyIn47 :: t47 -> (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37 t38 t39 t40 t41 t42 t43 t44 t45 t46 t47 t48 t49 t50 t51 t52 t53 t54 t55 t56 t57 t58 t59 t60 t61 t62 t63 t64 t65 t66 t67 t68 t69 t70 t71 t72 t73 t74 t75 t76) -happyIn47 x = Happy_GHC_Exts.unsafeCoerce# x -{-# INLINE happyIn47 #-} -happyOut47 :: (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37 t38 t39 t40 t41 t42 t43 t44 t45 t46 t47 t48 t49 t50 t51 t52 t53 t54 t55 t56 t57 t58 t59 t60 t61 t62 t63 t64 t65 t66 t67 t68 t69 t70 t71 t72 t73 t74 t75 t76) -> t47 -happyOut47 x = Happy_GHC_Exts.unsafeCoerce# x -{-# INLINE happyOut47 #-} -happyIn48 :: t48 -> (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37 t38 t39 t40 t41 t42 t43 t44 t45 t46 t47 t48 t49 t50 t51 t52 t53 t54 t55 t56 t57 t58 t59 t60 t61 t62 t63 t64 t65 t66 t67 t68 t69 t70 t71 t72 t73 t74 t75 t76) -happyIn48 x = Happy_GHC_Exts.unsafeCoerce# x -{-# INLINE happyIn48 #-} -happyOut48 :: (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37 t38 t39 t40 t41 t42 t43 t44 t45 t46 t47 t48 t49 t50 t51 t52 t53 t54 t55 t56 t57 t58 t59 t60 t61 t62 t63 t64 t65 t66 t67 t68 t69 t70 t71 t72 t73 t74 t75 t76) -> t48 -happyOut48 x = Happy_GHC_Exts.unsafeCoerce# x -{-# INLINE happyOut48 #-} -happyIn49 :: t49 -> (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37 t38 t39 t40 t41 t42 t43 t44 t45 t46 t47 t48 t49 t50 t51 t52 t53 t54 t55 t56 t57 t58 t59 t60 t61 t62 t63 t64 t65 t66 t67 t68 t69 t70 t71 t72 t73 t74 t75 t76) -happyIn49 x = Happy_GHC_Exts.unsafeCoerce# x -{-# INLINE happyIn49 #-} -happyOut49 :: (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37 t38 t39 t40 t41 t42 t43 t44 t45 t46 t47 t48 t49 t50 t51 t52 t53 t54 t55 t56 t57 t58 t59 t60 t61 t62 t63 t64 t65 t66 t67 t68 t69 t70 t71 t72 t73 t74 t75 t76) -> t49 -happyOut49 x = Happy_GHC_Exts.unsafeCoerce# x -{-# INLINE happyOut49 #-} -happyIn50 :: t50 -> (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37 t38 t39 t40 t41 t42 t43 t44 t45 t46 t47 t48 t49 t50 t51 t52 t53 t54 t55 t56 t57 t58 t59 t60 t61 t62 t63 t64 t65 t66 t67 t68 t69 t70 t71 t72 t73 t74 t75 t76) -happyIn50 x = Happy_GHC_Exts.unsafeCoerce# x -{-# INLINE happyIn50 #-} -happyOut50 :: (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37 t38 t39 t40 t41 t42 t43 t44 t45 t46 t47 t48 t49 t50 t51 t52 t53 t54 t55 t56 t57 t58 t59 t60 t61 t62 t63 t64 t65 t66 t67 t68 t69 t70 t71 t72 t73 t74 t75 t76) -> t50 -happyOut50 x = Happy_GHC_Exts.unsafeCoerce# x -{-# INLINE happyOut50 #-} -happyIn51 :: t51 -> (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37 t38 t39 t40 t41 t42 t43 t44 t45 t46 t47 t48 t49 t50 t51 t52 t53 t54 t55 t56 t57 t58 t59 t60 t61 t62 t63 t64 t65 t66 t67 t68 t69 t70 t71 t72 t73 t74 t75 t76) -happyIn51 x = Happy_GHC_Exts.unsafeCoerce# x -{-# INLINE happyIn51 #-} -happyOut51 :: (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37 t38 t39 t40 t41 t42 t43 t44 t45 t46 t47 t48 t49 t50 t51 t52 t53 t54 t55 t56 t57 t58 t59 t60 t61 t62 t63 t64 t65 t66 t67 t68 t69 t70 t71 t72 t73 t74 t75 t76) -> t51 -happyOut51 x = Happy_GHC_Exts.unsafeCoerce# x -{-# INLINE happyOut51 #-} -happyIn52 :: t52 -> (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37 t38 t39 t40 t41 t42 t43 t44 t45 t46 t47 t48 t49 t50 t51 t52 t53 t54 t55 t56 t57 t58 t59 t60 t61 t62 t63 t64 t65 t66 t67 t68 t69 t70 t71 t72 t73 t74 t75 t76) -happyIn52 x = Happy_GHC_Exts.unsafeCoerce# x -{-# INLINE happyIn52 #-} -happyOut52 :: (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37 t38 t39 t40 t41 t42 t43 t44 t45 t46 t47 t48 t49 t50 t51 t52 t53 t54 t55 t56 t57 t58 t59 t60 t61 t62 t63 t64 t65 t66 t67 t68 t69 t70 t71 t72 t73 t74 t75 t76) -> t52 -happyOut52 x = Happy_GHC_Exts.unsafeCoerce# x -{-# INLINE happyOut52 #-} -happyIn53 :: t53 -> (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37 t38 t39 t40 t41 t42 t43 t44 t45 t46 t47 t48 t49 t50 t51 t52 t53 t54 t55 t56 t57 t58 t59 t60 t61 t62 t63 t64 t65 t66 t67 t68 t69 t70 t71 t72 t73 t74 t75 t76) -happyIn53 x = Happy_GHC_Exts.unsafeCoerce# x -{-# INLINE happyIn53 #-} -happyOut53 :: (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37 t38 t39 t40 t41 t42 t43 t44 t45 t46 t47 t48 t49 t50 t51 t52 t53 t54 t55 t56 t57 t58 t59 t60 t61 t62 t63 t64 t65 t66 t67 t68 t69 t70 t71 t72 t73 t74 t75 t76) -> t53 -happyOut53 x = Happy_GHC_Exts.unsafeCoerce# x -{-# INLINE happyOut53 #-} -happyIn54 :: t54 -> (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37 t38 t39 t40 t41 t42 t43 t44 t45 t46 t47 t48 t49 t50 t51 t52 t53 t54 t55 t56 t57 t58 t59 t60 t61 t62 t63 t64 t65 t66 t67 t68 t69 t70 t71 t72 t73 t74 t75 t76) -happyIn54 x = Happy_GHC_Exts.unsafeCoerce# x -{-# INLINE happyIn54 #-} -happyOut54 :: (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37 t38 t39 t40 t41 t42 t43 t44 t45 t46 t47 t48 t49 t50 t51 t52 t53 t54 t55 t56 t57 t58 t59 t60 t61 t62 t63 t64 t65 t66 t67 t68 t69 t70 t71 t72 t73 t74 t75 t76) -> t54 -happyOut54 x = Happy_GHC_Exts.unsafeCoerce# x -{-# INLINE happyOut54 #-} -happyIn55 :: t55 -> (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37 t38 t39 t40 t41 t42 t43 t44 t45 t46 t47 t48 t49 t50 t51 t52 t53 t54 t55 t56 t57 t58 t59 t60 t61 t62 t63 t64 t65 t66 t67 t68 t69 t70 t71 t72 t73 t74 t75 t76) -happyIn55 x = Happy_GHC_Exts.unsafeCoerce# x -{-# INLINE happyIn55 #-} -happyOut55 :: (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37 t38 t39 t40 t41 t42 t43 t44 t45 t46 t47 t48 t49 t50 t51 t52 t53 t54 t55 t56 t57 t58 t59 t60 t61 t62 t63 t64 t65 t66 t67 t68 t69 t70 t71 t72 t73 t74 t75 t76) -> t55 -happyOut55 x = Happy_GHC_Exts.unsafeCoerce# x -{-# INLINE happyOut55 #-} -happyIn56 :: t56 -> (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37 t38 t39 t40 t41 t42 t43 t44 t45 t46 t47 t48 t49 t50 t51 t52 t53 t54 t55 t56 t57 t58 t59 t60 t61 t62 t63 t64 t65 t66 t67 t68 t69 t70 t71 t72 t73 t74 t75 t76) -happyIn56 x = Happy_GHC_Exts.unsafeCoerce# x -{-# INLINE happyIn56 #-} -happyOut56 :: (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37 t38 t39 t40 t41 t42 t43 t44 t45 t46 t47 t48 t49 t50 t51 t52 t53 t54 t55 t56 t57 t58 t59 t60 t61 t62 t63 t64 t65 t66 t67 t68 t69 t70 t71 t72 t73 t74 t75 t76) -> t56 -happyOut56 x = Happy_GHC_Exts.unsafeCoerce# x -{-# INLINE happyOut56 #-} -happyIn57 :: t57 -> (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37 t38 t39 t40 t41 t42 t43 t44 t45 t46 t47 t48 t49 t50 t51 t52 t53 t54 t55 t56 t57 t58 t59 t60 t61 t62 t63 t64 t65 t66 t67 t68 t69 t70 t71 t72 t73 t74 t75 t76) -happyIn57 x = Happy_GHC_Exts.unsafeCoerce# x -{-# INLINE happyIn57 #-} -happyOut57 :: (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37 t38 t39 t40 t41 t42 t43 t44 t45 t46 t47 t48 t49 t50 t51 t52 t53 t54 t55 t56 t57 t58 t59 t60 t61 t62 t63 t64 t65 t66 t67 t68 t69 t70 t71 t72 t73 t74 t75 t76) -> t57 -happyOut57 x = Happy_GHC_Exts.unsafeCoerce# x -{-# INLINE happyOut57 #-} -happyIn58 :: t58 -> (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37 t38 t39 t40 t41 t42 t43 t44 t45 t46 t47 t48 t49 t50 t51 t52 t53 t54 t55 t56 t57 t58 t59 t60 t61 t62 t63 t64 t65 t66 t67 t68 t69 t70 t71 t72 t73 t74 t75 t76) -happyIn58 x = Happy_GHC_Exts.unsafeCoerce# x -{-# INLINE happyIn58 #-} -happyOut58 :: (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37 t38 t39 t40 t41 t42 t43 t44 t45 t46 t47 t48 t49 t50 t51 t52 t53 t54 t55 t56 t57 t58 t59 t60 t61 t62 t63 t64 t65 t66 t67 t68 t69 t70 t71 t72 t73 t74 t75 t76) -> t58 -happyOut58 x = Happy_GHC_Exts.unsafeCoerce# x -{-# INLINE happyOut58 #-} -happyIn59 :: t59 -> (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37 t38 t39 t40 t41 t42 t43 t44 t45 t46 t47 t48 t49 t50 t51 t52 t53 t54 t55 t56 t57 t58 t59 t60 t61 t62 t63 t64 t65 t66 t67 t68 t69 t70 t71 t72 t73 t74 t75 t76) -happyIn59 x = Happy_GHC_Exts.unsafeCoerce# x -{-# INLINE happyIn59 #-} -happyOut59 :: (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37 t38 t39 t40 t41 t42 t43 t44 t45 t46 t47 t48 t49 t50 t51 t52 t53 t54 t55 t56 t57 t58 t59 t60 t61 t62 t63 t64 t65 t66 t67 t68 t69 t70 t71 t72 t73 t74 t75 t76) -> t59 -happyOut59 x = Happy_GHC_Exts.unsafeCoerce# x -{-# INLINE happyOut59 #-} -happyIn60 :: t60 -> (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37 t38 t39 t40 t41 t42 t43 t44 t45 t46 t47 t48 t49 t50 t51 t52 t53 t54 t55 t56 t57 t58 t59 t60 t61 t62 t63 t64 t65 t66 t67 t68 t69 t70 t71 t72 t73 t74 t75 t76) -happyIn60 x = Happy_GHC_Exts.unsafeCoerce# x -{-# INLINE happyIn60 #-} -happyOut60 :: (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37 t38 t39 t40 t41 t42 t43 t44 t45 t46 t47 t48 t49 t50 t51 t52 t53 t54 t55 t56 t57 t58 t59 t60 t61 t62 t63 t64 t65 t66 t67 t68 t69 t70 t71 t72 t73 t74 t75 t76) -> t60 -happyOut60 x = Happy_GHC_Exts.unsafeCoerce# x -{-# INLINE happyOut60 #-} -happyIn61 :: t61 -> (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37 t38 t39 t40 t41 t42 t43 t44 t45 t46 t47 t48 t49 t50 t51 t52 t53 t54 t55 t56 t57 t58 t59 t60 t61 t62 t63 t64 t65 t66 t67 t68 t69 t70 t71 t72 t73 t74 t75 t76) -happyIn61 x = Happy_GHC_Exts.unsafeCoerce# x -{-# INLINE happyIn61 #-} -happyOut61 :: (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37 t38 t39 t40 t41 t42 t43 t44 t45 t46 t47 t48 t49 t50 t51 t52 t53 t54 t55 t56 t57 t58 t59 t60 t61 t62 t63 t64 t65 t66 t67 t68 t69 t70 t71 t72 t73 t74 t75 t76) -> t61 -happyOut61 x = Happy_GHC_Exts.unsafeCoerce# x -{-# INLINE happyOut61 #-} -happyIn62 :: t62 -> (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37 t38 t39 t40 t41 t42 t43 t44 t45 t46 t47 t48 t49 t50 t51 t52 t53 t54 t55 t56 t57 t58 t59 t60 t61 t62 t63 t64 t65 t66 t67 t68 t69 t70 t71 t72 t73 t74 t75 t76) -happyIn62 x = Happy_GHC_Exts.unsafeCoerce# x -{-# INLINE happyIn62 #-} -happyOut62 :: (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37 t38 t39 t40 t41 t42 t43 t44 t45 t46 t47 t48 t49 t50 t51 t52 t53 t54 t55 t56 t57 t58 t59 t60 t61 t62 t63 t64 t65 t66 t67 t68 t69 t70 t71 t72 t73 t74 t75 t76) -> t62 -happyOut62 x = Happy_GHC_Exts.unsafeCoerce# x -{-# INLINE happyOut62 #-} -happyIn63 :: t63 -> (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37 t38 t39 t40 t41 t42 t43 t44 t45 t46 t47 t48 t49 t50 t51 t52 t53 t54 t55 t56 t57 t58 t59 t60 t61 t62 t63 t64 t65 t66 t67 t68 t69 t70 t71 t72 t73 t74 t75 t76) -happyIn63 x = Happy_GHC_Exts.unsafeCoerce# x -{-# INLINE happyIn63 #-} -happyOut63 :: (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37 t38 t39 t40 t41 t42 t43 t44 t45 t46 t47 t48 t49 t50 t51 t52 t53 t54 t55 t56 t57 t58 t59 t60 t61 t62 t63 t64 t65 t66 t67 t68 t69 t70 t71 t72 t73 t74 t75 t76) -> t63 -happyOut63 x = Happy_GHC_Exts.unsafeCoerce# x -{-# INLINE happyOut63 #-} -happyIn64 :: t64 -> (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37 t38 t39 t40 t41 t42 t43 t44 t45 t46 t47 t48 t49 t50 t51 t52 t53 t54 t55 t56 t57 t58 t59 t60 t61 t62 t63 t64 t65 t66 t67 t68 t69 t70 t71 t72 t73 t74 t75 t76) -happyIn64 x = Happy_GHC_Exts.unsafeCoerce# x -{-# INLINE happyIn64 #-} -happyOut64 :: (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37 t38 t39 t40 t41 t42 t43 t44 t45 t46 t47 t48 t49 t50 t51 t52 t53 t54 t55 t56 t57 t58 t59 t60 t61 t62 t63 t64 t65 t66 t67 t68 t69 t70 t71 t72 t73 t74 t75 t76) -> t64 -happyOut64 x = Happy_GHC_Exts.unsafeCoerce# x -{-# INLINE happyOut64 #-} -happyIn65 :: t65 -> (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37 t38 t39 t40 t41 t42 t43 t44 t45 t46 t47 t48 t49 t50 t51 t52 t53 t54 t55 t56 t57 t58 t59 t60 t61 t62 t63 t64 t65 t66 t67 t68 t69 t70 t71 t72 t73 t74 t75 t76) -happyIn65 x = Happy_GHC_Exts.unsafeCoerce# x -{-# INLINE happyIn65 #-} -happyOut65 :: (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37 t38 t39 t40 t41 t42 t43 t44 t45 t46 t47 t48 t49 t50 t51 t52 t53 t54 t55 t56 t57 t58 t59 t60 t61 t62 t63 t64 t65 t66 t67 t68 t69 t70 t71 t72 t73 t74 t75 t76) -> t65 -happyOut65 x = Happy_GHC_Exts.unsafeCoerce# x -{-# INLINE happyOut65 #-} -happyIn66 :: t66 -> (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37 t38 t39 t40 t41 t42 t43 t44 t45 t46 t47 t48 t49 t50 t51 t52 t53 t54 t55 t56 t57 t58 t59 t60 t61 t62 t63 t64 t65 t66 t67 t68 t69 t70 t71 t72 t73 t74 t75 t76) -happyIn66 x = Happy_GHC_Exts.unsafeCoerce# x -{-# INLINE happyIn66 #-} -happyOut66 :: (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37 t38 t39 t40 t41 t42 t43 t44 t45 t46 t47 t48 t49 t50 t51 t52 t53 t54 t55 t56 t57 t58 t59 t60 t61 t62 t63 t64 t65 t66 t67 t68 t69 t70 t71 t72 t73 t74 t75 t76) -> t66 -happyOut66 x = Happy_GHC_Exts.unsafeCoerce# x -{-# INLINE happyOut66 #-} -happyIn67 :: t67 -> (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37 t38 t39 t40 t41 t42 t43 t44 t45 t46 t47 t48 t49 t50 t51 t52 t53 t54 t55 t56 t57 t58 t59 t60 t61 t62 t63 t64 t65 t66 t67 t68 t69 t70 t71 t72 t73 t74 t75 t76) -happyIn67 x = Happy_GHC_Exts.unsafeCoerce# x -{-# INLINE happyIn67 #-} -happyOut67 :: (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37 t38 t39 t40 t41 t42 t43 t44 t45 t46 t47 t48 t49 t50 t51 t52 t53 t54 t55 t56 t57 t58 t59 t60 t61 t62 t63 t64 t65 t66 t67 t68 t69 t70 t71 t72 t73 t74 t75 t76) -> t67 -happyOut67 x = Happy_GHC_Exts.unsafeCoerce# x -{-# INLINE happyOut67 #-} -happyIn68 :: t68 -> (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37 t38 t39 t40 t41 t42 t43 t44 t45 t46 t47 t48 t49 t50 t51 t52 t53 t54 t55 t56 t57 t58 t59 t60 t61 t62 t63 t64 t65 t66 t67 t68 t69 t70 t71 t72 t73 t74 t75 t76) -happyIn68 x = Happy_GHC_Exts.unsafeCoerce# x -{-# INLINE happyIn68 #-} -happyOut68 :: (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37 t38 t39 t40 t41 t42 t43 t44 t45 t46 t47 t48 t49 t50 t51 t52 t53 t54 t55 t56 t57 t58 t59 t60 t61 t62 t63 t64 t65 t66 t67 t68 t69 t70 t71 t72 t73 t74 t75 t76) -> t68 -happyOut68 x = Happy_GHC_Exts.unsafeCoerce# x -{-# INLINE happyOut68 #-} -happyIn69 :: t69 -> (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37 t38 t39 t40 t41 t42 t43 t44 t45 t46 t47 t48 t49 t50 t51 t52 t53 t54 t55 t56 t57 t58 t59 t60 t61 t62 t63 t64 t65 t66 t67 t68 t69 t70 t71 t72 t73 t74 t75 t76) -happyIn69 x = Happy_GHC_Exts.unsafeCoerce# x -{-# INLINE happyIn69 #-} -happyOut69 :: (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37 t38 t39 t40 t41 t42 t43 t44 t45 t46 t47 t48 t49 t50 t51 t52 t53 t54 t55 t56 t57 t58 t59 t60 t61 t62 t63 t64 t65 t66 t67 t68 t69 t70 t71 t72 t73 t74 t75 t76) -> t69 -happyOut69 x = Happy_GHC_Exts.unsafeCoerce# x -{-# INLINE happyOut69 #-} -happyIn70 :: t70 -> (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37 t38 t39 t40 t41 t42 t43 t44 t45 t46 t47 t48 t49 t50 t51 t52 t53 t54 t55 t56 t57 t58 t59 t60 t61 t62 t63 t64 t65 t66 t67 t68 t69 t70 t71 t72 t73 t74 t75 t76) -happyIn70 x = Happy_GHC_Exts.unsafeCoerce# x -{-# INLINE happyIn70 #-} -happyOut70 :: (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37 t38 t39 t40 t41 t42 t43 t44 t45 t46 t47 t48 t49 t50 t51 t52 t53 t54 t55 t56 t57 t58 t59 t60 t61 t62 t63 t64 t65 t66 t67 t68 t69 t70 t71 t72 t73 t74 t75 t76) -> t70 -happyOut70 x = Happy_GHC_Exts.unsafeCoerce# x -{-# INLINE happyOut70 #-} -happyIn71 :: t71 -> (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37 t38 t39 t40 t41 t42 t43 t44 t45 t46 t47 t48 t49 t50 t51 t52 t53 t54 t55 t56 t57 t58 t59 t60 t61 t62 t63 t64 t65 t66 t67 t68 t69 t70 t71 t72 t73 t74 t75 t76) -happyIn71 x = Happy_GHC_Exts.unsafeCoerce# x -{-# INLINE happyIn71 #-} -happyOut71 :: (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37 t38 t39 t40 t41 t42 t43 t44 t45 t46 t47 t48 t49 t50 t51 t52 t53 t54 t55 t56 t57 t58 t59 t60 t61 t62 t63 t64 t65 t66 t67 t68 t69 t70 t71 t72 t73 t74 t75 t76) -> t71 -happyOut71 x = Happy_GHC_Exts.unsafeCoerce# x -{-# INLINE happyOut71 #-} -happyIn72 :: t72 -> (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37 t38 t39 t40 t41 t42 t43 t44 t45 t46 t47 t48 t49 t50 t51 t52 t53 t54 t55 t56 t57 t58 t59 t60 t61 t62 t63 t64 t65 t66 t67 t68 t69 t70 t71 t72 t73 t74 t75 t76) -happyIn72 x = Happy_GHC_Exts.unsafeCoerce# x -{-# INLINE happyIn72 #-} -happyOut72 :: (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37 t38 t39 t40 t41 t42 t43 t44 t45 t46 t47 t48 t49 t50 t51 t52 t53 t54 t55 t56 t57 t58 t59 t60 t61 t62 t63 t64 t65 t66 t67 t68 t69 t70 t71 t72 t73 t74 t75 t76) -> t72 -happyOut72 x = Happy_GHC_Exts.unsafeCoerce# x -{-# INLINE happyOut72 #-} -happyIn73 :: t73 -> (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37 t38 t39 t40 t41 t42 t43 t44 t45 t46 t47 t48 t49 t50 t51 t52 t53 t54 t55 t56 t57 t58 t59 t60 t61 t62 t63 t64 t65 t66 t67 t68 t69 t70 t71 t72 t73 t74 t75 t76) -happyIn73 x = Happy_GHC_Exts.unsafeCoerce# x -{-# INLINE happyIn73 #-} -happyOut73 :: (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37 t38 t39 t40 t41 t42 t43 t44 t45 t46 t47 t48 t49 t50 t51 t52 t53 t54 t55 t56 t57 t58 t59 t60 t61 t62 t63 t64 t65 t66 t67 t68 t69 t70 t71 t72 t73 t74 t75 t76) -> t73 -happyOut73 x = Happy_GHC_Exts.unsafeCoerce# x -{-# INLINE happyOut73 #-} -happyIn74 :: t74 -> (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37 t38 t39 t40 t41 t42 t43 t44 t45 t46 t47 t48 t49 t50 t51 t52 t53 t54 t55 t56 t57 t58 t59 t60 t61 t62 t63 t64 t65 t66 t67 t68 t69 t70 t71 t72 t73 t74 t75 t76) -happyIn74 x = Happy_GHC_Exts.unsafeCoerce# x -{-# INLINE happyIn74 #-} -happyOut74 :: (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37 t38 t39 t40 t41 t42 t43 t44 t45 t46 t47 t48 t49 t50 t51 t52 t53 t54 t55 t56 t57 t58 t59 t60 t61 t62 t63 t64 t65 t66 t67 t68 t69 t70 t71 t72 t73 t74 t75 t76) -> t74 -happyOut74 x = Happy_GHC_Exts.unsafeCoerce# x -{-# INLINE happyOut74 #-} -happyIn75 :: t75 -> (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37 t38 t39 t40 t41 t42 t43 t44 t45 t46 t47 t48 t49 t50 t51 t52 t53 t54 t55 t56 t57 t58 t59 t60 t61 t62 t63 t64 t65 t66 t67 t68 t69 t70 t71 t72 t73 t74 t75 t76) -happyIn75 x = Happy_GHC_Exts.unsafeCoerce# x -{-# INLINE happyIn75 #-} -happyOut75 :: (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37 t38 t39 t40 t41 t42 t43 t44 t45 t46 t47 t48 t49 t50 t51 t52 t53 t54 t55 t56 t57 t58 t59 t60 t61 t62 t63 t64 t65 t66 t67 t68 t69 t70 t71 t72 t73 t74 t75 t76) -> t75 -happyOut75 x = Happy_GHC_Exts.unsafeCoerce# x -{-# INLINE happyOut75 #-} -happyIn76 :: t76 -> (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37 t38 t39 t40 t41 t42 t43 t44 t45 t46 t47 t48 t49 t50 t51 t52 t53 t54 t55 t56 t57 t58 t59 t60 t61 t62 t63 t64 t65 t66 t67 t68 t69 t70 t71 t72 t73 t74 t75 t76) -happyIn76 x = Happy_GHC_Exts.unsafeCoerce# x -{-# INLINE happyIn76 #-} -happyOut76 :: (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37 t38 t39 t40 t41 t42 t43 t44 t45 t46 t47 t48 t49 t50 t51 t52 t53 t54 t55 t56 t57 t58 t59 t60 t61 t62 t63 t64 t65 t66 t67 t68 t69 t70 t71 t72 t73 t74 t75 t76) -> t76 -happyOut76 x = Happy_GHC_Exts.unsafeCoerce# x -{-# INLINE happyOut76 #-} -happyInTok :: ((Token Point)) -> (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37 t38 t39 t40 t41 t42 t43 t44 t45 t46 t47 t48 t49 t50 t51 t52 t53 t54 t55 t56 t57 t58 t59 t60 t61 t62 t63 t64 t65 t66 t67 t68 t69 t70 t71 t72 t73 t74 t75 t76) -happyInTok x = Happy_GHC_Exts.unsafeCoerce# x -{-# INLINE happyInTok #-} -happyOutTok :: (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37 t38 t39 t40 t41 t42 t43 t44 t45 t46 t47 t48 t49 t50 t51 t52 t53 t54 t55 t56 t57 t58 t59 t60 t61 t62 t63 t64 t65 t66 t67 t68 t69 t70 t71 t72 t73 t74 t75 t76) -> ((Token Point)) -happyOutTok x = Happy_GHC_Exts.unsafeCoerce# x -{-# INLINE happyOutTok #-} - - -happyActOffsets :: HappyAddr -happyActOffsets = HappyA# "\x3a\x02\x3a\x02\x31\x02\x2a\x02\x3d\x02\x00\x00\x28\x02\x1b\x02\x71\x00\x22\x02\x19\x02\x13\x02\x18\x02\x2d\x02\x00\x00\x20\x02\xfd\x01\x71\x00\x00\x00\x00\x00\x16\x02\x00\x00\x00\x00\xb7\x00\x00\x00\x94\x02\x11\x02\x05\x02\xfb\x01\xf4\x01\x0d\x02\x00\x00\x00\x00\xf1\x01\x00\x00\xf7\x01\x86\x00\xdb\x01\x94\x02\xed\x01\xd9\x01\xd9\x01\xf9\x01\xf3\x01\x00\x00\x00\x00\x00\x00\xd2\x01\xd9\x00\xd2\x01\x00\x00\xec\x01\x00\x00\x51\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x80\x00\xb8\x00\xcb\x01\x51\x00\xd9\x00\x00\x00\x00\x00\xe3\x01\xcd\x01\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\xd3\x01\xb9\x01\xd7\x01\x00\x00\x51\x00\x00\x00\x00\x00\xd5\x01\x00\x00\x00\x00\x00\x00\xb2\x00\x00\x00\x19\x00\xeb\x00\xb2\x00\xb2\x01\x00\x00\xcc\x01\x00\x00\xe7\x00\x9b\x00\x00\x00\x1d\x00\x00\x00\xb8\x00\xd0\x01\xce\x01\x00\x00\xb8\x00\xb0\x01\x51\x00\xaf\x01\xa4\x00\x51\x00\x00\x00\x00\x00\x51\x00\x00\x00\x00\x00\xb4\x01\x00\x00\x00\x00\xae\x01\x8e\x01\x00\x00\xe8\x00\xd9\x00\x00\x00\x9d\x01\x80\x00\x72\x00\x9b\x01\xa4\x00\xad\x01\x51\x00\x00\x00\x1d\x00\x8b\x01\x51\x00\x00\x00\xa4\x00\x51\x00\x51\x00\xd9\x00\x00\x00\x89\x01\x8d\x01\xaa\x01\xb2\x00\x00\x00\x00\x00\x97\x01\x93\x01\x00\x00\x00\x00\x00\x00\xb2\x00\xeb\x00\x00\x00\x87\x01\x70\x01\x00\x00\x51\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\xeb\x00\x00\x00\x00\x00\x6c\x01\x86\x01\x00\x00\x8c\x01\x00\x00\x00\x00\xa4\x00\x7d\x01\x00\x00\x00\x00\x51\x00\x68\x01\x84\x01\x6a\x01\xa4\x00\x57\x01\x6b\x01\x53\x01\x72\x00\x51\x00\x4f\x01\x00\x00\x00\x00\x00\x00\x5d\x00\x51\x01\x00\x00\xb2\x00\x00\x00\x4c\x01\x00\x00\x64\x01\x48\x01\x66\x01\x33\x02\x3d\x01\x4b\x01\x00\x00\x00\x00\x28\x01\x4a\x01\x51\x00\x00\x00\x51\x00\x00\x00\x00\x00\x00\x00\xeb\x00\x00\x00\x00\x00\x00\x00\x00\x00\x49\x01\x00\x00\x45\x01\x25\x01\x25\x01\x26\x01\x00\x00\x51\x00\x40\x01\x43\x01\x0e\x01\x33\x02\x07\x01\x00\x00\xd9\x00\x0a\x01\x00\x00\x00\x00\xb2\x00\x00\x00\x00\x00\x00\x00\x00\x00\x23\x01\x05\x01\x21\x01\x51\x00\x00\x00\x00\x00\x09\x01\xf0\x00\x03\x01\x00\x00\xdf\x00\x00\x00\x51\x00\x00\x00\x00\x00\x00\x00\x51\x00\x00\x00\x00\x00\xef\x00\x00\x00\x00\x00\x00\x00"# - -happyGotoOffsets :: HappyAddr -happyGotoOffsets = HappyA# "\xf7\x00\x00\x00\xc7\x00\x00\x00\xe2\x00\x00\x00\xdb\x00\x00\x00\x12\x00\x00\x00\x00\x00\x0d\x00\x00\x00\x00\x00\x00\x00\xd1\x00\x00\x00\x81\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\xce\x00\x00\x00\xc4\x00\x00\x00\x23\x00\x00\x00\x00\x00\x00\x00\x97\x00\x00\x00\x00\x00\x0c\x00\x00\x00\x16\x00\xbe\x00\x95\x00\x92\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\xf8\x00\xde\x02\x7d\x00\x00\x00\x00\x00\x00\x00\x24\x02\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x6e\x00\x81\x02\x00\x00\xff\xff\xce\x02\x00\x00\x00\x00\x00\x00\xde\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\xf7\xff\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x3a\x00\x00\x00\x00\x00\x36\x00\x03\x03\x05\x00\x00\x00\x00\x00\x00\x00\x60\x00\x76\x02\x00\x00\x00\x00\x00\x00\x7b\x02\x00\x00\x00\x00\x00\x00\x7f\x00\x00\x00\x1c\x02\x00\x00\x60\x02\x02\x02\x00\x00\x00\x00\xfa\x01\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x17\x00\x00\x00\x8e\x02\xbe\x02\x00\x00\x00\x00\x2f\x00\xc3\x00\x00\x00\x08\x01\x00\x00\xe0\x01\x00\x00\x00\x00\xee\xff\xd8\x01\x00\x00\x6d\x02\xbe\x01\xb6\x01\xae\x02\x00\x00\xcd\x00\x00\x00\x00\x00\xff\x02\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\xea\x00\xf5\x02\x00\x00\x00\x00\x8b\x00\x00\x00\x9c\x01\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\xf1\x02\x00\x00\x00\x00\x35\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x76\x02\x00\x00\x00\x00\x00\x00\x94\x01\x00\x00\x00\x00\x00\x00\x56\x02\x00\x00\x00\x00\x00\x00\x3e\x02\x7a\x01\x00\x00\x00\x00\x00\x00\x00\x00\x01\x00\xcb\x00\x00\x00\x48\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x25\x02\x00\x00\x00\x00\x00\x00\x00\x00\x2f\x02\x00\x00\x72\x01\x00\x00\x58\x01\x00\x00\x00\x00\x00\x00\xe2\x02\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\xf0\xff\x4e\x00\x13\x00\x00\x00\x50\x01\x00\x00\x00\x00\x1c\x00\x37\x00\x4c\x00\x00\x00\x9e\x02\x4a\x00\x00\x00\x00\x00\x0c\x03\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x36\x01\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x2e\x01\x00\x00\x00\x00\x00\x00\x14\x01\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00"# - -happyDefActions :: HappyAddr -happyDefActions = HappyA# "\x00\x00\x00\x00\x00\x00\x00\x00\xfc\xff\xac\xff\xfa\xff\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\xf8\xff\xf4\xff\x00\x00\x92\xff\xad\xff\xae\xff\x00\x00\xfd\xff\xf9\xff\x00\x00\x91\xff\x9b\xff\x00\x00\xf5\xff\x00\x00\x98\xff\x00\x00\xfb\xff\xf7\xff\x00\x00\x97\xff\x00\x00\x00\x00\x00\x00\x9c\xff\xe7\xff\x00\x00\x00\x00\x00\x00\x00\x00\x90\xff\xf2\xff\xf3\xff\x88\xff\x00\x00\x00\x00\xe8\xff\x00\x00\xfe\xff\x00\x00\x8b\xff\xcd\xff\xcf\xff\xce\xff\xb1\xff\x00\x00\x8c\xff\x00\x00\x84\xff\x00\x00\xe9\xff\xea\xff\x00\x00\x00\x00\xb3\xff\xb4\xff\xb2\xff\x9a\xff\xf6\xff\x96\xff\x80\xff\x00\x00\x00\x00\x81\xff\xab\xff\x84\xff\xee\xff\xc4\xff\xc2\xff\xbf\xff\xbe\xff\xbc\xff\xba\xff\xbb\xff\x00\x00\x73\xff\x00\x00\x00\x00\xaa\xff\x83\xff\xe5\xff\xdd\xff\xdb\xff\xd9\xff\xd7\xff\xd4\xff\x00\x00\x00\x00\x85\xff\xcc\xff\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\xaf\xff\x8a\xff\x00\x00\xed\xff\x99\xff\x00\x00\xeb\xff\x87\xff\xef\xff\x89\xff\x86\xff\x00\x00\x00\x00\xec\xff\x00\x00\x00\x00\x00\x00\x00\x00\xa7\xff\x00\x00\x00\x00\xd1\xff\xd8\xff\x00\x00\x00\x00\xda\xff\x00\x00\x00\x00\x00\x00\x00\x00\x6f\xff\x88\xff\x00\x00\x70\xff\x00\x00\xba\xff\x72\xff\x00\x00\x74\xff\xa9\xff\x76\xff\xc0\xff\x77\xff\x00\x00\x83\xff\x00\x00\x00\x00\xd2\xff\x00\x00\xb0\xff\x7f\xff\xd3\xff\xc3\xff\x75\xff\x00\x00\xbd\xff\xc1\xff\x00\x00\x00\x00\xc6\xff\x00\x00\xe1\xff\xe4\xff\xdc\xff\x00\x00\xd5\xff\x82\xff\x00\x00\x00\x00\x00\x00\x00\x00\xa8\xff\x00\x00\x00\x00\x00\x00\x95\xff\x00\x00\x00\x00\xf1\xff\xb7\xff\xf0\xff\x00\x00\x00\x00\x8e\xff\x7a\xff\xb8\xff\x8f\xff\x7d\xff\x00\x00\x00\x00\x7e\xff\x9f\xff\x00\x00\x00\x00\xe6\xff\x94\xff\xa3\xff\x00\x00\x00\x00\xa6\xff\x00\x00\xe2\xff\xd6\xff\xd0\xff\x00\x00\x6e\xff\x71\xff\xc5\xff\xc7\xff\x00\x00\xa5\xff\x00\x00\x88\xff\xc8\xff\xa4\xff\x93\xff\x00\x00\x00\x00\x00\x00\xc8\xff\xa0\xff\x00\x00\xb9\xff\x00\x00\x00\x00\x79\xff\xb6\xff\x7b\xff\x78\xff\x8d\xff\xb5\xff\x7c\xff\x00\x00\x00\x00\x00\x00\x00\x00\x9e\xff\xe3\xff\x00\x00\x00\x00\x00\x00\xa2\xff\x00\x00\xde\xff\x00\x00\xe0\xff\xa1\xff\xca\xff\x00\x00\xdf\xff\x9d\xff\x00\x00\xcb\xff\xc9\xff"# - -happyCheck :: HappyAddr -happyCheck = HappyA# "\xff\xff\x0a\x00\x0b\x00\x0c\x00\x0d\x00\x0e\x00\x0f\x00\x10\x00\x11\x00\x0a\x00\x0b\x00\x0c\x00\x0d\x00\x0e\x00\x0f\x00\x10\x00\x11\x00\x04\x00\x22\x00\x25\x00\x08\x00\x03\x00\x1f\x00\x16\x00\x21\x00\x22\x00\x23\x00\x16\x00\x10\x00\x07\x00\x1f\x00\x1e\x00\x21\x00\x22\x00\x23\x00\x06\x00\x23\x00\x12\x00\x25\x00\x04\x00\x23\x00\x39\x00\x3a\x00\x1f\x00\x0f\x00\x21\x00\x22\x00\x23\x00\x14\x00\x24\x00\x3b\x00\x3c\x00\x22\x00\x23\x00\x23\x00\x08\x00\x22\x00\x22\x00\x3b\x00\x3c\x00\x2f\x00\x30\x00\x22\x00\x26\x00\x3f\x00\x40\x00\x29\x00\x37\x00\x38\x00\x33\x00\x34\x00\x24\x00\x47\x00\x48\x00\x13\x00\x16\x00\x47\x00\x48\x00\x18\x00\x19\x00\x1a\x00\x1b\x00\x01\x00\x02\x00\x1a\x00\x1b\x00\x1f\x00\x21\x00\x23\x00\x23\x00\x23\x00\x21\x00\x26\x00\x23\x00\x0d\x00\x0e\x00\x26\x00\x10\x00\x14\x00\x1b\x00\x13\x00\x14\x00\x15\x00\x1d\x00\x08\x00\x21\x00\x1e\x00\x23\x00\x1b\x00\x23\x00\x26\x00\x1e\x00\x22\x00\x25\x00\x21\x00\x01\x00\x02\x00\x24\x00\x08\x00\x26\x00\x27\x00\x28\x00\x29\x00\x45\x00\x46\x00\x43\x00\x44\x00\x0d\x00\x0e\x00\x24\x00\x10\x00\x26\x00\x03\x00\x13\x00\x14\x00\x01\x00\x02\x00\x41\x00\x42\x00\x0b\x00\x0c\x00\x1b\x00\x08\x00\x10\x00\x1e\x00\x0b\x00\x0c\x00\x21\x00\x0e\x00\x24\x00\x24\x00\x26\x00\x26\x00\x27\x00\x28\x00\x29\x00\x01\x00\x02\x00\x1f\x00\x22\x00\x21\x00\x22\x00\x23\x00\x22\x00\x23\x00\x01\x00\x02\x00\x21\x00\x0d\x00\x0e\x00\x24\x00\x20\x00\x26\x00\x27\x00\x28\x00\x29\x00\x25\x00\x0d\x00\x0e\x00\x01\x00\x02\x00\x23\x00\x37\x00\x38\x00\x23\x00\x01\x00\x02\x00\x24\x00\x21\x00\x06\x00\x07\x00\x24\x00\x25\x00\x26\x00\x27\x00\x28\x00\x29\x00\x21\x00\x0e\x00\x09\x00\x24\x00\x05\x00\x26\x00\x27\x00\x28\x00\x29\x00\x0b\x00\x0c\x00\x0d\x00\x0e\x00\x0f\x00\x10\x00\x11\x00\x07\x00\x24\x00\x06\x00\x26\x00\x21\x00\x01\x00\x02\x00\x24\x00\x02\x00\x26\x00\x27\x00\x28\x00\x29\x00\x1f\x00\x01\x00\x21\x00\x22\x00\x23\x00\x0e\x00\x1d\x00\x01\x00\x02\x00\x24\x00\x01\x00\x02\x00\x23\x00\x22\x00\x22\x00\x0a\x00\x0b\x00\x0c\x00\x31\x00\x32\x00\x0e\x00\x00\x00\x09\x00\x0e\x00\x21\x00\x2d\x00\x2e\x00\x24\x00\x20\x00\x26\x00\x35\x00\x36\x00\x23\x00\x25\x00\x1a\x00\x1b\x00\x39\x00\x3a\x00\x05\x00\x21\x00\x22\x00\x21\x00\x24\x00\x23\x00\x26\x00\x24\x00\x26\x00\x26\x00\x09\x00\x23\x00\x0c\x00\x0d\x00\x0e\x00\x0f\x00\x10\x00\x11\x00\x22\x00\x3d\x00\x3e\x00\x15\x00\x0a\x00\x0b\x00\x0c\x00\x0d\x00\x0e\x00\x0f\x00\x10\x00\x11\x00\x05\x00\x1f\x00\x23\x00\x21\x00\x22\x00\x23\x00\x09\x00\x26\x00\x24\x00\x27\x00\x28\x00\x39\x00\x3a\x00\x1f\x00\x26\x00\x21\x00\x22\x00\x23\x00\x0a\x00\x0b\x00\x0c\x00\x0d\x00\x0e\x00\x0f\x00\x10\x00\x11\x00\x0a\x00\x0b\x00\x0c\x00\x0d\x00\x0e\x00\x0f\x00\x10\x00\x11\x00\x05\x00\x09\x00\x24\x00\x26\x00\x24\x00\x1f\x00\x09\x00\x21\x00\x22\x00\x23\x00\x09\x00\x09\x00\x09\x00\x1f\x00\x19\x00\x21\x00\x22\x00\x23\x00\x0a\x00\x0b\x00\x0c\x00\x0d\x00\x0e\x00\x0f\x00\x10\x00\x11\x00\x0a\x00\x0b\x00\x0c\x00\x0d\x00\x0e\x00\x0f\x00\x10\x00\x11\x00\x04\x00\x23\x00\x08\x00\x05\x00\x22\x00\x1f\x00\x21\x00\x21\x00\x22\x00\x23\x00\x09\x00\x24\x00\x23\x00\x1f\x00\x21\x00\x21\x00\x22\x00\x23\x00\x0a\x00\x0b\x00\x0c\x00\x0d\x00\x0e\x00\x0f\x00\x10\x00\x11\x00\x0a\x00\x0b\x00\x0c\x00\x0d\x00\x0e\x00\x0f\x00\x10\x00\x11\x00\x22\x00\x09\x00\x11\x00\x03\x00\x24\x00\x1f\x00\x0c\x00\x21\x00\x22\x00\x23\x00\x26\x00\x04\x00\x11\x00\x1f\x00\x03\x00\x21\x00\x22\x00\x23\x00\x0a\x00\x0b\x00\x0c\x00\x0d\x00\x0e\x00\x0f\x00\x10\x00\x11\x00\x0a\x00\x0b\x00\x0c\x00\x0d\x00\x0e\x00\x0f\x00\x10\x00\x11\x00\x04\x00\x26\x00\x23\x00\x26\x00\x05\x00\x1f\x00\x26\x00\x21\x00\x22\x00\x23\x00\x1d\x00\x0b\x00\x1d\x00\x1f\x00\x08\x00\x21\x00\x22\x00\x23\x00\x0a\x00\x0b\x00\x0c\x00\x0d\x00\x0e\x00\x0f\x00\x10\x00\x11\x00\x0a\x00\x0b\x00\x0c\x00\x0d\x00\x0e\x00\x0f\x00\x10\x00\x11\x00\x21\x00\x21\x00\x04\x00\x03\x00\x08\x00\x1f\x00\x24\x00\x21\x00\x22\x00\x23\x00\x05\x00\x04\x00\x23\x00\x1f\x00\x0b\x00\x21\x00\x22\x00\x23\x00\x0a\x00\x0b\x00\x0c\x00\x0d\x00\x0e\x00\x0f\x00\x10\x00\x11\x00\x0a\x00\x0b\x00\x0c\x00\x0d\x00\x0e\x00\x0f\x00\x10\x00\x11\x00\x0f\x00\x26\x00\x29\x00\x09\x00\x03\x00\x1f\x00\x26\x00\x21\x00\x22\x00\x23\x00\x03\x00\x24\x00\x23\x00\x1f\x00\x09\x00\x21\x00\x22\x00\x23\x00\x0a\x00\x0b\x00\x0c\x00\x0d\x00\x0e\x00\x0f\x00\x10\x00\x11\x00\x0a\x00\x0b\x00\x0c\x00\x0d\x00\x0e\x00\x0f\x00\x10\x00\x11\x00\x27\x00\x24\x00\x09\x00\x12\x00\x24\x00\x1f\x00\x09\x00\x21\x00\x22\x00\x23\x00\x23\x00\x09\x00\x23\x00\x1f\x00\x02\x00\x21\x00\x22\x00\x23\x00\x0a\x00\x0b\x00\x0c\x00\x0d\x00\x0e\x00\x0f\x00\x10\x00\x11\x00\x0a\x00\x0b\x00\x0c\x00\x0d\x00\x0e\x00\x0f\x00\x10\x00\x11\x00\x09\x00\x24\x00\x13\x00\x21\x00\x21\x00\x1f\x00\x21\x00\x21\x00\x22\x00\x23\x00\x18\x00\x12\x00\x20\x00\x1f\x00\x1f\x00\x21\x00\x22\x00\x23\x00\x23\x00\x0b\x00\x0c\x00\x0d\x00\x0e\x00\x0f\x00\x10\x00\x11\x00\x2b\x00\x2c\x00\x23\x00\x16\x00\x2a\x00\x24\x00\x1c\x00\x24\x00\x29\x00\x2a\x00\x27\x00\x28\x00\x29\x00\x1f\x00\xff\xff\x21\x00\x22\x00\x23\x00\x0c\x00\x0d\x00\x0e\x00\x0f\x00\x10\x00\x11\x00\xff\xff\xff\xff\xff\xff\x15\x00\x0c\x00\x0d\x00\x0e\x00\x0f\x00\x10\x00\x11\x00\xff\xff\xff\xff\xff\xff\x1f\x00\xff\xff\x21\x00\x22\x00\x23\x00\x0d\x00\x0e\x00\x0f\x00\x10\x00\x11\x00\x1f\x00\xff\xff\x21\x00\x22\x00\x23\x00\x0e\x00\x0f\x00\x10\x00\x11\x00\xff\xff\xff\xff\x0f\x00\x10\x00\x1f\x00\xff\xff\x21\x00\x22\x00\x23\x00\x10\x00\xff\xff\xff\xff\xff\xff\x1f\x00\xff\xff\x21\x00\x22\x00\x23\x00\x1f\x00\xff\xff\x21\x00\x22\x00\x23\x00\xff\xff\x1f\x00\xff\xff\x21\x00\x22\x00\x23\x00\x17\x00\x18\x00\x19\x00\x1a\x00\x1b\x00\x1c\x00\x17\x00\xff\xff\xff\xff\x1a\x00\x21\x00\xff\xff\x23\x00\xff\xff\x1f\x00\x26\x00\x17\x00\x18\x00\x19\x00\x1a\x00\x1b\x00\x26\x00\xff\xff\xff\xff\xff\xff\xff\xff\x21\x00\xff\xff\x23\x00\xff\xff\xff\xff\x26\x00\x17\x00\x18\x00\x19\x00\x1a\x00\x1b\x00\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\x21\x00\xff\xff\x23\x00\xff\xff\xff\xff\x26\x00\x17\x00\x18\x00\x19\x00\x1a\x00\x1b\x00\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\x21\x00\xff\xff\x23\x00\xff\xff\xff\xff\x26\x00\x17\x00\x18\x00\x19\x00\x1a\x00\x1b\x00\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\x21\x00\xff\xff\x23\x00\xff\xff\xff\xff\x26\x00\x17\x00\x18\x00\x19\x00\x1a\x00\x1b\x00\x18\x00\x19\x00\x1a\x00\x1b\x00\xff\xff\x21\x00\xff\xff\x23\x00\xff\xff\x21\x00\x26\x00\x23\x00\xff\xff\xff\xff\x26\x00\x18\x00\x19\x00\x1a\x00\x1b\x00\x18\x00\x19\x00\x1a\x00\x1b\x00\xff\xff\x21\x00\xff\xff\x23\x00\xff\xff\x21\x00\x26\x00\x23\x00\x1a\x00\x1b\x00\x26\x00\xff\xff\x1a\x00\x1b\x00\xff\xff\x21\x00\xff\xff\x23\x00\xff\xff\x21\x00\x26\x00\x23\x00\x1b\x00\xff\xff\x26\x00\xff\xff\xff\xff\xff\xff\x21\x00\xff\xff\x23\x00\xff\xff\xff\xff\x26\x00\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff"# - -happyTable :: HappyAddr -happyTable = HappyA# "\x00\x00\x9a\x00\x5e\x00\x5f\x00\x60\x00\x61\x00\x62\x00\x63\x00\x64\x00\x5d\x00\x5e\x00\x5f\x00\x60\x00\x61\x00\x62\x00\x63\x00\x64\x00\x1a\x00\x75\x00\xaf\x00\x35\x00\x0d\x00\x37\x00\x8c\x00\x38\x00\x39\x00\x3a\x00\x8c\x00\x36\x00\x33\x00\x37\x00\xc5\x00\x38\x00\x39\x00\x3a\x00\x86\x00\x8d\x00\xf8\x00\xc6\x00\x1e\x00\x8d\x00\xfa\x00\x77\x00\x37\x00\x87\x00\x38\x00\x39\x00\x3a\x00\xf3\x00\x1b\x00\x9b\x00\x66\x00\x0e\x00\x0f\x00\xde\x00\xba\x00\x24\x00\x78\x00\x65\x00\x66\x00\x1c\x00\x1d\x00\xf4\x00\x96\x00\xc7\x00\xc8\x00\x6f\x00\x3b\x00\x3c\x00\x10\x00\x11\x00\x1b\x00\x8e\x00\x8f\x00\xf2\x00\xd7\x00\x8e\x00\x8f\x00\x92\x00\x52\x00\x53\x00\x54\x00\x3e\x00\x3f\x00\x96\x00\x54\x00\xe4\x00\x55\x00\x8d\x00\x56\x00\x3a\x00\x55\x00\x57\x00\x91\x00\x68\x00\x43\x00\x57\x00\x69\x00\xf9\x00\xeb\x00\x6a\x00\x6b\x00\x6c\x00\xef\x00\x89\x00\x55\x00\xf1\x00\x91\x00\x6d\x00\xc2\x00\x57\x00\x6e\x00\xf4\x00\xc6\x00\x44\x00\x3e\x00\x3f\x00\x13\x00\x70\x00\x14\x00\x45\x00\x46\x00\x47\x00\x93\x00\x94\x00\x97\x00\x98\x00\x68\x00\x43\x00\x13\x00\x69\x00\x4f\x00\x14\x00\x6a\x00\x6b\x00\x3e\x00\x3f\x00\xec\x00\xed\x00\x41\x00\x42\x00\x6d\x00\x40\x00\x36\x00\x6e\x00\x41\x00\x42\x00\x44\x00\x43\x00\x13\x00\x13\x00\x14\x00\x14\x00\x45\x00\x46\x00\x47\x00\x3e\x00\x3f\x00\x37\x00\x73\x00\x38\x00\x39\x00\x3a\x00\x0e\x00\x0f\x00\x3e\x00\x3f\x00\x44\x00\x68\x00\x43\x00\x13\x00\xa0\x00\x14\x00\x45\x00\x46\x00\x47\x00\x4b\x00\x68\x00\x43\x00\x59\x00\x5a\x00\x2f\x00\x81\x00\x3c\x00\x30\x00\x3e\x00\x3f\x00\x48\x00\x44\x00\x2b\x00\x2c\x00\x13\x00\x89\x00\x14\x00\x45\x00\x46\x00\x47\x00\x44\x00\x43\x00\x31\x00\x13\x00\x20\x00\x14\x00\x45\x00\x46\x00\x47\x00\xb7\x00\x5f\x00\x60\x00\x61\x00\x62\x00\x63\x00\x64\x00\x23\x00\x13\x00\x16\x00\x5d\x00\x44\x00\x59\x00\x5a\x00\x13\x00\x09\x00\x14\x00\x45\x00\x46\x00\x47\x00\x37\x00\x06\x00\x38\x00\x39\x00\x3a\x00\x5b\x00\xc1\x00\x59\x00\x5a\x00\x04\x00\x59\x00\x5a\x00\xc2\x00\x75\x00\x24\x00\x8b\x00\x41\x00\x42\x00\xb8\x00\xb9\x00\x5b\x00\x03\x00\x08\x01\x5b\x00\x5c\x00\x25\x00\x26\x00\x13\x00\x4a\x00\x5d\x00\xc3\x00\xc4\x00\xfe\x00\x4b\x00\xa3\x00\x54\x00\xa9\x00\x77\x00\xff\x00\xc0\x00\xc1\x00\x55\x00\x13\x00\x91\x00\x5d\x00\x13\x00\x57\x00\x5d\x00\x01\x01\x00\x01\xb2\x00\x60\x00\x61\x00\x62\x00\x63\x00\x64\x00\x75\x00\x4c\x00\x4d\x00\xb3\x00\x05\x01\x5e\x00\x5f\x00\x60\x00\x61\x00\x62\x00\x63\x00\x64\x00\x03\x01\x37\x00\x04\x01\x38\x00\x39\x00\x3a\x00\x05\x01\x4f\x00\x13\x00\xb4\x00\xb5\x00\x76\x00\x77\x00\x37\x00\x14\x00\x38\x00\x39\x00\x3a\x00\x06\x01\x5e\x00\x5f\x00\x60\x00\x61\x00\x62\x00\x63\x00\x64\x00\x01\x01\x5e\x00\x5f\x00\x60\x00\x61\x00\x62\x00\x63\x00\x64\x00\xf6\x00\xf7\x00\x13\x00\x14\x00\x13\x00\x37\x00\xfc\x00\x38\x00\x39\x00\x3a\x00\xfd\x00\xdd\x00\xe2\x00\x37\x00\xe3\x00\x38\x00\x39\x00\x3a\x00\xf7\x00\x5e\x00\x5f\x00\x60\x00\x61\x00\x62\x00\x63\x00\x64\x00\xda\x00\x5e\x00\x5f\x00\x60\x00\x61\x00\x62\x00\x63\x00\x64\x00\xe8\x00\xe9\x00\xea\x00\xd3\x00\xeb\x00\x37\x00\xca\x00\x38\x00\x39\x00\x3a\x00\xce\x00\x13\x00\xcd\x00\x37\x00\xcf\x00\x38\x00\x39\x00\x3a\x00\xdb\x00\x5e\x00\x5f\x00\x60\x00\x61\x00\x62\x00\x63\x00\x64\x00\xca\x00\x5e\x00\x5f\x00\x60\x00\x61\x00\x62\x00\x63\x00\x64\x00\xd1\x00\xd2\x00\xd5\x00\xd6\x00\x13\x00\x37\x00\xd7\x00\x38\x00\x39\x00\x3a\x00\x4f\x00\xa5\x00\xa2\x00\x37\x00\xa6\x00\x38\x00\x39\x00\x3a\x00\xd3\x00\x5e\x00\x5f\x00\x60\x00\x61\x00\x62\x00\x63\x00\x64\x00\x9f\x00\x5e\x00\x5f\x00\x60\x00\x61\x00\x62\x00\x63\x00\x64\x00\xa8\x00\x14\x00\xa9\x00\x4f\x00\xb2\x00\x37\x00\x14\x00\x38\x00\x39\x00\x3a\x00\xb7\x00\x7a\x00\xbc\x00\x37\x00\x7b\x00\x38\x00\x39\x00\x3a\x00\xab\x00\x5e\x00\x5f\x00\x60\x00\x61\x00\x62\x00\x63\x00\x64\x00\xac\x00\x5e\x00\x5f\x00\x60\x00\x61\x00\x62\x00\x63\x00\x64\x00\x7f\x00\x81\x00\x83\x00\x84\x00\x8c\x00\x37\x00\x13\x00\x38\x00\x39\x00\x3a\x00\x9a\x00\x9d\x00\x9e\x00\x37\x00\x9f\x00\x38\x00\x39\x00\x3a\x00\xae\x00\x5e\x00\x5f\x00\x60\x00\x61\x00\x62\x00\x63\x00\x64\x00\xb0\x00\x5e\x00\x5f\x00\x60\x00\x61\x00\x62\x00\x63\x00\x64\x00\x50\x00\x4f\x00\x6f\x00\x73\x00\x2e\x00\x37\x00\x14\x00\x38\x00\x39\x00\x3a\x00\x2f\x00\x13\x00\x35\x00\x37\x00\x48\x00\x38\x00\x39\x00\x3a\x00\x7b\x00\x5e\x00\x5f\x00\x60\x00\x61\x00\x62\x00\x63\x00\x64\x00\x7c\x00\x5e\x00\x5f\x00\x60\x00\x61\x00\x62\x00\x63\x00\x64\x00\x33\x00\x06\x00\x4a\x00\x22\x00\x06\x00\x37\x00\x23\x00\x38\x00\x39\x00\x3a\x00\x20\x00\x2d\x00\x16\x00\x37\x00\x18\x00\x38\x00\x39\x00\x3a\x00\x7f\x00\x5e\x00\x5f\x00\x60\x00\x61\x00\x62\x00\x63\x00\x64\x00\x71\x00\x5e\x00\x5f\x00\x60\x00\x61\x00\x62\x00\x63\x00\x64\x00\x19\x00\x06\x00\xe3\x00\x1a\x00\x0c\x00\x37\x00\x09\x00\x38\x00\x39\x00\x3a\x00\x0b\x00\xdd\x00\x0d\x00\x37\x00\xe4\x00\x38\x00\x39\x00\x3a\x00\x3a\x00\xcb\x00\x5f\x00\x60\x00\x61\x00\x62\x00\x63\x00\x64\x00\xe5\x00\xe6\x00\xde\x00\x08\x00\xff\xff\x06\x00\x03\x00\x13\x00\xdf\x00\xe0\x00\x45\x00\x46\x00\x47\x00\x37\x00\x00\x00\x38\x00\x39\x00\x3a\x00\xb2\x00\x60\x00\x61\x00\x62\x00\x63\x00\x64\x00\x00\x00\x00\x00\x00\x00\xcf\x00\x7d\x00\x60\x00\x61\x00\x62\x00\x63\x00\x64\x00\x00\x00\x00\x00\x00\x00\x37\x00\x00\x00\x38\x00\x39\x00\x3a\x00\xad\x00\x61\x00\x62\x00\x63\x00\x64\x00\x37\x00\x00\x00\x38\x00\x39\x00\x3a\x00\x87\x00\x62\x00\x63\x00\x64\x00\x00\x00\x00\x00\x84\x00\x63\x00\x37\x00\x00\x00\x38\x00\x39\x00\x3a\x00\x6f\x00\x00\x00\x00\x00\x00\x00\x37\x00\x00\x00\x38\x00\x39\x00\x3a\x00\x37\x00\x00\x00\x38\x00\x39\x00\x3a\x00\x00\x00\x37\x00\x00\x00\x38\x00\x39\x00\x3a\x00\xbd\x00\x51\x00\x52\x00\x53\x00\x54\x00\xbe\x00\x28\x00\x00\x00\x00\x00\x29\x00\x55\x00\x00\x00\x56\x00\x00\x00\x2a\x00\x57\x00\xf0\x00\x51\x00\x52\x00\x53\x00\x54\x00\x14\x00\x00\x00\x00\x00\x00\x00\x00\x00\x55\x00\x00\x00\x56\x00\x00\x00\x00\x00\x57\x00\xaa\x00\x51\x00\x52\x00\x53\x00\x54\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x55\x00\x00\x00\x56\x00\x00\x00\x00\x00\x57\x00\xbc\x00\x51\x00\x52\x00\x53\x00\x54\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x55\x00\x00\x00\x56\x00\x00\x00\x00\x00\x57\x00\x50\x00\x51\x00\x52\x00\x53\x00\x54\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x55\x00\x00\x00\x56\x00\x00\x00\x00\x00\x57\x00\x74\x00\x51\x00\x52\x00\x53\x00\x54\x00\xd9\x00\x52\x00\x53\x00\x54\x00\x00\x00\x55\x00\x00\x00\x56\x00\x00\x00\x55\x00\x57\x00\x56\x00\x00\x00\x00\x00\x57\x00\xd8\x00\x52\x00\x53\x00\x54\x00\xa2\x00\x52\x00\x53\x00\x54\x00\x00\x00\x55\x00\x00\x00\x56\x00\x00\x00\x55\x00\x57\x00\x56\x00\xa6\x00\x54\x00\x57\x00\x00\x00\x90\x00\x54\x00\x00\x00\x55\x00\x00\x00\x91\x00\x00\x00\x55\x00\x57\x00\x91\x00\xee\x00\x00\x00\x57\x00\x00\x00\x00\x00\x00\x00\x55\x00\x00\x00\x91\x00\x00\x00\x00\x00\x57\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\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 (1, 145) [ - (1 , happyReduce_1), - (2 , happyReduce_2), - (3 , happyReduce_3), - (4 , happyReduce_4), - (5 , happyReduce_5), - (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) - ] - -happy_n_terms = 43 :: Int -happy_n_nonterms = 73 :: Int - -happyReduce_1 = happyReduce 8# 0# happyReduction_1 -happyReduction_1 (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 happyOutTok happy_x_1 of { happy_var_1 -> - case happyOut40 happy_x_2 of { happy_var_2 -> - case happyOut5 happy_x_3 of { happy_var_3 -> - case happyOut6 happy_x_4 of { happy_var_4 -> - case happyOutTok happy_x_5 of { happy_var_5 -> - case happyOutTok happy_x_6 of { happy_var_6 -> - case happyOut49 happy_x_7 of { happy_var_7 -> - case happyOutTok happy_x_8 of { happy_var_8 -> - happyIn4 - (Module (lrPoint [point happy_var_1 - ,point happy_var_2 - ,point happy_var_3 - ,point happy_var_4 - ,point happy_var_5 - ,point happy_var_6 - ,lrPointList happy_var_7 - ,point happy_var_8]) happy_var_2 happy_var_3 happy_var_4 happy_var_7 - ) `HappyStk` happyRest}}}}}}}} - -happyReduce_2 = happyReduce 4# 1# happyReduction_2 -happyReduction_2 (happy_x_4 `HappyStk` - happy_x_3 `HappyStk` - happy_x_2 `HappyStk` - happy_x_1 `HappyStk` - happyRest) - = case happyOutTok happy_x_1 of { happy_var_1 -> - case happyOutTok happy_x_2 of { happy_var_2 -> - case happyOut55 happy_x_3 of { happy_var_3 -> - case happyOutTok happy_x_4 of { happy_var_4 -> - happyIn5 - (ExpListD (lrPoint [point happy_var_1 - ,point happy_var_2 - ,lrPointList happy_var_3 - ,point happy_var_4]) happy_var_3 - ) `HappyStk` happyRest}}}} - -happyReduce_3 = happySpecReduce_0 1# happyReduction_3 -happyReduction_3 = happyIn5 - (ExpAllD noPoint - ) - -happyReduce_4 = happyReduce 4# 2# happyReduction_4 -happyReduction_4 (happy_x_4 `HappyStk` - happy_x_3 `HappyStk` - happy_x_2 `HappyStk` - happy_x_1 `HappyStk` - happyRest) - = case happyOutTok happy_x_1 of { happy_var_1 -> - case happyOutTok happy_x_2 of { happy_var_2 -> - case happyOut51 happy_x_3 of { happy_var_3 -> - case happyOutTok happy_x_4 of { happy_var_4 -> - happyIn6 - (ImpListD (lrPoint [point happy_var_1 - ,point happy_var_2 - ,lrPointList happy_var_3 - ,point happy_var_4]) happy_var_3 - ) `HappyStk` happyRest}}}} - -happyReduce_5 = happySpecReduce_0 2# happyReduction_5 -happyReduction_5 = happyIn6 - (ImpNoneD noPoint - ) - -happyReduce_6 = happySpecReduce_2 3# happyReduction_6 -happyReduction_6 happy_x_2 - happy_x_1 - = case happyOut39 happy_x_1 of { happy_var_1 -> - case happyOut10 happy_x_2 of { happy_var_2 -> - happyIn7 - (TypeEx (lrPoint [point happy_var_1 - ,point happy_var_2]) happy_var_1 happy_var_2 - )}} - -happyReduce_7 = happySpecReduce_1 3# happyReduction_7 -happyReduction_7 happy_x_1 - = case happyOut38 happy_x_1 of { happy_var_1 -> - happyIn7 - (VarEx (point happy_var_1) happy_var_1 - )} - -happyReduce_8 = happySpecReduce_2 4# happyReduction_8 -happyReduction_8 happy_x_2 - happy_x_1 - = case happyOut40 happy_x_1 of { happy_var_1 -> - case happyOut9 happy_x_2 of { happy_var_2 -> - happyIn8 - (Import (lrPoint [point happy_var_1 - ,point happy_var_2]) happy_var_1 happy_var_2 - )}} - -happyReduce_9 = happySpecReduce_2 5# happyReduction_9 -happyReduction_9 happy_x_2 - happy_x_1 - = case happyOutTok happy_x_1 of { happy_var_1 -> - case happyOut40 happy_x_2 of { happy_var_2 -> - happyIn9 - (AsAS (lrPoint [point happy_var_1 - ,point happy_var_2]) happy_var_2 - )}} - -happyReduce_10 = happySpecReduce_0 5# happyReduction_10 -happyReduction_10 = happyIn9 - (EmptyAS noPoint - ) - -happyReduce_11 = happySpecReduce_0 6# happyReduction_11 -happyReduction_11 = happyIn10 - (Neither noPoint - ) - -happyReduce_12 = happySpecReduce_3 6# happyReduction_12 -happyReduction_12 happy_x_3 - happy_x_2 - happy_x_1 - = case happyOutTok happy_x_1 of { happy_var_1 -> - case happyOutTok happy_x_2 of { happy_var_2 -> - case happyOutTok happy_x_3 of { happy_var_3 -> - happyIn10 - (Decon (lrPoint [point happy_var_1 - ,point happy_var_2 - ,point happy_var_3]) - )}}} - -happyReduce_13 = happySpecReduce_3 6# happyReduction_13 -happyReduction_13 happy_x_3 - happy_x_2 - happy_x_1 - = case happyOutTok happy_x_1 of { happy_var_1 -> - case happyOutTok happy_x_2 of { happy_var_2 -> - case happyOutTok happy_x_3 of { happy_var_3 -> - happyIn10 - (Both (lrPoint [point happy_var_1 - ,point happy_var_2 - ,point happy_var_3]) - )}}} - -happyReduce_14 = happyReduce 5# 7# happyReduction_14 -happyReduction_14 (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 { happy_var_1 -> - case happyOut13 happy_x_2 of { happy_var_2 -> - case happyOut38 happy_x_3 of { happy_var_3 -> - case happyOutTok happy_x_4 of { happy_var_4 -> - case happyOut27 happy_x_5 of { happy_var_5 -> - happyIn11 - (ExternD (lrPoint [point happy_var_1 - ,point happy_var_2 - ,point happy_var_3 - ,point happy_var_4 - ,point happy_var_5]) happy_var_2 happy_var_3 happy_var_5 - ) `HappyStk` happyRest}}}}} - -happyReduce_15 = happyReduce 5# 7# happyReduction_15 -happyReduction_15 (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 { happy_var_1 -> - case happyOut39 happy_x_2 of { happy_var_2 -> - case happyOut61 happy_x_3 of { happy_var_3 -> - case happyOutTok happy_x_4 of { happy_var_4 -> - case happyOut32 happy_x_5 of { happy_var_5 -> - happyIn11 - (TypeD (lrPoint [point happy_var_1 - ,point happy_var_2 - ,lrPointList happy_var_3 - ,point happy_var_4 - ,point happy_var_5]) happy_var_2 happy_var_3 happy_var_5 - ) `HappyStk` happyRest}}}}} - -happyReduce_16 = happySpecReduce_3 7# happyReduction_16 -happyReduction_16 happy_x_3 - happy_x_2 - happy_x_1 - = case happyOutTok happy_x_1 of { happy_var_1 -> - case happyOut39 happy_x_2 of { happy_var_2 -> - case happyOut61 happy_x_3 of { happy_var_3 -> - happyIn11 - (TypeD0 (lrPoint [point happy_var_1 - ,point happy_var_2 - ,lrPointList happy_var_3]) happy_var_2 happy_var_3 - )}}} - -happyReduce_17 = happySpecReduce_3 7# happyReduction_17 -happyReduction_17 happy_x_3 - happy_x_2 - happy_x_1 - = case happyOut38 happy_x_1 of { happy_var_1 -> - case happyOutTok happy_x_2 of { happy_var_2 -> - case happyOut27 happy_x_3 of { happy_var_3 -> - happyIn11 - (AscribeD (lrPoint [point happy_var_1 - ,point happy_var_2 - ,point happy_var_3]) happy_var_1 happy_var_3 - )}}} - -happyReduce_18 = happySpecReduce_3 7# happyReduction_18 -happyReduction_18 happy_x_3 - happy_x_2 - happy_x_1 - = case happyOut38 happy_x_1 of { happy_var_1 -> - case happyOut12 happy_x_2 of { happy_var_2 -> - case happyOut14 happy_x_3 of { happy_var_3 -> - happyIn11 - (VarD (lrPoint [point happy_var_1 - ,point happy_var_2 - ,point happy_var_3]) happy_var_1 happy_var_2 happy_var_3 - )}}} - -happyReduce_19 = happyReduce 4# 7# happyReduction_19 -happyReduction_19 (happy_x_4 `HappyStk` - happy_x_3 `HappyStk` - happy_x_2 `HappyStk` - happy_x_1 `HappyStk` - happyRest) - = case happyOut38 happy_x_1 of { happy_var_1 -> - case happyOut59 happy_x_2 of { happy_var_2 -> - case happyOut12 happy_x_3 of { happy_var_3 -> - case happyOut14 happy_x_4 of { happy_var_4 -> - happyIn11 - (ProcD (lrPoint [point happy_var_1 - ,lrPointList happy_var_2 - ,point happy_var_3 - ,point happy_var_4]) happy_var_1 happy_var_2 happy_var_3 happy_var_4 - ) `HappyStk` happyRest}}}} - -happyReduce_20 = happySpecReduce_3 7# happyReduction_20 -happyReduction_20 happy_x_3 - happy_x_2 - happy_x_1 - = case happyOutTok happy_x_1 of { happy_var_1 -> - case happyOut39 happy_x_2 of { happy_var_2 -> - case happyOut27 happy_x_3 of { happy_var_3 -> - happyIn11 - (InstD (lrPoint [point happy_var_1 - ,point happy_var_2 - ,point happy_var_3]) happy_var_2 happy_var_3 - )}}} - -happyReduce_21 = happySpecReduce_1 8# happyReduction_21 -happyReduction_21 happy_x_1 - = case happyOutTok happy_x_1 of { happy_var_1 -> - happyIn12 - (Macro (point happy_var_1) - )} - -happyReduce_22 = happySpecReduce_1 8# happyReduction_22 -happyReduction_22 happy_x_1 - = case happyOutTok happy_x_1 of { happy_var_1 -> - happyIn12 - (Define (point happy_var_1) - )} - -happyReduce_23 = happySpecReduce_1 9# happyReduction_23 -happyReduction_23 happy_x_1 - = case happyOutTok happy_x_1 of { happy_var_1 -> - happyIn13 - (SomeNm (point happy_var_1) (unTString happy_var_1) - )} - -happyReduce_24 = happySpecReduce_0 9# happyReduction_24 -happyReduction_24 = happyIn13 - (NoneNm noPoint - ) - -happyReduce_25 = happyReduce 4# 10# happyReduction_25 -happyReduction_25 (happy_x_4 `HappyStk` - happy_x_3 `HappyStk` - happy_x_2 `HappyStk` - happy_x_1 `HappyStk` - happyRest) - = case happyOutTok happy_x_1 of { happy_var_1 -> - case happyOutTok happy_x_2 of { happy_var_2 -> - case happyOut53 happy_x_3 of { happy_var_3 -> - case happyOutTok happy_x_4 of { happy_var_4 -> - happyIn14 - (BlockE (lrPoint [point happy_var_1 - ,point happy_var_2 - ,lrPointList happy_var_3 - ,point happy_var_4]) happy_var_3 - ) `HappyStk` happyRest}}}} - -happyReduce_26 = happySpecReduce_1 10# happyReduction_26 -happyReduction_26 happy_x_1 - = case happyOut15 happy_x_1 of { happy_var_1 -> - happyIn14 - (happy_var_1 - )} - -happyReduce_27 = happySpecReduce_3 11# happyReduction_27 -happyReduction_27 happy_x_3 - happy_x_2 - happy_x_1 - = case happyOut16 happy_x_1 of { happy_var_1 -> - case happyOut12 happy_x_2 of { happy_var_2 -> - case happyOut14 happy_x_3 of { happy_var_3 -> - happyIn15 - (LetS (lrPoint [point happy_var_1 - ,point happy_var_2 - ,point happy_var_3]) happy_var_1 happy_var_2 happy_var_3 - )}}} - -happyReduce_28 = happyReduce 6# 11# happyReduction_28 -happyReduction_28 (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 { happy_var_1 -> - case happyOut16 happy_x_2 of { happy_var_2 -> - case happyOut12 happy_x_3 of { happy_var_3 -> - case happyOut14 happy_x_4 of { happy_var_4 -> - case happyOutTok happy_x_5 of { happy_var_5 -> - case happyOut14 happy_x_6 of { happy_var_6 -> - happyIn15 - (LetE (lrPoint [point happy_var_1 - ,point happy_var_2 - ,point happy_var_3 - ,point happy_var_4 - ,point happy_var_5 - ,point happy_var_6]) happy_var_2 happy_var_3 happy_var_4 happy_var_6 - ) `HappyStk` happyRest}}}}}} - -happyReduce_29 = happyReduce 4# 11# happyReduction_29 -happyReduction_29 (happy_x_4 `HappyStk` - happy_x_3 `HappyStk` - happy_x_2 `HappyStk` - happy_x_1 `HappyStk` - happyRest) - = case happyOutTok happy_x_1 of { happy_var_1 -> - case happyOut59 happy_x_2 of { happy_var_2 -> - case happyOutTok happy_x_3 of { happy_var_3 -> - case happyOut14 happy_x_4 of { happy_var_4 -> - happyIn15 - (LamE (lrPoint [point happy_var_1 - ,lrPointList happy_var_2 - ,point happy_var_3 - ,point happy_var_4]) happy_var_2 happy_var_4 - ) `HappyStk` happyRest}}}} - -happyReduce_30 = happySpecReduce_3 11# happyReduction_30 -happyReduction_30 happy_x_3 - happy_x_2 - happy_x_1 - = case happyOut16 happy_x_1 of { happy_var_1 -> - case happyOutTok happy_x_2 of { happy_var_2 -> - case happyOut14 happy_x_3 of { happy_var_3 -> - happyIn15 - (StoreE (lrPoint [point happy_var_1 - ,point happy_var_2 - ,point happy_var_3]) happy_var_1 happy_var_3 - )}}} - -happyReduce_31 = happyReduce 7# 11# happyReduction_31 -happyReduction_31 (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 happyOutTok happy_x_1 of { happy_var_1 -> - case happyOut14 happy_x_2 of { happy_var_2 -> - case happyOutTok happy_x_3 of { happy_var_3 -> - case happyOutTok happy_x_4 of { happy_var_4 -> - case happyOut45 happy_x_5 of { happy_var_5 -> - case happyOut24 happy_x_6 of { happy_var_6 -> - case happyOutTok happy_x_7 of { happy_var_7 -> - happyIn15 - (CaseE (lrPoint [point happy_var_1 - ,point happy_var_2 - ,point happy_var_3 - ,point happy_var_4 - ,lrPointList happy_var_5 - ,point happy_var_6 - ,point happy_var_7]) happy_var_2 happy_var_5 happy_var_6 - ) `HappyStk` happyRest}}}}}}} - -happyReduce_32 = happyReduce 7# 11# happyReduction_32 -happyReduction_32 (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 happyOutTok happy_x_1 of { happy_var_1 -> - case happyOut14 happy_x_2 of { happy_var_2 -> - case happyOutTok happy_x_3 of { happy_var_3 -> - case happyOutTok happy_x_4 of { happy_var_4 -> - case happyOut47 happy_x_5 of { happy_var_5 -> - case happyOut24 happy_x_6 of { happy_var_6 -> - case happyOutTok happy_x_7 of { happy_var_7 -> - happyIn15 - (SwitchE (lrPoint [point happy_var_1 - ,point happy_var_2 - ,point happy_var_3 - ,point happy_var_4 - ,lrPointList happy_var_5 - ,point happy_var_6 - ,point happy_var_7]) happy_var_2 happy_var_5 happy_var_6 - ) `HappyStk` happyRest}}}}}}} - -happyReduce_33 = happyReduce 7# 11# happyReduction_33 -happyReduction_33 (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 happyOutTok happy_x_1 of { happy_var_1 -> - case happyOutTok happy_x_2 of { happy_var_2 -> - case happyOut43 happy_x_3 of { happy_var_3 -> - case happyOutTok happy_x_4 of { happy_var_4 -> - case happyOut14 happy_x_5 of { happy_var_5 -> - case happyOutTok happy_x_6 of { happy_var_6 -> - case happyOutTok happy_x_7 of { happy_var_7 -> - happyIn15 - (BranchE (lrPoint [point happy_var_1 - ,point happy_var_2 - ,lrPointList happy_var_3 - ,point happy_var_4 - ,point happy_var_5 - ,point happy_var_6 - ,point happy_var_7]) happy_var_3 happy_var_5 - ) `HappyStk` happyRest}}}}}}} - -happyReduce_34 = happySpecReduce_1 11# happyReduction_34 -happyReduction_34 happy_x_1 - = case happyOut16 happy_x_1 of { happy_var_1 -> - happyIn15 - (happy_var_1 - )} - -happyReduce_35 = happySpecReduce_3 12# happyReduction_35 -happyReduction_35 happy_x_3 - happy_x_2 - happy_x_1 - = case happyOut17 happy_x_1 of { happy_var_1 -> - case happyOutTok happy_x_2 of { happy_var_2 -> - case happyOut17 happy_x_3 of { happy_var_3 -> - happyIn16 - (BinOpE (lrPoint [point happy_var_1 - ,point happy_var_2 - ,point happy_var_3]) happy_var_1 (unTUsym happy_var_2) happy_var_3 - )}}} - -happyReduce_36 = happySpecReduce_1 12# happyReduction_36 -happyReduction_36 happy_x_1 - = case happyOut17 happy_x_1 of { happy_var_1 -> - happyIn16 - (happy_var_1 - )} - -happyReduce_37 = happySpecReduce_2 13# happyReduction_37 -happyReduction_37 happy_x_2 - happy_x_1 - = case happyOut17 happy_x_1 of { happy_var_1 -> - case happyOut18 happy_x_2 of { happy_var_2 -> - happyIn17 - (AppE (lrPoint [point happy_var_1 - ,point happy_var_2]) happy_var_1 happy_var_2 - )}} - -happyReduce_38 = happySpecReduce_1 13# happyReduction_38 -happyReduction_38 happy_x_1 - = case happyOut18 happy_x_1 of { happy_var_1 -> - happyIn17 - (happy_var_1 - )} - -happyReduce_39 = happySpecReduce_2 14# happyReduction_39 -happyReduction_39 happy_x_2 - happy_x_1 - = case happyOut21 happy_x_1 of { happy_var_1 -> - case happyOut19 happy_x_2 of { happy_var_2 -> - happyIn18 - (UnOpE (lrPoint [point happy_var_1 - ,point happy_var_2]) happy_var_1 happy_var_2 - )}} - -happyReduce_40 = happySpecReduce_1 14# happyReduction_40 -happyReduction_40 happy_x_1 - = case happyOut19 happy_x_1 of { happy_var_1 -> - happyIn18 - (happy_var_1 - )} - -happyReduce_41 = happyReduce 4# 15# happyReduction_41 -happyReduction_41 (happy_x_4 `HappyStk` - happy_x_3 `HappyStk` - happy_x_2 `HappyStk` - happy_x_1 `HappyStk` - happyRest) - = case happyOut19 happy_x_1 of { happy_var_1 -> - case happyOutTok happy_x_2 of { happy_var_2 -> - case happyOut14 happy_x_3 of { happy_var_3 -> - case happyOutTok happy_x_4 of { happy_var_4 -> - happyIn19 - (IdxE (lrPoint [point happy_var_1 - ,point happy_var_2 - ,point happy_var_3 - ,point happy_var_4]) happy_var_1 happy_var_3 - ) `HappyStk` happyRest}}}} - -happyReduce_42 = happySpecReduce_3 15# happyReduction_42 -happyReduction_42 happy_x_3 - happy_x_2 - happy_x_1 - = case happyOut19 happy_x_1 of { happy_var_1 -> - case happyOutTok happy_x_2 of { happy_var_2 -> - case happyOut41 happy_x_3 of { happy_var_3 -> - happyIn19 - (FldE (lrPoint [point happy_var_1 - ,point happy_var_2 - ,point happy_var_3]) happy_var_1 happy_var_3 - )}}} - -happyReduce_43 = happySpecReduce_1 15# happyReduction_43 -happyReduction_43 happy_x_1 - = case happyOut20 happy_x_1 of { happy_var_1 -> - happyIn19 - (happy_var_1 - )} - -happyReduce_44 = happyReduce 4# 16# happyReduction_44 -happyReduction_44 (happy_x_4 `HappyStk` - happy_x_3 `HappyStk` - happy_x_2 `HappyStk` - happy_x_1 `HappyStk` - happyRest) - = case happyOutTok happy_x_1 of { happy_var_1 -> - case happyOutTok happy_x_2 of { happy_var_2 -> - case happyOut63 happy_x_3 of { happy_var_3 -> - case happyOutTok happy_x_4 of { happy_var_4 -> - happyIn20 - (ArrayE (lrPoint [point happy_var_1 - ,point happy_var_2 - ,lrPointList happy_var_3 - ,point happy_var_4]) happy_var_3 - ) `HappyStk` happyRest}}}} - -happyReduce_45 = happySpecReduce_3 16# happyReduction_45 -happyReduction_45 happy_x_3 - happy_x_2 - happy_x_1 - = case happyOutTok happy_x_1 of { happy_var_1 -> - case happyOut65 happy_x_2 of { happy_var_2 -> - case happyOutTok happy_x_3 of { happy_var_3 -> - happyIn20 - (RecordE (lrPoint [point happy_var_1 - ,lrPointList happy_var_2 - ,point happy_var_3]) happy_var_2 - )}}} - -happyReduce_46 = happySpecReduce_3 16# happyReduction_46 -happyReduction_46 happy_x_3 - happy_x_2 - happy_x_1 - = case happyOutTok happy_x_1 of { happy_var_1 -> - case happyOut63 happy_x_2 of { happy_var_2 -> - case happyOutTok happy_x_3 of { happy_var_3 -> - happyIn20 - (TupleE (lrPoint [point happy_var_1 - ,lrPointList happy_var_2 - ,point happy_var_3]) happy_var_2 - )}}} - -happyReduce_47 = happyReduce 5# 16# 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 happyOutTok happy_x_1 of { happy_var_1 -> - case happyOut14 happy_x_2 of { happy_var_2 -> - case happyOutTok happy_x_3 of { happy_var_3 -> - case happyOut27 happy_x_4 of { happy_var_4 -> - case happyOutTok happy_x_5 of { happy_var_5 -> - happyIn20 - (AscribeE (lrPoint [point happy_var_1 - ,point happy_var_2 - ,point happy_var_3 - ,point happy_var_4 - ,point happy_var_5]) happy_var_2 happy_var_4 - ) `HappyStk` happyRest}}}}} - -happyReduce_48 = happySpecReduce_1 16# happyReduction_48 -happyReduction_48 happy_x_1 - = case happyOut37 happy_x_1 of { happy_var_1 -> - happyIn20 - (CountE (point happy_var_1) happy_var_1 - )} - -happyReduce_49 = happySpecReduce_1 16# happyReduction_49 -happyReduction_49 happy_x_1 - = case happyOut38 happy_x_1 of { happy_var_1 -> - happyIn20 - (VarE (point happy_var_1) happy_var_1 - )} - -happyReduce_50 = happySpecReduce_1 16# happyReduction_50 -happyReduction_50 happy_x_1 - = case happyOut35 happy_x_1 of { happy_var_1 -> - happyIn20 - (LitE (point happy_var_1) happy_var_1 - )} - -happyReduce_51 = happySpecReduce_1 17# happyReduction_51 -happyReduction_51 happy_x_1 - = case happyOutTok happy_x_1 of { happy_var_1 -> - happyIn21 - (Load (point happy_var_1) - )} - -happyReduce_52 = happyReduce 4# 18# happyReduction_52 -happyReduction_52 (happy_x_4 `HappyStk` - happy_x_3 `HappyStk` - happy_x_2 `HappyStk` - happy_x_1 `HappyStk` - happyRest) - = case happyOut39 happy_x_1 of { happy_var_1 -> - case happyOut61 happy_x_2 of { happy_var_2 -> - case happyOutTok happy_x_3 of { happy_var_3 -> - case happyOut14 happy_x_4 of { happy_var_4 -> - happyIn22 - (CaseAlt (lrPoint [point happy_var_1 - ,lrPointList happy_var_2 - ,point happy_var_3 - ,point happy_var_4]) happy_var_1 happy_var_2 happy_var_4 - ) `HappyStk` happyRest}}}} - -happyReduce_53 = happySpecReduce_3 19# happyReduction_53 -happyReduction_53 happy_x_3 - happy_x_2 - happy_x_1 - = case happyOut35 happy_x_1 of { happy_var_1 -> - case happyOutTok happy_x_2 of { happy_var_2 -> - case happyOut14 happy_x_3 of { happy_var_3 -> - happyIn23 - (SwitchAlt (lrPoint [point happy_var_1 - ,point happy_var_2 - ,point happy_var_3]) happy_var_1 happy_var_3 - )}}} - -happyReduce_54 = happyReduce 4# 20# happyReduction_54 -happyReduction_54 (happy_x_4 `HappyStk` - happy_x_3 `HappyStk` - happy_x_2 `HappyStk` - happy_x_1 `HappyStk` - happyRest) - = case happyOut38 happy_x_1 of { happy_var_1 -> - case happyOutTok happy_x_2 of { happy_var_2 -> - case happyOut14 happy_x_3 of { happy_var_3 -> - case happyOutTok happy_x_4 of { happy_var_4 -> - happyIn24 - (DefaultAlt (lrPoint [point happy_var_1 - ,point happy_var_2 - ,point happy_var_3 - ,point happy_var_4]) happy_var_1 happy_var_3 - ) `HappyStk` happyRest}}}} - -happyReduce_55 = happySpecReduce_0 20# happyReduction_55 -happyReduction_55 = happyIn24 - (DefaultNone noPoint - ) - -happyReduce_56 = happySpecReduce_3 21# happyReduction_56 -happyReduction_56 happy_x_3 - happy_x_2 - happy_x_1 - = case happyOut16 happy_x_1 of { happy_var_1 -> - case happyOutTok happy_x_2 of { happy_var_2 -> - case happyOut14 happy_x_3 of { happy_var_3 -> - happyIn25 - (BranchAlt (lrPoint [point happy_var_1 - ,point happy_var_2 - ,point happy_var_3]) happy_var_1 happy_var_3 - )}}} - -happyReduce_57 = happySpecReduce_2 22# happyReduction_57 -happyReduction_57 happy_x_2 - happy_x_1 - = case happyOut39 happy_x_1 of { happy_var_1 -> - case happyOut61 happy_x_2 of { happy_var_2 -> - happyIn26 - (Cxt (lrPoint [point happy_var_1 - ,lrPointList happy_var_2]) happy_var_1 happy_var_2 - )}} - -happyReduce_58 = happyReduce 5# 23# happyReduction_58 -happyReduction_58 (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 { happy_var_1 -> - case happyOut75 happy_x_2 of { happy_var_2 -> - case happyOutTok happy_x_3 of { happy_var_3 -> - case happyOutTok happy_x_4 of { happy_var_4 -> - case happyOut28 happy_x_5 of { happy_var_5 -> - happyIn27 - (TyCxt (lrPoint [point happy_var_1 - ,lrPointList happy_var_2 - ,point happy_var_3 - ,point happy_var_4 - ,point happy_var_5]) happy_var_2 happy_var_5 - ) `HappyStk` happyRest}}}}} - -happyReduce_59 = happySpecReduce_1 23# happyReduction_59 -happyReduction_59 happy_x_1 - = case happyOut28 happy_x_1 of { happy_var_1 -> - happyIn27 - (happy_var_1 - )} - -happyReduce_60 = happySpecReduce_3 24# happyReduction_60 -happyReduction_60 happy_x_3 - happy_x_2 - happy_x_1 - = case happyOut29 happy_x_1 of { happy_var_1 -> - case happyOutTok happy_x_2 of { happy_var_2 -> - case happyOut28 happy_x_3 of { happy_var_3 -> - happyIn28 - (TyFun (lrPoint [point happy_var_1 - ,point happy_var_2 - ,point happy_var_3]) happy_var_1 happy_var_3 - )}}} - -happyReduce_61 = happySpecReduce_1 24# happyReduction_61 -happyReduction_61 happy_x_1 - = case happyOut29 happy_x_1 of { happy_var_1 -> - happyIn28 - (happy_var_1 - )} - -happyReduce_62 = happySpecReduce_3 25# happyReduction_62 -happyReduction_62 happy_x_3 - happy_x_2 - happy_x_1 - = case happyOutTok happy_x_1 of { happy_var_1 -> - case happyOut30 happy_x_2 of { happy_var_2 -> - case happyOut30 happy_x_3 of { happy_var_3 -> - happyIn29 - (TyArray (lrPoint [point happy_var_1 - ,point happy_var_2 - ,point happy_var_3]) happy_var_2 happy_var_3 - )}}} - -happyReduce_63 = happySpecReduce_2 25# happyReduction_63 -happyReduction_63 happy_x_2 - happy_x_1 - = case happyOut39 happy_x_1 of { happy_var_1 -> - case happyOut71 happy_x_2 of { happy_var_2 -> - happyIn29 - (TyConstr (lrPoint [point happy_var_1 - ,lrPointList happy_var_2]) happy_var_1 happy_var_2 - )}} - -happyReduce_64 = happySpecReduce_1 25# happyReduction_64 -happyReduction_64 happy_x_1 - = case happyOut30 happy_x_1 of { happy_var_1 -> - happyIn29 - (happy_var_1 - )} - -happyReduce_65 = happySpecReduce_1 26# happyReduction_65 -happyReduction_65 happy_x_1 - = case happyOut31 happy_x_1 of { happy_var_1 -> - happyIn30 - (happy_var_1 - )} - -happyReduce_66 = happySpecReduce_3 27# happyReduction_66 -happyReduction_66 happy_x_3 - happy_x_2 - happy_x_1 - = case happyOutTok happy_x_1 of { happy_var_1 -> - case happyOut73 happy_x_2 of { happy_var_2 -> - case happyOutTok happy_x_3 of { happy_var_3 -> - happyIn31 - (TyTuple (lrPoint [point happy_var_1 - ,lrPointList happy_var_2 - ,point happy_var_3]) happy_var_2 - )}}} - -happyReduce_67 = happySpecReduce_1 27# happyReduction_67 -happyReduction_67 happy_x_1 - = case happyOut37 happy_x_1 of { happy_var_1 -> - happyIn31 - (TyCount (point happy_var_1) happy_var_1 - )} - -happyReduce_68 = happySpecReduce_1 27# happyReduction_68 -happyReduction_68 happy_x_1 - = case happyOut42 happy_x_1 of { happy_var_1 -> - happyIn31 - (TyVarT (point happy_var_1) happy_var_1 - )} - -happyReduce_69 = happySpecReduce_1 27# happyReduction_69 -happyReduction_69 happy_x_1 - = case happyOut39 happy_x_1 of { happy_var_1 -> - happyIn31 - (TyConstr0 (point happy_var_1) happy_var_1 - )} - -happyReduce_70 = happySpecReduce_3 28# happyReduction_70 -happyReduction_70 happy_x_3 - happy_x_2 - happy_x_1 - = case happyOutTok happy_x_1 of { happy_var_1 -> - case happyOut67 happy_x_2 of { happy_var_2 -> - case happyOutTok happy_x_3 of { happy_var_3 -> - happyIn32 - (TyRecord (lrPoint [point happy_var_1 - ,lrPointList happy_var_2 - ,point happy_var_3]) happy_var_2 - )}}} - -happyReduce_71 = happySpecReduce_2 28# happyReduction_71 -happyReduction_71 happy_x_2 - happy_x_1 - = case happyOutTok happy_x_1 of { happy_var_1 -> - case happyOut57 happy_x_2 of { happy_var_2 -> - happyIn32 - (TyTagged (lrPoint [point happy_var_1 - ,lrPointList happy_var_2]) happy_var_2 - )}} - -happyReduce_72 = happySpecReduce_1 28# happyReduction_72 -happyReduction_72 happy_x_1 - = case happyOut27 happy_x_1 of { happy_var_1 -> - happyIn32 - (TySyn (point happy_var_1) happy_var_1 - )} - -happyReduce_73 = happySpecReduce_2 29# happyReduction_73 -happyReduction_73 happy_x_2 - happy_x_1 - = case happyOut39 happy_x_1 of { happy_var_1 -> - case happyOut69 happy_x_2 of { happy_var_2 -> - happyIn33 - (ConC (lrPoint [point happy_var_1 - ,lrPointList happy_var_2]) happy_var_1 happy_var_2 - )}} - -happyReduce_74 = happySpecReduce_3 30# happyReduction_74 -happyReduction_74 happy_x_3 - happy_x_2 - happy_x_1 - = case happyOut41 happy_x_1 of { happy_var_1 -> - case happyOutTok happy_x_2 of { happy_var_2 -> - case happyOut27 happy_x_3 of { happy_var_3 -> - happyIn34 - (FieldT (lrPoint [point happy_var_1 - ,point happy_var_2 - ,point happy_var_3]) happy_var_1 happy_var_3 - )}}} - -happyReduce_75 = happySpecReduce_1 31# happyReduction_75 -happyReduction_75 happy_x_1 - = case happyOutTok happy_x_1 of { happy_var_1 -> - happyIn35 - (CharL (point happy_var_1) (unTChar happy_var_1) - )} - -happyReduce_76 = happySpecReduce_1 31# happyReduction_76 -happyReduction_76 happy_x_1 - = case happyOutTok happy_x_1 of { happy_var_1 -> - happyIn35 - (StringL (point happy_var_1) (unTString happy_var_1) - )} - -happyReduce_77 = happySpecReduce_1 31# happyReduction_77 -happyReduction_77 happy_x_1 - = case happyOutTok happy_x_1 of { happy_var_1 -> - happyIn35 - (NmbrL (point happy_var_1) (unTNumber happy_var_1) - )} - -happyReduce_78 = happySpecReduce_1 31# happyReduction_78 -happyReduction_78 happy_x_1 - = case happyOut39 happy_x_1 of { happy_var_1 -> - happyIn35 - (EnumL (point happy_var_1) happy_var_1 - )} - -happyReduce_79 = happySpecReduce_3 32# happyReduction_79 -happyReduction_79 happy_x_3 - happy_x_2 - happy_x_1 - = case happyOut41 happy_x_1 of { happy_var_1 -> - case happyOutTok happy_x_2 of { happy_var_2 -> - case happyOut14 happy_x_3 of { happy_var_3 -> - happyIn36 - (FieldD (lrPoint [point happy_var_1 - ,point happy_var_2 - ,point happy_var_3]) happy_var_1 happy_var_3 - )}}} - -happyReduce_80 = happySpecReduce_2 33# happyReduction_80 -happyReduction_80 happy_x_2 - happy_x_1 - = case happyOutTok happy_x_1 of { happy_var_1 -> - case happyOutTok happy_x_2 of { happy_var_2 -> - happyIn37 - (Count (lrPoint [point happy_var_1 - ,point happy_var_2]) (unTNumber happy_var_2) - )}} - -happyReduce_81 = happySpecReduce_1 34# happyReduction_81 -happyReduction_81 happy_x_1 - = case happyOutTok happy_x_1 of { happy_var_1 -> - happyIn38 - (Var (point happy_var_1) (unTLident happy_var_1) - )} - -happyReduce_82 = happySpecReduce_1 35# happyReduction_82 -happyReduction_82 happy_x_1 - = case happyOutTok happy_x_1 of { happy_var_1 -> - happyIn39 - (Con (point happy_var_1) (unTUident happy_var_1) - )} - -happyReduce_83 = happySpecReduce_1 36# happyReduction_83 -happyReduction_83 happy_x_1 - = case happyOutTok happy_x_1 of { happy_var_1 -> - happyIn40 - (Modid (point happy_var_1) (unTUident happy_var_1) - )} - -happyReduce_84 = happySpecReduce_1 37# happyReduction_84 -happyReduction_84 happy_x_1 - = case happyOutTok happy_x_1 of { happy_var_1 -> - happyIn41 - (Field (point happy_var_1) (unTLident happy_var_1) - )} - -happyReduce_85 = happySpecReduce_1 38# happyReduction_85 -happyReduction_85 happy_x_1 - = case happyOutTok happy_x_1 of { happy_var_1 -> - happyIn42 - (VarTV (point happy_var_1) (unTLident happy_var_1) - )} - -happyReduce_86 = happySpecReduce_2 38# happyReduction_86 -happyReduction_86 happy_x_2 - happy_x_1 - = case happyOutTok happy_x_1 of { happy_var_1 -> - case happyOutTok happy_x_2 of { happy_var_2 -> - happyIn42 - (CntTV (lrPoint [point happy_var_1 - ,point happy_var_2]) (unTLident happy_var_2) - )}} - -happyReduce_87 = happySpecReduce_1 39# happyReduction_87 -happyReduction_87 happy_x_1 - = case happyOut44 happy_x_1 of { happy_var_1 -> - happyIn43 - (reverse happy_var_1 - )} - -happyReduce_88 = happySpecReduce_0 39# happyReduction_88 -happyReduction_88 = happyIn43 - ([] - ) - -happyReduce_89 = happySpecReduce_2 40# happyReduction_89 -happyReduction_89 happy_x_2 - happy_x_1 - = case happyOut25 happy_x_1 of { happy_var_1 -> - happyIn44 - ([happy_var_1] - )} - -happyReduce_90 = happySpecReduce_3 40# happyReduction_90 -happyReduction_90 happy_x_3 - happy_x_2 - happy_x_1 - = case happyOut44 happy_x_1 of { happy_var_1 -> - case happyOut25 happy_x_2 of { happy_var_2 -> - happyIn44 - (happy_var_2 : happy_var_1 - )}} - -happyReduce_91 = happySpecReduce_1 41# happyReduction_91 -happyReduction_91 happy_x_1 - = case happyOut46 happy_x_1 of { happy_var_1 -> - happyIn45 - (reverse happy_var_1 - )} - -happyReduce_92 = happySpecReduce_0 41# happyReduction_92 -happyReduction_92 = happyIn45 - ([] - ) - -happyReduce_93 = happySpecReduce_2 42# happyReduction_93 -happyReduction_93 happy_x_2 - happy_x_1 - = case happyOut22 happy_x_1 of { happy_var_1 -> - happyIn46 - ([happy_var_1] - )} - -happyReduce_94 = happySpecReduce_3 42# happyReduction_94 -happyReduction_94 happy_x_3 - happy_x_2 - happy_x_1 - = case happyOut46 happy_x_1 of { happy_var_1 -> - case happyOut22 happy_x_2 of { happy_var_2 -> - happyIn46 - (happy_var_2 : happy_var_1 - )}} - -happyReduce_95 = happySpecReduce_1 43# happyReduction_95 -happyReduction_95 happy_x_1 - = case happyOut48 happy_x_1 of { happy_var_1 -> - happyIn47 - (reverse happy_var_1 - )} - -happyReduce_96 = happySpecReduce_0 43# happyReduction_96 -happyReduction_96 = happyIn47 - ([] - ) - -happyReduce_97 = happySpecReduce_2 44# happyReduction_97 -happyReduction_97 happy_x_2 - happy_x_1 - = case happyOut23 happy_x_1 of { happy_var_1 -> - happyIn48 - ([happy_var_1] - )} - -happyReduce_98 = happySpecReduce_3 44# happyReduction_98 -happyReduction_98 happy_x_3 - happy_x_2 - happy_x_1 - = case happyOut48 happy_x_1 of { happy_var_1 -> - case happyOut23 happy_x_2 of { happy_var_2 -> - happyIn48 - (happy_var_2 : happy_var_1 - )}} - -happyReduce_99 = happySpecReduce_1 45# happyReduction_99 -happyReduction_99 happy_x_1 - = case happyOut50 happy_x_1 of { happy_var_1 -> - happyIn49 - (reverse happy_var_1 - )} - -happyReduce_100 = happySpecReduce_0 45# happyReduction_100 -happyReduction_100 = happyIn49 - ([] - ) - -happyReduce_101 = happySpecReduce_2 46# happyReduction_101 -happyReduction_101 happy_x_2 - happy_x_1 - = case happyOut11 happy_x_1 of { happy_var_1 -> - happyIn50 - ([happy_var_1] - )} - -happyReduce_102 = happySpecReduce_3 46# happyReduction_102 -happyReduction_102 happy_x_3 - happy_x_2 - happy_x_1 - = case happyOut50 happy_x_1 of { happy_var_1 -> - case happyOut11 happy_x_2 of { happy_var_2 -> - happyIn50 - (happy_var_2 : happy_var_1 - )}} - -happyReduce_103 = happySpecReduce_1 47# happyReduction_103 -happyReduction_103 happy_x_1 - = case happyOut52 happy_x_1 of { happy_var_1 -> - happyIn51 - (reverse happy_var_1 - )} - -happyReduce_104 = happySpecReduce_2 48# happyReduction_104 -happyReduction_104 happy_x_2 - happy_x_1 - = case happyOut8 happy_x_1 of { happy_var_1 -> - happyIn52 - ([happy_var_1] - )} - -happyReduce_105 = happySpecReduce_3 48# happyReduction_105 -happyReduction_105 happy_x_3 - happy_x_2 - happy_x_1 - = case happyOut52 happy_x_1 of { happy_var_1 -> - case happyOut8 happy_x_2 of { happy_var_2 -> - happyIn52 - (happy_var_2 : happy_var_1 - )}} - -happyReduce_106 = happySpecReduce_1 49# happyReduction_106 -happyReduction_106 happy_x_1 - = case happyOut54 happy_x_1 of { happy_var_1 -> - happyIn53 - (reverse happy_var_1 - )} - -happyReduce_107 = happySpecReduce_2 50# happyReduction_107 -happyReduction_107 happy_x_2 - happy_x_1 - = case happyOut15 happy_x_1 of { happy_var_1 -> - happyIn54 - ([happy_var_1] - )} - -happyReduce_108 = happySpecReduce_3 50# happyReduction_108 -happyReduction_108 happy_x_3 - happy_x_2 - happy_x_1 - = case happyOut54 happy_x_1 of { happy_var_1 -> - case happyOut15 happy_x_2 of { happy_var_2 -> - happyIn54 - (happy_var_2 : happy_var_1 - )}} - -happyReduce_109 = happySpecReduce_1 51# happyReduction_109 -happyReduction_109 happy_x_1 - = case happyOut56 happy_x_1 of { happy_var_1 -> - happyIn55 - (reverse happy_var_1 - )} - -happyReduce_110 = happySpecReduce_2 52# happyReduction_110 -happyReduction_110 happy_x_2 - happy_x_1 - = case happyOut7 happy_x_1 of { happy_var_1 -> - happyIn56 - ([happy_var_1] - )} - -happyReduce_111 = happySpecReduce_3 52# happyReduction_111 -happyReduction_111 happy_x_3 - happy_x_2 - happy_x_1 - = case happyOut56 happy_x_1 of { happy_var_1 -> - case happyOut7 happy_x_2 of { happy_var_2 -> - happyIn56 - (happy_var_2 : happy_var_1 - )}} - -happyReduce_112 = happySpecReduce_1 53# happyReduction_112 -happyReduction_112 happy_x_1 - = case happyOut58 happy_x_1 of { happy_var_1 -> - happyIn57 - (reverse happy_var_1 - )} - -happyReduce_113 = happySpecReduce_1 54# happyReduction_113 -happyReduction_113 happy_x_1 - = case happyOut33 happy_x_1 of { happy_var_1 -> - happyIn58 - ([happy_var_1] - )} - -happyReduce_114 = happySpecReduce_3 54# happyReduction_114 -happyReduction_114 happy_x_3 - happy_x_2 - happy_x_1 - = case happyOut58 happy_x_1 of { happy_var_1 -> - case happyOut33 happy_x_3 of { happy_var_3 -> - happyIn58 - (happy_var_3 : happy_var_1 - )}} - -happyReduce_115 = happySpecReduce_1 55# happyReduction_115 -happyReduction_115 happy_x_1 - = case happyOut60 happy_x_1 of { happy_var_1 -> - happyIn59 - (reverse happy_var_1 - )} - -happyReduce_116 = happySpecReduce_1 56# happyReduction_116 -happyReduction_116 happy_x_1 - = case happyOut20 happy_x_1 of { happy_var_1 -> - happyIn60 - ([happy_var_1] - )} - -happyReduce_117 = happySpecReduce_2 56# happyReduction_117 -happyReduction_117 happy_x_2 - happy_x_1 - = case happyOut60 happy_x_1 of { happy_var_1 -> - case happyOut20 happy_x_2 of { happy_var_2 -> - happyIn60 - (happy_var_2 : happy_var_1 - )}} - -happyReduce_118 = happySpecReduce_1 57# happyReduction_118 -happyReduction_118 happy_x_1 - = case happyOut62 happy_x_1 of { happy_var_1 -> - happyIn61 - (reverse happy_var_1 - )} - -happyReduce_119 = happySpecReduce_0 57# happyReduction_119 -happyReduction_119 = happyIn61 - ([] - ) - -happyReduce_120 = happySpecReduce_1 58# happyReduction_120 -happyReduction_120 happy_x_1 - = case happyOut38 happy_x_1 of { happy_var_1 -> - happyIn62 - ([happy_var_1] - )} - -happyReduce_121 = happySpecReduce_2 58# happyReduction_121 -happyReduction_121 happy_x_2 - happy_x_1 - = case happyOut62 happy_x_1 of { happy_var_1 -> - case happyOut38 happy_x_2 of { happy_var_2 -> - happyIn62 - (happy_var_2 : happy_var_1 - )}} - -happyReduce_122 = happySpecReduce_1 59# happyReduction_122 -happyReduction_122 happy_x_1 - = case happyOut64 happy_x_1 of { happy_var_1 -> - happyIn63 - (reverse happy_var_1 - )} - -happyReduce_123 = happySpecReduce_0 59# happyReduction_123 -happyReduction_123 = happyIn63 - ([] - ) - -happyReduce_124 = happySpecReduce_1 60# happyReduction_124 -happyReduction_124 happy_x_1 - = case happyOut14 happy_x_1 of { happy_var_1 -> - happyIn64 - ([happy_var_1] - )} - -happyReduce_125 = happySpecReduce_3 60# happyReduction_125 -happyReduction_125 happy_x_3 - happy_x_2 - happy_x_1 - = case happyOut64 happy_x_1 of { happy_var_1 -> - case happyOut14 happy_x_3 of { happy_var_3 -> - happyIn64 - (happy_var_3 : happy_var_1 - )}} - -happyReduce_126 = happySpecReduce_1 61# happyReduction_126 -happyReduction_126 happy_x_1 - = case happyOut66 happy_x_1 of { happy_var_1 -> - happyIn65 - (reverse happy_var_1 - )} - -happyReduce_127 = happySpecReduce_1 62# happyReduction_127 -happyReduction_127 happy_x_1 - = case happyOut36 happy_x_1 of { happy_var_1 -> - happyIn66 - ([happy_var_1] - )} - -happyReduce_128 = happySpecReduce_3 62# happyReduction_128 -happyReduction_128 happy_x_3 - happy_x_2 - happy_x_1 - = case happyOut66 happy_x_1 of { happy_var_1 -> - case happyOut36 happy_x_3 of { happy_var_3 -> - happyIn66 - (happy_var_3 : happy_var_1 - )}} - -happyReduce_129 = happySpecReduce_1 63# happyReduction_129 -happyReduction_129 happy_x_1 - = case happyOut68 happy_x_1 of { happy_var_1 -> - happyIn67 - (reverse happy_var_1 - )} - -happyReduce_130 = happySpecReduce_1 64# happyReduction_130 -happyReduction_130 happy_x_1 - = case happyOut34 happy_x_1 of { happy_var_1 -> - happyIn68 - ([happy_var_1] - )} - -happyReduce_131 = happySpecReduce_3 64# happyReduction_131 -happyReduction_131 happy_x_3 - happy_x_2 - happy_x_1 - = case happyOut68 happy_x_1 of { happy_var_1 -> - case happyOut34 happy_x_3 of { happy_var_3 -> - happyIn68 - (happy_var_3 : happy_var_1 - )}} - -happyReduce_132 = happySpecReduce_1 65# happyReduction_132 -happyReduction_132 happy_x_1 - = case happyOut70 happy_x_1 of { happy_var_1 -> - happyIn69 - (reverse happy_var_1 - )} - -happyReduce_133 = happySpecReduce_0 65# happyReduction_133 -happyReduction_133 = happyIn69 - ([] - ) - -happyReduce_134 = happySpecReduce_1 66# happyReduction_134 -happyReduction_134 happy_x_1 - = case happyOut31 happy_x_1 of { happy_var_1 -> - happyIn70 - ([happy_var_1] - )} - -happyReduce_135 = happySpecReduce_2 66# happyReduction_135 -happyReduction_135 happy_x_2 - happy_x_1 - = case happyOut70 happy_x_1 of { happy_var_1 -> - case happyOut31 happy_x_2 of { happy_var_2 -> - happyIn70 - (happy_var_2 : happy_var_1 - )}} - -happyReduce_136 = happySpecReduce_1 67# happyReduction_136 -happyReduction_136 happy_x_1 - = case happyOut72 happy_x_1 of { happy_var_1 -> - happyIn71 - (reverse happy_var_1 - )} - -happyReduce_137 = happySpecReduce_1 68# happyReduction_137 -happyReduction_137 happy_x_1 - = case happyOut30 happy_x_1 of { happy_var_1 -> - happyIn72 - ([happy_var_1] - )} - -happyReduce_138 = happySpecReduce_2 68# happyReduction_138 -happyReduction_138 happy_x_2 - happy_x_1 - = case happyOut72 happy_x_1 of { happy_var_1 -> - case happyOut30 happy_x_2 of { happy_var_2 -> - happyIn72 - (happy_var_2 : happy_var_1 - )}} - -happyReduce_139 = happySpecReduce_1 69# happyReduction_139 -happyReduction_139 happy_x_1 - = case happyOut74 happy_x_1 of { happy_var_1 -> - happyIn73 - (reverse happy_var_1 - )} - -happyReduce_140 = happySpecReduce_0 69# happyReduction_140 -happyReduction_140 = happyIn73 - ([] - ) - -happyReduce_141 = happySpecReduce_1 70# happyReduction_141 -happyReduction_141 happy_x_1 - = case happyOut28 happy_x_1 of { happy_var_1 -> - happyIn74 - ([happy_var_1] - )} - -happyReduce_142 = happySpecReduce_3 70# happyReduction_142 -happyReduction_142 happy_x_3 - happy_x_2 - happy_x_1 - = case happyOut74 happy_x_1 of { happy_var_1 -> - case happyOut28 happy_x_3 of { happy_var_3 -> - happyIn74 - (happy_var_3 : happy_var_1 - )}} - -happyReduce_143 = happySpecReduce_1 71# happyReduction_143 -happyReduction_143 happy_x_1 - = case happyOut76 happy_x_1 of { happy_var_1 -> - happyIn75 - (reverse happy_var_1 - )} - -happyReduce_144 = happySpecReduce_1 72# happyReduction_144 -happyReduction_144 happy_x_1 - = case happyOut26 happy_x_1 of { happy_var_1 -> - happyIn76 - ([happy_var_1] - )} - -happyReduce_145 = happySpecReduce_3 72# happyReduction_145 -happyReduction_145 happy_x_3 - happy_x_2 - happy_x_1 - = case happyOut76 happy_x_1 of { happy_var_1 -> - case happyOut26 happy_x_3 of { happy_var_3 -> - happyIn76 - (happy_var_3 : happy_var_1 - )}} - -happyNewToken action sts stk [] = - happyDoAction 42# notHappyAtAll action sts stk [] - -happyNewToken action sts stk (tk:tks) = - let cont i = happyDoAction i tk action sts stk tks in - case tk of { - TSymbol _ "#" -> cont 1#; - TSymbol _ "(" -> cont 2#; - TSymbol _ ")" -> cont 3#; - TSymbol _ "," -> cont 4#; - TSymbol _ "->" -> cont 5#; - TSymbol _ "." -> cont 6#; - TSymbol _ ".." -> cont 7#; - TSymbol _ "::" -> cont 8#; - TSymbol _ ";" -> cont 9#; - TSymbol _ "<-" -> cont 10#; - TSymbol _ "=" -> cont 11#; - TSymbol _ "=>" -> cont 12#; - TSymbol _ "@" -> cont 13#; - TSymbol _ "Array" -> cont 14#; - TSymbol _ "[" -> cont 15#; - TSymbol _ "\\" -> cont 16#; - TSymbol _ "]" -> cont 17#; - TSymbol _ "as" -> cont 18#; - TSymbol _ "branch" -> cont 19#; - TSymbol _ "case" -> cont 20#; - TSymbol _ "do" -> cont 21#; - TSymbol _ "exports" -> cont 22#; - TSymbol _ "extern" -> cont 23#; - TSymbol _ "imports" -> cont 24#; - TSymbol _ "in" -> cont 25#; - TSymbol _ "instance" -> cont 26#; - TSymbol _ "let" -> cont 27#; - TSymbol _ "module" -> cont 28#; - TSymbol _ "of" -> cont 29#; - TSymbol _ "switch" -> cont 30#; - TSymbol _ "type" -> cont 31#; - TSymbol _ "where" -> cont 32#; - TSymbol _ "{" -> cont 33#; - TSymbol _ "|" -> cont 34#; - TSymbol _ "}" -> cont 35#; - TUident _ _ -> cont 36#; - TUsym _ _ -> cont 37#; - TLident _ _ -> cont 38#; - TString _ _ -> cont 39#; - TChar _ _ -> cont 40#; - TNumber _ _ -> cont 41#; - _ -> happyError' (tk:tks) - } - -happyError_ tk tks = happyError' (tk:tks) - -newtype HappyIdentity a = HappyIdentity a -happyIdentity = HappyIdentity -happyRunIdentity (HappyIdentity a) = a - -instance Monad HappyIdentity where - return = HappyIdentity - (HappyIdentity p) >>= q = q p - -happyThen :: () => HappyIdentity a -> (a -> HappyIdentity b) -> HappyIdentity b -happyThen = (>>=) -happyReturn :: () => a -> HappyIdentity a -happyReturn = (return) -happyThen1 m k tks = (>>=) m (\a -> k a tks) -happyReturn1 :: () => a -> b -> HappyIdentity a -happyReturn1 = \a tks -> (return) a -happyError' :: () => [((Token Point))] -> HappyIdentity a -happyError' = HappyIdentity . happyError - -grmParse tks = happyRunIdentity happySomeParser where - happySomeParser = happyThen (happyParse 0# tks) (\x -> happyReturn (happyOut4 x)) - -happySeq = happyDontSeq - - - -{-# LINE 1 "templates\GenericTemplate.hs" #-} -{-# LINE 1 "templates\\GenericTemplate.hs" #-} -{-# LINE 1 "<built-in>" #-} -{-# LINE 1 "<command-line>" #-} -{-# LINE 1 "templates\\GenericTemplate.hs" #-} --- Id: GenericTemplate.hs,v 1.26 2005/01/14 14:47:22 simonmar Exp - -{-# LINE 30 "templates\\GenericTemplate.hs" #-} - - -data Happy_IntList = HappyCons Happy_GHC_Exts.Int# Happy_IntList - - - - - -{-# LINE 51 "templates\\GenericTemplate.hs" #-} - -{-# LINE 61 "templates\\GenericTemplate.hs" #-} - -{-# LINE 70 "templates\\GenericTemplate.hs" #-} - -infixr 9 `HappyStk` -data HappyStk a = HappyStk a (HappyStk a) - ------------------------------------------------------------------------------ --- starting the parse - -happyParse start_state = happyNewToken start_state notHappyAtAll notHappyAtAll - ------------------------------------------------------------------------------ --- Accepting the parse - --- If the current token is 0#, it means we've just accepted a partial --- parse (a %partial parser). We must ignore the saved token on the top of --- the stack in this case. -happyAccept 0# tk st sts (_ `HappyStk` ans `HappyStk` _) = - happyReturn1 ans -happyAccept j tk st sts (HappyStk ans _) = - (happyTcHack j (happyTcHack st)) (happyReturn1 ans) - ------------------------------------------------------------------------------ --- Arrays only: do the next action - - - -happyDoAction i tk st - = {- nothing -} - - - case action of - 0# -> {- nothing -} - happyFail i tk st - -1# -> {- nothing -} - happyAccept i tk st - n | (n Happy_GHC_Exts.<# (0# :: Happy_GHC_Exts.Int#)) -> {- nothing -} - - (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 -> {- nothing -} - - - 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 (off_i Happy_GHC_Exts.>=# (0# :: Happy_GHC_Exts.Int#)) - then (indexShortOffAddr happyCheck off_i Happy_GHC_Exts.==# i) - else False - (action) - | check = indexShortOffAddr happyTable off_i - | otherwise = indexShortOffAddr happyDefActions st - -{-# LINE 130 "templates\\GenericTemplate.hs" #-} - - -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# - - - - ------------------------------------------------------------------------------ --- HappyState data type (not arrays) - -{-# LINE 163 "templates\\GenericTemplate.hs" #-} - ------------------------------------------------------------------------------ --- Shifting a token - -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 --- trace "shifting the error token" $ - 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) - --- happyReduce is specialised for the common cases. - -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 -- it doesn't hurt to always seq here... - 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 = - happyThen1 (fn stk tk) (\r -> happyGoto nt j tk st1 sts1 (r `HappyStk` drop_stk)) - where (sts1@((HappyCons (st1@(action)) (_)))) = happyDrop k (HappyCons (st) (sts)) - drop_stk = happyDropStk k stk - -happyMonad2Reduce k nt fn 0# tk st sts stk - = happyFail 0# tk st sts stk -happyMonad2Reduce k nt fn j tk st sts stk = - happyThen1 (fn stk tk) (\r -> happyNewToken new_state sts1 (r `HappyStk` drop_stk)) - where (sts1@((HappyCons (st1@(action)) (_)))) = happyDrop k (HappyCons (st) (sts)) - drop_stk = happyDropStk k stk - - (off) = indexShortOffAddr happyGotoOffsets st1 - (off_i) = (off Happy_GHC_Exts.+# nt) - (new_state) = indexShortOffAddr happyTable off_i - - - - -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 - ------------------------------------------------------------------------------ --- Moving to a new state after a reduction - - -happyGoto nt j tk st = - {- nothing -} - happyDoAction j tk new_state - where (off) = indexShortOffAddr happyGotoOffsets st - (off_i) = (off Happy_GHC_Exts.+# nt) - (new_state) = indexShortOffAddr happyTable off_i - - - - ------------------------------------------------------------------------------ --- Error recovery (0# is the error token) - --- parse error if we are in recovery and we fail again -happyFail 0# tk old_st _ stk = --- trace "failing" $ - happyError_ tk - -{- We don't need state discarding for our restricted implementation of - "error". In fact, it can cause some bogus parses, so I've disabled it - for now --SDM - --- discard a state -happyFail 0# tk old_st (HappyCons ((action)) (sts)) - (saved_tok `HappyStk` _ `HappyStk` stk) = --- trace ("discarding state, depth " ++ show (length stk)) $ - happyDoAction 0# tk action sts ((saved_tok`HappyStk`stk)) --} - --- Enter error recovery: generate an error token, --- save the old token and carry on. -happyFail i tk (action) sts stk = --- trace "entering error recovery" $ - happyDoAction 0# tk action sts ( (Happy_GHC_Exts.unsafeCoerce# (Happy_GHC_Exts.I# (i))) `HappyStk` stk) - --- Internal happy errors: - -notHappyAtAll :: a -notHappyAtAll = error "Internal Happy error\n" - ------------------------------------------------------------------------------ --- Hack to get the typechecker to accept our action functions - - -happyTcHack :: Happy_GHC_Exts.Int# -> a -> a -happyTcHack x y = y -{-# INLINE happyTcHack #-} - - ------------------------------------------------------------------------------ --- Seq-ing. If the --strict flag is given, then Happy emits --- happySeq = happyDoSeq --- otherwise it emits --- happySeq = happyDontSeq - -happyDoSeq, happyDontSeq :: a -> b -> b -happyDoSeq a b = a `seq` b -happyDontSeq a b = b - ------------------------------------------------------------------------------ --- Don't inline any functions from the template. GHC has a nasty habit --- of deciding to inline happyGoto everywhere, which increases the size of --- the generated parser quite a bit. - - -{-# NOINLINE happyDoAction #-} -{-# NOINLINE happyTable #-} -{-# NOINLINE happyCheck #-} -{-# NOINLINE happyActOffsets #-} -{-# NOINLINE happyGotoOffsets #-} -{-# NOINLINE happyDefActions #-} - -{-# NOINLINE happyShift #-} -{-# NOINLINE happySpecReduce_0 #-} -{-# NOINLINE happySpecReduce_1 #-} -{-# NOINLINE happySpecReduce_2 #-} -{-# NOINLINE happySpecReduce_3 #-} -{-# NOINLINE happyReduce #-} -{-# NOINLINE happyMonadReduce #-} -{-# NOINLINE happyGoto #-} -{-# NOINLINE happyFail #-} - --- end of Happy Template.
pec.cabal view
@@ -1,6 +1,6 @@ Name: pec -Version: 0.2.2+Version: 0.2.3 Synopsis: pec embedded compiler @@ -20,7 +20,7 @@ Build-type: Simple -data-files: Makefile, FAQ, DESIGN, lib/Data/Array.pec, lib/Data/Stack.pec, lib/Data/Deque.pec, lib/Data/Queue.pec, lib/Data/StrBuf.pec, lib/Prelude.pec, test_cases/TestStack.pec, test_cases/TestLoad.pec, test_cases/TestPrims.pec, test_cases/TestTuple.pec, test_cases/TestStrBuf.pec, test_cases/TestVariant.pec, test_cases/TestArray.pec, pec.cabal, THANKS, README, TODO, CHANGES, Pec.grm, Pir.grm, Pds.grm, C.grm, LLVM.grm, MkPec.hs+data-files: Makefile, FAQ, DESIGN, lib/Data/Array.pec, lib/Data/Stack.pec, lib/Data/Deque.pec, lib/Data/Queue.pec, lib/Data/StrBuf.pec, lib/Prelude.pec, test_cases/TestStack.pec, test_cases/TestLoad.pec, test_cases/TestPrims.pec, test_cases/TestTuple.pec, test_cases/TestStrBuf.pec, test_cases/TestVariant.pec, test_cases/TestArray.pec, pec.cabal, THANKS, README, TODO, CHANGES, Pec.grm, Pir.grm, Pds.grm, C.grm, LLVM.grm, MkPec.hs, test_cases/euler/Euler1.pec, test_cases/euler/Euler10.pec, test_cases/euler/Euler11.pec, test_cases/euler/Euler12.pec, test_cases/euler/Euler13.pec, test_cases/euler/Euler14.pec, test_cases/euler/Euler145.pec, test_cases/euler/Euler2.pec, test_cases/euler/Euler3.pec, test_cases/euler/Euler4.pec, test_cases/euler/Euler5.pec, test_cases/euler/Euler6.pec, test_cases/euler/Euler7.pec, test_cases/euler/Euler8.pec, test_cases/euler/Euler9.pec, test_cases/TestArray.pec, test_cases/TestDeque.pec, test_cases/TestEmptyAlts.pec, test_cases/TestFun.pec, test_cases/TestLoad.pec, test_cases/TestPrims.pec, test_cases/TestQueue.pec, test_cases/TestStack.pec, test_cases/TestStrBuf.pec, test_cases/TestTuple.pec, test_cases/TestVariant.pec Cabal-version: >= 1.8 @@ -31,19 +31,19 @@ Library Exposed-modules: Language.Pec.Par, Language.Pir.Abs, Language.C.Abs, Language.LLVM.Abs, Language.Pds.Abs, Pec.Base, Pec.C, Pec.LLVM, Pec.Desugar, Language.Pec.Abs, Pec.PUtil, Pec.HUtil, Pec.IUtil Other-modules: Paths_pec- Build-depends: base < 5, mtl, grm, Cabal, uniplate, derive, wl-pprint, syb, deepseq, array, containers, shake, cmdargs+ Build-depends: base < 5, mtl, grm, Cabal, uniplate, derive, wl-pprint, syb, deepseq, array, containers, shake >= 0.2.9, cmdargs Executable pecgen Main-is: PecGen.hs- Build-depends: pec, base < 5, derive, wl-pprint, filepath, cmdargs, grm, Cabal, syb, deepseq, uniplate, mtl, directory, shake+ Build-depends: pec, base < 5, derive, wl-pprint, filepath, cmdargs, grm, Cabal, syb, deepseq, uniplate, mtl, directory, shake >= 0.2.9 Hs-Source-Dirs: src Executable pec Main-is: Pec.hs- Build-depends: pec, base < 5, old-time, process, filepath, directory, cmdargs, grm, Cabal, wl-pprint, syb, deepseq, uniplate, mtl, shake+ Build-depends: pec, base < 5, old-time, process, filepath, directory, cmdargs, grm, Cabal, wl-pprint, syb, deepseq, uniplate, mtl, shake >= 0.2.9 Hs-Source-Dirs: src Executable pecgencnt Main-is: PecGenCnt.hs- Build-depends: pec, base < 5, derive, cmdargs, grm, Cabal, wl-pprint, syb, deepseq, uniplate, mtl, filepath, shake+ Build-depends: pec, base < 5, derive, cmdargs, grm, Cabal, wl-pprint, syb, deepseq, uniplate, mtl, filepath, shake >= 0.2.9 Hs-Source-Dirs: src
+ test_cases/TestDeque.pec view
@@ -0,0 +1,91 @@+module TestDeque++imports+ Prelude+ Data.Deque++where++main :: () -> I32+main () = do+ putLn "test Deque"+ test push_front pop_front+ test push_back pop_back+ test push_front pop_back+ test push_back pop_front+ putLn "done"+ 0++test push pop => do+ p = new (deque #3) // deques must be given a size+ mc = new (pop p)+ case mc of+ Nothing -> assert True+ Just _ -> assert False+ assert (push 'a' p)+ case new (pop p) of+ Nothing -> assert False+ Just c -> do+ putCh @c+ assert (@c == 'a')+ assert (is_empty p)+ put putCh p+ assert (push 'a' p)+ put putCh p+ assert (push 'b' p)+ put putCh p+ assert (push 'c' p)+ put putCh p+ assert (is_full p)+ assert (not (push 'd' p))+ mc <- pop p+ case mc of+ Nothing -> assert False+ Just c -> do+ putCh @c+ mc <- pop p+ put putCh p+ mc <- pop p+ put putCh p+ assert (is_empty p)+ assert (push 'x' p)+ assert (push 'y' p)+ mc <- pop p+ put putCh p++ assert (push 'z' p)+ put putCh p++ assert (push '1' p)+ put putCh p++ case mc of+ Nothing -> assert False+ Just c -> putCh @c++ mc <- pop p+ case mc of+ Nothing -> assert False+ Just c -> putCh @c++ put putCh p++ case new (find_idx (eq 'x') p) of+ Nothing -> putS "no x"+ Just ix -> do+ putS "x at index:"+ putW (from_idx @ix)++ if (any (eq 'x') p) (putS "has x") (putS "no x")++ assert (push 'x' p)+ put putCh p++ filter (eq 'x') p+ put putCh p++ assert (push 'x' p)+ filter (eq 'x') p+ put putCh p++ putLn ""
+ test_cases/TestEmptyAlts.pec view
@@ -0,0 +1,16 @@+module TestEmptyAlts++imports+ Prelude++where++main :: () -> I32+main () = do+ switch 'c' of // should work+ _ -> assert True++ // case 'c' of // should fail+ // _ -> assert True++ 0
+ test_cases/TestFun.pec view
@@ -0,0 +1,45 @@+module TestFun++imports+ Prelude++where++main :: () -> I32+main () = do+ putLn "testFun"+ assert (oneArg 4 'c')+ f = is_lower+ assert (f 'c')+ g = alsoOne 3+ assert (g 4 'c')+ h = new is_lower+ assert (@h 'c')+ assert (argFunPtr h)+ h <- is_upper+ assert (not (@h 'c'))+ assert (not (argFunPtr h))+ assert (argFun is_lower)+ assert (not (argFun is_upper))+ assert ((retFun True) 'c')+ assert (not ((retFun False) 'c'))+ putLn "done"+ 0++twoArgs :: W32 -> Char -> Bool+twoArgs a b = True++oneArg :: W32 -> (Char -> Bool)+oneArg a = is_lower++alsoOne :: I32 -> (W32 -> Char -> Bool)+alsoOne a = twoArgs++argFun :: (Char -> Bool) -> Bool+argFun f = f 'c'++argFunPtr :: Ptr (Char -> Bool) -> Bool+argFunPtr p = @p 'c'++retFun :: Bool -> (Char -> Bool)+retFun a = if a is_lower is_upper
+ test_cases/TestQueue.pec view
@@ -0,0 +1,60 @@+module TestQueue++// polymorphic queue implementation++imports+ Prelude+ Data.Queue++where++main :: () -> I32+main () = do+ putLn "test Queue"+ p = new (queue #3) // queues must be given a size+ mc = new (pop p)+ case mc of+ Nothing -> assert True+ Just _ -> assert False+ assert (push 'a' p)+ case new (pop p) of+ Nothing -> assert False+ Just c -> do+ putCh @c+ assert (@c == 'a')+ assert (is_empty p)+ put putCh p+ assert (push 'a' p)+ put putCh p+ assert (push 'b' p)+ put putCh p+ assert (push 'c' p)+ put putCh p+ assert (is_full p)+ assert (not (push 'd' p))+ mc <- pop p+ put putCh p+ case mc of+ Nothing -> assert False+ Just c -> do+ putCh @c+ assert (@c == 'a')+ mc <- pop p+ put putCh p+ mc <- pop p+ put putCh p+ assert (is_empty p)+ assert (push 'x' p)+ assert (push 'y' p)+ mc <- pop p+ case mc of+ Nothing -> assert False+ Just c -> assert (@c == 'x')++ mc <- pop p+ case mc of+ Nothing -> assert False+ Just c -> assert (@c == 'y')++ putLn "done"+ 0
+ test_cases/euler/Euler1.pec view
@@ -0,0 +1,17 @@+module Euler1++imports+ Prelude++where++main :: () -> I32+main () = do+ t = new (0 :: W32)+ times 1000+ (\i -> when (is_factor i 3 || is_factor i 5) (t += i))+ assert (@t == 233168)+ putW @t+ 0++is_factor a b => (a % b) == 0
+ test_cases/euler/Euler10.pec view
@@ -0,0 +1,38 @@+module Euler10++// The sum of the primes below 10 is 2 + 3 + 5 + 7 = 17.+// Find the sum of all the primes below two million.++imports+ Prelude+ Data.Stack++where++main :: () -> I32+main () = do+ p = new (stack #200000)+ assert (primes 2000000 p)+// put putW p+ t = sum p+// BAL: printing of W64 is broken putW t+ assert (t == 142913828922)+ 0++sum :: Ptr (Stack #cnt W32) -> W64+sum => fold my_add 0++my_add :: W64 -> W32 -> W64+my_add x y => x + unsafe_cast y // BAL: casting from W32 to W64 isn't unsafe++primes :: W32 -> Ptr (Stack #cnt W32) -> Bool+primes w p => do+ empty p+ b = new (push 2 p)+ for 3 (\i -> @b && (i < w)) (add 2)+ (\i -> when (not (any (is_factor i) p)) (b <- push i p))+ @b++is_factor :: { Arith a, Eq a } => a -> a -> Bool+is_factor x y => (x % y) == 0+
+ test_cases/euler/Euler11.pec view
@@ -0,0 +1,67 @@+module Euler11++imports+ Prelude+ Data.Array++where++main :: () -> I32+main () = do+ a = new garr+ m = new 0+ times 20+ (\i -> do+ times 20+ (\j -> do+ m <- max @m (mul_it_horiz a i j)+ m <- max @m (mul_it_vert a i j)+ m <- max @m (mul_it_diag a i j)+ m <- max @m (mul_it_giad a i j)+ )+ )+ assert (@m == 70600674)+ putW @m+ 0++mul_it_horiz :: Ptr (Array #23 (Array #23 W32)) -> W32 -> W32 -> W32+mul_it_horiz a x y => ((ix a x y) * (ix a (x + 1) y)) * ((ix a (x + 2) y) * (ix a (x + 3) y))++mul_it_vert :: Ptr (Array #23 (Array #23 W32)) -> W32 -> W32 -> W32+mul_it_vert a x y => ((ix a x y) * (ix a x (y + 1))) * ((ix a x (y + 2)) * (ix a x (y + 3)))++mul_it_diag :: Ptr (Array #23 (Array #23 W32)) -> W32 -> W32 -> W32+mul_it_diag a x y => ((ix a x y) * (ix a (x + 1) (y + 1))) * ((ix a (x + 2) (y + 2)) * (ix a (x + 3) (y + 3)))++mul_it_giad :: Ptr (Array #23 (Array #23 W32)) -> W32 -> W32 -> W32+mul_it_giad a x y => ((ix a (x + 3) y) * (ix a (x + 2) (y + 1))) * ((ix a (x + 1) (y + 2)) * (ix a x (y + 3)))++ix :: Ptr (Array #23 (Array #23 W32)) -> W32 -> W32 -> W32+ix p i j => @p[unsafe_to_idx i][unsafe_to_idx j]++garr :: Array #23 (Array #23 W32)+garr => Array+ [ Array [ 08, 02, 22, 97, 38, 15, 00, 40, 00, 75, 04, 05, 07, 78, 52, 12, 50, 77, 91, 08, 0, 0, 0 ]+ , Array [ 49, 49, 99, 40, 17, 81, 18, 57, 60, 87, 17, 40, 98, 43, 69, 48, 04, 56, 62, 00, 0, 0, 0 ]+ , Array [ 81, 49, 31, 73, 55, 79, 14, 29, 93, 71, 40, 67, 53, 88, 30, 03, 49, 13, 36, 65, 0, 0, 0 ]+ , Array [ 52, 70, 95, 23, 04, 60, 11, 42, 69, 24, 68, 56, 01, 32, 56, 71, 37, 02, 36, 91, 0, 0, 0 ]+ , Array [ 22, 31, 16, 71, 51, 67, 63, 89, 41, 92, 36, 54, 22, 40, 40, 28, 66, 33, 13, 80, 0, 0, 0 ]+ , Array [ 24, 47, 32, 60, 99, 03, 45, 02, 44, 75, 33, 53, 78, 36, 84, 20, 35, 17, 12, 50, 0, 0, 0 ]+ , Array [ 32, 98, 81, 28, 64, 23, 67, 10, 26, 38, 40, 67, 59, 54, 70, 66, 18, 38, 64, 70, 0, 0, 0 ]+ , Array [ 67, 26, 20, 68, 02, 62, 12, 20, 95, 63, 94, 39, 63, 08, 40, 91, 66, 49, 94, 21, 0, 0, 0 ]+ , Array [ 24, 55, 58, 05, 66, 73, 99, 26, 97, 17, 78, 78, 96, 83, 14, 88, 34, 89, 63, 72, 0, 0, 0 ]+ , Array [ 21, 36, 23, 09, 75, 00, 76, 44, 20, 45, 35, 14, 00, 61, 33, 97, 34, 31, 33, 95, 0, 0, 0 ]+ , Array [ 78, 17, 53, 28, 22, 75, 31, 67, 15, 94, 03, 80, 04, 62, 16, 14, 09, 53, 56, 92, 0, 0, 0 ]+ , Array [ 16, 39, 05, 42, 96, 35, 31, 47, 55, 58, 88, 24, 00, 17, 54, 24, 36, 29, 85, 57, 0, 0, 0 ]+ , Array [ 86, 56, 00, 48, 35, 71, 89, 07, 05, 44, 44, 37, 44, 60, 21, 58, 51, 54, 17, 58, 0, 0, 0 ]+ , Array [ 19, 80, 81, 68, 05, 94, 47, 69, 28, 73, 92, 13, 86, 52, 17, 77, 04, 89, 55, 40, 0, 0, 0 ]+ , Array [ 04, 52, 08, 83, 97, 35, 99, 16, 07, 97, 57, 32, 16, 26, 26, 79, 33, 27, 98, 66, 0, 0, 0 ]+ , Array [ 88, 36, 68, 87, 57, 62, 20, 72, 03, 46, 33, 67, 46, 55, 12, 32, 63, 93, 53, 69, 0, 0, 0 ]+ , Array [ 04, 42, 16, 73, 38, 25, 39, 11, 24, 94, 72, 18, 08, 46, 29, 32, 40, 62, 76, 36, 0, 0, 0 ]+ , Array [ 20, 69, 36, 41, 72, 30, 23, 88, 34, 62, 99, 69, 82, 67, 59, 85, 74, 04, 36, 16, 0, 0, 0 ]+ , Array [ 20, 73, 35, 29, 78, 31, 90, 01, 74, 31, 49, 71, 48, 86, 81, 16, 23, 57, 05, 54, 0, 0, 0 ]+ , Array [ 01, 70, 54, 71, 83, 51, 54, 69, 16, 92, 33, 48, 61, 43, 52, 01, 89, 19, 67, 48, 0, 0, 0 ]+ , Array [ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 ]+ , Array [ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 ]+ , Array [ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 ]+ ]
+ test_cases/euler/Euler12.pec view
@@ -0,0 +1,78 @@+module Euler12++imports+ Prelude+ Data.Stack++where++main :: () -> I32+main () = do+ t = new (28 :: W32)+ for 8 (\_ -> my_factor @t <= 500) succ+ (\i -> t += i)+ assert (@t == 76576500)+ putW @t+ 0++my_factor :: W32 -> W32 // BAL: w must be non-zero+my_factor w => do+ j = sqrtw w+ t = new 0+ for 1 (\i -> i < j) succ+ (\i -> when ((w % i) == 0) (t += 2))+ when ((w % j) == 0)+ (do+ inc t+ k = w / j+ when (k != j) (inc t)+ )+ @t++// main :: () -> I32+// main () = do+// p = new (stack #500)+// assert (factor 25 p)+// put putW p+// assert (factor 100 p)+// put putW p+// // assert (factor 2 p)+// // put putW p+// // assert (factor 3 p)+// // put putW p+// // assert (factor 4 p)+// // put putW p+// // assert (factor 100 p)+// // put putW p+// // assert (factor 110 p)+// // put putW p+// i = new (1 :: W32)+// t = new (1 :: W32)+// while (factor @t p)+// (do+// inc i+// t += @i+// )+// putW @t+// putS "\n"+// 0++// factor :: W32 -> Ptr (Stack #cnt W32) -> Bool // BAL: w must be non-zero+// factor w p => do+// i = new 1+// j = sqrtw w+// b = new True+// empty p+// while ((@i < j) && @b)+// (do+// when ((w % @i) == 0)+// (b <- (push @i p) && (push (w / @i) p))+// inc i+// )+// when ((w % j) == 0)+// (do+// b <- push j p+// k = w / j+// when (k != j) (b <- push k p)+// )+// @b
+ test_cases/euler/Euler13.pec view
@@ -0,0 +1,225 @@+module Euler13++imports+ Prelude+ Data.Array++where++main :: () -> I32+main () = do+ // a = new garr+ // putW (fold foo 0 a)+ 0++// foo :: W32 -> W32 -> W32+// foo x y = (x + y) % 1000000000++// maxBound :: Word64+// 18446744073709551615++// garr :: Array #100 W32+// garr => Array+// [+// ]+// 3710728753390210279879799822083759024651013 5740250+// 46376937677490009712648124896970078050417018260538+// 74324986199524741059474233309513058123726617309629+// 91942213363574161572522430563301811072406154908250+// 23067588207539346171171980310421047513778063246676+// 89261670696623633820136378418383684178734361726757+// 28112879812849979408065481931592621691275889832738+// 44274228917432520321923589422876796487670272189318+// 47451445736001306439091167216856844588711603153276+// 70386486105843025439939619828917593665686757934951+// 62176457141856560629502157223196586755079324193331+// 64906352462741904929101432445813822663347944758178+// 92575867718337217661963751590579239728245598838407+// 58203565325359399008402633568948830189458628227828+// 80181199384826282014278194139940567587151170094390+// 35398664372827112653829987240784473053190104293586+// 86515506006295864861532075273371959191420517255829+// 71693888707715466499115593487603532921714970056938+// 54370070576826684624621495650076471787294438377604+// 53282654108756828443191190634694037855217779295145+// 36123272525000296071075082563815656710885258350721+// 45876576172410976447339110607218265236877223636045+// 17423706905851860660448207621209813287860733969412+// 81142660418086830619328460811191061556940512689692+// 51934325451728388641918047049293215058642563049483+// 62467221648435076201727918039944693004732956340691+// 15732444386908125794514089057706229429197107928209+// 55037687525678773091862540744969844508330393682126+// 18336384825330154686196124348767681297534375946515+// 80386287592878490201521685554828717201219257766954+// 78182833757993103614740356856449095527097864797581+// 16726320100436897842553539920931837441497806860984+// 48403098129077791799088218795327364475675590848030+// 87086987551392711854517078544161852424320693150332+// 59959406895756536782107074926966537676326235447210+// 69793950679652694742597709739166693763042633987085+// 41052684708299085211399427365734116182760315001271+// 65378607361501080857009149939512557028198746004375+// 35829035317434717326932123578154982629742552737307+// 94953759765105305946966067683156574377167401875275+// 88902802571733229619176668713819931811048770190271+// 25267680276078003013678680992525463401061632866526+// 36270218540497705585629946580636237993140746255962+// 24074486908231174977792365466257246923322810917141+// 91430288197103288597806669760892938638285025333403+// 34413065578016127815921815005561868836468420090470+// 23053081172816430487623791969842487255036638784583+// 11487696932154902810424020138335124462181441773470+// 63783299490636259666498587618221225225512486764533+// 67720186971698544312419572409913959008952310058822+// 95548255300263520781532296796249481641953868218774+// 76085327132285723110424803456124867697064507995236+// 37774242535411291684276865538926205024910326572967+// 23701913275725675285653248258265463092207058596522+// 29798860272258331913126375147341994889534765745501+// 18495701454879288984856827726077713721403798879715+// 38298203783031473527721580348144513491373226651381+// 34829543829199918180278916522431027392251122869539+// 40957953066405232632538044100059654939159879593635+// 29746152185502371307642255121183693803580388584903+// 41698116222072977186158236678424689157993532961922+// 62467957194401269043877107275048102390895523597457+// 23189706772547915061505504953922979530901129967519+// 86188088225875314529584099251203829009407770775672+// 11306739708304724483816533873502340845647058077308+// 82959174767140363198008187129011875491310547126581+// 97623331044818386269515456334926366572897563400500+// 42846280183517070527831839425882145521227251250327+// 55121603546981200581762165212827652751691296897789+// 32238195734329339946437501907836945765883352399886+// 75506164965184775180738168837861091527357929701337+// 62177842752192623401942399639168044983993173312731+// 32924185707147349566916674687634660915035914677504+// 99518671430235219628894890102423325116913619626622+// 73267460800591547471830798392868535206946944540724+// 76841822524674417161514036427982273348055556214818+// 97142617910342598647204516893989422179826088076852+// 87783646182799346313767754307809363333018982642090+// 10848802521674670883215120185883543223812876952786+// 71329612474782464538636993009049310363619763878039+// 62184073572399794223406235393808339651327408011116+// 66627891981488087797941876876144230030984490851411+// 60661826293682836764744779239180335110989069790714+// 85786944089552990653640447425576083659976645795096+// 66024396409905389607120198219976047599490197230297+// 64913982680032973156037120041377903785566085089252+// 16730939319872750275468906903707539413042652315011+// 94809377245048795150954100921645863754710598436791+// 78639167021187492431995700641917969777599028300699+// 15368713711936614952811305876380278410754449733078+// 40789923115535562561142322423255033685442488917353+// 44889911501440648020369068063960672322193204149535+// 41503128880339536053299340368006977710650566631954+// 81234880673210146739058568557934581403627822703280+// 82616570773948327592232845941706525094512325230608+// 22918802058777319719839450180888072429661980811197+// 77158542502016545090413245809786882778948721859617+// 72107838435069186155435662884062257473692284509516+// 20849603980134001723930671666823555245252804609722+// 53503534226472524250874054075591789781264330331690+// ]+// 37107287533902102798797998220837590246510135740250+// 46376937677490009712648124896970078050417018260538+// 74324986199524741059474233309513058123726617309629+// 91942213363574161572522430563301811072406154908250+// 23067588207539346171171980310421047513778063246676+// 89261670696623633820136378418383684178734361726757+// 28112879812849979408065481931592621691275889832738+// 44274228917432520321923589422876796487670272189318+// 47451445736001306439091167216856844588711603153276+// 70386486105843025439939619828917593665686757934951+// 62176457141856560629502157223196586755079324193331+// 64906352462741904929101432445813822663347944758178+// 92575867718337217661963751590579239728245598838407+// 58203565325359399008402633568948830189458628227828+// 80181199384826282014278194139940567587151170094390+// 35398664372827112653829987240784473053190104293586+// 86515506006295864861532075273371959191420517255829+// 71693888707715466499115593487603532921714970056938+// 54370070576826684624621495650076471787294438377604+// 53282654108756828443191190634694037855217779295145+// 36123272525000296071075082563815656710885258350721+// 45876576172410976447339110607218265236877223636045+// 17423706905851860660448207621209813287860733969412+// 81142660418086830619328460811191061556940512689692+// 51934325451728388641918047049293215058642563049483+// 62467221648435076201727918039944693004732956340691+// 15732444386908125794514089057706229429197107928209+// 55037687525678773091862540744969844508330393682126+// 18336384825330154686196124348767681297534375946515+// 80386287592878490201521685554828717201219257766954+// 78182833757993103614740356856449095527097864797581+// 16726320100436897842553539920931837441497806860984+// 48403098129077791799088218795327364475675590848030+// 87086987551392711854517078544161852424320693150332+// 59959406895756536782107074926966537676326235447210+// 69793950679652694742597709739166693763042633987085+// 41052684708299085211399427365734116182760315001271+// 65378607361501080857009149939512557028198746004375+// 35829035317434717326932123578154982629742552737307+// 94953759765105305946966067683156574377167401875275+// 88902802571733229619176668713819931811048770190271+// 25267680276078003013678680992525463401061632866526+// 36270218540497705585629946580636237993140746255962+// 24074486908231174977792365466257246923322810917141+// 91430288197103288597806669760892938638285025333403+// 34413065578016127815921815005561868836468420090470+// 23053081172816430487623791969842487255036638784583+// 11487696932154902810424020138335124462181441773470+// 63783299490636259666498587618221225225512486764533+// 67720186971698544312419572409913959008952310058822+// 95548255300263520781532296796249481641953868218774+// 76085327132285723110424803456124867697064507995236+// 37774242535411291684276865538926205024910326572967+// 23701913275725675285653248258265463092207058596522+// 29798860272258331913126375147341994889534765745501+// 18495701454879288984856827726077713721403798879715+// 38298203783031473527721580348144513491373226651381+// 34829543829199918180278916522431027392251122869539+// 40957953066405232632538044100059654939159879593635+// 29746152185502371307642255121183693803580388584903+// 41698116222072977186158236678424689157993532961922+// 62467957194401269043877107275048102390895523597457+// 23189706772547915061505504953922979530901129967519+// 86188088225875314529584099251203829009407770775672+// 11306739708304724483816533873502340845647058077308+// 82959174767140363198008187129011875491310547126581+// 97623331044818386269515456334926366572897563400500+// 42846280183517070527831839425882145521227251250327+// 55121603546981200581762165212827652751691296897789+// 32238195734329339946437501907836945765883352399886+// 75506164965184775180738168837861091527357929701337+// 62177842752192623401942399639168044983993173312731+// 32924185707147349566916674687634660915035914677504+// 99518671430235219628894890102423325116913619626622+// 73267460800591547471830798392868535206946944540724+// 76841822524674417161514036427982273348055556214818+// 97142617910342598647204516893989422179826088076852+// 87783646182799346313767754307809363333018982642090+// 10848802521674670883215120185883543223812876952786+// 71329612474782464538636993009049310363619763878039+// 62184073572399794223406235393808339651327408011116+// 66627891981488087797941876876144230030984490851411+// 60661826293682836764744779239180335110989069790714+// 85786944089552990653640447425576083659976645795096+// 66024396409905389607120198219976047599490197230297+// 64913982680032973156037120041377903785566085089252+// 16730939319872750275468906903707539413042652315011+// 94809377245048795150954100921645863754710598436791+// 78639167021187492431995700641917969777599028300699+// 15368713711936614952811305876380278410754449733078+// 40789923115535562561142322423255033685442488917353+// 44889911501440648020369068063960672322193204149535+// 41503128880339536053299340368006977710650566631954+// 81234880673210146739058568557934581403627822703280+// 82616570773948327592232845941706525094512325230608+// 22918802058777319719839450180888072429661980811197+// 77158542502016545090413245809786882778948721859617+// 72107838435069186155435662884062257473692284509516+// 20849603980134001723930671666823555245252804609722+// 53503534226472524250874054075591789781264330331690
+ test_cases/euler/Euler14.pec view
@@ -0,0 +1,35 @@+module Euler14++imports+ Prelude++where++main :: () -> I32+main () = do+ i = new (1 :: W32)+ m = new (1 :: W32)+ n = new (1 :: W32)+ times 1000000+ (\i -> do+ l = collatz_len i+ when (l > @m)+ (do+ m <- l+ n <- i+ )+ )+ putW @n+ assert (@n == 837799)+ 0++collatz_len n => do+ t = new (1 :: W32)+ for n (\i -> i > 1) collatz (\_ -> inc t)+ @t++collatz n => branch+ is_odd n -> (3 * n) + 1+ | n / 2++is_odd n => (n & 0x1) == 0x1
+ test_cases/euler/Euler145.pec view
@@ -0,0 +1,30 @@+module Euler145++imports+ Prelude++where++main :: () -> I32+main () = do+ t = new (0 :: W32)+ times (1000000000 :: W32)+ (\i -> when (is_rev i) (inc t))+ assert (@t == 608720)+ putW @t+ 0++is_rev x => branch+ (x % 10) == 0 -> False+ | do+ i = new (x + rev x)+ while ((@i > 0) && (is_odd @i)) (i /= 10)+ @i == 0++is_odd x => (x % 2) == 1++rev x => do+ j = new 0+ for x (\i -> i > 0) (\i -> i / 10)+ (\i -> j <- (@j * 10) + (i % 10))+ @j
+ test_cases/euler/Euler2.pec view
@@ -0,0 +1,24 @@+module Euler2++imports+ Prelude++where++main :: () -> I32+main () = do+ i = new (1 :: W32)+ t = new 0+ tot = new 0+ for 2 (\j -> j <= 4000000) (\j -> j + @t)+ (\j -> do+ when (is_even j) (tot += j)+ t <- @i+ i <- j+ )+ assert (@tot == 4613732)+ putW @tot+ 0++is_even :: W32 -> Bool+is_even x => (x % 2) == 0
+ test_cases/euler/Euler3.pec view
@@ -0,0 +1,34 @@+module Euler3++imports+ Prelude+ Data.Stack++where++// The prime factors of 13195 are 5, 7, 13 and 29.+// What is the largest prime factor of the number 600851475143 ?++main :: () -> I32+main () = do+ p = new (stack #20000)+ assert (primes_and_fact 600851475143 p)+ case new (pop p) of+ Nothing -> assert False+ Just x -> do+ assert (@x == 6857)+ putW @x+ 0++primes_and_fact :: W64 -> Ptr (Stack #cnt W64) -> Bool+primes_and_fact w p => do+ h = sqrtw w+ empty p+ b = new (if (is_factor w 2) (push 2 p) True)+ for 3 (\i -> @b && (i <= h)) (add 2)+ (\i -> when ((is_factor w i) && (not (any (is_factor i) p)))+ (b <- push i p))+ @b++is_factor :: { Arith a, Eq a } => a -> a -> Bool+is_factor x y => (x % y) == 0
+ test_cases/euler/Euler4.pec view
@@ -0,0 +1,35 @@+module Euler4++imports+ Prelude++where++// A palindromic number reads the same both ways. The largest palindrome made from the product of two 2-digit numbers is 9009 = 91 × 99.+// Find the largest palindrome made from the product of two 3-digit numbers.++main :: () -> I32+main () = do+ m = new (0 :: W32)+ times 1000+ (\i -> do+ times 1000+ (\j -> do+ x = i * j+ when (is_palindrome x)+ (do+ m <- max @m x+ )+ )+ )+ assert (@m == 906609)+ putW @m+ 0++is_palindrome x => rev_digits x == x++rev_digits n => do+ y = new 0+ for n (\x -> x > 0) (\x -> x / 10)+ (\x -> y <- (@y * 10) + (x % 10))+ @y
+ test_cases/euler/Euler5.pec view
@@ -0,0 +1,28 @@+module Euler5++// 2520 is the smallest number that can be divided by each of the numbers from 1 to 10 without any remainder.+// What is the smallest positive number that is evenly divisible by all of the numbers from 1 to 20?++imports+ Prelude+ Data.Stack++where++main :: () -> I32+main () = do+ i = new 1+ while (not (all_20 @i)) (inc i)+ putW @i+ assert (@i == 232792560)+ 0++is_factor :: { Arith a, Eq a } => a -> a -> Bool+is_factor x y => (x % y) == 0++all_20 :: W32 -> Bool+all_20 x = do+ b = new True+ for 1 (\i -> (i <= 20) && @b) succ+ (\i -> b <- is_factor x i)+ @b
+ test_cases/euler/Euler6.pec view
@@ -0,0 +1,20 @@+module Euler6++imports+ Prelude++where++main :: () -> I32+main () = do+ x = new (0 :: W32)+ y = new 0+ times 101+ (\i -> do+ x += i+ y += (i * i)+ )+ t = (@x * @x) - @y+ assert (t == 25164150)+ putW t+ 0
+ test_cases/euler/Euler7.pec view
@@ -0,0 +1,28 @@+module Euler7++imports+ Prelude+ Data.Stack++where++main :: () -> I32+main () = do+ p = new (stack #10001)+ primes p+ case new (pop p) of+ Nothing -> assert False+ Just i -> do+ assert (@i == 104743)+ putW @i+ 0++primes :: Ptr (Stack #cnt W32) -> ()+primes p => do+ empty p+ b = new (push 2 p)+ for 3 (\_ -> not (is_full p)) (add 2)+ (\i -> when (not (any (is_factor i) p)) (b <- push i p))++is_factor :: { Arith a, Eq a } => a -> a -> Bool+is_factor x y => (x % y) == 0
+ test_cases/euler/Euler8.pec view
@@ -0,0 +1,54 @@+module Euler8++imports+ Prelude+ Data.Queue+ Data.Queue as Q+ Data.Array as A++where++main :: () -> I32+main () = do+ q = new (queue #5)+ assert (push (7 :: W32) q)+ assert (push 3 q)+ assert (push 1 q)+ assert (push 6 q)+ assert (push 7 q)+ arr = new garr+ m = A.fold (foo q) (mul_queue q) arr+ putW m+ assert (m == 40824)+ 0++mul_queue => Q.fold mul 1++foo q m x => do+ assert (del q)+ assert (push x q)+ max m (mul_queue q)++garr :: Array #995 W32+garr => Array+ [ 1, 7, 6, 5, 3, 1, 3, 3, 0, 6, 2, 4, 9, 1, 9, 2, 2, 5, 1, 1, 9, 6, 7, 4, 4, 2, 6, 5, 7, 4, 7, 4, 2, 3, 5, 5, 3, 4, 9, 1, 9, 4, 9, 3, 4+ , 9, 6, 9, 8, 3, 5, 2, 0, 3, 1, 2, 7, 7, 4, 5, 0, 6, 3, 2, 6, 2, 3, 9, 5, 7, 8, 3, 1, 8, 0, 1, 6, 9, 8, 4, 8, 0, 1, 8, 6, 9, 4, 7, 8, 8, 5, 1, 8, 4, 3+ , 8, 5, 8, 6, 1, 5, 6, 0, 7, 8, 9, 1, 1, 2, 9, 4, 9, 4, 9, 5, 4, 5, 9, 5, 0, 1, 7, 3, 7, 9, 5, 8, 3, 3, 1, 9, 5, 2, 8, 5, 3, 2, 0, 8, 8, 0, 5, 5, 1, 1+ , 1, 2, 5, 4, 0, 6, 9, 8, 7, 4, 7, 1, 5, 8, 5, 2, 3, 8, 6, 3, 0, 5, 0, 7, 1, 5, 6, 9, 3, 2, 9, 0, 9, 6, 3, 2, 9, 5, 2, 2, 7, 4, 4, 3, 0, 4, 3, 5, 5, 7+ , 6, 6, 8, 9, 6, 6, 4, 8, 9, 5, 0, 4, 4, 5, 2, 4, 4, 5, 2, 3, 1, 6, 1, 7, 3, 1, 8, 5, 6, 4, 0, 3, 0, 9, 8, 7, 1, 1, 1, 2, 1, 7, 2, 2, 3, 8, 3, 1, 1, 3+ , 6, 2, 2, 2, 9, 8, 9, 3, 4, 2, 3, 3, 8, 0, 3, 0, 8, 1, 3, 5, 3, 3, 6, 2, 7, 6, 6, 1, 4, 2, 8, 2, 8, 0, 6, 4, 4, 4, 4, 8, 6, 6, 4, 5, 2, 3, 8, 7, 4, 9+ , 3, 0, 3, 5, 8, 9, 0, 7, 2, 9, 6, 2, 9, 0, 4, 9, 1, 5, 6, 0, 4, 4, 0, 7, 7, 2, 3, 9, 0, 7, 1, 3, 8, 1, 0, 5, 1, 5, 8, 5, 9, 3, 0, 7, 9, 6, 0, 8, 6, 6+ , 7, 0, 1, 7, 2, 4, 2, 7, 1, 2, 1, 8, 8, 3, 9, 9, 8, 7, 9, 7, 9, 0, 8, 7, 9, 2, 2, 7, 4, 9, 2, 1, 9, 0, 1, 6, 9, 9, 7, 2, 0, 8, 8, 8, 0, 9, 3, 7, 7, 6+ , 6, 5, 7, 2, 7, 3, 3, 3, 0, 0, 1, 0, 5, 3, 3, 6, 7, 8, 8, 1, 2, 2, 0, 2, 3, 5, 4, 2, 1, 8, 0, 9, 7, 5, 1, 2, 5, 4, 5, 4, 0, 5, 9, 4, 7, 5, 2, 2, 4, 3+ , 5, 2, 5, 8, 4, 9, 0, 7, 7, 1, 1, 6, 7, 0, 5, 5, 6, 0, 1, 3, 6, 0, 4, 8, 3, 9, 5, 8, 6, 4, 4, 6, 7, 0, 6, 3, 2, 4, 4, 1, 5, 7, 2, 2, 1, 5, 5, 3, 9, 7+ , 5, 3, 6, 9, 7, 8, 1, 7, 9, 7, 7, 8, 4, 6, 1, 7, 4, 0, 6, 4, 9, 5, 5, 1, 4, 9, 2, 9, 0, 8, 6, 2, 5, 6, 9, 3, 2, 1, 9, 7, 8, 4, 6, 8, 6, 2, 2, 4, 8, 2+ , 8, 3, 9, 7, 2, 2, 4, 1, 3, 7, 5, 6, 5, 7, 0, 5, 6, 0, 5, 7, 4, 9, 0, 2, 6, 1, 4, 0, 7, 9, 7, 2, 9, 6, 8, 6, 5, 2, 4, 1, 4, 5, 3, 5, 1, 0, 0, 4, 7, 4+ , 8, 2, 1, 6, 6, 3, 7, 0, 4, 8, 4, 4, 0, 3, 1, 9, 9, 8, 9, 0, 0, 0, 8, 8, 9, 5, 2, 4, 3, 4, 5, 0, 6, 5, 8, 5, 4, 1, 2, 2, 7, 5, 8, 8, 6, 6, 6, 8, 8, 1+ , 1, 6, 4, 2, 7, 1, 7, 1, 4, 7, 9, 9, 2, 4, 4, 4, 2, 9, 2, 8, 2, 3, 0, 8, 6, 3, 4, 6, 5, 6, 7, 4, 8, 1, 3, 9, 1, 9, 1, 2, 3, 1, 6, 2, 8, 2, 4, 5, 8, 6+ , 1, 7, 8, 6, 6, 4, 5, 8, 3, 5, 9, 1, 2, 4, 5, 6, 6, 5, 2, 9, 4, 7, 6, 5, 4, 5, 6, 8, 2, 8, 4, 8, 9, 1, 2, 8, 8, 3, 1, 4, 2, 6, 0, 7, 6, 9, 0, 0, 4, 2+ , 2, 4, 2, 1, 9, 0, 2, 2, 6, 7, 1, 0, 5, 5, 6, 2, 6, 3, 2, 1, 1, 1, 1, 1, 0, 9, 3, 7, 0, 5, 4, 4, 2, 1, 7, 5, 0, 6, 9, 4, 1, 6, 5, 8, 9, 6, 0, 4, 0, 8+ , 0, 7, 1, 9, 8, 4, 0, 3, 8, 5, 0, 9, 6, 2, 4, 5, 5, 4, 4, 4, 3, 6, 2, 9, 8, 1, 2, 3, 0, 9, 8, 7, 8, 7, 9, 9, 2, 7, 2, 4, 4, 2, 8, 4, 9, 0, 9, 1, 8, 8+ , 8, 4, 5, 8, 0, 1, 5, 6, 1, 6, 6, 0, 9, 7, 9, 1, 9, 1, 3, 3, 8, 7, 5, 4, 9, 9, 2, 0, 0, 5, 2, 4, 0, 6, 3, 6, 8, 9, 9, 1, 2, 5, 6, 0, 7, 1, 7, 6, 0, 6+ , 0, 5, 8, 8, 6, 1, 1, 6, 4, 6, 7, 1, 0, 9, 4, 0, 5, 0, 7, 7, 5, 4, 1, 0, 0, 2, 2, 5, 6, 9, 8, 3, 1, 5, 5, 2, 0, 0, 0, 5, 5, 9, 3, 5, 7, 2, 9, 7, 2, 5+ , 7, 1, 6, 3, 6, 2, 6, 9, 5, 6, 1, 8, 8, 2, 6, 7, 0, 4, 2, 8, 2, 5, 2, 4, 8, 3, 6, 0, 0, 8, 2, 3, 2, 5, 7, 5, 3, 0, 4, 2, 0, 7, 5, 2, 9, 6, 3, 4, 5, 0+ ]
+ test_cases/euler/Euler9.pec view
@@ -0,0 +1,39 @@+module Euler9++imports+ Prelude++where++main :: () -> I32+main () = do+ pc = new (1 :: W32)+ pa = new 1+ g = new True+ while ((@pc < 1000) && @g)+ (do+ pa <- 1+ while ((@pa < @pc) && @g)+ (do+ g <- foo @pa @pc+ inc pa+ )+ inc pc+ )+ a = @pa - 1+ c = @pc - 1+ b = ((1000 - a) - c)+ // putW a+ // putS " "+ // putW b+ // putS " "+ // putW c+ assert ((a < b) && (b < c))+ assert (((a*a) + (b*b)) == (c*c))+ assert (((a + b) + c) == 1000)+ v = (a*b)*c+ putW v+ assert (v == 31875000)+ 0++foo a c => ((500000 + ((a*a) + (a * c))) - ((a * 1000) + (c * 1000))) != 0