lojbanParser 0.1.9.1 → 0.1.9.2
raw patch · 2 files changed
+236/−47 lines, 2 filesPVP ok
version bump matches the API change (PVP)
API changes (from Hackage documentation)
Files
- lojbanParser.cabal +1/−1
- src/TestPappy.hs +235/−46
lojbanParser.cabal view
@@ -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. <PAF01143@nifty.ne.jp> maintainer: .iocikun.juj. <PAF01143@nifty.ne.jp>
src/TestPappy.hs view
@@ -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