diff --git a/lojbanParser.cabal b/lojbanParser.cabal --- a/lojbanParser.cabal +++ b/lojbanParser.cabal @@ -2,7 +2,7 @@ cabal-version: >= 1.8 name: lojbanParser -version: 0.1.9.1 +version: 0.1.9.2 stability: experimental author: .iocikun.juj. maintainer: .iocikun.juj. diff --git a/src/TestPappy.hs b/src/TestPappy.hs --- a/src/TestPappy.hs +++ b/src/TestPappy.hs @@ -18864,7 +18864,10 @@ Parsed h d11 e11 -> case testPappyu d11 of Parsed u d13 e13 -> - Parsed ( [d, a, h, u] ) d13 (maximum [e13,e11,e9,e7,e5]) + case testPappyh d13 of + NoParse e15 -> + Parsed ( [d, a, h, u] ) d13 (maximum [e15,e13,e11,e9,e7,e5]) + Parsed _ _ e15 -> pappyAlt5_2 (maximum [e15,e13,e11,e9,e7,e5]) NoParse e13 -> pappyAlt5_2 (maximum [e13,e11,e9,e7,e5]) NoParse e11 -> pappyAlt5_2 (maximum [e11,e9,e7,e5]) NoParse e9 -> pappyAlt5_2 (maximum [e9,e7,e5]) @@ -18878,7 +18881,13 @@ Parsed h d11 e11 -> case testPappye d11 of Parsed e d13 e13 -> - Parsed ( [d, a, h, e] ) d13 (maximum [e13,e11,e9,e7,e5]) + case testPappyh d13 of + NoParse e15 -> + case testPappyvowel d13 of + NoParse e17 -> + Parsed ( [d, a, h, e] ) d13 (maximum [e17,e15,e13,e11,e9,e7,e5]) + Parsed _ _ e17 -> pappyAlt5_3 (maximum [e17,e15,e13,e11,e9,e7,e5]) + Parsed _ _ e15 -> pappyAlt5_3 (maximum [e15,e13,e11,e9,e7,e5]) NoParse e13 -> pappyAlt5_3 (maximum [e13,e11,e9,e7,e5]) NoParse e11 -> pappyAlt5_3 (maximum [e11,e9,e7,e5]) NoParse e9 -> pappyAlt5_3 (maximum [e9,e7,e5]) @@ -18892,7 +18901,10 @@ Parsed h d11 e11 -> case testPappyu d11 of Parsed u d13 e13 -> - Parsed ( [d, i, h, u] ) d13 (maximum [e13,e11,e9,e7,e5]) + case testPappyh d13 of + NoParse e15 -> + Parsed ( [d, i, h, u] ) d13 (maximum [e15,e13,e11,e9,e7,e5]) + Parsed _ _ e15 -> pappyAlt5_4 (maximum [e15,e13,e11,e9,e7,e5]) NoParse e13 -> pappyAlt5_4 (maximum [e13,e11,e9,e7,e5]) NoParse e11 -> pappyAlt5_4 (maximum [e11,e9,e7,e5]) NoParse e9 -> pappyAlt5_4 (maximum [e9,e7,e5]) @@ -18906,7 +18918,13 @@ Parsed h d11 e11 -> case testPappye d11 of Parsed e d13 e13 -> - Parsed ( [d, i, h, e] ) d13 (maximum [e13,e11,e9,e7,e5]) + case testPappyh d13 of + NoParse e15 -> + case testPappyvowel d13 of + NoParse e17 -> + Parsed ( [d, i, h, e] ) d13 (maximum [e17,e15,e13,e11,e9,e7,e5]) + Parsed _ _ e17 -> pappyAlt5_5 (maximum [e17,e15,e13,e11,e9,e7,e5]) + Parsed _ _ e15 -> pappyAlt5_5 (maximum [e15,e13,e11,e9,e7,e5]) NoParse e13 -> pappyAlt5_5 (maximum [e13,e11,e9,e7,e5]) NoParse e11 -> pappyAlt5_5 (maximum [e11,e9,e7,e5]) NoParse e9 -> pappyAlt5_5 (maximum [e9,e7,e5]) @@ -18920,7 +18938,10 @@ Parsed h d11 e11 -> case testPappyu d11 of Parsed u d13 e13 -> - Parsed ( [d, e, h, u] ) d13 (maximum [e13,e11,e9,e7,e5]) + case testPappyh d13 of + NoParse e15 -> + Parsed ( [d, e, h, u] ) d13 (maximum [e15,e13,e11,e9,e7,e5]) + Parsed _ _ e15 -> pappyAlt5_6 (maximum [e15,e13,e11,e9,e7,e5]) NoParse e13 -> pappyAlt5_6 (maximum [e13,e11,e9,e7,e5]) NoParse e11 -> pappyAlt5_6 (maximum [e11,e9,e7,e5]) NoParse e9 -> pappyAlt5_6 (maximum [e9,e7,e5]) @@ -18934,7 +18955,13 @@ Parsed h d11 e11 -> case testPappye d11 of Parsed e d13 e13 -> - Parsed ( [d, e, h, e] ) d13 (maximum [e13,e11,e9,e7,e5]) + case testPappyh d13 of + NoParse e15 -> + case testPappyvowel d13 of + NoParse e17 -> + Parsed ( [d, e, h, e] ) d13 (maximum [e17,e15,e13,e11,e9,e7,e5]) + Parsed _ _ e17 -> pappyAlt5_7 (maximum [e17,e15,e13,e11,e9,e7,e5]) + Parsed _ _ e15 -> pappyAlt5_7 (maximum [e15,e13,e11,e9,e7,e5]) NoParse e13 -> pappyAlt5_7 (maximum [e13,e11,e9,e7,e5]) NoParse e11 -> pappyAlt5_7 (maximum [e11,e9,e7,e5]) NoParse e9 -> pappyAlt5_7 (maximum [e9,e7,e5]) @@ -18946,7 +18973,10 @@ Parsed e d9 e9 -> case testPappyi d9 of Parsed i d11 e11 -> - Parsed ( [d, e, i] ) d11 (maximum [e11,e9,e7,e5]) + case testPappyh d11 of + NoParse e13 -> + Parsed ( [d, e, i] ) d11 (maximum [e13,e11,e9,e7,e5]) + Parsed _ _ e13 -> pappyAlt5_8 (maximum [e13,e11,e9,e7,e5]) NoParse e11 -> pappyAlt5_8 (maximum [e11,e9,e7,e5]) NoParse e9 -> pappyAlt5_8 (maximum [e9,e7,e5]) NoParse e7 -> pappyAlt5_8 (max e7 e5) @@ -18959,7 +18989,10 @@ Parsed h d11 e11 -> case testPappyi d11 of Parsed i d13 e13 -> - Parsed ( [d, o, h, i] ) d13 (maximum [e13,e11,e9,e7,e5]) + case testPappyh d13 of + NoParse e15 -> + Parsed ( [d, o, h, i] ) d13 (maximum [e15,e13,e11,e9,e7,e5]) + Parsed _ _ e15 -> pappyAlt5_9 (maximum [e15,e13,e11,e9,e7,e5]) NoParse e13 -> pappyAlt5_9 (maximum [e13,e11,e9,e7,e5]) NoParse e11 -> pappyAlt5_9 (maximum [e11,e9,e7,e5]) NoParse e9 -> pappyAlt5_9 (maximum [e9,e7,e5]) @@ -18973,7 +19006,13 @@ Parsed h d11 e11 -> case testPappyo d11 of Parsed o d13 e13 -> - Parsed ( [m, i, h, o] ) d13 (maximum [e13,e11,e9,e7,e5]) + case testPappyh d13 of + NoParse e15 -> + case testPappyvowel d13 of + NoParse e17 -> + Parsed ( [m, i, h, o] ) d13 (maximum [e17,e15,e13,e11,e9,e7,e5]) + Parsed _ _ e17 -> pappyAlt5_10 (maximum [e17,e15,e13,e11,e9,e7,e5]) + Parsed _ _ e15 -> pappyAlt5_10 (maximum [e15,e13,e11,e9,e7,e5]) NoParse e13 -> pappyAlt5_10 (maximum [e13,e11,e9,e7,e5]) NoParse e11 -> pappyAlt5_10 (maximum [e11,e9,e7,e5]) NoParse e9 -> pappyAlt5_10 (maximum [e9,e7,e5]) @@ -18987,7 +19026,13 @@ Parsed h d11 e11 -> case testPappya d11 of Parsed a d13 e13 -> - Parsed ( [m, a, h, a] ) d13 (maximum [e13,e11,e9,e7,e5]) + case testPappyh d13 of + NoParse e15 -> + case testPappyvowel d13 of + NoParse e17 -> + Parsed ( [m, a, h, a] ) d13 (maximum [e17,e15,e13,e11,e9,e7,e5]) + Parsed _ _ e17 -> pappyAlt5_11 (maximum [e17,e15,e13,e11,e9,e7,e5]) + Parsed _ _ e15 -> pappyAlt5_11 (maximum [e15,e13,e11,e9,e7,e5]) NoParse e13 -> pappyAlt5_11 (maximum [e13,e11,e9,e7,e5]) NoParse e11 -> pappyAlt5_11 (maximum [e11,e9,e7,e5]) NoParse e9 -> pappyAlt5_11 (maximum [e9,e7,e5]) @@ -19001,7 +19046,13 @@ Parsed h d11 e11 -> case testPappya d11 of Parsed a d13 e13 -> - Parsed ( [m, i, h, a] ) d13 (maximum [e13,e11,e9,e7,e5]) + case testPappyh d13 of + NoParse e15 -> + case testPappyvowel d13 of + NoParse e17 -> + Parsed ( [m, i, h, a] ) d13 (maximum [e17,e15,e13,e11,e9,e7,e5]) + Parsed _ _ e17 -> pappyAlt5_12 (maximum [e17,e15,e13,e11,e9,e7,e5]) + Parsed _ _ e15 -> pappyAlt5_12 (maximum [e15,e13,e11,e9,e7,e5]) NoParse e13 -> pappyAlt5_12 (maximum [e13,e11,e9,e7,e5]) NoParse e11 -> pappyAlt5_12 (maximum [e11,e9,e7,e5]) NoParse e9 -> pappyAlt5_12 (maximum [e9,e7,e5]) @@ -19015,7 +19066,13 @@ Parsed h d11 e11 -> case testPappyo d11 of Parsed o d13 e13 -> - Parsed ( [d, o, h, o] ) d13 (maximum [e13,e11,e9,e7,e5]) + case testPappyh d13 of + NoParse e15 -> + case testPappyvowel d13 of + NoParse e17 -> + Parsed ( [d, o, h, o] ) d13 (maximum [e17,e15,e13,e11,e9,e7,e5]) + Parsed _ _ e17 -> pappyAlt5_13 (maximum [e17,e15,e13,e11,e9,e7,e5]) + Parsed _ _ e15 -> pappyAlt5_13 (maximum [e15,e13,e11,e9,e7,e5]) NoParse e13 -> pappyAlt5_13 (maximum [e13,e11,e9,e7,e5]) NoParse e11 -> pappyAlt5_13 (maximum [e11,e9,e7,e5]) NoParse e9 -> pappyAlt5_13 (maximum [e9,e7,e5]) @@ -19029,7 +19086,13 @@ Parsed h d11 e11 -> case testPappya d11 of Parsed a d13 e13 -> - Parsed ( [k, o, h, a] ) d13 (maximum [e13,e11,e9,e7,e5]) + case testPappyh d13 of + NoParse e15 -> + case testPappyvowel d13 of + NoParse e17 -> + Parsed ( [k, o, h, a] ) d13 (maximum [e17,e15,e13,e11,e9,e7,e5]) + Parsed _ _ e17 -> pappyAlt5_14 (maximum [e17,e15,e13,e11,e9,e7,e5]) + Parsed _ _ e15 -> pappyAlt5_14 (maximum [e15,e13,e11,e9,e7,e5]) NoParse e13 -> pappyAlt5_14 (maximum [e13,e11,e9,e7,e5]) NoParse e11 -> pappyAlt5_14 (maximum [e11,e9,e7,e5]) NoParse e9 -> pappyAlt5_14 (maximum [e9,e7,e5]) @@ -19043,7 +19106,10 @@ Parsed h d11 e11 -> case testPappyu d11 of Parsed u d13 e13 -> - Parsed ( [f, o, h, u] ) d13 (maximum [e13,e11,e9,e7,e5]) + case testPappyh d13 of + NoParse e15 -> + Parsed ( [f, o, h, u] ) d13 (maximum [e15,e13,e11,e9,e7,e5]) + Parsed _ _ e15 -> pappyAlt5_15 (maximum [e15,e13,e11,e9,e7,e5]) NoParse e13 -> pappyAlt5_15 (maximum [e13,e11,e9,e7,e5]) NoParse e11 -> pappyAlt5_15 (maximum [e11,e9,e7,e5]) NoParse e9 -> pappyAlt5_15 (maximum [e9,e7,e5]) @@ -19057,7 +19123,13 @@ Parsed h d11 e11 -> case testPappye d11 of Parsed e d13 e13 -> - Parsed ( [k, o, h, e] ) d13 (maximum [e13,e11,e9,e7,e5]) + case testPappyh d13 of + NoParse e15 -> + case testPappyvowel d13 of + NoParse e17 -> + Parsed ( [k, o, h, e] ) d13 (maximum [e17,e15,e13,e11,e9,e7,e5]) + Parsed _ _ e17 -> pappyAlt5_16 (maximum [e17,e15,e13,e11,e9,e7,e5]) + Parsed _ _ e15 -> pappyAlt5_16 (maximum [e15,e13,e11,e9,e7,e5]) NoParse e13 -> pappyAlt5_16 (maximum [e13,e11,e9,e7,e5]) NoParse e11 -> pappyAlt5_16 (maximum [e11,e9,e7,e5]) NoParse e9 -> pappyAlt5_16 (maximum [e9,e7,e5]) @@ -19071,7 +19143,10 @@ Parsed h d11 e11 -> case testPappyi d11 of Parsed i d13 e13 -> - Parsed ( [k, o, h, i] ) d13 (maximum [e13,e11,e9,e7,e5]) + case testPappyh d13 of + NoParse e15 -> + Parsed ( [k, o, h, i] ) d13 (maximum [e15,e13,e11,e9,e7,e5]) + Parsed _ _ e15 -> pappyAlt5_17 (maximum [e15,e13,e11,e9,e7,e5]) NoParse e13 -> pappyAlt5_17 (maximum [e13,e11,e9,e7,e5]) NoParse e11 -> pappyAlt5_17 (maximum [e11,e9,e7,e5]) NoParse e9 -> pappyAlt5_17 (maximum [e9,e7,e5]) @@ -19085,7 +19160,13 @@ Parsed h d11 e11 -> case testPappyo d11 of Parsed o d13 e13 -> - Parsed ( [k, o, h, o] ) d13 (maximum [e13,e11,e9,e7,e5]) + case testPappyh d13 of + NoParse e15 -> + case testPappyvowel d13 of + NoParse e17 -> + Parsed ( [k, o, h, o] ) d13 (maximum [e17,e15,e13,e11,e9,e7,e5]) + Parsed _ _ e17 -> pappyAlt5_18 (maximum [e17,e15,e13,e11,e9,e7,e5]) + Parsed _ _ e15 -> pappyAlt5_18 (maximum [e15,e13,e11,e9,e7,e5]) NoParse e13 -> pappyAlt5_18 (maximum [e13,e11,e9,e7,e5]) NoParse e11 -> pappyAlt5_18 (maximum [e11,e9,e7,e5]) NoParse e9 -> pappyAlt5_18 (maximum [e9,e7,e5]) @@ -19099,7 +19180,10 @@ Parsed h d11 e11 -> case testPappyu d11 of Parsed u d13 e13 -> - Parsed ( [k, o, h, u] ) d13 (maximum [e13,e11,e9,e7,e5]) + case testPappyh d13 of + NoParse e15 -> + Parsed ( [k, o, h, u] ) d13 (maximum [e15,e13,e11,e9,e7,e5]) + Parsed _ _ e15 -> pappyAlt5_19 (maximum [e15,e13,e11,e9,e7,e5]) NoParse e13 -> pappyAlt5_19 (maximum [e13,e11,e9,e7,e5]) NoParse e11 -> pappyAlt5_19 (maximum [e11,e9,e7,e5]) NoParse e9 -> pappyAlt5_19 (maximum [e9,e7,e5]) @@ -19113,7 +19197,13 @@ Parsed h d11 e11 -> case testPappya d11 of Parsed a d13 e13 -> - Parsed ( [f, o, h, a] ) d13 (maximum [e13,e11,e9,e7,e5]) + case testPappyh d13 of + NoParse e15 -> + case testPappyvowel d13 of + NoParse e17 -> + Parsed ( [f, o, h, a] ) d13 (maximum [e17,e15,e13,e11,e9,e7,e5]) + Parsed _ _ e17 -> pappyAlt5_20 (maximum [e17,e15,e13,e11,e9,e7,e5]) + Parsed _ _ e15 -> pappyAlt5_20 (maximum [e15,e13,e11,e9,e7,e5]) NoParse e13 -> pappyAlt5_20 (maximum [e13,e11,e9,e7,e5]) NoParse e11 -> pappyAlt5_20 (maximum [e11,e9,e7,e5]) NoParse e9 -> pappyAlt5_20 (maximum [e9,e7,e5]) @@ -19127,7 +19217,13 @@ Parsed h d11 e11 -> case testPappye d11 of Parsed e d13 e13 -> - Parsed ( [f, o, h, e] ) d13 (maximum [e13,e11,e9,e7,e5]) + case testPappyh d13 of + NoParse e15 -> + case testPappyvowel d13 of + NoParse e17 -> + Parsed ( [f, o, h, e] ) d13 (maximum [e17,e15,e13,e11,e9,e7,e5]) + Parsed _ _ e17 -> pappyAlt5_21 (maximum [e17,e15,e13,e11,e9,e7,e5]) + Parsed _ _ e15 -> pappyAlt5_21 (maximum [e15,e13,e11,e9,e7,e5]) NoParse e13 -> pappyAlt5_21 (maximum [e13,e11,e9,e7,e5]) NoParse e11 -> pappyAlt5_21 (maximum [e11,e9,e7,e5]) NoParse e9 -> pappyAlt5_21 (maximum [e9,e7,e5]) @@ -19141,7 +19237,10 @@ Parsed h d11 e11 -> case testPappyi d11 of Parsed i d13 e13 -> - Parsed ( [f, o, h, i] ) d13 (maximum [e13,e11,e9,e7,e5]) + case testPappyh d13 of + NoParse e15 -> + Parsed ( [f, o, h, i] ) d13 (maximum [e15,e13,e11,e9,e7,e5]) + Parsed _ _ e15 -> pappyAlt5_22 (maximum [e15,e13,e11,e9,e7,e5]) NoParse e13 -> pappyAlt5_22 (maximum [e13,e11,e9,e7,e5]) NoParse e11 -> pappyAlt5_22 (maximum [e11,e9,e7,e5]) NoParse e9 -> pappyAlt5_22 (maximum [e9,e7,e5]) @@ -19155,7 +19254,13 @@ Parsed h d11 e11 -> case testPappyo d11 of Parsed o d13 e13 -> - Parsed ( [f, o, h, o] ) d13 (maximum [e13,e11,e9,e7,e5]) + case testPappyh d13 of + NoParse e15 -> + case testPappyvowel d13 of + NoParse e17 -> + Parsed ( [f, o, h, o] ) d13 (maximum [e17,e15,e13,e11,e9,e7,e5]) + Parsed _ _ e17 -> pappyAlt5_23 (maximum [e17,e15,e13,e11,e9,e7,e5]) + Parsed _ _ e15 -> pappyAlt5_23 (maximum [e15,e13,e11,e9,e7,e5]) NoParse e13 -> pappyAlt5_23 (maximum [e13,e11,e9,e7,e5]) NoParse e11 -> pappyAlt5_23 (maximum [e11,e9,e7,e5]) NoParse e9 -> pappyAlt5_23 (maximum [e9,e7,e5]) @@ -19169,7 +19274,13 @@ Parsed h d11 e11 -> case testPappya d11 of Parsed a d13 e13 -> - Parsed ( [v, o, h, a] ) d13 (maximum [e13,e11,e9,e7,e5]) + case testPappyh d13 of + NoParse e15 -> + case testPappyvowel d13 of + NoParse e17 -> + Parsed ( [v, o, h, a] ) d13 (maximum [e17,e15,e13,e11,e9,e7,e5]) + Parsed _ _ e17 -> pappyAlt5_24 (maximum [e17,e15,e13,e11,e9,e7,e5]) + Parsed _ _ e15 -> pappyAlt5_24 (maximum [e15,e13,e11,e9,e7,e5]) NoParse e13 -> pappyAlt5_24 (maximum [e13,e11,e9,e7,e5]) NoParse e11 -> pappyAlt5_24 (maximum [e11,e9,e7,e5]) NoParse e9 -> pappyAlt5_24 (maximum [e9,e7,e5]) @@ -19183,7 +19294,13 @@ Parsed h d11 e11 -> case testPappye d11 of Parsed e d13 e13 -> - Parsed ( [v, o, h, e] ) d13 (maximum [e13,e11,e9,e7,e5]) + case testPappyh d13 of + NoParse e15 -> + case testPappyvowel d13 of + NoParse e17 -> + Parsed ( [v, o, h, e] ) d13 (maximum [e17,e15,e13,e11,e9,e7,e5]) + Parsed _ _ e17 -> pappyAlt5_25 (maximum [e17,e15,e13,e11,e9,e7,e5]) + Parsed _ _ e15 -> pappyAlt5_25 (maximum [e15,e13,e11,e9,e7,e5]) NoParse e13 -> pappyAlt5_25 (maximum [e13,e11,e9,e7,e5]) NoParse e11 -> pappyAlt5_25 (maximum [e11,e9,e7,e5]) NoParse e9 -> pappyAlt5_25 (maximum [e9,e7,e5]) @@ -19197,7 +19314,10 @@ Parsed h d11 e11 -> case testPappyi d11 of Parsed i d13 e13 -> - Parsed ( [v, o, h, i] ) d13 (maximum [e13,e11,e9,e7,e5]) + case testPappyh d13 of + NoParse e15 -> + Parsed ( [v, o, h, i] ) d13 (maximum [e15,e13,e11,e9,e7,e5]) + Parsed _ _ e15 -> pappyAlt5_26 (maximum [e15,e13,e11,e9,e7,e5]) NoParse e13 -> pappyAlt5_26 (maximum [e13,e11,e9,e7,e5]) NoParse e11 -> pappyAlt5_26 (maximum [e11,e9,e7,e5]) NoParse e9 -> pappyAlt5_26 (maximum [e9,e7,e5]) @@ -19211,7 +19331,13 @@ Parsed h d11 e11 -> case testPappyo d11 of Parsed o d13 e13 -> - Parsed ( [v, o, h, o] ) d13 (maximum [e13,e11,e9,e7,e5]) + case testPappyh d13 of + NoParse e15 -> + case testPappyvowel d13 of + NoParse e17 -> + Parsed ( [v, o, h, o] ) d13 (maximum [e17,e15,e13,e11,e9,e7,e5]) + Parsed _ _ e17 -> pappyAlt5_27 (maximum [e17,e15,e13,e11,e9,e7,e5]) + Parsed _ _ e15 -> pappyAlt5_27 (maximum [e15,e13,e11,e9,e7,e5]) NoParse e13 -> pappyAlt5_27 (maximum [e13,e11,e9,e7,e5]) NoParse e11 -> pappyAlt5_27 (maximum [e11,e9,e7,e5]) NoParse e9 -> pappyAlt5_27 (maximum [e9,e7,e5]) @@ -19225,7 +19351,10 @@ Parsed h d11 e11 -> case testPappyu d11 of Parsed u d13 e13 -> - Parsed ( [v, o, h, u] ) d13 (maximum [e13,e11,e9,e7,e5]) + case testPappyh d13 of + NoParse e15 -> + Parsed ( [v, o, h, u] ) d13 (maximum [e15,e13,e11,e9,e7,e5]) + Parsed _ _ e15 -> pappyAlt5_28 (maximum [e15,e13,e11,e9,e7,e5]) NoParse e13 -> pappyAlt5_28 (maximum [e13,e11,e9,e7,e5]) NoParse e11 -> pappyAlt5_28 (maximum [e11,e9,e7,e5]) NoParse e9 -> pappyAlt5_28 (maximum [e9,e7,e5]) @@ -19246,7 +19375,10 @@ Parsed r d7 e7 -> case testPappyi d7 of Parsed i d9 e9 -> - Parsed ( [r, i] ) d9 (maximum [e9,e7,e5]) + case testPappyh d9 of + NoParse e11 -> + Parsed ( [r, i] ) d9 (maximum [e11,e9,e7,e5]) + Parsed _ _ e11 -> pappyAlt5_30 (maximum [e11,e9,e7,e5]) NoParse e9 -> pappyAlt5_30 (maximum [e9,e7,e5]) NoParse e7 -> pappyAlt5_30 (max e7 e5) pappyAlt5_30 e5 = @@ -19254,7 +19386,13 @@ Parsed r d7 e7 -> case testPappya d7 of Parsed a d9 e9 -> - Parsed ( [r, a] ) d9 (maximum [e9,e7,e5]) + case testPappyh d9 of + NoParse e11 -> + case testPappyvowel d9 of + NoParse e13 -> + Parsed ( [r, a] ) d9 (maximum [e13,e11,e9,e7,e5]) + Parsed _ _ e13 -> pappyAlt5_31 (maximum [e13,e11,e9,e7,e5]) + Parsed _ _ e11 -> pappyAlt5_31 (maximum [e11,e9,e7,e5]) NoParse e9 -> pappyAlt5_31 (maximum [e9,e7,e5]) NoParse e7 -> pappyAlt5_31 (max e7 e5) pappyAlt5_31 e5 = @@ -19264,7 +19402,10 @@ Parsed a d9 e9 -> case testPappyh d9 of NoParse e11 -> - Parsed ( [t, a] ) d9 (maximum [e11,e9,e7,e5]) + case testPappyvowel d9 of + NoParse e13 -> + Parsed ( [t, a] ) d9 (maximum [e13,e11,e9,e7,e5]) + Parsed _ _ e13 -> pappyAlt5_32 (maximum [e13,e11,e9,e7,e5]) Parsed _ _ e11 -> pappyAlt5_32 (maximum [e11,e9,e7,e5]) NoParse e9 -> pappyAlt5_32 (maximum [e9,e7,e5]) NoParse e7 -> pappyAlt5_32 (max e7 e5) @@ -19275,10 +19416,7 @@ Parsed u d9 e9 -> case testPappyh d9 of NoParse e11 -> - case testPappyvowel d9 of - NoParse e13 -> - Parsed ( [t, u] ) d9 (maximum [e13,e11,e9,e7,e5]) - Parsed _ _ e13 -> pappyAlt5_33 (maximum [e13,e11,e9,e7,e5]) + Parsed ( [t, u] ) d9 (maximum [e11,e9,e7,e5]) Parsed _ _ e11 -> pappyAlt5_33 (maximum [e11,e9,e7,e5]) NoParse e9 -> pappyAlt5_33 (maximum [e9,e7,e5]) NoParse e7 -> pappyAlt5_33 (max e7 e5) @@ -19287,7 +19425,10 @@ Parsed t d7 e7 -> case testPappyi d7 of Parsed i d9 e9 -> - Parsed ( [t, i] ) d9 (maximum [e9,e7,e5]) + case testPappyh d9 of + NoParse e11 -> + Parsed ( [t, i] ) d9 (maximum [e11,e9,e7,e5]) + Parsed _ _ e11 -> pappyAlt5_34 (maximum [e11,e9,e7,e5]) NoParse e9 -> pappyAlt5_34 (maximum [e9,e7,e5]) NoParse e7 -> pappyAlt5_34 (max e7 e5) pappyAlt5_34 e5 = @@ -19299,7 +19440,13 @@ Parsed h d11 e11 -> case testPappyo d11 of Parsed o d13 e13 -> - Parsed ( [z, i, h, o] ) d13 (maximum [e13,e11,e9,e7,e5]) + case testPappyh d13 of + NoParse e15 -> + case testPappyvowel d13 of + NoParse e17 -> + Parsed ( [z, i, h, o] ) d13 (maximum [e17,e15,e13,e11,e9,e7,e5]) + Parsed _ _ e17 -> pappyAlt5_35 (maximum [e17,e15,e13,e11,e9,e7,e5]) + Parsed _ _ e15 -> pappyAlt5_35 (maximum [e15,e13,e11,e9,e7,e5]) NoParse e13 -> pappyAlt5_35 (maximum [e13,e11,e9,e7,e5]) NoParse e11 -> pappyAlt5_35 (maximum [e11,e9,e7,e5]) NoParse e9 -> pappyAlt5_35 (maximum [e9,e7,e5]) @@ -19313,7 +19460,13 @@ Parsed h d11 e11 -> case testPappya d11 of Parsed a d13 e13 -> - Parsed ( [k, e, h, a] ) d13 (maximum [e13,e11,e9,e7,e5]) + case testPappyh d13 of + NoParse e15 -> + case testPappyvowel d13 of + NoParse e17 -> + Parsed ( [k, e, h, a] ) d13 (maximum [e17,e15,e13,e11,e9,e7,e5]) + Parsed _ _ e17 -> pappyAlt5_36 (maximum [e17,e15,e13,e11,e9,e7,e5]) + Parsed _ _ e15 -> pappyAlt5_36 (maximum [e15,e13,e11,e9,e7,e5]) NoParse e13 -> pappyAlt5_36 (maximum [e13,e11,e9,e7,e5]) NoParse e11 -> pappyAlt5_36 (maximum [e11,e9,e7,e5]) NoParse e9 -> pappyAlt5_36 (maximum [e9,e7,e5]) @@ -19323,7 +19476,13 @@ Parsed m d7 e7 -> case testPappya d7 of Parsed a d9 e9 -> - Parsed ( [m, a] ) d9 (maximum [e9,e7,e5]) + case testPappyh d9 of + NoParse e11 -> + case testPappyvowel d9 of + NoParse e13 -> + Parsed ( [m, a] ) d9 (maximum [e13,e11,e9,e7,e5]) + Parsed _ _ e13 -> pappyAlt5_37 (maximum [e13,e11,e9,e7,e5]) + Parsed _ _ e11 -> pappyAlt5_37 (maximum [e11,e9,e7,e5]) NoParse e9 -> pappyAlt5_37 (maximum [e9,e7,e5]) NoParse e7 -> pappyAlt5_37 (max e7 e5) pappyAlt5_37 e5 = @@ -19335,7 +19494,10 @@ Parsed h d11 e11 -> case testPappyi d11 of Parsed i d13 e13 -> - Parsed ( [z, u, h, i] ) d13 (maximum [e13,e11,e9,e7,e5]) + case testPappyh d13 of + NoParse e15 -> + Parsed ( [z, u, h, i] ) d13 (maximum [e15,e13,e11,e9,e7,e5]) + Parsed _ _ e15 -> pappyAlt5_38 (maximum [e15,e13,e11,e9,e7,e5]) NoParse e13 -> pappyAlt5_38 (maximum [e13,e11,e9,e7,e5]) NoParse e11 -> pappyAlt5_38 (maximum [e11,e9,e7,e5]) NoParse e9 -> pappyAlt5_38 (maximum [e9,e7,e5]) @@ -19349,7 +19511,13 @@ Parsed h d11 e11 -> case testPappye d11 of Parsed e d13 e13 -> - Parsed ( [z, o, h, e] ) d13 (maximum [e13,e11,e9,e7,e5]) + case testPappyh d13 of + NoParse e15 -> + case testPappyvowel d13 of + NoParse e17 -> + Parsed ( [z, o, h, e] ) d13 (maximum [e17,e15,e13,e11,e9,e7,e5]) + Parsed _ _ e17 -> pappyAlt5_39 (maximum [e17,e15,e13,e11,e9,e7,e5]) + Parsed _ _ e15 -> pappyAlt5_39 (maximum [e15,e13,e11,e9,e7,e5]) NoParse e13 -> pappyAlt5_39 (maximum [e13,e11,e9,e7,e5]) NoParse e11 -> pappyAlt5_39 (maximum [e11,e9,e7,e5]) NoParse e9 -> pappyAlt5_39 (maximum [e9,e7,e5]) @@ -19363,7 +19531,10 @@ Parsed h d11 e11 -> case testPappyu d11 of Parsed u d13 e13 -> - Parsed ( [c, e, h, u] ) d13 (maximum [e13,e11,e9,e7,e5]) + case testPappyh d13 of + NoParse e15 -> + Parsed ( [c, e, h, u] ) d13 (maximum [e15,e13,e11,e9,e7,e5]) + Parsed _ _ e15 -> pappyAlt5_40 (maximum [e15,e13,e11,e9,e7,e5]) NoParse e13 -> pappyAlt5_40 (maximum [e13,e11,e9,e7,e5]) NoParse e11 -> pappyAlt5_40 (maximum [e11,e9,e7,e5]) NoParse e9 -> pappyAlt5_40 (maximum [e9,e7,e5]) @@ -19375,7 +19546,10 @@ Parsed a d9 e9 -> case testPappyh d9 of NoParse e11 -> - Parsed ( [d, a] ) d9 (maximum [e11,e9,e7,e5]) + case testPappyvowel d9 of + NoParse e13 -> + Parsed ( [d, a] ) d9 (maximum [e13,e11,e9,e7,e5]) + Parsed _ _ e13 -> pappyAlt5_41 (maximum [e13,e11,e9,e7,e5]) Parsed _ _ e11 -> pappyAlt5_41 (maximum [e11,e9,e7,e5]) NoParse e9 -> pappyAlt5_41 (maximum [e9,e7,e5]) NoParse e7 -> pappyAlt5_41 (max e7 e5) @@ -19386,7 +19560,10 @@ Parsed e d9 e9 -> case testPappyh d9 of NoParse e11 -> - Parsed ( [d, e] ) d9 (maximum [e11,e9,e7,e5]) + case testPappyvowel d9 of + NoParse e13 -> + Parsed ( [d, e] ) d9 (maximum [e13,e11,e9,e7,e5]) + Parsed _ _ e13 -> pappyAlt5_42 (maximum [e13,e11,e9,e7,e5]) Parsed _ _ e11 -> pappyAlt5_42 (maximum [e11,e9,e7,e5]) NoParse e9 -> pappyAlt5_42 (maximum [e9,e7,e5]) NoParse e7 -> pappyAlt5_42 (max e7 e5) @@ -19408,7 +19585,10 @@ Parsed o d9 e9 -> case testPappyh d9 of NoParse e11 -> - Parsed ( [k, o] ) d9 (maximum [e11,e9,e7,e5]) + case testPappyvowel d9 of + NoParse e13 -> + Parsed ( [k, o] ) d9 (maximum [e13,e11,e9,e7,e5]) + Parsed _ _ e13 -> pappyAlt5_44 (maximum [e13,e11,e9,e7,e5]) Parsed _ _ e11 -> pappyAlt5_44 (maximum [e11,e9,e7,e5]) NoParse e9 -> pappyAlt5_44 (maximum [e9,e7,e5]) NoParse e7 -> pappyAlt5_44 (max e7 e5) @@ -19417,7 +19597,10 @@ Parsed m d7 e7 -> case testPappyi d7 of Parsed i d9 e9 -> - Parsed ( [m, i] ) d9 (maximum [e9,e7,e5]) + case testPappyh d9 of + NoParse e11 -> + Parsed ( [m, i] ) d9 (maximum [e11,e9,e7,e5]) + Parsed _ _ e11 -> pappyAlt5_45 (maximum [e11,e9,e7,e5]) NoParse e9 -> pappyAlt5_45 (maximum [e9,e7,e5]) NoParse e7 -> pappyAlt5_45 (max e7 e5) pappyAlt5_45 e5 = @@ -19425,7 +19608,13 @@ Parsed d d7 e7 -> case testPappyo d7 of Parsed o d9 e9 -> - Parsed ( [d, o] ) d9 (maximum [e9,e7,e5]) + case testPappyh d9 of + NoParse e11 -> + case testPappyvowel d9 of + NoParse e13 -> + Parsed ( [d, o] ) d9 (maximum [e13,e11,e9,e7,e5]) + Parsed _ _ e13 -> pappyAlt5_46 (maximum [e13,e11,e9,e7,e5]) + Parsed _ _ e11 -> pappyAlt5_46 (maximum [e11,e9,e7,e5]) NoParse e9 -> pappyAlt5_46 (maximum [e9,e7,e5]) NoParse e7 -> pappyAlt5_46 (max e7 e5) pappyAlt5_46 e5 = NoParse e5