content: {-# OPTIONS_GHC -w #-}
  import Control.Monad(when)
  import System.Exit
  
  -- parser produced by Happy Version 1.18.6
  
  data HappyAbsSyn 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
  	= HappyTerminal (Char)
  	| HappyErrorToken Int
  	| HappyAbsSyn14 t14
  	| HappyAbsSyn15 t15
  	| HappyAbsSyn16 t16
  	| HappyAbsSyn17 t17
  	| HappyAbsSyn18 t18
  	| HappyAbsSyn19 t19
  	| HappyAbsSyn20 t20
  	| HappyAbsSyn21 t21
  	| HappyAbsSyn22 t22
  	| HappyAbsSyn23 t23
  	| HappyAbsSyn24 t24
  	| HappyAbsSyn25 t25
  	| HappyAbsSyn26 t26
  	| HappyAbsSyn27 t27
  	| HappyAbsSyn28 t28
  	| HappyAbsSyn29 t29
  	| HappyAbsSyn30 t30
  	| HappyAbsSyn31 t31
  	| HappyAbsSyn32 t32
  	| HappyAbsSyn33 t33
  	| HappyAbsSyn34 t34
  	| HappyAbsSyn35 t35
  	| HappyAbsSyn36 t36
  	| HappyAbsSyn37 t37
  	| HappyAbsSyn38 t38
  	| HappyAbsSyn39 t39
  	| HappyAbsSyn40 t40
  	| HappyAbsSyn41 t41
  	| HappyAbsSyn42 t42
  	| HappyAbsSyn43 t43
  	| HappyAbsSyn44 t44
  	| HappyAbsSyn45 t45
  	| HappyAbsSyn46 t46
  	| HappyAbsSyn47 t47
  	| HappyAbsSyn48 t48
  	| HappyAbsSyn49 t49
  	| HappyAbsSyn50 t50
  	| HappyAbsSyn51 t51
  	| HappyAbsSyn52 t52
  	| HappyAbsSyn53 t53
  	| HappyAbsSyn54 t54
  	| HappyAbsSyn55 t55
  	| HappyAbsSyn56 t56
  	| HappyAbsSyn57 t57
  	| HappyAbsSyn58 t58
  	| HappyAbsSyn59 t59
  	| HappyAbsSyn60 t60
  	| HappyAbsSyn61 t61
  
  action_0 (62) = happyShift action_22
  action_0 (14) = happyGoto action_66
  action_0 (17) = happyGoto action_12
  action_0 (18) = happyGoto action_13
  action_0 (19) = happyGoto action_14
  action_0 (31) = happyGoto action_15
  action_0 (32) = happyGoto action_16
  action_0 (33) = happyGoto action_17
  action_0 (35) = happyGoto action_18
  action_0 (43) = happyGoto action_19
  action_0 (44) = happyGoto action_20
  action_0 (45) = happyGoto action_21
  action_0 _ = happyFail
  
  action_1 (62) = happyShift action_22
  action_1 (15) = happyGoto action_63
  action_1 (34) = happyGoto action_64
  action_1 (35) = happyGoto action_65
  action_1 _ = happyReduce_32
  
  action_2 (62) = happyShift action_62
  action_2 (16) = happyGoto action_56
  action_2 (25) = happyGoto action_57
  action_2 (36) = happyGoto action_58
  action_2 (46) = happyGoto action_59
  action_2 (53) = happyGoto action_60
  action_2 (60) = happyGoto action_61
  action_2 _ = happyReduce_35
  
  action_3 (62) = happyShift action_22
  action_3 (17) = happyGoto action_55
  action_3 (18) = happyGoto action_13
  action_3 (19) = happyGoto action_14
  action_3 (32) = happyGoto action_16
  action_3 (33) = happyGoto action_17
  action_3 (35) = happyGoto action_18
  action_3 (44) = happyGoto action_20
  action_3 (45) = happyGoto action_21
  action_3 _ = happyFail
  
  action_4 (62) = happyShift action_22
  action_4 (18) = happyGoto action_54
  action_4 (19) = happyGoto action_14
  action_4 (33) = happyGoto action_17
  action_4 (35) = happyGoto action_18
  action_4 (45) = happyGoto action_21
  action_4 _ = happyFail
  
  action_5 (62) = happyShift action_22
  action_5 (19) = happyGoto action_53
  action_5 (35) = happyGoto action_18
  action_5 _ = happyFail
  
  action_6 (62) = happyShift action_52
  action_6 (20) = happyGoto action_47
  action_6 (26) = happyGoto action_48
  action_6 (38) = happyGoto action_49
  action_6 (47) = happyGoto action_50
  action_6 (55) = happyGoto action_51
  action_6 _ = happyFail
  
  action_7 (62) = happyShift action_46
  action_7 (21) = happyGoto action_41
  action_7 (27) = happyGoto action_42
  action_7 (39) = happyGoto action_43
  action_7 (48) = happyGoto action_44
  action_7 (56) = happyGoto action_45
  action_7 _ = happyFail
  
  action_8 (62) = happyShift action_40
  action_8 (22) = happyGoto action_35
  action_8 (28) = happyGoto action_36
  action_8 (40) = happyGoto action_37
  action_8 (49) = happyGoto action_38
  action_8 (57) = happyGoto action_39
  action_8 _ = happyFail
  
  action_9 (62) = happyShift action_34
  action_9 (23) = happyGoto action_29
  action_9 (29) = happyGoto action_30
  action_9 (41) = happyGoto action_31
  action_9 (50) = happyGoto action_32
  action_9 (58) = happyGoto action_33
  action_9 _ = happyFail
  
  action_10 (62) = happyShift action_28
  action_10 (24) = happyGoto action_23
  action_10 (30) = happyGoto action_24
  action_10 (42) = happyGoto action_25
  action_10 (51) = happyGoto action_26
  action_10 (59) = happyGoto action_27
  action_10 _ = happyFail
  
  action_11 (62) = happyShift action_22
  action_11 (17) = happyGoto action_12
  action_11 (18) = happyGoto action_13
  action_11 (19) = happyGoto action_14
  action_11 (31) = happyGoto action_15
  action_11 (32) = happyGoto action_16
  action_11 (33) = happyGoto action_17
  action_11 (35) = happyGoto action_18
  action_11 (43) = happyGoto action_19
  action_11 (44) = happyGoto action_20
  action_11 (45) = happyGoto action_21
  action_11 _ = happyFail
  
  action_12 _ = happyReduce_43
  
  action_13 _ = happyReduce_45
  
  action_14 _ = happyReduce_47
  
  action_15 _ = happyReduce_11
  
  action_16 _ = happyReduce_14
  
  action_17 _ = happyReduce_15
  
  action_18 _ = happyReduce_16
  
  action_19 (62) = happyShift action_22
  action_19 (17) = happyGoto action_86
  action_19 (18) = happyGoto action_13
  action_19 (19) = happyGoto action_14
  action_19 (32) = happyGoto action_16
  action_19 (33) = happyGoto action_17
  action_19 (35) = happyGoto action_18
  action_19 (44) = happyGoto action_20
  action_19 (45) = happyGoto action_21
  action_19 _ = happyReduce_28
  
  action_20 (62) = happyShift action_22
  action_20 (18) = happyGoto action_85
  action_20 (19) = happyGoto action_14
  action_20 (33) = happyGoto action_17
  action_20 (35) = happyGoto action_18
  action_20 (45) = happyGoto action_21
  action_20 _ = happyReduce_29
  
  action_21 (62) = happyShift action_22
  action_21 (19) = happyGoto action_84
  action_21 (35) = happyGoto action_18
  action_21 _ = happyReduce_30
  
  action_22 (63) = happyShift action_83
  action_22 (37) = happyGoto action_79
  action_22 (52) = happyGoto action_80
  action_22 (54) = happyGoto action_81
  action_22 (61) = happyGoto action_82
  action_22 _ = happyReduce_37
  
  action_23 (64) = happyAccept
  action_23 _ = happyFail
  
  action_24 _ = happyReduce_21
  
  action_25 _ = happyReduce_27
  
  action_26 _ = happyReduce_66
  
  action_27 (62) = happyShift action_28
  action_27 (51) = happyGoto action_78
  action_27 _ = happyReduce_42
  
  action_28 (62) = happyShift action_22
  action_28 (19) = happyGoto action_77
  action_28 (35) = happyGoto action_18
  action_28 _ = happyFail
  
  action_29 (64) = happyAccept
  action_29 _ = happyFail
  
  action_30 _ = happyReduce_20
  
  action_31 _ = happyReduce_26
  
  action_32 _ = happyReduce_64
  
  action_33 (62) = happyShift action_34
  action_33 (50) = happyGoto action_76
  action_33 _ = happyReduce_41
  
  action_34 (62) = happyShift action_22
  action_34 (18) = happyGoto action_75
  action_34 (19) = happyGoto action_14
  action_34 (33) = happyGoto action_17
  action_34 (35) = happyGoto action_18
  action_34 (45) = happyGoto action_21
  action_34 _ = happyFail
  
  action_35 (64) = happyAccept
  action_35 _ = happyFail
  
  action_36 _ = happyReduce_19
  
  action_37 _ = happyReduce_25
  
  action_38 _ = happyReduce_62
  
  action_39 (62) = happyShift action_40
  action_39 (49) = happyGoto action_74
  action_39 _ = happyReduce_40
  
  action_40 (62) = happyShift action_22
  action_40 (17) = happyGoto action_73
  action_40 (18) = happyGoto action_13
  action_40 (19) = happyGoto action_14
  action_40 (32) = happyGoto action_16
  action_40 (33) = happyGoto action_17
  action_40 (35) = happyGoto action_18
  action_40 (44) = happyGoto action_20
  action_40 (45) = happyGoto action_21
  action_40 _ = happyFail
  
  action_41 (64) = happyAccept
  action_41 _ = happyFail
  
  action_42 _ = happyReduce_18
  
  action_43 _ = happyReduce_24
  
  action_44 _ = happyReduce_60
  
  action_45 (62) = happyShift action_46
  action_45 (48) = happyGoto action_72
  action_45 _ = happyReduce_39
  
  action_46 (62) = happyShift action_62
  action_46 (16) = happyGoto action_71
  action_46 (25) = happyGoto action_57
  action_46 (36) = happyGoto action_58
  action_46 (46) = happyGoto action_59
  action_46 (53) = happyGoto action_60
  action_46 (60) = happyGoto action_61
  action_46 _ = happyReduce_35
  
  action_47 (64) = happyAccept
  action_47 _ = happyFail
  
  action_48 _ = happyReduce_17
  
  action_49 _ = happyReduce_23
  
  action_50 _ = happyReduce_58
  
  action_51 (62) = happyShift action_52
  action_51 (47) = happyGoto action_70
  action_51 _ = happyReduce_38
  
  action_52 (62) = happyShift action_22
  action_52 (15) = happyGoto action_69
  action_52 (34) = happyGoto action_64
  action_52 (35) = happyGoto action_65
  action_52 _ = happyReduce_32
  
  action_53 (64) = happyAccept
  action_53 _ = happyFail
  
  action_54 (64) = happyAccept
  action_54 _ = happyFail
  
  action_55 (64) = happyAccept
  action_55 _ = happyFail
  
  action_56 (64) = happyAccept
  action_56 _ = happyFail
  
  action_57 _ = happyReduce_13
  
  action_58 _ = happyReduce_22
  
  action_59 _ = happyReduce_68
  
  action_60 _ = happyReduce_34
  
  action_61 (62) = happyShift action_62
  action_61 (46) = happyGoto action_68
  action_61 _ = happyReduce_56
  
  action_62 (63) = happyShift action_67
  action_62 _ = happyFail
  
  action_63 (64) = happyAccept
  action_63 _ = happyFail
  
  action_64 _ = happyReduce_12
  
  action_65 _ = happyReduce_31
  
  action_66 (64) = happyAccept
  action_66 _ = happyFail
  
  action_67 _ = happyReduce_49
  
  action_68 _ = happyReduce_69
  
  action_69 _ = happyReduce_50
  
  action_70 _ = happyReduce_59
  
  action_71 _ = happyReduce_51
  
  action_72 _ = happyReduce_61
  
  action_73 _ = happyReduce_52
  
  action_74 _ = happyReduce_63
  
  action_75 _ = happyReduce_53
  
  action_76 _ = happyReduce_65
  
  action_77 _ = happyReduce_54
  
  action_78 _ = happyReduce_67
  
  action_79 _ = happyReduce_33
  
  action_80 _ = happyReduce_70
  
  action_81 _ = happyReduce_36
  
  action_82 (63) = happyShift action_83
  action_82 (52) = happyGoto action_88
  action_82 _ = happyReduce_57
  
  action_83 (62) = happyShift action_87
  action_83 _ = happyFail
  
  action_84 _ = happyReduce_48
  
  action_85 _ = happyReduce_46
  
  action_86 _ = happyReduce_44
  
  action_87 _ = happyReduce_55
  
  action_88 _ = happyReduce_71
  
  happyReduce_11 = happySpecReduce_1  14 happyReduction_11
  happyReduction_11 (HappyAbsSyn31  happy_var_1)
  	 =  HappyAbsSyn14
  		 (happy_var_1
  	)
  happyReduction_11 _  = notHappyAtAll 
  
  happyReduce_12 = happySpecReduce_1  15 happyReduction_12
  happyReduction_12 (HappyAbsSyn34  happy_var_1)
  	 =  HappyAbsSyn15
  		 (happy_var_1
  	)
  happyReduction_12 _  = notHappyAtAll 
  
  happyReduce_13 = happySpecReduce_1  16 happyReduction_13
  happyReduction_13 (HappyAbsSyn25  happy_var_1)
  	 =  HappyAbsSyn16
  		 (happy_var_1
  	)
  happyReduction_13 _  = notHappyAtAll 
  
  happyReduce_14 = happySpecReduce_1  17 happyReduction_14
  happyReduction_14 (HappyAbsSyn32  happy_var_1)
  	 =  HappyAbsSyn17
  		 (happy_var_1
  	)
  happyReduction_14 _  = notHappyAtAll 
  
  happyReduce_15 = happySpecReduce_1  18 happyReduction_15
  happyReduction_15 (HappyAbsSyn33  happy_var_1)
  	 =  HappyAbsSyn18
  		 (happy_var_1
  	)
  happyReduction_15 _  = notHappyAtAll 
  
  happyReduce_16 = happySpecReduce_1  19 happyReduction_16
  happyReduction_16 (HappyAbsSyn35  happy_var_1)
  	 =  HappyAbsSyn19
  		 (happy_var_1
  	)
  happyReduction_16 _  = notHappyAtAll 
  
  happyReduce_17 = happySpecReduce_1  20 happyReduction_17
  happyReduction_17 (HappyAbsSyn26  happy_var_1)
  	 =  HappyAbsSyn20
  		 (happy_var_1
  	)
  happyReduction_17 _  = notHappyAtAll 
  
  happyReduce_18 = happySpecReduce_1  21 happyReduction_18
  happyReduction_18 (HappyAbsSyn27  happy_var_1)
  	 =  HappyAbsSyn21
  		 (happy_var_1
  	)
  happyReduction_18 _  = notHappyAtAll 
  
  happyReduce_19 = happySpecReduce_1  22 happyReduction_19
  happyReduction_19 (HappyAbsSyn28  happy_var_1)
  	 =  HappyAbsSyn22
  		 (happy_var_1
  	)
  happyReduction_19 _  = notHappyAtAll 
  
  happyReduce_20 = happySpecReduce_1  23 happyReduction_20
  happyReduction_20 (HappyAbsSyn29  happy_var_1)
  	 =  HappyAbsSyn23
  		 (happy_var_1
  	)
  happyReduction_20 _  = notHappyAtAll 
  
  happyReduce_21 = happySpecReduce_1  24 happyReduction_21
  happyReduction_21 (HappyAbsSyn30  happy_var_1)
  	 =  HappyAbsSyn24
  		 (happy_var_1
  	)
  happyReduction_21 _  = notHappyAtAll 
  
  happyReduce_22 = happySpecReduce_1  25 happyReduction_22
  happyReduction_22 (HappyAbsSyn36  happy_var_1)
  	 =  HappyAbsSyn25
  		 (happy_var_1
  	)
  happyReduction_22 _  = notHappyAtAll 
  
  happyReduce_23 = happySpecReduce_1  26 happyReduction_23
  happyReduction_23 (HappyAbsSyn38  happy_var_1)
  	 =  HappyAbsSyn26
  		 (happy_var_1
  	)
  happyReduction_23 _  = notHappyAtAll 
  
  happyReduce_24 = happySpecReduce_1  27 happyReduction_24
  happyReduction_24 (HappyAbsSyn39  happy_var_1)
  	 =  HappyAbsSyn27
  		 (happy_var_1
  	)
  happyReduction_24 _  = notHappyAtAll 
  
  happyReduce_25 = happySpecReduce_1  28 happyReduction_25
  happyReduction_25 (HappyAbsSyn40  happy_var_1)
  	 =  HappyAbsSyn28
  		 (happy_var_1
  	)
  happyReduction_25 _  = notHappyAtAll 
  
  happyReduce_26 = happySpecReduce_1  29 happyReduction_26
  happyReduction_26 (HappyAbsSyn41  happy_var_1)
  	 =  HappyAbsSyn29
  		 (happy_var_1
  	)
  happyReduction_26 _  = notHappyAtAll 
  
  happyReduce_27 = happySpecReduce_1  30 happyReduction_27
  happyReduction_27 (HappyAbsSyn42  happy_var_1)
  	 =  HappyAbsSyn30
  		 (happy_var_1
  	)
  happyReduction_27 _  = notHappyAtAll 
  
  happyReduce_28 = happySpecReduce_1  31 happyReduction_28
  happyReduction_28 (HappyAbsSyn43  happy_var_1)
  	 =  HappyAbsSyn31
  		 (reverse happy_var_1
  	)
  happyReduction_28 _  = notHappyAtAll 
  
  happyReduce_29 = happySpecReduce_1  32 happyReduction_29
  happyReduction_29 (HappyAbsSyn44  happy_var_1)
  	 =  HappyAbsSyn32
  		 (reverse happy_var_1
  	)
  happyReduction_29 _  = notHappyAtAll 
  
  happyReduce_30 = happySpecReduce_1  33 happyReduction_30
  happyReduction_30 (HappyAbsSyn45  happy_var_1)
  	 =  HappyAbsSyn33
  		 (reverse happy_var_1
  	)
  happyReduction_30 _  = notHappyAtAll 
  
  happyReduce_31 = happySpecReduce_1  34 happyReduction_31
  happyReduction_31 (HappyAbsSyn35  happy_var_1)
  	 =  HappyAbsSyn34
  		 (happy_var_1
  	)
  happyReduction_31 _  = notHappyAtAll 
  
  happyReduce_32 = happySpecReduce_0  34 happyReduction_32
  happyReduction_32  =  HappyAbsSyn34
  		 ([]
  	)
  
  happyReduce_33 = happySpecReduce_2  35 happyReduction_33
  happyReduction_33 (HappyAbsSyn37  happy_var_2)
  	(HappyTerminal happy_var_1)
  	 =  HappyAbsSyn35
  		 (happy_var_1 : happy_var_2
  	)
  happyReduction_33 _ _  = notHappyAtAll 
  
  happyReduce_34 = happySpecReduce_1  36 happyReduction_34
  happyReduction_34 (HappyAbsSyn53  happy_var_1)
  	 =  HappyAbsSyn36
  		 (happy_var_1
  	)
  happyReduction_34 _  = notHappyAtAll 
  
  happyReduce_35 = happySpecReduce_0  36 happyReduction_35
  happyReduction_35  =  HappyAbsSyn36
  		 ([]
  	)
  
  happyReduce_36 = happySpecReduce_1  37 happyReduction_36
  happyReduction_36 (HappyAbsSyn54  happy_var_1)
  	 =  HappyAbsSyn37
  		 (happy_var_1
  	)
  happyReduction_36 _  = notHappyAtAll 
  
  happyReduce_37 = happySpecReduce_0  37 happyReduction_37
  happyReduction_37  =  HappyAbsSyn37
  		 ([]
  	)
  
  happyReduce_38 = happySpecReduce_1  38 happyReduction_38
  happyReduction_38 (HappyAbsSyn55  happy_var_1)
  	 =  HappyAbsSyn38
  		 (reverse happy_var_1
  	)
  happyReduction_38 _  = notHappyAtAll 
  
  happyReduce_39 = happySpecReduce_1  39 happyReduction_39
  happyReduction_39 (HappyAbsSyn56  happy_var_1)
  	 =  HappyAbsSyn39
  		 (reverse happy_var_1
  	)
  happyReduction_39 _  = notHappyAtAll 
  
  happyReduce_40 = happySpecReduce_1  40 happyReduction_40
  happyReduction_40 (HappyAbsSyn57  happy_var_1)
  	 =  HappyAbsSyn40
  		 (reverse happy_var_1
  	)
  happyReduction_40 _  = notHappyAtAll 
  
  happyReduce_41 = happySpecReduce_1  41 happyReduction_41
  happyReduction_41 (HappyAbsSyn58  happy_var_1)
  	 =  HappyAbsSyn41
  		 (reverse happy_var_1
  	)
  happyReduction_41 _  = notHappyAtAll 
  
  happyReduce_42 = happySpecReduce_1  42 happyReduction_42
  happyReduction_42 (HappyAbsSyn59  happy_var_1)
  	 =  HappyAbsSyn42
  		 (reverse happy_var_1
  	)
  happyReduction_42 _  = notHappyAtAll 
  
  happyReduce_43 = happySpecReduce_1  43 happyReduction_43
  happyReduction_43 (HappyAbsSyn17  happy_var_1)
  	 =  HappyAbsSyn43
  		 ([happy_var_1]
  	)
  happyReduction_43 _  = notHappyAtAll 
  
  happyReduce_44 = happySpecReduce_2  43 happyReduction_44
  happyReduction_44 (HappyAbsSyn17  happy_var_2)
  	(HappyAbsSyn43  happy_var_1)
  	 =  HappyAbsSyn43
  		 (happy_var_2 : happy_var_1
  	)
  happyReduction_44 _ _  = notHappyAtAll 
  
  happyReduce_45 = happySpecReduce_1  44 happyReduction_45
  happyReduction_45 (HappyAbsSyn18  happy_var_1)
  	 =  HappyAbsSyn44
  		 ([happy_var_1]
  	)
  happyReduction_45 _  = notHappyAtAll 
  
  happyReduce_46 = happySpecReduce_2  44 happyReduction_46
  happyReduction_46 (HappyAbsSyn18  happy_var_2)
  	(HappyAbsSyn44  happy_var_1)
  	 =  HappyAbsSyn44
  		 (happy_var_2 : happy_var_1
  	)
  happyReduction_46 _ _  = notHappyAtAll 
  
  happyReduce_47 = happySpecReduce_1  45 happyReduction_47
  happyReduction_47 (HappyAbsSyn19  happy_var_1)
  	 =  HappyAbsSyn45
  		 ([happy_var_1]
  	)
  happyReduction_47 _  = notHappyAtAll 
  
  happyReduce_48 = happySpecReduce_2  45 happyReduction_48
  happyReduction_48 (HappyAbsSyn19  happy_var_2)
  	(HappyAbsSyn45  happy_var_1)
  	 =  HappyAbsSyn45
  		 (happy_var_2 : happy_var_1
  	)
  happyReduction_48 _ _  = notHappyAtAll 
  
  happyReduce_49 = happySpecReduce_2  46 happyReduction_49
  happyReduction_49 _
  	(HappyTerminal happy_var_1)
  	 =  HappyAbsSyn46
  		 (happy_var_1
  	)
  happyReduction_49 _ _  = notHappyAtAll 
  
  happyReduce_50 = happySpecReduce_2  47 happyReduction_50
  happyReduction_50 _
  	(HappyTerminal happy_var_1)
  	 =  HappyAbsSyn47
  		 (happy_var_1
  	)
  happyReduction_50 _ _  = notHappyAtAll 
  
  happyReduce_51 = happySpecReduce_2  48 happyReduction_51
  happyReduction_51 _
  	(HappyTerminal happy_var_1)
  	 =  HappyAbsSyn48
  		 (happy_var_1
  	)
  happyReduction_51 _ _  = notHappyAtAll 
  
  happyReduce_52 = happySpecReduce_2  49 happyReduction_52
  happyReduction_52 _
  	(HappyTerminal happy_var_1)
  	 =  HappyAbsSyn49
  		 (happy_var_1
  	)
  happyReduction_52 _ _  = notHappyAtAll 
  
  happyReduce_53 = happySpecReduce_2  50 happyReduction_53
  happyReduction_53 _
  	(HappyTerminal happy_var_1)
  	 =  HappyAbsSyn50
  		 (happy_var_1
  	)
  happyReduction_53 _ _  = notHappyAtAll 
  
  happyReduce_54 = happySpecReduce_2  51 happyReduction_54
  happyReduction_54 _
  	(HappyTerminal happy_var_1)
  	 =  HappyAbsSyn51
  		 (happy_var_1
  	)
  happyReduction_54 _ _  = notHappyAtAll 
  
  happyReduce_55 = happySpecReduce_2  52 happyReduction_55
  happyReduction_55 (HappyTerminal happy_var_2)
  	_
  	 =  HappyAbsSyn52
  		 (happy_var_2
  	)
  happyReduction_55 _ _  = notHappyAtAll 
  
  happyReduce_56 = happySpecReduce_1  53 happyReduction_56
  happyReduction_56 (HappyAbsSyn60  happy_var_1)
  	 =  HappyAbsSyn53
  		 (reverse happy_var_1
  	)
  happyReduction_56 _  = notHappyAtAll 
  
  happyReduce_57 = happySpecReduce_1  54 happyReduction_57
  happyReduction_57 (HappyAbsSyn61  happy_var_1)
  	 =  HappyAbsSyn54
  		 (reverse happy_var_1
  	)
  happyReduction_57 _  = notHappyAtAll 
  
  happyReduce_58 = happySpecReduce_1  55 happyReduction_58
  happyReduction_58 (HappyAbsSyn47  happy_var_1)
  	 =  HappyAbsSyn55
  		 ([happy_var_1]
  	)
  happyReduction_58 _  = notHappyAtAll 
  
  happyReduce_59 = happySpecReduce_2  55 happyReduction_59
  happyReduction_59 (HappyAbsSyn47  happy_var_2)
  	(HappyAbsSyn55  happy_var_1)
  	 =  HappyAbsSyn55
  		 (happy_var_2 : happy_var_1
  	)
  happyReduction_59 _ _  = notHappyAtAll 
  
  happyReduce_60 = happySpecReduce_1  56 happyReduction_60
  happyReduction_60 (HappyAbsSyn48  happy_var_1)
  	 =  HappyAbsSyn56
  		 ([happy_var_1]
  	)
  happyReduction_60 _  = notHappyAtAll 
  
  happyReduce_61 = happySpecReduce_2  56 happyReduction_61
  happyReduction_61 (HappyAbsSyn48  happy_var_2)
  	(HappyAbsSyn56  happy_var_1)
  	 =  HappyAbsSyn56
  		 (happy_var_2 : happy_var_1
  	)
  happyReduction_61 _ _  = notHappyAtAll 
  
  happyReduce_62 = happySpecReduce_1  57 happyReduction_62
  happyReduction_62 (HappyAbsSyn49  happy_var_1)
  	 =  HappyAbsSyn57
  		 ([happy_var_1]
  	)
  happyReduction_62 _  = notHappyAtAll 
  
  happyReduce_63 = happySpecReduce_2  57 happyReduction_63
  happyReduction_63 (HappyAbsSyn49  happy_var_2)
  	(HappyAbsSyn57  happy_var_1)
  	 =  HappyAbsSyn57
  		 (happy_var_2 : happy_var_1
  	)
  happyReduction_63 _ _  = notHappyAtAll 
  
  happyReduce_64 = happySpecReduce_1  58 happyReduction_64
  happyReduction_64 (HappyAbsSyn50  happy_var_1)
  	 =  HappyAbsSyn58
  		 ([happy_var_1]
  	)
  happyReduction_64 _  = notHappyAtAll 
  
  happyReduce_65 = happySpecReduce_2  58 happyReduction_65
  happyReduction_65 (HappyAbsSyn50  happy_var_2)
  	(HappyAbsSyn58  happy_var_1)
  	 =  HappyAbsSyn58
  		 (happy_var_2 : happy_var_1
  	)
  happyReduction_65 _ _  = notHappyAtAll 
  
  happyReduce_66 = happySpecReduce_1  59 happyReduction_66
  happyReduction_66 (HappyAbsSyn51  happy_var_1)
  	 =  HappyAbsSyn59
  		 ([happy_var_1]
  	)
  happyReduction_66 _  = notHappyAtAll 
  
  happyReduce_67 = happySpecReduce_2  59 happyReduction_67
  happyReduction_67 (HappyAbsSyn51  happy_var_2)
  	(HappyAbsSyn59  happy_var_1)
  	 =  HappyAbsSyn59
  		 (happy_var_2 : happy_var_1
  	)
  happyReduction_67 _ _  = notHappyAtAll 
  
  happyReduce_68 = happySpecReduce_1  60 happyReduction_68
  happyReduction_68 (HappyAbsSyn46  happy_var_1)
  	 =  HappyAbsSyn60
  		 ([happy_var_1]
  	)
  happyReduction_68 _  = notHappyAtAll 
  
  happyReduce_69 = happySpecReduce_2  60 happyReduction_69
  happyReduction_69 (HappyAbsSyn46  happy_var_2)
  	(HappyAbsSyn60  happy_var_1)
  	 =  HappyAbsSyn60
  		 (happy_var_2 : happy_var_1
  	)
  happyReduction_69 _ _  = notHappyAtAll 
  
  happyReduce_70 = happySpecReduce_1  61 happyReduction_70
  happyReduction_70 (HappyAbsSyn52  happy_var_1)
  	 =  HappyAbsSyn61
  		 ([happy_var_1]
  	)
  happyReduction_70 _  = notHappyAtAll 
  
  happyReduce_71 = happySpecReduce_2  61 happyReduction_71
  happyReduction_71 (HappyAbsSyn52  happy_var_2)
  	(HappyAbsSyn61  happy_var_1)
  	 =  HappyAbsSyn61
  		 (happy_var_2 : happy_var_1
  	)
  happyReduction_71 _ _  = notHappyAtAll 
  
  happyNewToken action sts stk [] =
  	action 64 64 notHappyAtAll (HappyState action) sts stk []
  
  happyNewToken action sts stk (tk:tks) =
  	let cont i = action i i tk (HappyState action) sts stk tks in
  	case tk of {
  	'a' -> cont 62;
  	'b' -> cont 63;
  	_ -> happyError' (tk:tks)
  	}
  
  happyError_ tk tks = happyError' (tk:tks)
  
  happyThen :: () => Maybe a -> (a -> Maybe b) -> Maybe b
  happyThen = ((>>=))
  happyReturn :: () => a -> Maybe a
  happyReturn = (return)
  happyThen1 m k tks = ((>>=)) m (\a -> k a tks)
  happyReturn1 :: () => a -> b -> Maybe a
  happyReturn1 = \a tks -> (return) a
  happyError' :: () => [(Char)] -> Maybe a
  happyError' = happyError
  
  test0 tks = happySomeParser where
    happySomeParser = happyThen (happyParse action_0 tks) (\x -> case x of {HappyAbsSyn14 z -> happyReturn z; _other -> notHappyAtAll })
  
  test1 tks = happySomeParser where
    happySomeParser = happyThen (happyParse action_1 tks) (\x -> case x of {HappyAbsSyn15 z -> happyReturn z; _other -> notHappyAtAll })
  
  test2 tks = happySomeParser where
    happySomeParser = happyThen (happyParse action_2 tks) (\x -> case x of {HappyAbsSyn16 z -> happyReturn z; _other -> notHappyAtAll })
  
  test3 tks = happySomeParser where
    happySomeParser = happyThen (happyParse action_3 tks) (\x -> case x of {HappyAbsSyn17 z -> happyReturn z; _other -> notHappyAtAll })
  
  test4 tks = happySomeParser where
    happySomeParser = happyThen (happyParse action_4 tks) (\x -> case x of {HappyAbsSyn18 z -> happyReturn z; _other -> notHappyAtAll })
  
  test5 tks = happySomeParser where
    happySomeParser = happyThen (happyParse action_5 tks) (\x -> case x of {HappyAbsSyn19 z -> happyReturn z; _other -> notHappyAtAll })
  
  test6 tks = happySomeParser where
    happySomeParser = happyThen (happyParse action_6 tks) (\x -> case x of {HappyAbsSyn20 z -> happyReturn z; _other -> notHappyAtAll })
  
  test7 tks = happySomeParser where
    happySomeParser = happyThen (happyParse action_7 tks) (\x -> case x of {HappyAbsSyn21 z -> happyReturn z; _other -> notHappyAtAll })
  
  test8 tks = happySomeParser where
    happySomeParser = happyThen (happyParse action_8 tks) (\x -> case x of {HappyAbsSyn22 z -> happyReturn z; _other -> notHappyAtAll })
  
  test9 tks = happySomeParser where
    happySomeParser = happyThen (happyParse action_9 tks) (\x -> case x of {HappyAbsSyn23 z -> happyReturn z; _other -> notHappyAtAll })
  
  test10 tks = happySomeParser where
    happySomeParser = happyThen (happyParse action_10 tks) (\x -> case x of {HappyAbsSyn24 z -> happyReturn z; _other -> notHappyAtAll })
  
  happySeq = happyDontSeq
  
  
  happyError _  = Nothing
  
  tests         = [ test1 ""      == Just ""
                  , test1 "a"     == Just "a"
                  , test1 "ab"    == Nothing
                  , test1 "aba"   == Just "aa"
                  , test1 "abab"  == Nothing
  
                  , test2 ""      == Just ""
                  , test2 "a"     == Nothing
                  , test2 "ab"    == Just "a"
                  , test2 "aba"   == Nothing
                  , test2 "abab"  == Just "aa"
                  ]
  
  main        = do let failed = filter (not . snd) (zip [0..] tests)
                   when (not (null failed)) $
                     do putStrLn ("Failed tests: " ++ show (map fst failed))
                        exitFailure
                   putStrLn "Tests passed."
  {-# 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" #-}
  
  
  
  
  
  
  
  
  {-# 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 (1), 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 (1) tk st sts (_ `HappyStk` ans `HappyStk` _) =
  	happyReturn1 ans
  happyAccept j tk st sts (HappyStk ans _) = 
  	 (happyReturn1 ans)
  
  -----------------------------------------------------------------------------
  -- Arrays only: do the next action
  
  {-# LINE 148 "templates/GenericTemplate.hs" #-}
  
  -----------------------------------------------------------------------------
  -- HappyState data type (not arrays)
  
  
  
  newtype HappyState b c = HappyState
          (Int ->                    -- token number
           Int ->                    -- token number (yes, again)
           b ->                           -- token semantic value
           HappyState b c ->              -- current state
           [HappyState b c] ->            -- state stack
           c)
  
  
  
  -----------------------------------------------------------------------------
  -- Shifting a token
  
  happyShift new_state (1) tk st sts stk@(x `HappyStk` _) =
       let (i) = (case x of { HappyErrorToken (i) -> i }) in
  --     trace "shifting the error token" $
       new_state i i tk (HappyState (new_state)) ((st):(sts)) (stk)
  
  happyShift new_state i tk st sts stk =
       happyNewToken new_state ((st):(sts)) ((HappyTerminal (tk))`HappyStk`stk)
  
  -- happyReduce is specialised for the common cases.
  
  happySpecReduce_0 i fn (1) tk st sts stk
       = happyFail (1) tk st sts stk
  happySpecReduce_0 nt fn j tk st@((HappyState (action))) sts stk
       = action nt j tk st ((st):(sts)) (fn `HappyStk` stk)
  
  happySpecReduce_1 i fn (1) tk st sts stk
       = happyFail (1) tk st sts stk
  happySpecReduce_1 nt fn j tk _ sts@(((st@(HappyState (action))):(_))) (v1`HappyStk`stk')
       = let r = fn v1 in
         happySeq r (action nt j tk st sts (r `HappyStk` stk'))
  
  happySpecReduce_2 i fn (1) tk st sts stk
       = happyFail (1) tk st sts stk
  happySpecReduce_2 nt fn j tk _ ((_):(sts@(((st@(HappyState (action))):(_))))) (v1`HappyStk`v2`HappyStk`stk')
       = let r = fn v1 v2 in
         happySeq r (action nt j tk st sts (r `HappyStk` stk'))
  
  happySpecReduce_3 i fn (1) tk st sts stk
       = happyFail (1) tk st sts stk
  happySpecReduce_3 nt fn j tk _ ((_):(((_):(sts@(((st@(HappyState (action))):(_))))))) (v1`HappyStk`v2`HappyStk`v3`HappyStk`stk')
       = let r = fn v1 v2 v3 in
         happySeq r (action nt j tk st sts (r `HappyStk` stk'))
  
  happyReduce k i fn (1) tk st sts stk
       = happyFail (1) tk st sts stk
  happyReduce k nt fn j tk st sts stk
       = case happyDrop (k - ((1) :: Int)) sts of
  	 sts1@(((st1@(HappyState (action))):(_))) ->
          	let r = fn stk in  -- it doesn't hurt to always seq here...
         		happyDoSeq r (action nt j tk st1 sts1 r)
  
  happyMonadReduce k nt fn (1) tk st sts stk
       = happyFail (1) tk st sts stk
  happyMonadReduce k nt fn j tk st sts stk =
          happyThen1 (fn stk tk) (\r -> action nt j tk st1 sts1 (r `HappyStk` drop_stk))
         where (sts1@(((st1@(HappyState (action))):(_)))) = happyDrop k ((st):(sts))
               drop_stk = happyDropStk k stk
  
  happyMonad2Reduce k nt fn (1) tk st sts stk
       = happyFail (1) 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@(((st1@(HappyState (action))):(_)))) = happyDrop k ((st):(sts))
               drop_stk = happyDropStk k stk
  
  
  
  
  
               new_state = action
  
  
  happyDrop (0) l = l
  happyDrop n ((_):(t)) = happyDrop (n - ((1) :: Int)) t
  
  happyDropStk (0) l = l
  happyDropStk n (x `HappyStk` xs) = happyDropStk (n - ((1)::Int)) xs
  
  -----------------------------------------------------------------------------
  -- Moving to a new state after a reduction
  
  {-# LINE 246 "templates/GenericTemplate.hs" #-}
  happyGoto action j tk st = action j j tk (HappyState action)
  
  
  -----------------------------------------------------------------------------
  -- Error recovery ((1) is the error token)
  
  -- parse error if we are in recovery and we fail again
  happyFail  (1) 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  (1) tk old_st (((HappyState (action))):(sts)) 
  						(saved_tok `HappyStk` _ `HappyStk` stk) =
  --	trace ("discarding state, depth " ++ show (length stk))  $
  	action (1) (1) tk (HappyState (action)) sts ((saved_tok`HappyStk`stk))
  -}
  
  -- Enter error recovery: generate an error token,
  --                       save the old token and carry on.
  happyFail  i tk (HappyState (action)) sts stk =
  --      trace "entering error recovery" $
  	action (1) (1) tk (HappyState (action)) sts ( (HappyErrorToken (i)) `HappyStk` stk)
  
  -- Internal happy errors:
  
  notHappyAtAll :: a
  notHappyAtAll = error "Internal Happy error\n"
  
  -----------------------------------------------------------------------------
  -- Hack to get the typechecker to accept our action functions
  
  
  
  
  
  
  
  -----------------------------------------------------------------------------
  -- 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.
  
  {-# LINE 311 "templates/GenericTemplate.hs" #-}
  {-# 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.
  