"fulsom" Csg: Results: case calc (Object X) ? ((,,) ?1 ?2 ?3) of (,,,) _ x _ _ -> x ==> ! Evaluated dead csg. case calc (Object Y) ? ((,,) ?1 ?2 ?3) of (,,,) _ x _ _ -> x ==> ! Evaluated dead csg. case calc (Object Z) ? ((,,) ?1 ?2 ?3) of (,,,) _ x _ _ -> x ==> ! Evaluated dead csg. case calc (Object (Plane ? ?1 ?2 ?3)) ?4 ?5 of (,,,) _ x _ _ -> x ==> ! Evaluated dead csg. case calc (Object X) ? ((,,) ?1 ?2 ?3) of (,,,) _ x _ _ -> x ==> ! Evaluated dead csg. case calc (Object Y) ? ((,,) ?1 ?2 ?3) of (,,,) _ x _ _ -> x ==> ! Evaluated dead csg. case calc (Object Z) ? ((,,) ?1 ?2 ?3) of (,,,) _ x _ _ -> x ==> ! Evaluated dead csg. case calc (Object (Plane ? ?1 ?2 ?3)) ?4 ?5 of (,,,) _ x _ _ -> x ==> ! Evaluated dead csg. case calc (Matrix (Object X) ((,,) ? ?1 ?2)) ?3 ?4 of (,,,) _ x _ _ -> x ==> ! Evaluated dead csg. case calc (Matrix (Object Y) ((,,) ? ?1 ?2)) ?3 ?4 of (,,,) _ x _ _ -> x ==> ! Evaluated dead csg. case calc (Matrix (Object Z) ((,,) ? ?1 ?2)) ?3 ?4 of (,,,) _ x _ _ -> x ==> ! Evaluated dead csg. case calc (Matrix (Object (Cube ? ?1 ?2 ?3)) ?4) ?5 ?6 of (,,,) _ x _ _ -> x ==> ! Evaluated dead csg. case calc (Matrix (Object (Plane ? ?1 ?2 ?3)) ?4) ?5 ?6 of (,,,) _ x _ _ -> x ==> ! Evaluated dead csg. case calc (Colour ? (Object X)) ?1 ((,,) ?2 ?3 ?4) of (,,,) _ x _ _ -> x ==> ! Evaluated dead csg. case calc (Colour ? (Object Y)) ?1 ((,,) ?2 ?3 ?4) of (,,,) _ x _ _ -> x ==> ! Evaluated dead csg. case calc (Colour ? (Object Z)) ?1 ((,,) ?2 ?3 ?4) of (,,,) _ x _ _ -> x ==> ! Evaluated dead csg. case calc (Colour ? (Object (Cube ?1 ?2 ?3 ?4))) ?5 ?6 of (,,,) _ x _ _ -> x ==> ! Evaluated dead csg. case calc (Colour ? (Object (Plane ?1 ?2 ?3 ?4))) ?5 ?6 of (,,,) _ x _ _ -> x ==> ! Evaluated dead csg. up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down case calc (Object X) ? ((,,) ?1 ?2 ?3) of (,,,) _ x _ _ -> x ==> ! Evaluated dead csg. up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down case calc (Object Y) ? ((,,) ?1 ?2 ?3) of (,,,) _ x _ _ -> x ==> ! Evaluated dead csg. up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down case calc (Object Z) ? ((,,) ?1 ?2 ?3) of (,,,) _ x _ _ -> x ==> ! Evaluated dead csg. up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down case (case case calc (Object (Sphere ? ?1 ?2 ?3)) ?4 ?5 of (,,,) _ x _ _ -> x of Func x -> x) ?6 ?7 of (,,,) _ x _ _ -> x ==> ! Evaluated dead csg. up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down case calc (Object (Plane ? ?1 ?2 ?3)) ?4 ?5 of (,,,) _ x _ _ -> x ==> ! Evaluated dead csg. case calc (Geom (Sub (Geom (Union ? ?1) (RotX ?2)) ?3) (RotX ?4)) ?5 ?6 of (,,,) _ x _ _ -> x ==> ! case calc (Matrix (Object X) ((,,) ? ?1 ?2)) ?3 ?4 of (,,,) _ x _ _ -> x ==> ! Evaluated dead csg. case calc (Matrix (Object Y) ((,,) ? ?1 ?2)) ?3 ?4 of (,,,) _ x _ _ -> x ==> ! Evaluated dead csg. case calc (Matrix (Object Z) ((,,) ? ?1 ?2)) ?3 ?4 of (,,,) _ x _ _ -> x ==> ! Evaluated dead csg. case calc (Matrix (Object (Cube ? ?1 ?2 ?3)) ?4) ?5 ?6 of (,,,) _ x _ _ -> x ==> ! Evaluated dead csg. case calc (Matrix (Object (Plane ? ?1 ?2 ?3)) ?4) ?5 ?6 of (,,,) _ x _ _ -> x ==> ! Evaluated dead csg. case calc (Matrix (Matrix (Object X) ((,,) ? ?1 ?2)) ?3) ?4 ?5 of (,,,) _ x _ _ -> x ==> ! Evaluated dead csg. case calc (Matrix (Matrix (Object Y) ((,,) ? ?1 ?2)) ?3) ?4 ?5 of (,,,) _ x _ _ -> x ==> ! Evaluated dead csg. case calc (Matrix (Matrix (Object Z) ((,,) ? ?1 ?2)) ?3) ?4 ?5 of (,,,) _ x _ _ -> x ==> ! Evaluated dead csg. case calc (Matrix (Matrix (Object (Cube ? ?1 ?2 ?3)) ?4) ?5) ?6 ?7 of (,,,) _ x _ _ -> x ==> ! Evaluated dead csg. case calc (Matrix (Matrix (Object (Plane ? ?1 ?2 ?3)) ?4) ?5) ?6 ?7 of (,,,) _ x _ _ -> x ==> ! Evaluated dead csg. case calc (Matrix (Colour ? (Object X)) ((,,) ?1 ?2 ?3)) ?4 ?5 of (,,,) _ x _ _ -> x ==> ! Evaluated dead csg. case calc (Matrix (Colour ? (Object Y)) ((,,) ?1 ?2 ?3)) ?4 ?5 of (,,,) _ x _ _ -> x ==> ! Evaluated dead csg. case calc (Matrix (Colour ? (Object Z)) ((,,) ?1 ?2 ?3)) ?4 ?5 of (,,,) _ x _ _ -> x ==> ! Evaluated dead csg. case calc (Matrix (Colour ? (Object (Cube ?1 ?2 ?3 ?4))) ?5) ?6 ?7 of (,,,) _ x _ _ -> x ==> ! Evaluated dead csg. case calc (Matrix (Colour ? (Object (Plane ?1 ?2 ?3 ?4))) ?5) ?6 ?7 of (,,,) _ x _ _ -> x ==> ! Evaluated dead csg. case calc (Matrix (Union (Object (Cube ? ?1 ?2 ?3)) (Object (Cube ?4 ?5 ?6 ?7))) ?8) ?9 ?10 of (,,,) _ x _ _ -> x ==> ! Evaluated dead csg. case calc (Matrix (Union (Object (Cube ? ?1 ?2 ?3)) (Object (Plane ?4 ?5 ?6 ?7))) ?8) ?9 ?10 of (,,,) _ x _ _ -> x ==> ! Evaluated dead csg. case calc (Matrix (Union (Object (Plane ? ?1 ?2 ?3)) (Object (Cube ?4 ?5 ?6 ?7))) ?8) ?9 ?10 of (,,,) _ x _ _ -> x ==> ! Evaluated dead csg. case calc (Matrix (Union (Object (Plane ? ?1 ?2 ?3)) (Object (Plane ?4 ?5 ?6 ?7))) ?8) ?9 ?10 of (,,,) _ x _ _ -> x ==> ! Evaluated dead csg. case calc (Matrix (Inter (Object (Cube ? ?1 ?2 ?3)) (Object (Cube ?4 ?5 ?6 ?7))) ?8) ?9 ?10 of (,,,) _ x _ _ -> x ==> ! Evaluated dead csg. case calc (Matrix (Inter (Object (Cube ? ?1 ?2 ?3)) (Object (Plane ?4 ?5 ?6 ?7))) ?8) ?9 ?10 of (,,,) _ x _ _ -> x ==> ! Evaluated dead csg. case calc (Matrix (Inter (Object (Plane ? ?1 ?2 ?3)) (Object (Cube ?4 ?5 ?6 ?7))) ?8) ?9 ?10 of (,,,) _ x _ _ -> x ==> ! Evaluated dead csg. case calc (Matrix (Inter (Object (Plane ? ?1 ?2 ?3)) (Object (Plane ?4 ?5 ?6 ?7))) ?8) ?9 ?10 of (,,,) _ x _ _ -> x ==> ! Evaluated dead csg. case calc (Colour ? (Object X)) ?1 ((,,) ?2 ?3 ?4) of (,,,) _ x _ _ -> x ==> ! Evaluated dead csg. case calc (Colour ? (Object Y)) ?1 ((,,) ?2 ?3 ?4) of (,,,) _ x _ _ -> x ==> ! Evaluated dead csg. case calc (Colour ? (Object Z)) ?1 ((,,) ?2 ?3 ?4) of (,,,) _ x _ _ -> x ==> ! Evaluated dead csg. case calc (Colour ? (Object (Cube ?1 ?2 ?3 ?4))) ?5 ?6 of (,,,) _ x _ _ -> x ==> ! Evaluated dead csg. case calc (Colour ? (Object (Plane ?1 ?2 ?3 ?4))) ?5 ?6 of (,,,) _ x _ _ -> x ==> ! Evaluated dead csg. case calc (Colour ? (Matrix (Object X) ((,,) ?1 ?2 ?3))) ?4 ?5 of (,,,) _ x _ _ -> x ==> ! Evaluated dead csg. case calc (Colour ? (Matrix (Object Y) ((,,) ?1 ?2 ?3))) ?4 ?5 of (,,,) _ x _ _ -> x ==> ! Evaluated dead csg. case calc (Colour ? (Matrix (Object Z) ((,,) ?1 ?2 ?3))) ?4 ?5 of (,,,) _ x _ _ -> x ==> ! Evaluated dead csg. case calc (Colour ? (Matrix (Object (Cube ?1 ?2 ?3 ?4)) ?5)) ?6 ?7 of (,,,) _ x _ _ -> x ==> ! Evaluated dead csg. case calc (Colour ? (Matrix (Object (Plane ?1 ?2 ?3 ?4)) ?5)) ?6 ?7 of (,,,) _ x _ _ -> x ==> ! Evaluated dead csg. case calc (Colour ? (Colour ?1 (Object X))) ?2 ((,,) ?3 ?4 ?5) of (,,,) _ x _ _ -> x ==> ! Evaluated dead csg. case calc (Colour ? (Colour ?1 (Object Y))) ?2 ((,,) ?3 ?4 ?5) of (,,,) _ x _ _ -> x ==> ! Evaluated dead csg. case calc (Colour ? (Colour ?1 (Object Z))) ?2 ((,,) ?3 ?4 ?5) of (,,,) _ x _ _ -> x ==> ! Evaluated dead csg. case calc (Colour ? (Colour ?1 (Object (Cube ?2 ?3 ?4 ?5)))) ?6 ?7 of (,,,) _ x _ _ -> x ==> ! Evaluated dead csg. case calc (Colour ? (Colour ?1 (Object (Plane ?2 ?3 ?4 ?5)))) ?6 ?7 of (,,,) _ x _ _ -> x ==> ! Evaluated dead csg. case calc (Colour ? (Union (Object (Cube ?1 ?2 ?3 ?4)) (Object (Cube ?5 ?6 ?7 ?8)))) ?9 ?10 of (,,,) _ x _ _ -> x ==> ! Evaluated dead csg. case calc (Colour ? (Union (Object (Cube ?1 ?2 ?3 ?4)) (Object (Plane ?5 ?6 ?7 ?8)))) ?9 ?10 of (,,,) _ x _ _ -> x ==> ! Evaluated dead csg. Interval: Results: bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down hi (pt ?) ==> ! Interval.hs:244:0-15: Non-exhaustive patterns in function hi lo (pt ?) ==> ! Interval.hs:243:0-15: Non-exhaustive patterns in function lo mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf unpt (# ? ?1) ==> ! Interval.hs:249:0-14: Non-exhaustive patterns in function unpt up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (down (# ? ?1)) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf down (up (# ? ?1)) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf hi (down (# ? ?1)) ==> ! Interval.hs:244:0-15: Non-exhaustive patterns in function hi down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 hi (pt ?) ==> ! Interval.hs:244:0-15: Non-exhaustive patterns in function hi topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf hi (up (# ? ?1)) ==> ! Interval.hs:244:0-15: Non-exhaustive patterns in function hi up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf lo (down (# ? ?1)) ==> ! Interval.hs:243:0-15: Non-exhaustive patterns in function lo down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 lo (pt ?) ==> ! Interval.hs:243:0-15: Non-exhaustive patterns in function lo topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf lo (up (# ? ?1)) ==> ! Interval.hs:243:0-15: Non-exhaustive patterns in function lo up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid1 ? (mid1 ?1 (# ?2 ?3)) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid2 ? (mid2 ?1 (# ?2 ?3)) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up unpt (# ? ?1) ==> ! Interval.hs:249:0-14: Non-exhaustive patterns in function unpt bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf up (down (# ? ?1)) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf up (up (# ? ?1)) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up bothalf ? (down (# ?1 ?2)) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf bothalf ? (up (# ?1 ?2)) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up bothalf ? (down (# ?1 ?2)) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (down (# ? ?1)) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up bothalf ? (mid1 ?1 (# ?2 ?3)) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up bothalf ? (mid2 ?1 (# ?2 ?3)) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf bothalf ? (sqr ?1 ?2 (pt ?3)) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up bothalf ? (up (# ?1 ?2)) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf up (up (# ? ?1)) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf bothalf ? (down (# ?1 ?2)) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up down (down (# ? ?1)) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (down (# ? ?1)) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (down (# ? ?1)) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up down (mid1 ? (# ?1 ?2)) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 down (mid2 ? (# ?1 ?2)) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down down (sqr ? ?1 (pt ?2)) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf down (up (# ? ?1)) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up down (mid1 ? (# ?1 ?2)) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf mid1 ? (down (# ?1 ?2)) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid1 ? (mid1 ?1 (# ?2 ?3)) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up down (mid2 ? (# ?1 ?2)) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf mid2 ? (down (# ?1 ?2)) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid2 ? (mid2 ?1 (# ?2 ?3)) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down down (sqr ? ?1 (pt ?2)) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf topbit ? (down (# ?1 ?2)) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf tophalf ? (down (# ?1 ?2)) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up down (up (# ? ?1)) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf up (down (# ? ?1)) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf up (up (# ? ?1)) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up hi (down (# ? ?1)) ==> ! Interval.hs:244:0-15: Non-exhaustive patterns in function hi bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (down (# ? ?1)) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf down (up (# ? ?1)) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up hi (mid1 ? (# ?1 ?2)) ==> ! Interval.hs:244:0-15: Non-exhaustive patterns in function hi bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid1 ? (mid1 ?1 (# ?2 ?3)) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up hi (mid2 ? (# ?1 ?2)) ==> ! Interval.hs:244:0-15: Non-exhaustive patterns in function hi bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid2 ? (mid2 ?1 (# ?2 ?3)) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up hi (pt ?) ==> ! Interval.hs:244:0-15: Non-exhaustive patterns in function hi down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down hi (sqr ? ?1 (pt ?2)) ==> ! Interval.hs:244:0-15: Non-exhaustive patterns in function hi up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up hi (up (# ? ?1)) ==> ! Interval.hs:244:0-15: Non-exhaustive patterns in function hi bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf up (down (# ? ?1)) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf up (up (# ? ?1)) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up lo (down (# ? ?1)) ==> ! Interval.hs:243:0-15: Non-exhaustive patterns in function lo bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (down (# ? ?1)) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf down (up (# ? ?1)) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up lo (mid1 ? (# ?1 ?2)) ==> ! Interval.hs:243:0-15: Non-exhaustive patterns in function lo bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid1 ? (mid1 ?1 (# ?2 ?3)) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up lo (mid2 ? (# ?1 ?2)) ==> ! Interval.hs:243:0-15: Non-exhaustive patterns in function lo bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid2 ? (mid2 ?1 (# ?2 ?3)) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up lo (pt ?) ==> ! Interval.hs:243:0-15: Non-exhaustive patterns in function lo down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down lo (sqr ? ?1 (pt ?2)) ==> ! Interval.hs:243:0-15: Non-exhaustive patterns in function lo up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up lo (up (# ? ?1)) ==> ! Interval.hs:243:0-15: Non-exhaustive patterns in function lo bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf up (down (# ? ?1)) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf up (up (# ? ?1)) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up mid1 ? (down (# ?1 ?2)) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (down (# ? ?1)) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down down (mid1 ? (# ?1 ?2)) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up mid1 ? (mid1 ?1 (# ?2 ?3)) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf mid1 ? (down (# ?1 ?2)) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid1 ? (mid1 ?1 (# ?2 ?3)) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf mid1 ? (up (# ?1 ?2)) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up mid1 ? (mid2 ?1 (# ?2 ?3)) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid1 ? (sqr ?1 ?2 (pt ?3)) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up mid1 ? (up (# ?1 ?2)) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down up (mid1 ? (# ?1 ?2)) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf up (up (# ? ?1)) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up mid2 ? (down (# ?1 ?2)) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (down (# ? ?1)) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 down (mid2 ? (# ?1 ?2)) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up mid2 ? (mid1 ?1 (# ?2 ?3)) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up mid2 ? (mid2 ?1 (# ?2 ?3)) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf mid2 ? (down (# ?1 ?2)) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid2 ? (mid2 ?1 (# ?2 ?3)) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf mid2 ? (up (# ?1 ?2)) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 mid2 ? (sqr ?1 ?2 (pt ?3)) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up mid2 ? (up (# ?1 ?2)) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 up (mid2 ? (# ?1 ?2)) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf up (up (# ? ?1)) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down down (sqr ? ?1 (pt ?2)) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up up (sqr ? ?1 (pt ?2)) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up topbit ? (down (# ?1 ?2)) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (down (# ? ?1)) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up topbit ? (mid1 ?1 (# ?2 ?3)) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up topbit ? (mid2 ?1 (# ?2 ?3)) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit topbit ? (sqr ?1 ?2 (pt ?3)) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf topbit ? (down (# ?1 ?2)) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf topbit ? (up (# ?1 ?2)) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up topbit ? (up (# ?1 ?2)) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf up (up (# ? ?1)) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up tophalf ? (down (# ?1 ?2)) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (down (# ? ?1)) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up tophalf ? (mid1 ?1 (# ?2 ?3)) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up tophalf ? (mid2 ?1 (# ?2 ?3)) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf tophalf ? (sqr ?1 ?2 (pt ?3)) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf tophalf ? (down (# ?1 ?2)) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up tophalf ? (up (# ?1 ?2)) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up tophalf ? (up (# ?1 ?2)) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up up (up (# ? ?1)) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up unpt (# ? ?1) ==> ! Interval.hs:249:0-14: Non-exhaustive patterns in function unpt unpt (bothalf ? (# ?1 ?2)) ==> ! Interval.hs:249:0-14: Non-exhaustive patterns in function unpt bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (down (# ? ?1)) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf down (up (# ? ?1)) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid1 ? (mid1 ?1 (# ?2 ?3)) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid2 ? (mid2 ?1 (# ?2 ?3)) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up unpt (topbit ? (# ?1 ?2)) ==> ! Interval.hs:249:0-14: Non-exhaustive patterns in function unpt bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up unpt (tophalf ? (# ?1 ?2)) ==> ! Interval.hs:249:0-14: Non-exhaustive patterns in function unpt bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf up (down (# ? ?1)) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf up (up (# ? ?1)) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf bothalf ? (up (# ?1 ?2)) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up up (down (# ? ?1)) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (down (# ? ?1)) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf down (up (# ? ?1)) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up up (mid1 ? (# ?1 ?2)) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid1 ? (mid1 ?1 (# ?2 ?3)) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf mid1 ? (up (# ?1 ?2)) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up up (mid2 ? (# ?1 ?2)) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid2 ? (mid2 ?1 (# ?2 ?3)) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf mid2 ? (up (# ?1 ?2)) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down up (sqr ? ?1 (pt ?2)) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf topbit ? (up (# ?1 ?2)) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up tophalf ? (up (# ?1 ?2)) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up up (up (# ? ?1)) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up up (down (# ? ?1)) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up up (mid1 ? (# ?1 ?2)) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up up (mid2 ? (# ?1 ?2)) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up up (sqr ? ?1 (pt ?2)) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up up (up (# ? ?1)) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf up (up (# ? ?1)) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up bothalf ? (down (# ?1 ?2)) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up bothalf ? (mid1 ?1 (# ?2 ?3)) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 bothalf ? (mid2 ?1 (# ?2 ?3)) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf bothalf ? (sqr ?1 ?2 (pt ?3)) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf bothalf ? (up (# ?1 ?2)) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up bothalf ? (down (# ?1 ?2)) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf bothalf ? (down (bothalf ?1 (# ?2 ?3))) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up down (down (# ? ?1)) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf down (up (# ? ?1)) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up bothalf ? (mid1 ?1 (# ?2 ?3)) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid1 ? (mid1 ?1 (# ?2 ?3)) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up bothalf ? (mid2 ?1 (# ?2 ?3)) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid2 ? (mid2 ?1 (# ?2 ?3)) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down bothalf ? (sqr ?1 ?2 (pt ?3)) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up bothalf ? (up (# ?1 ?2)) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf bothalf ? (up (bothalf ?1 (# ?2 ?3))) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up up (down (# ? ?1)) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf up (up (# ? ?1)) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up bothalf ? (down (# ?1 ?2)) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf bothalf ? (down (bothalf ?1 (# ?2 ?3))) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up bothalf ? (down (# ?1 ?2)) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf bothalf ? (up (# ?1 ?2)) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up down (down (# ? ?1)) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down down (down (bothalf ? (# ?1 ?2))) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up down (down (# ? ?1)) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf down (up (# ? ?1)) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up down (mid1 ? (# ?1 ?2)) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up down (mid2 ? (# ?1 ?2)) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down down (sqr ? ?1 (pt ?2)) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down bothalf ? (down (topbit ?1 (# ?2 ?3))) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up bothalf ? (down (tophalf ?1 (# ?2 ?3))) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up down (up (# ? ?1)) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up up (down (# ? ?1)) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf up (up (# ? ?1)) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up bothalf ? (mid1 ?1 (# ?2 ?3)) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf bothalf ? (mid1 ?1 (bothalf ?2 (# ?3 ?4))) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down bothalf ? (mid1 ?1 (# ?2 ?3)) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up mid1 ? (down (# ?1 ?2)) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up mid1 ? (mid1 ?1 (# ?2 ?3)) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid1 ? (mid1 ?1 (# ?2 ?3)) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up mid1 ? (mid2 ?1 (# ?2 ?3)) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid1 ? (sqr ?1 ?2 (pt ?3)) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf mid1 ? (up (# ?1 ?2)) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up bothalf ? (mid2 ?1 (# ?2 ?3)) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf bothalf ? (mid2 ?1 (bothalf ?2 (# ?3 ?4))) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 bothalf ? (mid2 ?1 (# ?2 ?3)) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up mid2 ? (down (# ?1 ?2)) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up mid2 ? (mid1 ?1 (# ?2 ?3)) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid2 ? (mid2 ?1 (# ?2 ?3)) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid2 ? (mid2 ?1 (# ?2 ?3)) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 mid2 ? (sqr ?1 ?2 (pt ?3)) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf mid2 ? (up (# ?1 ?2)) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf bothalf ? (sqr ?1 ?2 (pt ?3)) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 bothalf ? (sqr ?1 ?2 (pt ?3)) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down bothalf ? (sqr ?1 ?2 (sqr ?3 ?4 (pt ?5))) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up topbit ? (down (# ?1 ?2)) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up topbit ? (mid1 ?1 (# ?2 ?3)) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit topbit ? (mid2 ?1 (# ?2 ?3)) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit topbit ? (sqr ?1 ?2 (pt ?3)) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf topbit ? (up (# ?1 ?2)) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up tophalf ? (down (# ?1 ?2)) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up tophalf ? (mid1 ?1 (# ?2 ?3)) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf tophalf ? (mid2 ?1 (# ?2 ?3)) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf tophalf ? (sqr ?1 ?2 (pt ?3)) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up tophalf ? (up (# ?1 ?2)) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up bothalf ? (up (# ?1 ?2)) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf bothalf ? (up (bothalf ?1 (# ?2 ?3))) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up bothalf ? (down (# ?1 ?2)) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf bothalf ? (up (# ?1 ?2)) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up up (down (# ? ?1)) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up Kolor: Results: Matrix: Results: Oct: Results: octcsg -1 (Sub (Geom (Comp (Geom ? ?1)) (RotX ?2)) ?3) ==> ! Patchlevel: Results: case case case case case case case case version of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! case case case case case case case case case case case case case case case version of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! case case case case case case case case case case case case case case case case case case version of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad: Results: case case quadoct (O_Sub ? ([])) of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case quadoct (O_Sub ? ([])) of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case quadoct (O_Sub ? (: O_Empty ([]))) of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case quadoct (O_Sub ? (: (O_Sub ?1 ?2) ([]))) of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case quadoct (O_Sub ? ([])) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case quadoct (O_Sub ? ([])) of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case quadoct (O_Sub ? (: O_Empty ([]))) of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case quadoct (O_Sub ? (: (O_Sub ?1 ?2) ([]))) of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case quadoct (O_Sub ? ([])) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case quadoct (O_Sub ? (: ?1 ([]))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case quadoct (O_Sub ? ([])) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case quadoct (O_Sub ? ([])) of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case quadoct (O_Sub ? (: O_Empty ([]))) of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case quadoct (O_Sub ? (: (O_Sub ?1 ?2) ([]))) of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case quadoct (O_Sub ? ([])) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case quadoct (O_Sub ? (: ?1 ([]))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case quadoct (O_Sub ? (: ?1 (: ?2 ([])))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case quadoct (O_Sub ? ([])) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case quadoct (O_Sub ? (: ?1 ([]))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? ([])) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case quadoct (O_Sub ? ([])) of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case quadoct (O_Sub ? (: O_Empty ([]))) of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case quadoct (O_Sub ? (: (O_Sub ?1 ?2) ([]))) of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case quadoct (O_Sub ? (: (O_Sub ?1 ([])) (: O_Empty ?2))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case quadoct (O_Sub ? (: (O_Sub ?1 ([])) (: (O_Full ?2) ?3))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case quadoct (O_Sub ? (: (O_Sub ?1 ([])) (: (O_Sub ?2 ?3) ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case quadoct (O_Sub ? ([])) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case quadoct (O_Sub ? (: ?1 ([]))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case quadoct (O_Sub ? (: ?1 (: ?2 ([])))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case quadoct (O_Sub ? (: ?1 (: ?2 (: O_Empty ([]))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 ?4) ([]))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case quadoct (O_Sub ? ([])) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case quadoct (O_Sub ? (: ?1 ([]))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case quadoct (O_Sub ? (: ?1 (: ?2 ([])))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case quadoct (O_Sub ? ([])) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: ?1 ([]))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case quadoct (O_Sub ? ([])) of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case quadoct (O_Sub ? (: O_Empty ([]))) of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 ([])) ?2))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case quadoct (O_Sub ? (: (O_Sub ?1 ?2) ([]))) of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case quadoct (O_Sub ? (: (O_Sub ?1 ([])) (: O_Empty ?2))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty ([]))) (: O_Empty ?2))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ?3) ([]))) (: O_Empty ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 ([])) (: O_Empty ?2))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case quadoct (O_Sub ? (: (O_Sub ?1 ([])) (: (O_Full ?2) ?3))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty ([]))) (: (O_Full ?2) ?3))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ?3) ([]))) (: (O_Full ?4) ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 ([])) (: (O_Full ?2) ?3))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case quadoct (O_Sub ? (: (O_Sub ?1 ([])) (: (O_Sub ?2 ?3) ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty ([]))) (: (O_Sub ?2 ?3) ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ?3) ([]))) (: (O_Sub ?4 ?5) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 ([])) (: (O_Sub ?2 ?3) ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case quadoct (O_Sub ? ([])) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case quadoct (O_Sub ? (: ?1 ([]))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case quadoct (O_Sub ? (: ?1 (: ?2 ([])))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case quadoct (O_Sub ? (: ?1 (: ?2 (: O_Empty ([]))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 ?4) ([]))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case quadoct (O_Sub ? ([])) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case quadoct (O_Sub ? (: ?1 ([]))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case quadoct (O_Sub ? (: ?1 (: ?2 ([])))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 ([]))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case quadoct (O_Sub ? ([])) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: ?1 ([]))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 ([])))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case quadoct (O_Sub ? ([])) of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case quadoct (O_Sub ? (: O_Empty ([]))) of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 ([])) ?2))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: O_Empty ([]))) ?2))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 ?3) ([]))) ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 ([])) ?2))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case quadoct (O_Sub ? (: (O_Sub ?1 ?2) ([]))) of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case quadoct (O_Sub ? (: (O_Sub ?1 ([])) (: O_Empty ?2))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty ([]))) (: O_Empty ?2))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ?3) ([]))) (: O_Empty ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 ([])) (: O_Empty ?2))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 ([]))) (: O_Empty ?3))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 ([])) (: O_Empty ?2))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case quadoct (O_Sub ? (: (O_Sub ?1 ([])) (: (O_Full ?2) ?3))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty ([]))) (: (O_Full ?2) ?3))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ?3) ([]))) (: (O_Full ?4) ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 ([])) (: (O_Full ?2) ?3))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 ([]))) (: (O_Full ?3) ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 ([])) (: (O_Full ?2) ?3))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case quadoct (O_Sub ? (: (O_Sub ?1 ([])) (: (O_Sub ?2 ?3) ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty ([]))) (: (O_Sub ?2 ?3) ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 ([])) ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ?3) ?4))) (: (O_Sub ?5 ([])) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ?3) ([]))) (: (O_Sub ?4 ?5) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ?3) (: O_Empty ?4))) (: (O_Sub ?5 ([])) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ?3) (: (O_Full ?4) ?5))) (: (O_Sub ?6 ([])) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ?3) (: (O_Sub ?4 ?5) ?6))) (: (O_Sub ?7 ([])) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 ([])) (: (O_Sub ?2 ?3) ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 ([]))) (: (O_Sub ?3 ?4) ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 ([])) (: (O_Sub ?2 ?3) ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case quadoct (O_Sub ? ([])) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case quadoct (O_Sub ? (: ?1 ([]))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case quadoct (O_Sub ? (: ?1 (: ?2 ([])))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case quadoct (O_Sub ? (: ?1 (: ?2 (: O_Empty ([]))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 ?4) ([]))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case quadoct (O_Sub ? ([])) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case quadoct (O_Sub ? (: ?1 ([]))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case quadoct (O_Sub ? (: ?1 (: ?2 ([])))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 ([]))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 ([])))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:35:21-34: Irrefutable pattern failed for pattern (l4 : ll5) case case case case case quadoct (O_Sub ? ([])) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: ?1 ([]))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 ([])))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 ([]))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case quadoct (O_Sub ? ([])) of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case quadoct (O_Sub ? (: O_Empty ([]))) of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 ([])) ?2))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: O_Empty ([]))) ?2))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 ?3) ([]))) ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 ([])) ?2))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: ?2 ([]))) ?3))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 ([])) ?2))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case quadoct (O_Sub ? (: (O_Sub ?1 ?2) ([]))) of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case quadoct (O_Sub ? (: (O_Sub ?1 ([])) (: O_Empty ?2))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty ([]))) (: O_Empty ?2))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ?3) ([]))) (: O_Empty ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 ([])) (: O_Empty ?2))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 ([]))) (: O_Empty ?3))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 ([])))) (: O_Empty ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 ([])) (: O_Empty ?2))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 ([]))) (: O_Empty ?3))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 ([])) (: O_Empty ?2))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case quadoct (O_Sub ? (: (O_Sub ?1 ([])) (: (O_Full ?2) ?3))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty ([]))) (: (O_Full ?2) ?3))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ?3) ([]))) (: (O_Full ?4) ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 ([])) (: (O_Full ?2) ?3))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 ([]))) (: (O_Full ?3) ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 ([])))) (: (O_Full ?4) ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 ([])) (: (O_Full ?2) ?3))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 ([]))) (: (O_Full ?3) ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 ([])) (: (O_Full ?2) ?3))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case quadoct (O_Sub ? (: (O_Sub ?1 ([])) (: (O_Sub ?2 ?3) ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty ([]))) (: (O_Sub ?2 ?3) ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 ([])) ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: O_Empty ([]))) ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: (O_Sub ?4 ?5) ([]))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ?3) ?4))) (: (O_Sub ?5 ([])) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ?3) ?4))) (: (O_Sub ?5 (: O_Empty ([]))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ?3) ?4))) (: (O_Sub ?5 (: (O_Full ?6) ([]))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ?3) ?4))) (: (O_Sub ?5 (: (O_Sub ?6 ?7) ([]))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ?3) ([]))) (: (O_Sub ?4 ?5) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ?3) (: O_Empty ?4))) (: (O_Sub ?5 ([])) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ?3) (: O_Empty ?4))) (: (O_Sub ?5 (: O_Empty ([]))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ?3) (: O_Empty ?4))) (: (O_Sub ?5 (: (O_Full ?6) ([]))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ?3) (: O_Empty ?4))) (: (O_Sub ?5 (: (O_Sub ?6 ?7) ([]))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ?3) (: (O_Full ?4) ?5))) (: (O_Sub ?6 ([])) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ?3) (: (O_Full ?4) ?5))) (: (O_Sub ?6 (: O_Empty ([]))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ?3) (: (O_Full ?4) ?5))) (: (O_Sub ?6 (: (O_Full ?7) ([]))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ?3) (: (O_Full ?4) ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) ([]))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ?3) (: (O_Sub ?4 ?5) ?6))) (: (O_Sub ?7 ([])) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ?3) (: (O_Sub ?4 ?5) ?6))) (: (O_Sub ?7 (: O_Empty ([]))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ?3) (: (O_Sub ?4 ?5) ?6))) (: (O_Sub ?7 (: (O_Full ?8) ([]))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ?3) (: (O_Sub ?4 ?5) ?6))) (: (O_Sub ?7 (: (O_Sub ?8 ?9) ([]))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 ([])) (: (O_Sub ?2 ?3) ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 ([]))) (: (O_Sub ?3 ?4) ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 ([])))) (: (O_Sub ?4 ?5) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 ([])) (: (O_Sub ?2 ?3) ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 ([]))) (: (O_Sub ?3 ?4) ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 ([])) (: (O_Sub ?2 ?3) ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case quadoct (O_Sub ? ([])) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case quadoct (O_Sub ? (: ?1 ([]))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case quadoct (O_Sub ? (: ?1 (: ?2 ([])))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case quadoct (O_Sub ? (: ?1 (: ?2 (: O_Empty ([]))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 ?4) ([]))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 ([])) (: O_Empty ?4))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 ([])) (: (O_Full ?4) ?5))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 ([])) (: (O_Sub ?4 ?5) ?6))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case quadoct (O_Sub ? ([])) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case quadoct (O_Sub ? (: ?1 ([]))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case quadoct (O_Sub ? (: ?1 (: ?2 ([])))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 ([]))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 ([])))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:35:21-34: Irrefutable pattern failed for pattern (l4 : ll5) case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 (: O_Empty ([]))))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:35:38-51: Irrefutable pattern failed for pattern (l5 : ll6) case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 (: (O_Sub ?5 ?6) ([]))))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:35:38-51: Irrefutable pattern failed for pattern (l5 : ll6) case case case case case quadoct (O_Sub ? ([])) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: ?1 ([]))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 ([])))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 ([]))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 ([])))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:35:21-34: Irrefutable pattern failed for pattern (l4 : ll5) case case quadoct (O_Sub ? ([])) of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case quadoct (O_Sub ? (: O_Empty ([]))) of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 ([])) ?2))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: O_Empty ([]))) ?2))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 ?3) ([]))) ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 ([])) ?2))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: ?2 ([]))) ?3))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: ?2 (: ?3 ([])))) ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 ([])) ?2))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: ?2 ([]))) ?3))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 ([])) ?2))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case quadoct (O_Sub ? (: (O_Sub ?1 ?2) ([]))) of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case quadoct (O_Sub ? (: (O_Sub ?1 ([])) (: O_Empty ?2))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty ([]))) (: O_Empty ?2))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ?3) ([]))) (: O_Empty ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: O_Empty ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: O_Empty ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: O_Empty ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 ([])) (: O_Empty ?2))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 ([]))) (: O_Empty ?3))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 ([])))) (: O_Empty ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: O_Empty ([]))))) (: O_Empty ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ?5) ([]))))) (: O_Empty ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 ([])) (: O_Empty ?2))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 ([]))) (: O_Empty ?3))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 ([])))) (: O_Empty ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 ([])) (: O_Empty ?2))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 ([]))) (: O_Empty ?3))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case quadoct (O_Sub ? (: (O_Sub ?1 ([])) (: (O_Full ?2) ?3))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty ([]))) (: (O_Full ?2) ?3))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ?3) ([]))) (: (O_Full ?4) ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: (O_Full ?4) ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: (O_Full ?5) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: (O_Full ?6) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 ([])) (: (O_Full ?2) ?3))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 ([]))) (: (O_Full ?3) ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 ([])))) (: (O_Full ?4) ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: O_Empty ([]))))) (: (O_Full ?4) ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ?5) ([]))))) (: (O_Full ?6) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 ([])) (: (O_Full ?2) ?3))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 ([]))) (: (O_Full ?3) ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 ([])))) (: (O_Full ?4) ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 ([])) (: (O_Full ?2) ?3))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 ([]))) (: (O_Full ?3) ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case quadoct (O_Sub ? (: (O_Sub ?1 ([])) (: (O_Sub ?2 ?3) ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty ([]))) (: (O_Sub ?2 ?3) ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 ([])) ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: O_Empty ([]))) ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: (O_Sub ?4 ?5) ([]))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ?3) ?4))) (: (O_Sub ?5 ([])) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ?3) ?4))) (: (O_Sub ?5 (: O_Empty ([]))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ?3) ?4))) (: (O_Sub ?5 (: (O_Full ?6) ([]))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ?3) ?4))) (: (O_Sub ?5 (: (O_Sub ?6 ?7) ([]))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ?3) ([]))) (: (O_Sub ?4 ?5) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ?3) (: O_Empty ?4))) (: (O_Sub ?5 ([])) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ?3) (: O_Empty ?4))) (: (O_Sub ?5 (: O_Empty ([]))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ?3) (: O_Empty ?4))) (: (O_Sub ?5 (: (O_Full ?6) ([]))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ?3) (: O_Empty ?4))) (: (O_Sub ?5 (: (O_Sub ?6 ?7) ([]))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ?3) (: (O_Full ?4) ?5))) (: (O_Sub ?6 ([])) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ?3) (: (O_Full ?4) ?5))) (: (O_Sub ?6 (: O_Empty ([]))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ?3) (: (O_Full ?4) ?5))) (: (O_Sub ?6 (: (O_Full ?7) ([]))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ?3) (: (O_Full ?4) ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) ([]))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ?3) (: (O_Sub ?4 ?5) ?6))) (: (O_Sub ?7 ([])) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ?3) (: (O_Sub ?4 ?5) ?6))) (: (O_Sub ?7 (: O_Empty ([]))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ?3) (: (O_Sub ?4 ?5) ?6))) (: (O_Sub ?7 (: (O_Full ?8) ([]))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ?3) (: (O_Sub ?4 ?5) ?6))) (: (O_Sub ?7 (: (O_Sub ?8 ?9) ([]))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 ([])) (: (O_Sub ?2 ?3) ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 ([]))) (: (O_Sub ?3 ?4) ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 ([])))) (: (O_Sub ?4 ?5) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: O_Empty ([]))))) (: (O_Sub ?4 ?5) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ?5) ([]))))) (: (O_Sub ?6 ?7) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 ([])) (: (O_Sub ?2 ?3) ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 ([]))) (: (O_Sub ?3 ?4) ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 ([])))) (: (O_Sub ?4 ?5) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 ([])) (: (O_Sub ?2 ?3) ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 ([]))) (: (O_Sub ?3 ?4) ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case quadoct (O_Sub ? ([])) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case quadoct (O_Sub ? (: ?1 ([]))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case quadoct (O_Sub ? (: ?1 (: ?2 ([])))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case quadoct (O_Sub ? (: ?1 (: ?2 (: O_Empty ([]))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: O_Empty (: (O_Sub ?3 ([])) ?4))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 ?4) ([]))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 ([])) (: O_Empty ?4))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: O_Empty ([]))) (: O_Empty ?4))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ?5) ([]))) (: O_Empty ?6))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 ([])) (: O_Empty ?4))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 ([])) (: (O_Full ?4) ?5))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: O_Empty ([]))) (: (O_Full ?4) ?5))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ?5) ([]))) (: (O_Full ?6) ?7))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 ([])) (: (O_Full ?4) ?5))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 ([])) (: (O_Sub ?4 ?5) ?6))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: O_Empty ([]))) (: (O_Sub ?4 ?5) ?6))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ?5) ([]))) (: (O_Sub ?6 ?7) ?8))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 ([])) (: (O_Sub ?4 ?5) ?6))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case quadoct (O_Sub ? ([])) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case quadoct (O_Sub ? (: ?1 ([]))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case quadoct (O_Sub ? (: ?1 (: ?2 ([])))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 ([]))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 ([])))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:35:21-34: Irrefutable pattern failed for pattern (l4 : ll5) case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 (: O_Empty ([]))))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:35:38-51: Irrefutable pattern failed for pattern (l5 : ll6) case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 (: (O_Sub ?5 ?6) ([]))))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:35:38-51: Irrefutable pattern failed for pattern (l5 : ll6) case case case case case quadoct (O_Sub ? ([])) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: ?1 ([]))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 ([])))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 ([]))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 ([])))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:35:21-34: Irrefutable pattern failed for pattern (l4 : ll5) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 (: ?5 ([]))))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:35:38-51: Irrefutable pattern failed for pattern (l5 : ll6) case case quadoct (O_Sub ? ([])) of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case quadoct (O_Sub ? (: O_Empty ([]))) of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 ([])) ?2))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: O_Empty ([]))) ?2))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 ?3) ([]))) ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 ([])) ?2))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: ?2 ([]))) ?3))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: ?2 (: ?3 ([])))) ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: ?2 (: ?3 (: O_Empty ([]))))) ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ?5) ([]))))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 ([])) ?2))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: ?2 ([]))) ?3))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: ?2 (: ?3 ([])))) ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 ([])) ?2))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: ?2 ([]))) ?3))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case quadoct (O_Sub ? (: (O_Sub ?1 ?2) ([]))) of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case quadoct (O_Sub ? (: (O_Sub ?1 ([])) (: O_Empty ?2))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty ([]))) (: O_Empty ?2))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: O_Empty ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ?3) ([]))) (: O_Empty ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: O_Empty ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty ([]))) (: O_Empty ?3))) (: O_Empty ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) (: O_Empty ?5))) (: O_Empty ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: O_Empty ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: O_Empty ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty ([]))) (: (O_Full ?3) ?4))) (: O_Empty ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) (: (O_Full ?5) ?6))) (: O_Empty ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: O_Empty ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: O_Empty ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty ([]))) (: (O_Sub ?3 ?4) ?5))) (: O_Empty ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) (: (O_Sub ?5 ?6) ?7))) (: O_Empty ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: O_Empty ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 ([])) (: O_Empty ?2))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 ([]))) (: O_Empty ?3))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 ([])))) (: O_Empty ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: O_Empty ([]))))) (: O_Empty ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ?5) ([]))))) (: O_Empty ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 ([])) (: O_Empty ?2))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 ([]))) (: O_Empty ?3))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 ([])))) (: O_Empty ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 ([]))))) (: O_Empty ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 ([])) (: O_Empty ?2))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 ([]))) (: O_Empty ?3))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 ([])))) (: O_Empty ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case quadoct (O_Sub ? (: (O_Sub ?1 ([])) (: (O_Full ?2) ?3))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty ([]))) (: (O_Full ?2) ?3))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: (O_Full ?4) ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ?3) ([]))) (: (O_Full ?4) ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: (O_Full ?4) ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty ([]))) (: O_Empty ?3))) (: (O_Full ?4) ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) (: O_Empty ?5))) (: (O_Full ?6) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: (O_Full ?4) ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: (O_Full ?5) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty ([]))) (: (O_Full ?3) ?4))) (: (O_Full ?5) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) (: (O_Full ?5) ?6))) (: (O_Full ?7) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: (O_Full ?5) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: (O_Full ?6) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty ([]))) (: (O_Sub ?3 ?4) ?5))) (: (O_Full ?6) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) (: (O_Sub ?5 ?6) ?7))) (: (O_Full ?8) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: (O_Full ?6) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 ([])) (: (O_Full ?2) ?3))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 ([]))) (: (O_Full ?3) ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 ([])))) (: (O_Full ?4) ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: O_Empty ([]))))) (: (O_Full ?4) ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ?5) ([]))))) (: (O_Full ?6) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 ([])) (: (O_Full ?2) ?3))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 ([]))) (: (O_Full ?3) ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 ([])))) (: (O_Full ?4) ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 ([]))))) (: (O_Full ?5) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 ([])) (: (O_Full ?2) ?3))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 ([]))) (: (O_Full ?3) ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 ([])))) (: (O_Full ?4) ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case quadoct (O_Sub ? (: (O_Sub ?1 ([])) (: (O_Sub ?2 ?3) ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty ([]))) (: (O_Sub ?2 ?3) ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 ([])) ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: O_Empty ([]))) ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: (O_Sub ?4 ?5) ([]))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: O_Empty ?5))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: (O_Full ?5) ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: (O_Sub ?5 ?6) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ?3) ?4))) (: (O_Sub ?5 ([])) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ?3) ?4))) (: (O_Sub ?5 (: O_Empty ([]))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: (O_Sub ?4 (: O_Empty (: O_Empty ?5))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: (O_Sub ?4 (: O_Empty (: (O_Full ?5) ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: (O_Sub ?4 (: O_Empty (: (O_Sub ?5 ?6) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ?3) ?4))) (: (O_Sub ?5 (: (O_Full ?6) ([]))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: (O_Sub ?4 (: (O_Full ?5) (: O_Empty ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: (O_Sub ?4 (: (O_Full ?5) (: (O_Full ?6) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: (O_Sub ?4 (: (O_Full ?5) (: (O_Sub ?6 ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ?3) ?4))) (: (O_Sub ?5 (: (O_Sub ?6 ?7) ([]))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: O_Empty ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: (O_Full ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: (O_Sub ?7 ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ?3) ([]))) (: (O_Sub ?4 ?5) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ?3) (: O_Empty ?4))) (: (O_Sub ?5 ([])) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ?3) (: O_Empty ?4))) (: (O_Sub ?5 (: O_Empty ([]))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: (O_Sub ?4 (: O_Empty (: O_Empty ?5))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: (O_Sub ?4 (: O_Empty (: (O_Full ?5) ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: (O_Sub ?4 (: O_Empty (: (O_Sub ?5 ?6) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ?3) (: O_Empty ?4))) (: (O_Sub ?5 (: (O_Full ?6) ([]))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: (O_Sub ?4 (: (O_Full ?5) (: O_Empty ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: (O_Sub ?4 (: (O_Full ?5) (: (O_Full ?6) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: (O_Sub ?4 (: (O_Full ?5) (: (O_Sub ?6 ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ?3) (: O_Empty ?4))) (: (O_Sub ?5 (: (O_Sub ?6 ?7) ([]))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: O_Empty ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: (O_Full ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: (O_Sub ?7 ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ?3) (: (O_Full ?4) ?5))) (: (O_Sub ?6 ([])) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ?3) (: (O_Full ?4) ?5))) (: (O_Sub ?6 (: O_Empty ([]))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: O_Empty (: O_Empty ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: O_Empty (: (O_Full ?6) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: O_Empty (: (O_Sub ?6 ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ?3) (: (O_Full ?4) ?5))) (: (O_Sub ?6 (: (O_Full ?7) ([]))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: (O_Full ?6) (: O_Empty ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: (O_Full ?6) (: (O_Full ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: (O_Full ?6) (: (O_Sub ?7 ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ?3) (: (O_Full ?4) ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) ([]))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: (O_Sub ?6 ?7) (: O_Empty ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: (O_Sub ?6 ?7) (: (O_Full ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: (O_Sub ?6 ?7) (: (O_Sub ?8 ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ?3) (: (O_Sub ?4 ?5) ?6))) (: (O_Sub ?7 ([])) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ?3) (: (O_Sub ?4 ?5) ?6))) (: (O_Sub ?7 (: O_Empty ([]))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: O_Empty (: O_Empty ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: O_Empty (: (O_Full ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: O_Empty (: (O_Sub ?7 ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ?3) (: (O_Sub ?4 ?5) ?6))) (: (O_Sub ?7 (: (O_Full ?8) ([]))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: O_Empty ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: (O_Full ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: (O_Sub ?8 ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ?3) (: (O_Sub ?4 ?5) ?6))) (: (O_Sub ?7 (: (O_Sub ?8 ?9) ([]))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: O_Empty ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: (O_Full ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: (O_Sub ?9 ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 ([])) (: (O_Sub ?2 ?3) ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 ([]))) (: (O_Sub ?3 ?4) ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 ([])))) (: (O_Sub ?4 ?5) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: O_Empty ([]))))) (: (O_Sub ?4 ?5) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: O_Empty (: O_Empty ?4))))) (: (O_Sub ?5 ([])) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: O_Empty (: O_Empty ?4))))) (: (O_Sub ?5 (: ?6 ([]))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: O_Empty (: O_Empty ?4))))) (: (O_Sub ?5 (: ?6 (: ?7 ([])))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:44:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: O_Empty (: (O_Sub ?4 ?5) ?6))))) (: (O_Sub ?7 ([])) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: O_Empty (: (O_Sub ?4 ?5) ?6))))) (: (O_Sub ?7 (: ?8 ([]))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: O_Empty (: (O_Sub ?4 ?5) ?6))))) (: (O_Sub ?7 (: ?8 (: ?9 ([])))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:44:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ?5) ([]))))) (: (O_Sub ?6 ?7) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ?5) (: O_Empty ?6))))) (: (O_Sub ?7 ([])) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ?5) (: O_Empty ?6))))) (: (O_Sub ?7 (: ?8 ([]))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ?5) (: O_Empty ?6))))) (: (O_Sub ?7 (: ?8 (: ?9 ([])))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:44:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ?5) (: (O_Full ?6) ?7))))) (: (O_Sub ?8 ([])) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ?5) (: (O_Full ?6) ?7))))) (: (O_Sub ?8 (: ?9 ([]))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ?5) (: (O_Full ?6) ?7))))) (: (O_Sub ?8 (: ?9 (: ?10 ([])))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:44:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ?5) (: (O_Sub ?6 ?7) ?8))))) (: (O_Sub ?9 ([])) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ?5) (: (O_Sub ?6 ?7) ?8))))) (: (O_Sub ?9 (: ?10 ([]))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ?5) (: (O_Sub ?6 ?7) ?8))))) (: (O_Sub ?9 (: ?10 (: ?11 ([])))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:44:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 ([])) (: (O_Sub ?2 ?3) ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 ([]))) (: (O_Sub ?3 ?4) ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 ([])))) (: (O_Sub ?4 ?5) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 ([]))))) (: (O_Sub ?5 ?6) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 ([])) (: (O_Sub ?2 ?3) ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 ([]))) (: (O_Sub ?3 ?4) ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 ([])))) (: (O_Sub ?4 ?5) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case quadoct (O_Sub ? ([])) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case quadoct (O_Sub ? (: ?1 ([]))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case quadoct (O_Sub ? (: ?1 (: ?2 ([])))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case quadoct (O_Sub ? (: ?1 (: ?2 (: O_Empty ([]))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: O_Empty (: (O_Sub ?3 ([])) ?4))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: O_Empty (: (O_Sub ?3 (: O_Empty ([]))) ?4))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: O_Empty (: (O_Sub ?3 (: (O_Sub ?4 ?5) ([]))) ?6))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: O_Empty (: (O_Sub ?3 ([])) ?4))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 ?4) ([]))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 ([])) (: O_Empty ?4))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: O_Empty ([]))) (: O_Empty ?4))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ?5) ([]))) (: O_Empty ?6))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 ([])) (: O_Empty ?4))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: ?4 ([]))) (: O_Empty ?5))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 ([])) (: O_Empty ?4))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 ([])) (: (O_Full ?4) ?5))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: O_Empty ([]))) (: (O_Full ?4) ?5))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ?5) ([]))) (: (O_Full ?6) ?7))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 ([])) (: (O_Full ?4) ?5))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: ?4 ([]))) (: (O_Full ?5) ?6))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 ([])) (: (O_Full ?4) ?5))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 ([])) (: (O_Sub ?4 ?5) ?6))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: O_Empty ([]))) (: (O_Sub ?4 ?5) ?6))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: O_Empty (: O_Empty ?4))) (: (O_Sub ?5 ([])) ?6))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: O_Empty (: O_Empty ?4))) (: (O_Sub ?5 (: O_Empty ([]))) ?6))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: O_Empty (: O_Empty ?4))) (: (O_Sub ?5 (: (O_Sub ?6 ?7) ([]))) ?8))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: O_Empty (: (O_Sub ?4 ?5) ?6))) (: (O_Sub ?7 ([])) ?8))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: O_Empty (: (O_Sub ?4 ?5) ?6))) (: (O_Sub ?7 (: O_Empty ([]))) ?8))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: O_Empty (: (O_Sub ?4 ?5) ?6))) (: (O_Sub ?7 (: (O_Full ?8) ([]))) ?9))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: O_Empty (: (O_Sub ?4 ?5) ?6))) (: (O_Sub ?7 (: (O_Sub ?8 ?9) ([]))) ?10))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ?5) ([]))) (: (O_Sub ?6 ?7) ?8))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ?5) (: O_Empty ?6))) (: (O_Sub ?7 ([])) ?8))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ?5) (: O_Empty ?6))) (: (O_Sub ?7 (: O_Empty ([]))) ?8))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ?5) (: O_Empty ?6))) (: (O_Sub ?7 (: (O_Full ?8) ([]))) ?9))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ?5) (: O_Empty ?6))) (: (O_Sub ?7 (: (O_Sub ?8 ?9) ([]))) ?10))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ?5) (: (O_Full ?6) ?7))) (: (O_Sub ?8 ([])) ?9))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ?5) (: (O_Full ?6) ?7))) (: (O_Sub ?8 (: O_Empty ([]))) ?9))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ?5) (: (O_Full ?6) ?7))) (: (O_Sub ?8 (: (O_Full ?9) ([]))) ?10))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ?5) (: (O_Full ?6) ?7))) (: (O_Sub ?8 (: (O_Sub ?9 ?10) ([]))) ?11))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ?5) (: (O_Sub ?6 ?7) ?8))) (: (O_Sub ?9 ([])) ?10))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ?5) (: (O_Sub ?6 ?7) ?8))) (: (O_Sub ?9 (: O_Empty ([]))) ?10))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ?5) (: (O_Sub ?6 ?7) ?8))) (: (O_Sub ?9 (: (O_Full ?10) ([]))) ?11))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ?5) (: (O_Sub ?6 ?7) ?8))) (: (O_Sub ?9 (: (O_Sub ?10 ?11) ([]))) ?12))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 ([])) (: (O_Sub ?4 ?5) ?6))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: ?4 ([]))) (: (O_Sub ?5 ?6) ?7))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 ([])) (: (O_Sub ?4 ?5) ?6))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case quadoct (O_Sub ? ([])) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case quadoct (O_Sub ? (: ?1 ([]))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case quadoct (O_Sub ? (: ?1 (: ?2 ([])))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 ([]))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 ([])))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:35:21-34: Irrefutable pattern failed for pattern (l4 : ll5) case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 (: O_Empty ([]))))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:35:38-51: Irrefutable pattern failed for pattern (l5 : ll6) case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 (: (O_Sub ?5 ?6) ([]))))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:35:38-51: Irrefutable pattern failed for pattern (l5 : ll6) case case case case case quadoct (O_Sub ? ([])) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: ?1 ([]))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 ([])))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 ([]))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 ([])))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:35:21-34: Irrefutable pattern failed for pattern (l4 : ll5) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 (: ?5 ([]))))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:35:38-51: Irrefutable pattern failed for pattern (l5 : ll6) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 (: ?5 (: ?6 ([])))))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:36:21-34: Irrefutable pattern failed for pattern (l6 : ll7) case case quadoct (O_Sub ? ([])) of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case quadoct (O_Sub ? (: O_Empty ([]))) of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 ([])) ?2))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: O_Empty ([]))) ?2))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 ?3) ([]))) ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty ([]))) (: O_Empty ?3))) ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) (: O_Empty ?5))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty ([]))) (: (O_Full ?3) ?4))) ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) (: (O_Full ?5) ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty ([]))) (: (O_Sub ?3 ?4) ?5))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) (: (O_Sub ?5 ?6) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 ([])) ?2))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: ?2 ([]))) ?3))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: ?2 (: ?3 ([])))) ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: ?2 (: ?3 (: O_Empty ([]))))) ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ?5) ([]))))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 ([])) ?2))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: ?2 ([]))) ?3))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: ?2 (: ?3 ([])))) ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 ([]))))) ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 ([])) ?2))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: ?2 ([]))) ?3))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: ?2 (: ?3 ([])))) ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case quadoct (O_Sub ? (: (O_Sub ?1 ?2) ([]))) of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case quadoct (O_Sub ? (: (O_Sub ?1 ([])) (: O_Empty ?2))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty ([]))) (: O_Empty ?2))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: O_Empty ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: O_Empty ([]))) ?3))) (: O_Empty ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) ?5))) (: O_Empty ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: O_Empty ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ?3) ([]))) (: O_Empty ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: O_Empty ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty ([]))) (: O_Empty ?3))) (: O_Empty ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) (: O_Empty ?5))) (: O_Empty ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: O_Empty ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: O_Empty ?4))) (: O_Empty ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: O_Empty ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: O_Empty ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty ([]))) (: (O_Full ?3) ?4))) (: O_Empty ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) (: (O_Full ?5) ?6))) (: O_Empty ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: O_Empty ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Full ?4) ?5))) (: O_Empty ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: O_Empty ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: O_Empty ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty ([]))) (: (O_Sub ?3 ?4) ?5))) (: O_Empty ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: O_Empty ?3))) (: (O_Sub ?4 ([])) ?5))) (: O_Empty ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 ([])) ?7))) (: O_Empty ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) (: (O_Sub ?5 ?6) ?7))) (: O_Empty ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) (: (O_Sub ?6 ([])) ?7))) (: O_Empty ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) (: (O_Sub ?7 ([])) ?8))) (: O_Empty ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 ([])) ?9))) (: O_Empty ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: O_Empty ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Sub ?4 ?5) ?6))) (: O_Empty ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: O_Empty ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 ([])) (: O_Empty ?2))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 ([]))) (: O_Empty ?3))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 ([])))) (: O_Empty ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: O_Empty ([]))))) (: O_Empty ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ?5) ([]))))) (: O_Empty ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 ([])) (: O_Empty ?2))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 ([]))) (: O_Empty ?3))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 ([])))) (: O_Empty ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 ([]))))) (: O_Empty ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 (: ?5 ([])))))) (: O_Empty ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:35:21-34: Irrefutable pattern failed for pattern (l4 : ll5) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 ([])) (: O_Empty ?2))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 ([]))) (: O_Empty ?3))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 ([])))) (: O_Empty ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 ([]))))) (: O_Empty ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case quadoct (O_Sub ? (: (O_Sub ?1 ([])) (: (O_Full ?2) ?3))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty ([]))) (: (O_Full ?2) ?3))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: (O_Full ?4) ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: O_Empty ([]))) ?3))) (: (O_Full ?4) ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) ?5))) (: (O_Full ?6) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: (O_Full ?4) ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ?3) ([]))) (: (O_Full ?4) ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: (O_Full ?4) ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty ([]))) (: O_Empty ?3))) (: (O_Full ?4) ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) (: O_Empty ?5))) (: (O_Full ?6) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: (O_Full ?4) ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: O_Empty ?4))) (: (O_Full ?5) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: (O_Full ?4) ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: (O_Full ?5) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty ([]))) (: (O_Full ?3) ?4))) (: (O_Full ?5) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) (: (O_Full ?5) ?6))) (: (O_Full ?7) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: (O_Full ?5) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Full ?4) ?5))) (: (O_Full ?6) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: (O_Full ?5) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: (O_Full ?6) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty ([]))) (: (O_Sub ?3 ?4) ?5))) (: (O_Full ?6) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: O_Empty ?3))) (: (O_Sub ?4 ([])) ?5))) (: (O_Full ?6) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 ([])) ?7))) (: (O_Full ?8) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) (: (O_Sub ?5 ?6) ?7))) (: (O_Full ?8) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) (: (O_Sub ?6 ([])) ?7))) (: (O_Full ?8) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) (: (O_Sub ?7 ([])) ?8))) (: (O_Full ?9) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 ([])) ?9))) (: (O_Full ?10) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: (O_Full ?6) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Sub ?4 ?5) ?6))) (: (O_Full ?7) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: (O_Full ?6) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 ([])) (: (O_Full ?2) ?3))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 ([]))) (: (O_Full ?3) ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 ([])))) (: (O_Full ?4) ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: O_Empty ([]))))) (: (O_Full ?4) ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ?5) ([]))))) (: (O_Full ?6) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 ([])) (: (O_Full ?2) ?3))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 ([]))) (: (O_Full ?3) ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 ([])))) (: (O_Full ?4) ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 ([]))))) (: (O_Full ?5) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 (: ?5 ([])))))) (: (O_Full ?6) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:35:21-34: Irrefutable pattern failed for pattern (l4 : ll5) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 ([])) (: (O_Full ?2) ?3))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 ([]))) (: (O_Full ?3) ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 ([])))) (: (O_Full ?4) ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 ([]))))) (: (O_Full ?5) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case quadoct (O_Sub ? (: (O_Sub ?1 ([])) (: (O_Sub ?2 ?3) ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty ([]))) (: (O_Sub ?2 ?3) ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 ([])) ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: O_Empty ([]))) ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: O_Empty (: (O_Sub ?4 ([])) ?5))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: (O_Sub ?4 ?5) ([]))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: O_Empty ?5))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: O_Empty ?5))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: (O_Full ?5) ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: (O_Full ?5) ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: (O_Sub ?5 ?6) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: (O_Sub ?5 ?6) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ?3) ?4))) (: (O_Sub ?5 ([])) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ?3) ?4))) (: (O_Sub ?5 (: O_Empty ([]))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: (O_Sub ?4 (: O_Empty (: O_Empty ?5))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: (O_Sub ?4 (: O_Empty (: O_Empty ?5))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: (O_Sub ?4 (: O_Empty (: (O_Full ?5) ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: (O_Sub ?4 (: O_Empty (: (O_Full ?5) ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: (O_Sub ?4 (: O_Empty (: (O_Sub ?5 ?6) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: (O_Sub ?4 (: O_Empty (: (O_Sub ?5 ?6) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ?3) ?4))) (: (O_Sub ?5 (: (O_Full ?6) ([]))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: (O_Sub ?4 (: (O_Full ?5) (: O_Empty ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: (O_Sub ?4 (: (O_Full ?5) (: O_Empty ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: (O_Sub ?4 (: (O_Full ?5) (: (O_Full ?6) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: (O_Sub ?4 (: (O_Full ?5) (: (O_Full ?6) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: (O_Sub ?4 (: (O_Full ?5) (: (O_Sub ?6 ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: (O_Sub ?4 (: (O_Full ?5) (: (O_Sub ?6 ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ?3) ?4))) (: (O_Sub ?5 (: (O_Sub ?6 ?7) ([]))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: O_Empty ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: O_Empty ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: (O_Full ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: (O_Full ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: (O_Sub ?7 ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: (O_Sub ?7 ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ?3) ([]))) (: (O_Sub ?4 ?5) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ?3) (: O_Empty ?4))) (: (O_Sub ?5 ([])) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ?3) (: O_Empty ?4))) (: (O_Sub ?5 (: O_Empty ([]))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: (O_Sub ?4 (: O_Empty (: O_Empty ?5))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: (O_Sub ?4 (: O_Empty (: O_Empty ?5))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: (O_Sub ?4 (: O_Empty (: (O_Full ?5) ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: (O_Sub ?4 (: O_Empty (: (O_Full ?5) ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: (O_Sub ?4 (: O_Empty (: (O_Sub ?5 ?6) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: (O_Sub ?4 (: O_Empty (: (O_Sub ?5 ?6) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ?3) (: O_Empty ?4))) (: (O_Sub ?5 (: (O_Full ?6) ([]))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: (O_Sub ?4 (: (O_Full ?5) (: O_Empty ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: (O_Sub ?4 (: (O_Full ?5) (: O_Empty ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: (O_Sub ?4 (: (O_Full ?5) (: (O_Full ?6) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: (O_Sub ?4 (: (O_Full ?5) (: (O_Full ?6) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: (O_Sub ?4 (: (O_Full ?5) (: (O_Sub ?6 ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: (O_Sub ?4 (: (O_Full ?5) (: (O_Sub ?6 ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ?3) (: O_Empty ?4))) (: (O_Sub ?5 (: (O_Sub ?6 ?7) ([]))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: O_Empty ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: O_Empty ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: (O_Full ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: (O_Full ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: (O_Sub ?7 ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: (O_Sub ?7 ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ?3) (: (O_Full ?4) ?5))) (: (O_Sub ?6 ([])) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ?3) (: (O_Full ?4) ?5))) (: (O_Sub ?6 (: O_Empty ([]))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: O_Empty (: O_Empty ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: O_Empty (: O_Empty ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: O_Empty (: (O_Full ?6) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: O_Empty (: (O_Full ?6) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: O_Empty (: (O_Sub ?6 ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: O_Empty (: (O_Sub ?6 ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ?3) (: (O_Full ?4) ?5))) (: (O_Sub ?6 (: (O_Full ?7) ([]))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: (O_Full ?6) (: O_Empty ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: (O_Full ?6) (: O_Empty ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: (O_Full ?6) (: (O_Full ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: (O_Full ?6) (: (O_Full ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: (O_Full ?6) (: (O_Sub ?7 ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: (O_Full ?6) (: (O_Sub ?7 ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ?3) (: (O_Full ?4) ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) ([]))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: (O_Sub ?6 ?7) (: O_Empty ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: (O_Sub ?6 ?7) (: O_Empty ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: (O_Sub ?6 ?7) (: (O_Full ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: (O_Sub ?6 ?7) (: (O_Full ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: (O_Sub ?6 ?7) (: (O_Sub ?8 ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: (O_Sub ?6 ?7) (: (O_Sub ?8 ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ?3) (: (O_Sub ?4 ?5) ?6))) (: (O_Sub ?7 ([])) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ?3) (: (O_Sub ?4 ?5) ?6))) (: (O_Sub ?7 (: O_Empty ([]))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: O_Empty (: O_Empty ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: O_Empty (: O_Empty ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: O_Empty (: (O_Full ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: O_Empty (: (O_Full ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: O_Empty (: (O_Sub ?7 ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: O_Empty (: (O_Sub ?7 ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ?3) (: (O_Sub ?4 ?5) ?6))) (: (O_Sub ?7 (: (O_Full ?8) ([]))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: O_Empty ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: O_Empty ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: (O_Full ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: (O_Full ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: (O_Sub ?8 ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: (O_Sub ?8 ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ?3) (: (O_Sub ?4 ?5) ?6))) (: (O_Sub ?7 (: (O_Sub ?8 ?9) ([]))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: O_Empty ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: O_Empty ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: (O_Full ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: (O_Full ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: (O_Sub ?9 ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: (O_Sub ?9 ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 ([])) (: (O_Sub ?2 ?3) ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 ([]))) (: (O_Sub ?3 ?4) ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 ([])))) (: (O_Sub ?4 ?5) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: O_Empty ([]))))) (: (O_Sub ?4 ?5) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: O_Empty (: O_Empty ?4))))) (: (O_Sub ?5 ([])) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: O_Empty (: O_Empty ?4))))) (: (O_Sub ?5 (: ?6 ([]))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: O_Empty (: O_Empty ?4))))) (: (O_Sub ?5 (: ?6 (: ?7 ([])))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:44:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: O_Empty (: O_Empty ?4))))) (: (O_Sub ?5 (: ?6 (: ?7 (: O_Empty ([]))))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:44:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: O_Empty (: O_Empty ?4))))) (: (O_Sub ?5 (: ?6 (: ?7 (: (O_Sub ?8 ?9) ([]))))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:44:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: O_Empty (: (O_Sub ?4 ?5) ?6))))) (: (O_Sub ?7 ([])) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: O_Empty (: (O_Sub ?4 ?5) ?6))))) (: (O_Sub ?7 (: ?8 ([]))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: O_Empty (: (O_Sub ?4 ?5) ?6))))) (: (O_Sub ?7 (: ?8 (: ?9 ([])))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:44:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: O_Empty (: (O_Sub ?4 ?5) ?6))))) (: (O_Sub ?7 (: ?8 (: ?9 (: O_Empty ([]))))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:44:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: O_Empty (: (O_Sub ?4 ?5) ?6))))) (: (O_Sub ?7 (: ?8 (: ?9 (: (O_Full ?10) ([]))))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:44:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: O_Empty (: (O_Sub ?4 ?5) ?6))))) (: (O_Sub ?7 (: ?8 (: ?9 (: (O_Sub ?10 ?11) ([]))))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:44:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ?5) ([]))))) (: (O_Sub ?6 ?7) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ?5) (: O_Empty ?6))))) (: (O_Sub ?7 ([])) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ?5) (: O_Empty ?6))))) (: (O_Sub ?7 (: ?8 ([]))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ?5) (: O_Empty ?6))))) (: (O_Sub ?7 (: ?8 (: ?9 ([])))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:44:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ?5) (: O_Empty ?6))))) (: (O_Sub ?7 (: ?8 (: ?9 (: O_Empty ([]))))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:44:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ?5) (: O_Empty ?6))))) (: (O_Sub ?7 (: ?8 (: ?9 (: (O_Full ?10) ([]))))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:44:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ?5) (: O_Empty ?6))))) (: (O_Sub ?7 (: ?8 (: ?9 (: (O_Sub ?10 ?11) ([]))))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:44:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ?5) (: (O_Full ?6) ?7))))) (: (O_Sub ?8 ([])) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ?5) (: (O_Full ?6) ?7))))) (: (O_Sub ?8 (: ?9 ([]))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ?5) (: (O_Full ?6) ?7))))) (: (O_Sub ?8 (: ?9 (: ?10 ([])))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:44:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ?5) (: (O_Full ?6) ?7))))) (: (O_Sub ?8 (: ?9 (: ?10 (: O_Empty ([]))))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:44:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ?5) (: (O_Full ?6) ?7))))) (: (O_Sub ?8 (: ?9 (: ?10 (: (O_Full ?11) ([]))))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:44:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ?5) (: (O_Full ?6) ?7))))) (: (O_Sub ?8 (: ?9 (: ?10 (: (O_Sub ?11 ?12) ([]))))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:44:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ?5) (: (O_Sub ?6 ?7) ?8))))) (: (O_Sub ?9 ([])) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ?5) (: (O_Sub ?6 ?7) ?8))))) (: (O_Sub ?9 (: ?10 ([]))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ?5) (: (O_Sub ?6 ?7) ?8))))) (: (O_Sub ?9 (: ?10 (: ?11 ([])))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:44:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ?5) (: (O_Sub ?6 ?7) ?8))))) (: (O_Sub ?9 (: ?10 (: ?11 (: O_Empty ([]))))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:44:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ?5) (: (O_Sub ?6 ?7) ?8))))) (: (O_Sub ?9 (: ?10 (: ?11 (: (O_Full ?12) ([]))))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:44:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ?5) (: (O_Sub ?6 ?7) ?8))))) (: (O_Sub ?9 (: ?10 (: ?11 (: (O_Sub ?12 ?13) ([]))))) ?14))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:44:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 ([])) (: (O_Sub ?2 ?3) ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 ([]))) (: (O_Sub ?3 ?4) ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 ([])))) (: (O_Sub ?4 ?5) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 ([]))))) (: (O_Sub ?5 ?6) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 (: ?5 ([])))))) (: (O_Sub ?6 ?7) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:35:21-34: Irrefutable pattern failed for pattern (l4 : ll5) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 ([])) (: (O_Sub ?2 ?3) ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 ([]))) (: (O_Sub ?3 ?4) ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 ([])))) (: (O_Sub ?4 ?5) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 ([]))))) (: (O_Sub ?5 ?6) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case quadoct (O_Sub ? ([])) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case quadoct (O_Sub ? (: ?1 ([]))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case quadoct (O_Sub ? (: ?1 (: ?2 ([])))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case quadoct (O_Sub ? (: ?1 (: ?2 (: O_Empty ([]))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: O_Empty (: (O_Sub ?3 ([])) ?4))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: O_Empty (: (O_Sub ?3 (: O_Empty ([]))) ?4))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: O_Empty (: (O_Sub ?3 (: (O_Sub ?4 ?5) ([]))) ?6))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: O_Empty (: (O_Sub ?3 ([])) ?4))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: O_Empty (: (O_Sub ?3 (: ?4 ([]))) ?5))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: O_Empty (: (O_Sub ?3 ([])) ?4))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 ?4) ([]))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 ([])) (: O_Empty ?4))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: O_Empty ([]))) (: O_Empty ?4))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ?5) ([]))) (: O_Empty ?6))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 ([])) (: O_Empty ?4))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: ?4 ([]))) (: O_Empty ?5))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: ?4 (: ?5 ([])))) (: O_Empty ?6))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 ([])) (: O_Empty ?4))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: ?4 ([]))) (: O_Empty ?5))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 ([])) (: O_Empty ?4))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 ([])) (: (O_Full ?4) ?5))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: O_Empty ([]))) (: (O_Full ?4) ?5))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ?5) ([]))) (: (O_Full ?6) ?7))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 ([])) (: (O_Full ?4) ?5))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: ?4 ([]))) (: (O_Full ?5) ?6))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: ?4 (: ?5 ([])))) (: (O_Full ?6) ?7))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 ([])) (: (O_Full ?4) ?5))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: ?4 ([]))) (: (O_Full ?5) ?6))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 ([])) (: (O_Full ?4) ?5))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 ([])) (: (O_Sub ?4 ?5) ?6))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: O_Empty ([]))) (: (O_Sub ?4 ?5) ?6))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: O_Empty (: O_Empty ?4))) (: (O_Sub ?5 ([])) ?6))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: O_Empty (: O_Empty ?4))) (: (O_Sub ?5 (: O_Empty ([]))) ?6))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: O_Empty (: O_Empty ?4))) (: (O_Sub ?5 (: (O_Sub ?6 ?7) ([]))) ?8))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: O_Empty (: (O_Sub ?4 ?5) ?6))) (: (O_Sub ?7 ([])) ?8))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: O_Empty (: (O_Sub ?4 ?5) ?6))) (: (O_Sub ?7 (: O_Empty ([]))) ?8))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: O_Empty (: (O_Sub ?4 ?5) ?6))) (: (O_Sub ?7 (: (O_Full ?8) ([]))) ?9))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: O_Empty (: (O_Sub ?4 ?5) ?6))) (: (O_Sub ?7 (: (O_Sub ?8 ?9) ([]))) ?10))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ?5) ([]))) (: (O_Sub ?6 ?7) ?8))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ?5) (: O_Empty ?6))) (: (O_Sub ?7 ([])) ?8))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ?5) (: O_Empty ?6))) (: (O_Sub ?7 (: O_Empty ([]))) ?8))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ?5) (: O_Empty ?6))) (: (O_Sub ?7 (: (O_Full ?8) ([]))) ?9))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ?5) (: O_Empty ?6))) (: (O_Sub ?7 (: (O_Sub ?8 ?9) ([]))) ?10))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ?5) (: (O_Full ?6) ?7))) (: (O_Sub ?8 ([])) ?9))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ?5) (: (O_Full ?6) ?7))) (: (O_Sub ?8 (: O_Empty ([]))) ?9))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ?5) (: (O_Full ?6) ?7))) (: (O_Sub ?8 (: (O_Full ?9) ([]))) ?10))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ?5) (: (O_Full ?6) ?7))) (: (O_Sub ?8 (: (O_Sub ?9 ?10) ([]))) ?11))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ?5) (: (O_Sub ?6 ?7) ?8))) (: (O_Sub ?9 ([])) ?10))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ?5) (: (O_Sub ?6 ?7) ?8))) (: (O_Sub ?9 (: O_Empty ([]))) ?10))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ?5) (: (O_Sub ?6 ?7) ?8))) (: (O_Sub ?9 (: (O_Full ?10) ([]))) ?11))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ?5) (: (O_Sub ?6 ?7) ?8))) (: (O_Sub ?9 (: (O_Sub ?10 ?11) ([]))) ?12))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 ([])) (: (O_Sub ?4 ?5) ?6))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: ?4 ([]))) (: (O_Sub ?5 ?6) ?7))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: ?4 (: ?5 ([])))) (: (O_Sub ?6 ?7) ?8))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 ([])) (: (O_Sub ?4 ?5) ?6))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: ?4 ([]))) (: (O_Sub ?5 ?6) ?7))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 ([])) (: (O_Sub ?4 ?5) ?6))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case quadoct (O_Sub ? ([])) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case quadoct (O_Sub ? (: ?1 ([]))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case quadoct (O_Sub ? (: ?1 (: ?2 ([])))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 ([]))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 ([])))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:35:21-34: Irrefutable pattern failed for pattern (l4 : ll5) case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 (: O_Empty ([]))))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:35:38-51: Irrefutable pattern failed for pattern (l5 : ll6) case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 (: (O_Sub ?5 ?6) ([]))))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:35:38-51: Irrefutable pattern failed for pattern (l5 : ll6) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 (: (O_Sub ?5 ([])) (: O_Empty ?6))))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 (: (O_Sub ?5 ([])) (: (O_Full ?6) ?7))))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 (: (O_Sub ?5 ([])) (: (O_Sub ?6 ?7) ?8))))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? ([])) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: ?1 ([]))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 ([])))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 ([]))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 ([])))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:35:21-34: Irrefutable pattern failed for pattern (l4 : ll5) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 (: ?5 ([]))))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:35:38-51: Irrefutable pattern failed for pattern (l5 : ll6) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 (: ?5 (: ?6 ([])))))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:36:21-34: Irrefutable pattern failed for pattern (l6 : ll7) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 (: ?5 (: ?6 (: O_Empty ([]))))))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:36:38-51: Irrefutable pattern failed for pattern (l7 : ll8) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 (: ?5 (: ?6 (: (O_Sub ?7 ?8) ([]))))))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:36:38-51: Irrefutable pattern failed for pattern (l7 : ll8) case case quadoct (O_Sub ? ([])) of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case quadoct (O_Sub ? (: O_Empty ([]))) of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 ([])) ?2))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: O_Empty ([]))) ?2))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: O_Empty ([]))) ?3))) ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) ?5))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 ?3) ([]))) ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty ([]))) (: O_Empty ?3))) ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) (: O_Empty ?5))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: O_Empty ?4))) ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty ([]))) (: (O_Full ?3) ?4))) ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) (: (O_Full ?5) ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Full ?4) ?5))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty ([]))) (: (O_Sub ?3 ?4) ?5))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: O_Empty ?3))) (: (O_Sub ?4 ([])) ?5))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: O_Empty ?3))) (: (O_Sub ?4 (: O_Empty ([]))) ?5))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: O_Empty ?3))) (: (O_Sub ?4 (: (O_Sub ?5 ?6) ([]))) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 ([])) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: O_Empty ([]))) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: (O_Full ?7) ([]))) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) ([]))) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) (: (O_Sub ?5 ?6) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) (: (O_Sub ?6 ([])) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) (: (O_Sub ?6 (: O_Empty ([]))) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) (: (O_Sub ?6 (: (O_Full ?7) ([]))) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) ([]))) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) (: (O_Sub ?7 ([])) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: O_Empty ([]))) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: (O_Full ?8) ([]))) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: (O_Sub ?8 ?9) ([]))) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 ([])) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: O_Empty ([]))) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: (O_Full ?9) ([]))) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: (O_Sub ?9 ?10) ([]))) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Sub ?4 ?5) ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 ([])) ?2))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: ?2 ([]))) ?3))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: ?2 (: ?3 ([])))) ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: ?2 (: ?3 (: O_Empty ([]))))) ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ?5) ([]))))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 ([])) ?2))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: ?2 ([]))) ?3))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: ?2 (: ?3 ([])))) ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 ([]))))) ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 (: ?5 ([])))))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:35:21-34: Irrefutable pattern failed for pattern (l4 : ll5) case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 ([])) ?2))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: ?2 ([]))) ?3))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: ?2 (: ?3 ([])))) ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 ([]))))) ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case quadoct (O_Sub ? (: (O_Sub ?1 ?2) ([]))) of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case quadoct (O_Sub ? (: (O_Sub ?1 ([])) (: O_Empty ?2))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty ([]))) (: O_Empty ?2))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: O_Empty ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: O_Empty ([]))) ?3))) (: O_Empty ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) ?5))) (: O_Empty ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: O_Empty ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: ?3 ([]))) ?4))) (: O_Empty ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: O_Empty ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ?3) ([]))) (: O_Empty ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: O_Empty ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty ([]))) (: O_Empty ?3))) (: O_Empty ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) (: O_Empty ?5))) (: O_Empty ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: O_Empty ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: O_Empty ?4))) (: O_Empty ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: O_Empty ?5))) (: O_Empty ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: O_Empty ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: O_Empty ?4))) (: O_Empty ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: O_Empty ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: O_Empty ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty ([]))) (: (O_Full ?3) ?4))) (: O_Empty ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) (: (O_Full ?5) ?6))) (: O_Empty ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: O_Empty ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Full ?4) ?5))) (: O_Empty ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: (O_Full ?5) ?6))) (: O_Empty ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: O_Empty ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Full ?4) ?5))) (: O_Empty ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: O_Empty ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: O_Empty ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty ([]))) (: (O_Sub ?3 ?4) ?5))) (: O_Empty ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: O_Empty ?3))) (: (O_Sub ?4 ([])) ?5))) (: O_Empty ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: O_Empty ?3))) (: (O_Sub ?4 (: O_Empty ([]))) ?5))) (: O_Empty ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: O_Empty ?3))) (: (O_Sub ?4 (: (O_Sub ?5 ?6) ([]))) ?7))) (: O_Empty ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 ([])) ?7))) (: O_Empty ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: O_Empty ([]))) ?7))) (: O_Empty ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: (O_Full ?7) ([]))) ?8))) (: O_Empty ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) ([]))) ?9))) (: O_Empty ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) (: (O_Sub ?5 ?6) ?7))) (: O_Empty ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) (: (O_Sub ?6 ([])) ?7))) (: O_Empty ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) (: (O_Sub ?6 (: O_Empty ([]))) ?7))) (: O_Empty ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) (: (O_Sub ?6 (: (O_Full ?7) ([]))) ?8))) (: O_Empty ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) ([]))) ?9))) (: O_Empty ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) (: (O_Sub ?7 ([])) ?8))) (: O_Empty ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: O_Empty ([]))) ?8))) (: O_Empty ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: (O_Full ?8) ([]))) ?9))) (: O_Empty ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: (O_Sub ?8 ?9) ([]))) ?10))) (: O_Empty ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 ([])) ?9))) (: O_Empty ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: O_Empty ([]))) ?9))) (: O_Empty ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: (O_Full ?9) ([]))) ?10))) (: O_Empty ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: (O_Sub ?9 ?10) ([]))) ?11))) (: O_Empty ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: O_Empty ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Sub ?4 ?5) ?6))) (: O_Empty ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: (O_Sub ?5 ?6) ?7))) (: O_Empty ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: O_Empty ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Sub ?4 ?5) ?6))) (: O_Empty ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: O_Empty ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 ([])) (: O_Empty ?2))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 ([]))) (: O_Empty ?3))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 ([])))) (: O_Empty ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: O_Empty ([]))))) (: O_Empty ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ?5) ([]))))) (: O_Empty ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ([])) (: O_Empty ?5))))) (: O_Empty ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ([])) (: (O_Full ?5) ?6))))) (: O_Empty ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ([])) (: (O_Sub ?5 ?6) ?7))))) (: O_Empty ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 ([])) (: O_Empty ?2))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 ([]))) (: O_Empty ?3))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 ([])))) (: O_Empty ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 ([]))))) (: O_Empty ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 (: ?5 ([])))))) (: O_Empty ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:35:21-34: Irrefutable pattern failed for pattern (l4 : ll5) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 (: ?5 (: O_Empty ([]))))))) (: O_Empty ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:35:38-51: Irrefutable pattern failed for pattern (l5 : ll6) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 (: ?5 (: (O_Sub ?6 ?7) ([]))))))) (: O_Empty ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:35:38-51: Irrefutable pattern failed for pattern (l5 : ll6) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 ([])) (: O_Empty ?2))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 ([]))) (: O_Empty ?3))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 ([])))) (: O_Empty ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 ([]))))) (: O_Empty ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 (: ?5 ([])))))) (: O_Empty ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:35:21-34: Irrefutable pattern failed for pattern (l4 : ll5) case case case case quadoct (O_Sub ? (: (O_Sub ?1 ([])) (: (O_Full ?2) ?3))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty ([]))) (: (O_Full ?2) ?3))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: (O_Full ?4) ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: O_Empty ([]))) ?3))) (: (O_Full ?4) ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) ?5))) (: (O_Full ?6) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: (O_Full ?4) ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: ?3 ([]))) ?4))) (: (O_Full ?5) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: (O_Full ?4) ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ?3) ([]))) (: (O_Full ?4) ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: (O_Full ?4) ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty ([]))) (: O_Empty ?3))) (: (O_Full ?4) ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) (: O_Empty ?5))) (: (O_Full ?6) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: (O_Full ?4) ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: O_Empty ?4))) (: (O_Full ?5) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: O_Empty ?5))) (: (O_Full ?6) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: (O_Full ?4) ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: O_Empty ?4))) (: (O_Full ?5) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: (O_Full ?4) ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: (O_Full ?5) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty ([]))) (: (O_Full ?3) ?4))) (: (O_Full ?5) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) (: (O_Full ?5) ?6))) (: (O_Full ?7) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: (O_Full ?5) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Full ?4) ?5))) (: (O_Full ?6) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: (O_Full ?5) ?6))) (: (O_Full ?7) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: (O_Full ?5) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Full ?4) ?5))) (: (O_Full ?6) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: (O_Full ?5) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: (O_Full ?6) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty ([]))) (: (O_Sub ?3 ?4) ?5))) (: (O_Full ?6) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: O_Empty ?3))) (: (O_Sub ?4 ([])) ?5))) (: (O_Full ?6) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: O_Empty ?3))) (: (O_Sub ?4 (: O_Empty ([]))) ?5))) (: (O_Full ?6) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: O_Empty ?3))) (: (O_Sub ?4 (: (O_Sub ?5 ?6) ([]))) ?7))) (: (O_Full ?8) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 ([])) ?7))) (: (O_Full ?8) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: O_Empty ([]))) ?7))) (: (O_Full ?8) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: (O_Full ?7) ([]))) ?8))) (: (O_Full ?9) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) ([]))) ?9))) (: (O_Full ?10) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) (: (O_Sub ?5 ?6) ?7))) (: (O_Full ?8) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) (: (O_Sub ?6 ([])) ?7))) (: (O_Full ?8) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) (: (O_Sub ?6 (: O_Empty ([]))) ?7))) (: (O_Full ?8) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) (: (O_Sub ?6 (: (O_Full ?7) ([]))) ?8))) (: (O_Full ?9) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) ([]))) ?9))) (: (O_Full ?10) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) (: (O_Sub ?7 ([])) ?8))) (: (O_Full ?9) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: O_Empty ([]))) ?8))) (: (O_Full ?9) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: (O_Full ?8) ([]))) ?9))) (: (O_Full ?10) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: (O_Sub ?8 ?9) ([]))) ?10))) (: (O_Full ?11) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 ([])) ?9))) (: (O_Full ?10) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: O_Empty ([]))) ?9))) (: (O_Full ?10) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: (O_Full ?9) ([]))) ?10))) (: (O_Full ?11) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: (O_Sub ?9 ?10) ([]))) ?11))) (: (O_Full ?12) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: (O_Full ?6) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Sub ?4 ?5) ?6))) (: (O_Full ?7) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: (O_Sub ?5 ?6) ?7))) (: (O_Full ?8) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: (O_Full ?6) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Sub ?4 ?5) ?6))) (: (O_Full ?7) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: (O_Full ?6) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 ([])) (: (O_Full ?2) ?3))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 ([]))) (: (O_Full ?3) ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 ([])))) (: (O_Full ?4) ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: O_Empty ([]))))) (: (O_Full ?4) ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ?5) ([]))))) (: (O_Full ?6) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ([])) (: O_Empty ?5))))) (: (O_Full ?6) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ([])) (: (O_Full ?5) ?6))))) (: (O_Full ?7) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ([])) (: (O_Sub ?5 ?6) ?7))))) (: (O_Full ?8) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 ([])) (: (O_Full ?2) ?3))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 ([]))) (: (O_Full ?3) ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 ([])))) (: (O_Full ?4) ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 ([]))))) (: (O_Full ?5) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 (: ?5 ([])))))) (: (O_Full ?6) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:35:21-34: Irrefutable pattern failed for pattern (l4 : ll5) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 (: ?5 (: O_Empty ([]))))))) (: (O_Full ?6) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:35:38-51: Irrefutable pattern failed for pattern (l5 : ll6) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 (: ?5 (: (O_Sub ?6 ?7) ([]))))))) (: (O_Full ?8) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:35:38-51: Irrefutable pattern failed for pattern (l5 : ll6) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 ([])) (: (O_Full ?2) ?3))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 ([]))) (: (O_Full ?3) ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 ([])))) (: (O_Full ?4) ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 ([]))))) (: (O_Full ?5) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 (: ?5 ([])))))) (: (O_Full ?6) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:35:21-34: Irrefutable pattern failed for pattern (l4 : ll5) case case case case quadoct (O_Sub ? (: (O_Sub ?1 ([])) (: (O_Sub ?2 ?3) ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty ([]))) (: (O_Sub ?2 ?3) ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 ([])) ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: O_Empty ([]))) ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: O_Empty (: (O_Sub ?4 ([])) ?5))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: O_Empty (: (O_Sub ?4 (: O_Empty ([]))) ?5))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: O_Empty (: (O_Sub ?4 (: (O_Sub ?5 ?6) ([]))) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: O_Empty (: (O_Sub ?4 ([])) ?5))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: (O_Sub ?4 ?5) ([]))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: O_Empty ?5))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: (O_Sub ?4 (: O_Empty ([]))) (: O_Empty ?5))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: (O_Sub ?4 (: (O_Sub ?5 ?6) ([]))) (: O_Empty ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: O_Empty ?5))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: (O_Sub ?4 (: ?5 ([]))) (: O_Empty ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: O_Empty ?5))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: (O_Full ?5) ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: (O_Sub ?4 (: O_Empty ([]))) (: (O_Full ?5) ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: (O_Sub ?4 (: (O_Sub ?5 ?6) ([]))) (: (O_Full ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: (O_Full ?5) ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: (O_Sub ?4 (: ?5 ([]))) (: (O_Full ?6) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: (O_Full ?5) ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: (O_Sub ?5 ?6) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: (O_Sub ?4 (: O_Empty ([]))) (: (O_Sub ?5 ?6) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: (O_Sub ?4 (: (O_Sub ?5 ?6) ([]))) (: (O_Sub ?7 ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: (O_Sub ?5 ?6) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: (O_Sub ?4 (: ?5 ([]))) (: (O_Sub ?6 ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: (O_Sub ?5 ?6) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ?3) ?4))) (: (O_Sub ?5 ([])) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ?3) ?4))) (: (O_Sub ?5 (: O_Empty ([]))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: (O_Sub ?4 (: O_Empty (: O_Empty ?5))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: O_Empty ([]))) ?3))) (: (O_Sub ?4 (: O_Empty (: O_Empty ?5))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) ?5))) (: (O_Sub ?6 (: O_Empty (: O_Empty ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: (O_Sub ?4 (: O_Empty (: O_Empty ?5))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: ?3 ([]))) ?4))) (: (O_Sub ?5 (: O_Empty (: O_Empty ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: (O_Sub ?4 (: O_Empty (: O_Empty ?5))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: (O_Sub ?4 (: O_Empty (: (O_Full ?5) ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: O_Empty ([]))) ?3))) (: (O_Sub ?4 (: O_Empty (: (O_Full ?5) ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) ?5))) (: (O_Sub ?6 (: O_Empty (: (O_Full ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: (O_Sub ?4 (: O_Empty (: (O_Full ?5) ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: ?3 ([]))) ?4))) (: (O_Sub ?5 (: O_Empty (: (O_Full ?6) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: (O_Sub ?4 (: O_Empty (: (O_Full ?5) ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: (O_Sub ?4 (: O_Empty (: (O_Sub ?5 ?6) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: O_Empty ([]))) ?3))) (: (O_Sub ?4 (: O_Empty (: (O_Sub ?5 ?6) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) ?5))) (: (O_Sub ?6 (: O_Empty (: (O_Sub ?7 ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: (O_Sub ?4 (: O_Empty (: (O_Sub ?5 ?6) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: ?3 ([]))) ?4))) (: (O_Sub ?5 (: O_Empty (: (O_Sub ?6 ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: (O_Sub ?4 (: O_Empty (: (O_Sub ?5 ?6) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ?3) ?4))) (: (O_Sub ?5 (: (O_Full ?6) ([]))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: (O_Sub ?4 (: (O_Full ?5) (: O_Empty ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: O_Empty ([]))) ?3))) (: (O_Sub ?4 (: (O_Full ?5) (: O_Empty ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: O_Empty ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: (O_Sub ?4 (: (O_Full ?5) (: O_Empty ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: ?3 ([]))) ?4))) (: (O_Sub ?5 (: (O_Full ?6) (: O_Empty ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: (O_Sub ?4 (: (O_Full ?5) (: O_Empty ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: (O_Sub ?4 (: (O_Full ?5) (: (O_Full ?6) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: O_Empty ([]))) ?3))) (: (O_Sub ?4 (: (O_Full ?5) (: (O_Full ?6) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: (O_Full ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: (O_Sub ?4 (: (O_Full ?5) (: (O_Full ?6) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: ?3 ([]))) ?4))) (: (O_Sub ?5 (: (O_Full ?6) (: (O_Full ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: (O_Sub ?4 (: (O_Full ?5) (: (O_Full ?6) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: (O_Sub ?4 (: (O_Full ?5) (: (O_Sub ?6 ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: O_Empty ([]))) ?3))) (: (O_Sub ?4 (: (O_Full ?5) (: (O_Sub ?6 ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: (O_Sub ?8 ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: (O_Sub ?4 (: (O_Full ?5) (: (O_Sub ?6 ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: ?3 ([]))) ?4))) (: (O_Sub ?5 (: (O_Full ?6) (: (O_Sub ?7 ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: (O_Sub ?4 (: (O_Full ?5) (: (O_Sub ?6 ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ?3) ?4))) (: (O_Sub ?5 (: (O_Sub ?6 ?7) ([]))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: O_Empty ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: O_Empty ([]))) ?3))) (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: O_Empty ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: O_Empty ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: O_Empty ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: ?3 ([]))) ?4))) (: (O_Sub ?5 (: (O_Sub ?6 ?7) (: O_Empty ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: O_Empty ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: (O_Full ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: O_Empty ([]))) ?3))) (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: (O_Full ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: (O_Full ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: (O_Full ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: ?3 ([]))) ?4))) (: (O_Sub ?5 (: (O_Sub ?6 ?7) (: (O_Full ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: (O_Full ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: (O_Sub ?7 ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: O_Empty ([]))) ?3))) (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: (O_Sub ?7 ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: (O_Sub ?9 ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: (O_Sub ?7 ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: ?3 ([]))) ?4))) (: (O_Sub ?5 (: (O_Sub ?6 ?7) (: (O_Sub ?8 ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: (O_Sub ?7 ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ?3) ([]))) (: (O_Sub ?4 ?5) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ?3) (: O_Empty ?4))) (: (O_Sub ?5 ([])) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ?3) (: O_Empty ?4))) (: (O_Sub ?5 (: O_Empty ([]))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: (O_Sub ?4 (: O_Empty (: O_Empty ?5))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty ([]))) (: O_Empty ?3))) (: (O_Sub ?4 (: O_Empty (: O_Empty ?5))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) (: O_Empty ?5))) (: (O_Sub ?6 (: O_Empty (: O_Empty ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: (O_Sub ?4 (: O_Empty (: O_Empty ?5))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: O_Empty ?4))) (: (O_Sub ?5 (: O_Empty (: O_Empty ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: O_Empty ?5))) (: (O_Sub ?6 (: O_Empty (: O_Empty ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: (O_Sub ?4 (: O_Empty (: O_Empty ?5))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: O_Empty ?4))) (: (O_Sub ?5 (: O_Empty (: O_Empty ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: (O_Sub ?4 (: O_Empty (: (O_Full ?5) ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty ([]))) (: O_Empty ?3))) (: (O_Sub ?4 (: O_Empty (: (O_Full ?5) ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) (: O_Empty ?5))) (: (O_Sub ?6 (: O_Empty (: (O_Full ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: (O_Sub ?4 (: O_Empty (: (O_Full ?5) ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: O_Empty ?4))) (: (O_Sub ?5 (: O_Empty (: (O_Full ?6) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: O_Empty ?5))) (: (O_Sub ?6 (: O_Empty (: (O_Full ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: (O_Sub ?4 (: O_Empty (: (O_Full ?5) ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: O_Empty ?4))) (: (O_Sub ?5 (: O_Empty (: (O_Full ?6) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: (O_Sub ?4 (: O_Empty (: (O_Sub ?5 ?6) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty ([]))) (: O_Empty ?3))) (: (O_Sub ?4 (: O_Empty (: (O_Sub ?5 ?6) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) (: O_Empty ?5))) (: (O_Sub ?6 (: O_Empty (: (O_Sub ?7 ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: (O_Sub ?4 (: O_Empty (: (O_Sub ?5 ?6) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: O_Empty ?4))) (: (O_Sub ?5 (: O_Empty (: (O_Sub ?6 ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: O_Empty ?5))) (: (O_Sub ?6 (: O_Empty (: (O_Sub ?7 ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: (O_Sub ?4 (: O_Empty (: (O_Sub ?5 ?6) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: O_Empty ?4))) (: (O_Sub ?5 (: O_Empty (: (O_Sub ?6 ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ?3) (: O_Empty ?4))) (: (O_Sub ?5 (: (O_Full ?6) ([]))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: (O_Sub ?4 (: (O_Full ?5) (: O_Empty ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty ([]))) (: O_Empty ?3))) (: (O_Sub ?4 (: (O_Full ?5) (: O_Empty ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) (: O_Empty ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: O_Empty ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: (O_Sub ?4 (: (O_Full ?5) (: O_Empty ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: O_Empty ?4))) (: (O_Sub ?5 (: (O_Full ?6) (: O_Empty ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: O_Empty ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: O_Empty ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: (O_Sub ?4 (: (O_Full ?5) (: O_Empty ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: O_Empty ?4))) (: (O_Sub ?5 (: (O_Full ?6) (: O_Empty ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: (O_Sub ?4 (: (O_Full ?5) (: (O_Full ?6) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty ([]))) (: O_Empty ?3))) (: (O_Sub ?4 (: (O_Full ?5) (: (O_Full ?6) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) (: O_Empty ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: (O_Full ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: (O_Sub ?4 (: (O_Full ?5) (: (O_Full ?6) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: O_Empty ?4))) (: (O_Sub ?5 (: (O_Full ?6) (: (O_Full ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: O_Empty ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: (O_Full ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: (O_Sub ?4 (: (O_Full ?5) (: (O_Full ?6) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: O_Empty ?4))) (: (O_Sub ?5 (: (O_Full ?6) (: (O_Full ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: (O_Sub ?4 (: (O_Full ?5) (: (O_Sub ?6 ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty ([]))) (: O_Empty ?3))) (: (O_Sub ?4 (: (O_Full ?5) (: (O_Sub ?6 ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) (: O_Empty ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: (O_Sub ?8 ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: (O_Sub ?4 (: (O_Full ?5) (: (O_Sub ?6 ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: O_Empty ?4))) (: (O_Sub ?5 (: (O_Full ?6) (: (O_Sub ?7 ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: O_Empty ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: (O_Sub ?8 ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: (O_Sub ?4 (: (O_Full ?5) (: (O_Sub ?6 ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: O_Empty ?4))) (: (O_Sub ?5 (: (O_Full ?6) (: (O_Sub ?7 ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ?3) (: O_Empty ?4))) (: (O_Sub ?5 (: (O_Sub ?6 ?7) ([]))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: O_Empty ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty ([]))) (: O_Empty ?3))) (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: O_Empty ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) (: O_Empty ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: O_Empty ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: O_Empty ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: O_Empty ?4))) (: (O_Sub ?5 (: (O_Sub ?6 ?7) (: O_Empty ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: O_Empty ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: O_Empty ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: O_Empty ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: O_Empty ?4))) (: (O_Sub ?5 (: (O_Sub ?6 ?7) (: O_Empty ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: (O_Full ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty ([]))) (: O_Empty ?3))) (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: (O_Full ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) (: O_Empty ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: (O_Full ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: (O_Full ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: O_Empty ?4))) (: (O_Sub ?5 (: (O_Sub ?6 ?7) (: (O_Full ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: O_Empty ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: (O_Full ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: (O_Full ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: O_Empty ?4))) (: (O_Sub ?5 (: (O_Sub ?6 ?7) (: (O_Full ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: (O_Sub ?7 ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty ([]))) (: O_Empty ?3))) (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: (O_Sub ?7 ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) (: O_Empty ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: (O_Sub ?9 ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: (O_Sub ?7 ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: O_Empty ?4))) (: (O_Sub ?5 (: (O_Sub ?6 ?7) (: (O_Sub ?8 ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: O_Empty ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: (O_Sub ?9 ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: (O_Sub ?7 ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: O_Empty ?4))) (: (O_Sub ?5 (: (O_Sub ?6 ?7) (: (O_Sub ?8 ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ?3) (: (O_Full ?4) ?5))) (: (O_Sub ?6 ([])) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ?3) (: (O_Full ?4) ?5))) (: (O_Sub ?6 (: O_Empty ([]))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: O_Empty (: O_Empty ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty ([]))) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: O_Empty (: O_Empty ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: O_Empty (: O_Empty ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: O_Empty (: O_Empty ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Full ?4) ?5))) (: (O_Sub ?6 (: O_Empty (: O_Empty ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: O_Empty (: O_Empty ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: O_Empty (: O_Empty ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Full ?4) ?5))) (: (O_Sub ?6 (: O_Empty (: O_Empty ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: O_Empty (: (O_Full ?6) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty ([]))) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: O_Empty (: (O_Full ?6) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: O_Empty (: (O_Full ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: O_Empty (: (O_Full ?6) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Full ?4) ?5))) (: (O_Sub ?6 (: O_Empty (: (O_Full ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: O_Empty (: (O_Full ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: O_Empty (: (O_Full ?6) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Full ?4) ?5))) (: (O_Sub ?6 (: O_Empty (: (O_Full ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: O_Empty (: (O_Sub ?6 ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty ([]))) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: O_Empty (: (O_Sub ?6 ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: O_Empty (: (O_Sub ?8 ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: O_Empty (: (O_Sub ?6 ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Full ?4) ?5))) (: (O_Sub ?6 (: O_Empty (: (O_Sub ?7 ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: O_Empty (: (O_Sub ?8 ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: O_Empty (: (O_Sub ?6 ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Full ?4) ?5))) (: (O_Sub ?6 (: O_Empty (: (O_Sub ?7 ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ?3) (: (O_Full ?4) ?5))) (: (O_Sub ?6 (: (O_Full ?7) ([]))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: (O_Full ?6) (: O_Empty ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty ([]))) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: (O_Full ?6) (: O_Empty ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: (O_Full ?8) (: O_Empty ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: (O_Full ?6) (: O_Empty ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Full ?4) ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: O_Empty ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: (O_Full ?8) (: O_Empty ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: (O_Full ?6) (: O_Empty ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Full ?4) ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: O_Empty ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: (O_Full ?6) (: (O_Full ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty ([]))) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: (O_Full ?6) (: (O_Full ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: (O_Full ?8) (: (O_Full ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: (O_Full ?6) (: (O_Full ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Full ?4) ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: (O_Full ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: (O_Full ?8) (: (O_Full ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: (O_Full ?6) (: (O_Full ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Full ?4) ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: (O_Full ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: (O_Full ?6) (: (O_Sub ?7 ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty ([]))) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: (O_Full ?6) (: (O_Sub ?7 ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: (O_Full ?8) (: (O_Sub ?9 ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: (O_Full ?6) (: (O_Sub ?7 ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Full ?4) ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: (O_Sub ?8 ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: (O_Full ?8) (: (O_Sub ?9 ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: (O_Full ?6) (: (O_Sub ?7 ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Full ?4) ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: (O_Sub ?8 ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ?3) (: (O_Full ?4) ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) ([]))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: (O_Sub ?6 ?7) (: O_Empty ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty ([]))) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: (O_Sub ?6 ?7) (: O_Empty ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: (O_Sub ?8 ?9) (: O_Empty ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: (O_Sub ?6 ?7) (: O_Empty ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Full ?4) ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: O_Empty ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: (O_Sub ?8 ?9) (: O_Empty ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: (O_Sub ?6 ?7) (: O_Empty ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Full ?4) ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: O_Empty ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: (O_Sub ?6 ?7) (: (O_Full ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty ([]))) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: (O_Sub ?6 ?7) (: (O_Full ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: (O_Sub ?8 ?9) (: (O_Full ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: (O_Sub ?6 ?7) (: (O_Full ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Full ?4) ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: (O_Full ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: (O_Sub ?8 ?9) (: (O_Full ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: (O_Sub ?6 ?7) (: (O_Full ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Full ?4) ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: (O_Full ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: (O_Sub ?6 ?7) (: (O_Sub ?8 ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty ([]))) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: (O_Sub ?6 ?7) (: (O_Sub ?8 ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: (O_Sub ?8 ?9) (: (O_Sub ?10 ?11) ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: (O_Sub ?6 ?7) (: (O_Sub ?8 ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Full ?4) ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: (O_Sub ?9 ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: (O_Sub ?8 ?9) (: (O_Sub ?10 ?11) ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: (O_Sub ?6 ?7) (: (O_Sub ?8 ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Full ?4) ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: (O_Sub ?9 ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ?3) (: (O_Sub ?4 ?5) ?6))) (: (O_Sub ?7 ([])) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ?3) (: (O_Sub ?4 ?5) ?6))) (: (O_Sub ?7 (: O_Empty ([]))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: O_Empty (: O_Empty ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty ([]))) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: O_Empty (: O_Empty ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: O_Empty (: O_Empty ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: O_Empty (: O_Empty ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Sub ?4 ?5) ?6))) (: (O_Sub ?7 (: O_Empty (: O_Empty ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: O_Empty (: O_Empty ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: O_Empty (: O_Empty ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Sub ?4 ?5) ?6))) (: (O_Sub ?7 (: O_Empty (: O_Empty ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: O_Empty (: (O_Full ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty ([]))) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: O_Empty (: (O_Full ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: O_Empty (: (O_Full ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: O_Empty (: (O_Full ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Sub ?4 ?5) ?6))) (: (O_Sub ?7 (: O_Empty (: (O_Full ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: O_Empty (: (O_Full ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: O_Empty (: (O_Full ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Sub ?4 ?5) ?6))) (: (O_Sub ?7 (: O_Empty (: (O_Full ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: O_Empty (: (O_Sub ?7 ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty ([]))) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: O_Empty (: (O_Sub ?7 ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: O_Empty (: (O_Sub ?9 ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: O_Empty (: (O_Sub ?7 ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Sub ?4 ?5) ?6))) (: (O_Sub ?7 (: O_Empty (: (O_Sub ?8 ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: O_Empty (: (O_Sub ?9 ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: O_Empty (: (O_Sub ?7 ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Sub ?4 ?5) ?6))) (: (O_Sub ?7 (: O_Empty (: (O_Sub ?8 ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ?3) (: (O_Sub ?4 ?5) ?6))) (: (O_Sub ?7 (: (O_Full ?8) ([]))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: O_Empty ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty ([]))) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: O_Empty ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: (O_Full ?9) (: O_Empty ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: O_Empty ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Sub ?4 ?5) ?6))) (: (O_Sub ?7 (: (O_Full ?8) (: O_Empty ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: (O_Full ?9) (: O_Empty ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: O_Empty ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Sub ?4 ?5) ?6))) (: (O_Sub ?7 (: (O_Full ?8) (: O_Empty ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: (O_Full ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty ([]))) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: (O_Full ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: (O_Full ?9) (: (O_Full ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: (O_Full ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Sub ?4 ?5) ?6))) (: (O_Sub ?7 (: (O_Full ?8) (: (O_Full ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: (O_Full ?9) (: (O_Full ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: (O_Full ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Sub ?4 ?5) ?6))) (: (O_Sub ?7 (: (O_Full ?8) (: (O_Full ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: (O_Sub ?8 ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty ?3)) (: (O_Sub ?4 ?5) ?6))) (: (O_Sub ?7 (: (O_Full ?8) (: (O_Sub ?9 ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: (O_Full ?9) (: (O_Sub ?10 ?11) ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: (O_Sub ?8 ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Sub ?4 ?5) ?6))) (: (O_Sub ?7 (: (O_Full ?8) (: (O_Sub ?9 ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: (O_Full ?9) (: (O_Sub ?10 ?11) ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: (O_Sub ?8 ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Sub ?4 ?5) ?6))) (: (O_Sub ?7 (: (O_Full ?8) (: (O_Sub ?9 ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ?3) (: (O_Sub ?4 ?5) ?6))) (: (O_Sub ?7 (: (O_Sub ?8 ?9) ([]))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: O_Empty ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty ([]))) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: O_Empty ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: (O_Sub ?9 ?10) (: O_Empty ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: O_Empty ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Sub ?4 ?5) ?6))) (: (O_Sub ?7 (: (O_Sub ?8 ?9) (: O_Empty ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: (O_Sub ?9 ?10) (: O_Empty ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: O_Empty ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Sub ?4 ?5) ?6))) (: (O_Sub ?7 (: (O_Sub ?8 ?9) (: O_Empty ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: (O_Full ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty ([]))) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: (O_Full ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: (O_Sub ?9 ?10) (: (O_Full ?11) ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: (O_Full ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Sub ?4 ?5) ?6))) (: (O_Sub ?7 (: (O_Sub ?8 ?9) (: (O_Full ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: (O_Sub ?9 ?10) (: (O_Full ?11) ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: (O_Full ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Sub ?4 ?5) ?6))) (: (O_Sub ?7 (: (O_Sub ?8 ?9) (: (O_Full ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: (O_Sub ?9 ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty ([]))) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: (O_Sub ?9 ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: (O_Sub ?9 ?10) (: (O_Sub ?11 ?12) ?13))) ?14))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: (O_Sub ?9 ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Sub ?4 ?5) ?6))) (: (O_Sub ?7 (: (O_Sub ?8 ?9) (: (O_Sub ?10 ?11) ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: (O_Sub ?9 ?10) (: (O_Sub ?11 ?12) ?13))) ?14))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: (O_Sub ?9 ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Sub ?4 ?5) ?6))) (: (O_Sub ?7 (: (O_Sub ?8 ?9) (: (O_Sub ?10 ?11) ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 ([])) (: (O_Sub ?2 ?3) ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 ([]))) (: (O_Sub ?3 ?4) ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 ([])))) (: (O_Sub ?4 ?5) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: O_Empty ([]))))) (: (O_Sub ?4 ?5) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: O_Empty (: O_Empty ?4))))) (: (O_Sub ?5 ([])) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: O_Empty (: O_Empty ?4))))) (: (O_Sub ?5 (: ?6 ([]))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: O_Empty (: O_Empty ?4))))) (: (O_Sub ?5 (: ?6 (: ?7 ([])))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:44:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: O_Empty (: O_Empty ?4))))) (: (O_Sub ?5 (: ?6 (: ?7 (: O_Empty ([]))))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:44:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: O_Empty (: O_Empty ?4))))) (: (O_Sub ?5 (: ?6 (: ?7 (: (O_Sub ?8 ?9) ([]))))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:44:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: O_Empty (: (O_Sub ?4 ?5) ?6))))) (: (O_Sub ?7 ([])) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: O_Empty (: (O_Sub ?4 ?5) ?6))))) (: (O_Sub ?7 (: ?8 ([]))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: O_Empty (: (O_Sub ?4 ?5) ?6))))) (: (O_Sub ?7 (: ?8 (: ?9 ([])))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:44:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: O_Empty (: (O_Sub ?4 ?5) ?6))))) (: (O_Sub ?7 (: ?8 (: ?9 (: O_Empty ([]))))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:44:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: O_Empty (: (O_Sub ?4 ?5) ?6))))) (: (O_Sub ?7 (: ?8 (: ?9 (: (O_Full ?10) ([]))))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:44:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: O_Empty (: (O_Sub ?4 ?5) ?6))))) (: (O_Sub ?7 (: ?8 (: ?9 (: (O_Sub ?10 ?11) ([]))))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:44:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ?5) ([]))))) (: (O_Sub ?6 ?7) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ?5) (: O_Empty ?6))))) (: (O_Sub ?7 ([])) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ?5) (: O_Empty ?6))))) (: (O_Sub ?7 (: ?8 ([]))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ?5) (: O_Empty ?6))))) (: (O_Sub ?7 (: ?8 (: ?9 ([])))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:44:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ?5) (: O_Empty ?6))))) (: (O_Sub ?7 (: ?8 (: ?9 (: O_Empty ([]))))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:44:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ?5) (: O_Empty ?6))))) (: (O_Sub ?7 (: ?8 (: ?9 (: (O_Full ?10) ([]))))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:44:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ?5) (: O_Empty ?6))))) (: (O_Sub ?7 (: ?8 (: ?9 (: (O_Sub ?10 ?11) ([]))))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:44:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ?5) (: (O_Full ?6) ?7))))) (: (O_Sub ?8 ([])) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ?5) (: (O_Full ?6) ?7))))) (: (O_Sub ?8 (: ?9 ([]))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ?5) (: (O_Full ?6) ?7))))) (: (O_Sub ?8 (: ?9 (: ?10 ([])))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:44:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ?5) (: (O_Full ?6) ?7))))) (: (O_Sub ?8 (: ?9 (: ?10 (: O_Empty ([]))))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:44:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ?5) (: (O_Full ?6) ?7))))) (: (O_Sub ?8 (: ?9 (: ?10 (: (O_Full ?11) ([]))))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:44:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ?5) (: (O_Full ?6) ?7))))) (: (O_Sub ?8 (: ?9 (: ?10 (: (O_Sub ?11 ?12) ([]))))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:44:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ?5) (: (O_Sub ?6 ?7) ?8))))) (: (O_Sub ?9 ([])) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ?5) (: (O_Sub ?6 ?7) ?8))))) (: (O_Sub ?9 (: ?10 ([]))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ?5) (: (O_Sub ?6 ?7) ?8))))) (: (O_Sub ?9 (: ?10 (: ?11 ([])))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:44:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ?5) (: (O_Sub ?6 ?7) ?8))))) (: (O_Sub ?9 (: ?10 (: ?11 (: O_Empty ([]))))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:44:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ?5) (: (O_Sub ?6 ?7) ?8))))) (: (O_Sub ?9 (: ?10 (: ?11 (: (O_Full ?12) ([]))))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:44:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ?5) (: (O_Sub ?6 ?7) ?8))))) (: (O_Sub ?9 (: ?10 (: ?11 (: (O_Sub ?12 ?13) ([]))))) ?14))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:44:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 ([])) (: (O_Sub ?2 ?3) ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 ([]))) (: (O_Sub ?3 ?4) ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 ([])))) (: (O_Sub ?4 ?5) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 ([]))))) (: (O_Sub ?5 ?6) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 (: ?5 ([])))))) (: (O_Sub ?6 ?7) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:35:21-34: Irrefutable pattern failed for pattern (l4 : ll5) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 (: ?5 (: O_Empty ([]))))))) (: (O_Sub ?6 ?7) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:35:38-51: Irrefutable pattern failed for pattern (l5 : ll6) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 (: ?5 (: (O_Sub ?6 ?7) ([]))))))) (: (O_Sub ?8 ?9) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:35:38-51: Irrefutable pattern failed for pattern (l5 : ll6) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 ([])) (: (O_Sub ?2 ?3) ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 ([]))) (: (O_Sub ?3 ?4) ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 ([])))) (: (O_Sub ?4 ?5) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 ([]))))) (: (O_Sub ?5 ?6) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 (: ?5 ([])))))) (: (O_Sub ?6 ?7) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:35:21-34: Irrefutable pattern failed for pattern (l4 : ll5) case case case quadoct (O_Sub ? ([])) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case quadoct (O_Sub ? (: ?1 ([]))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case quadoct (O_Sub ? (: ?1 (: ?2 ([])))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case quadoct (O_Sub ? (: ?1 (: ?2 (: O_Empty ([]))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: O_Empty (: (O_Sub ?3 ([])) ?4))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: O_Empty (: (O_Sub ?3 (: O_Empty ([]))) ?4))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: O_Empty (: (O_Sub ?3 (: (O_Sub ?4 ?5) ([]))) ?6))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: O_Empty (: (O_Sub ?3 ([])) ?4))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: O_Empty (: (O_Sub ?3 (: ?4 ([]))) ?5))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: O_Empty (: (O_Sub ?3 (: ?4 (: ?5 ([])))) ?6))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: O_Empty (: (O_Sub ?3 ([])) ?4))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: O_Empty (: (O_Sub ?3 (: ?4 ([]))) ?5))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: O_Empty (: (O_Sub ?3 ([])) ?4))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 ?4) ([]))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 ([])) (: O_Empty ?4))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: O_Empty ([]))) (: O_Empty ?4))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ?5) ([]))) (: O_Empty ?6))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: O_Empty ?5))) (: O_Empty ?6))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: (O_Full ?5) ?6))) (: O_Empty ?7))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: (O_Sub ?5 ?6) ?7))) (: O_Empty ?8))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 ([])) (: O_Empty ?4))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: ?4 ([]))) (: O_Empty ?5))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: ?4 (: ?5 ([])))) (: O_Empty ?6))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: ?4 (: ?5 (: O_Empty ([]))))) (: O_Empty ?6))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: ?4 (: ?5 (: (O_Sub ?6 ?7) ([]))))) (: O_Empty ?8))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 ([])) (: O_Empty ?4))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: ?4 ([]))) (: O_Empty ?5))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: ?4 (: ?5 ([])))) (: O_Empty ?6))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 ([])) (: O_Empty ?4))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: ?4 ([]))) (: O_Empty ?5))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 ([])) (: (O_Full ?4) ?5))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: O_Empty ([]))) (: (O_Full ?4) ?5))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ?5) ([]))) (: (O_Full ?6) ?7))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: O_Empty ?5))) (: (O_Full ?6) ?7))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: (O_Full ?5) ?6))) (: (O_Full ?7) ?8))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: (O_Sub ?5 ?6) ?7))) (: (O_Full ?8) ?9))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 ([])) (: (O_Full ?4) ?5))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: ?4 ([]))) (: (O_Full ?5) ?6))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: ?4 (: ?5 ([])))) (: (O_Full ?6) ?7))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: ?4 (: ?5 (: O_Empty ([]))))) (: (O_Full ?6) ?7))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: ?4 (: ?5 (: (O_Sub ?6 ?7) ([]))))) (: (O_Full ?8) ?9))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 ([])) (: (O_Full ?4) ?5))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: ?4 ([]))) (: (O_Full ?5) ?6))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: ?4 (: ?5 ([])))) (: (O_Full ?6) ?7))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 ([])) (: (O_Full ?4) ?5))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: ?4 ([]))) (: (O_Full ?5) ?6))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 ([])) (: (O_Sub ?4 ?5) ?6))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: O_Empty ([]))) (: (O_Sub ?4 ?5) ?6))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: O_Empty (: O_Empty ?4))) (: (O_Sub ?5 ([])) ?6))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: O_Empty (: O_Empty ?4))) (: (O_Sub ?5 (: O_Empty ([]))) ?6))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: O_Empty (: O_Empty ?4))) (: (O_Sub ?5 (: (O_Sub ?6 ?7) ([]))) ?8))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: O_Empty (: (O_Sub ?4 ?5) ?6))) (: (O_Sub ?7 ([])) ?8))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: O_Empty (: (O_Sub ?4 ?5) ?6))) (: (O_Sub ?7 (: O_Empty ([]))) ?8))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: O_Empty (: (O_Sub ?4 ?5) ?6))) (: (O_Sub ?7 (: (O_Full ?8) ([]))) ?9))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: O_Empty (: (O_Sub ?4 ?5) ?6))) (: (O_Sub ?7 (: (O_Sub ?8 ?9) ([]))) ?10))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ?5) ([]))) (: (O_Sub ?6 ?7) ?8))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ?5) (: O_Empty ?6))) (: (O_Sub ?7 ([])) ?8))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ?5) (: O_Empty ?6))) (: (O_Sub ?7 (: O_Empty ([]))) ?8))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ?5) (: O_Empty ?6))) (: (O_Sub ?7 (: (O_Full ?8) ([]))) ?9))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ?5) (: O_Empty ?6))) (: (O_Sub ?7 (: (O_Sub ?8 ?9) ([]))) ?10))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ?5) (: (O_Full ?6) ?7))) (: (O_Sub ?8 ([])) ?9))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ?5) (: (O_Full ?6) ?7))) (: (O_Sub ?8 (: O_Empty ([]))) ?9))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ?5) (: (O_Full ?6) ?7))) (: (O_Sub ?8 (: (O_Full ?9) ([]))) ?10))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ?5) (: (O_Full ?6) ?7))) (: (O_Sub ?8 (: (O_Sub ?9 ?10) ([]))) ?11))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ?5) (: (O_Sub ?6 ?7) ?8))) (: (O_Sub ?9 ([])) ?10))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ?5) (: (O_Sub ?6 ?7) ?8))) (: (O_Sub ?9 (: O_Empty ([]))) ?10))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ?5) (: (O_Sub ?6 ?7) ?8))) (: (O_Sub ?9 (: (O_Full ?10) ([]))) ?11))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ?5) (: (O_Sub ?6 ?7) ?8))) (: (O_Sub ?9 (: (O_Sub ?10 ?11) ([]))) ?12))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 ([])) (: (O_Sub ?4 ?5) ?6))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: ?4 ([]))) (: (O_Sub ?5 ?6) ?7))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: ?4 (: ?5 ([])))) (: (O_Sub ?6 ?7) ?8))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: ?4 (: ?5 (: O_Empty ([]))))) (: (O_Sub ?6 ?7) ?8))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: ?4 (: ?5 (: (O_Sub ?6 ?7) ([]))))) (: (O_Sub ?8 ?9) ?10))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 ([])) (: (O_Sub ?4 ?5) ?6))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: ?4 ([]))) (: (O_Sub ?5 ?6) ?7))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: ?4 (: ?5 ([])))) (: (O_Sub ?6 ?7) ?8))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 ([])) (: (O_Sub ?4 ?5) ?6))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: ?4 ([]))) (: (O_Sub ?5 ?6) ?7))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case quadoct (O_Sub ? ([])) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case quadoct (O_Sub ? (: ?1 ([]))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case quadoct (O_Sub ? (: ?1 (: ?2 ([])))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 ([]))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 ([])))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:35:21-34: Irrefutable pattern failed for pattern (l4 : ll5) case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 (: O_Empty ([]))))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:35:38-51: Irrefutable pattern failed for pattern (l5 : ll6) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 (: O_Empty (: (O_Sub ?5 ([])) ?6))))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 (: (O_Sub ?5 ?6) ([]))))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:35:38-51: Irrefutable pattern failed for pattern (l5 : ll6) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 (: (O_Sub ?5 ([])) (: O_Empty ?6))))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 (: (O_Sub ?5 (: O_Empty ([]))) (: O_Empty ?6))))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 (: (O_Sub ?5 (: (O_Sub ?6 ?7) ([]))) (: O_Empty ?8))))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 (: (O_Sub ?5 ([])) (: O_Empty ?6))))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 (: (O_Sub ?5 ([])) (: (O_Full ?6) ?7))))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 (: (O_Sub ?5 (: O_Empty ([]))) (: (O_Full ?6) ?7))))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 (: (O_Sub ?5 (: (O_Sub ?6 ?7) ([]))) (: (O_Full ?8) ?9))))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 (: (O_Sub ?5 ([])) (: (O_Full ?6) ?7))))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 (: (O_Sub ?5 ([])) (: (O_Sub ?6 ?7) ?8))))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 (: (O_Sub ?5 (: O_Empty ([]))) (: (O_Sub ?6 ?7) ?8))))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 (: (O_Sub ?5 (: (O_Sub ?6 ?7) ([]))) (: (O_Sub ?8 ?9) ?10))))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 (: (O_Sub ?5 ([])) (: (O_Sub ?6 ?7) ?8))))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? ([])) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: ?1 ([]))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 ([])))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 ([]))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 ([])))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:35:21-34: Irrefutable pattern failed for pattern (l4 : ll5) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 (: ?5 ([]))))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:35:38-51: Irrefutable pattern failed for pattern (l5 : ll6) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 (: ?5 (: ?6 ([])))))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:36:21-34: Irrefutable pattern failed for pattern (l6 : ll7) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 (: ?5 (: ?6 (: O_Empty ([]))))))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:36:38-51: Irrefutable pattern failed for pattern (l7 : ll8) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 (: ?5 (: ?6 (: (O_Sub ?7 ?8) ([]))))))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:36:38-51: Irrefutable pattern failed for pattern (l7 : ll8) case case quadoct (O_Sub ? ([])) of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case quadoct (O_Sub ? (: O_Empty ([]))) of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 ([])) ?2))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: O_Empty ([]))) ?2))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: O_Empty ([]))) ?3))) ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) ?5))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: ?3 ([]))) ?4))) ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 ?3) ([]))) ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty ([]))) (: O_Empty ?3))) ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) (: O_Empty ?5))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: O_Empty ?4))) ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: O_Empty ?5))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: O_Empty ?4))) ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty ([]))) (: (O_Full ?3) ?4))) ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) (: (O_Full ?5) ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Full ?4) ?5))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: (O_Full ?5) ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Full ?4) ?5))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty ([]))) (: (O_Sub ?3 ?4) ?5))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: O_Empty ?3))) (: (O_Sub ?4 ([])) ?5))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: O_Empty ?3))) (: (O_Sub ?4 (: O_Empty ([]))) ?5))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: O_Empty ?3))) (: (O_Sub ?4 (: (O_Sub ?5 ?6) ([]))) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 ([])) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: O_Empty ([]))) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: (O_Full ?7) ([]))) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) ([]))) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) (: (O_Sub ?5 ?6) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) (: (O_Sub ?6 ([])) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) (: (O_Sub ?6 (: O_Empty ([]))) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) (: (O_Sub ?6 (: (O_Full ?7) ([]))) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) ([]))) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) (: (O_Sub ?7 ([])) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: O_Empty ([]))) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: (O_Full ?8) ([]))) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: (O_Sub ?8 ?9) ([]))) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 ([])) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: O_Empty ([]))) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: (O_Full ?9) ([]))) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: (O_Sub ?9 ?10) ([]))) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Sub ?4 ?5) ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: (O_Sub ?5 ?6) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Sub ?4 ?5) ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 ([])) ?2))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: ?2 ([]))) ?3))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: ?2 (: ?3 ([])))) ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: ?2 (: ?3 (: O_Empty ([]))))) ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ?5) ([]))))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ([])) (: O_Empty ?5))))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ([])) (: (O_Full ?5) ?6))))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ([])) (: (O_Sub ?5 ?6) ?7))))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 ([])) ?2))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: ?2 ([]))) ?3))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: ?2 (: ?3 ([])))) ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 ([]))))) ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 (: ?5 ([])))))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:35:21-34: Irrefutable pattern failed for pattern (l4 : ll5) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 (: ?5 (: O_Empty ([]))))))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:35:38-51: Irrefutable pattern failed for pattern (l5 : ll6) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 (: ?5 (: (O_Sub ?6 ?7) ([]))))))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:35:38-51: Irrefutable pattern failed for pattern (l5 : ll6) case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 ([])) ?2))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: ?2 ([]))) ?3))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: ?2 (: ?3 ([])))) ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 ([]))))) ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 (: ?5 ([])))))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:35:21-34: Irrefutable pattern failed for pattern (l4 : ll5) case case quadoct (O_Sub ? (: (O_Sub ?1 ?2) ([]))) of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case quadoct (O_Sub ? (: (O_Sub ?1 ([])) (: O_Empty ?2))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty ([]))) (: O_Empty ?2))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: O_Empty ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: O_Empty ([]))) ?3))) (: O_Empty ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) ?5))) (: O_Empty ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: O_Empty ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: ?3 ([]))) ?4))) (: O_Empty ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: ?3 (: ?4 ([])))) ?5))) (: O_Empty ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: O_Empty ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: ?3 ([]))) ?4))) (: O_Empty ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: O_Empty ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ?3) ([]))) (: O_Empty ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: O_Empty ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty ([]))) (: O_Empty ?3))) (: O_Empty ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) (: O_Empty ?5))) (: O_Empty ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: O_Empty ?4))) (: O_Empty ?5))) (: O_Empty ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: (O_Full ?4) ?5))) (: O_Empty ?6))) (: O_Empty ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: (O_Sub ?4 ?5) ?6))) (: O_Empty ?7))) (: O_Empty ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: O_Empty ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: O_Empty ?4))) (: O_Empty ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: O_Empty ?5))) (: O_Empty ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: O_Empty ([]))))) (: O_Empty ?5))) (: O_Empty ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: (O_Sub ?5 ?6) ([]))))) (: O_Empty ?7))) (: O_Empty ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: O_Empty ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: O_Empty ?4))) (: O_Empty ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: O_Empty ?5))) (: O_Empty ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: O_Empty ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: O_Empty ?4))) (: O_Empty ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: O_Empty ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty ([]))) (: (O_Full ?3) ?4))) (: O_Empty ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) (: (O_Full ?5) ?6))) (: O_Empty ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: O_Empty ?4))) (: (O_Full ?5) ?6))) (: O_Empty ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: (O_Full ?4) ?5))) (: (O_Full ?6) ?7))) (: O_Empty ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: (O_Sub ?4 ?5) ?6))) (: (O_Full ?7) ?8))) (: O_Empty ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: O_Empty ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Full ?4) ?5))) (: O_Empty ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: (O_Full ?5) ?6))) (: O_Empty ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: O_Empty ([]))))) (: (O_Full ?5) ?6))) (: O_Empty ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: (O_Sub ?5 ?6) ([]))))) (: (O_Full ?7) ?8))) (: O_Empty ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: O_Empty ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Full ?4) ?5))) (: O_Empty ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: (O_Full ?5) ?6))) (: O_Empty ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: O_Empty ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Full ?4) ?5))) (: O_Empty ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: O_Empty ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty ([]))) (: (O_Sub ?3 ?4) ?5))) (: O_Empty ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: O_Empty ?3))) (: (O_Sub ?4 ([])) ?5))) (: O_Empty ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: O_Empty ?3))) (: (O_Sub ?4 (: O_Empty ([]))) ?5))) (: O_Empty ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: O_Empty ?3))) (: (O_Sub ?4 (: (O_Sub ?5 ?6) ([]))) ?7))) (: O_Empty ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 ([])) ?7))) (: O_Empty ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: O_Empty ([]))) ?7))) (: O_Empty ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: (O_Full ?7) ([]))) ?8))) (: O_Empty ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) ([]))) ?9))) (: O_Empty ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) (: (O_Sub ?5 ?6) ?7))) (: O_Empty ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) (: (O_Sub ?6 ([])) ?7))) (: O_Empty ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) (: (O_Sub ?6 (: O_Empty ([]))) ?7))) (: O_Empty ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) (: (O_Sub ?6 (: (O_Full ?7) ([]))) ?8))) (: O_Empty ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) ([]))) ?9))) (: O_Empty ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) (: (O_Sub ?7 ([])) ?8))) (: O_Empty ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: O_Empty ([]))) ?8))) (: O_Empty ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: (O_Full ?8) ([]))) ?9))) (: O_Empty ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: (O_Sub ?8 ?9) ([]))) ?10))) (: O_Empty ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 ([])) ?9))) (: O_Empty ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: O_Empty ([]))) ?9))) (: O_Empty ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: (O_Full ?9) ([]))) ?10))) (: O_Empty ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: (O_Sub ?9 ?10) ([]))) ?11))) (: O_Empty ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: O_Empty ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Sub ?4 ?5) ?6))) (: O_Empty ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: (O_Sub ?5 ?6) ?7))) (: O_Empty ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: O_Empty ([]))))) (: (O_Sub ?5 ?6) ?7))) (: O_Empty ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: (O_Sub ?5 ?6) ([]))))) (: (O_Sub ?7 ?8) ?9))) (: O_Empty ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: O_Empty ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Sub ?4 ?5) ?6))) (: O_Empty ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: (O_Sub ?5 ?6) ?7))) (: O_Empty ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: O_Empty ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Sub ?4 ?5) ?6))) (: O_Empty ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 ([])) (: O_Empty ?2))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 ([]))) (: O_Empty ?3))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 ([])))) (: O_Empty ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: O_Empty ([]))))) (: O_Empty ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: O_Empty (: (O_Sub ?4 ([])) ?5))))) (: O_Empty ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ?5) ([]))))) (: O_Empty ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ([])) (: O_Empty ?5))))) (: O_Empty ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 (: O_Empty ([]))) (: O_Empty ?5))))) (: O_Empty ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 (: (O_Sub ?5 ?6) ([]))) (: O_Empty ?7))))) (: O_Empty ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ([])) (: O_Empty ?5))))) (: O_Empty ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ([])) (: (O_Full ?5) ?6))))) (: O_Empty ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 (: O_Empty ([]))) (: (O_Full ?5) ?6))))) (: O_Empty ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 (: (O_Sub ?5 ?6) ([]))) (: (O_Full ?7) ?8))))) (: O_Empty ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ([])) (: (O_Full ?5) ?6))))) (: O_Empty ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ([])) (: (O_Sub ?5 ?6) ?7))))) (: O_Empty ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 (: O_Empty ([]))) (: (O_Sub ?5 ?6) ?7))))) (: O_Empty ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 (: (O_Sub ?5 ?6) ([]))) (: (O_Sub ?7 ?8) ?9))))) (: O_Empty ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ([])) (: (O_Sub ?5 ?6) ?7))))) (: O_Empty ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 ([])) (: O_Empty ?2))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 ([]))) (: O_Empty ?3))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 ([])))) (: O_Empty ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 ([]))))) (: O_Empty ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 (: ?5 ([])))))) (: O_Empty ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:35:21-34: Irrefutable pattern failed for pattern (l4 : ll5) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 (: ?5 (: O_Empty ([]))))))) (: O_Empty ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:35:38-51: Irrefutable pattern failed for pattern (l5 : ll6) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 (: ?5 (: (O_Sub ?6 ?7) ([]))))))) (: O_Empty ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:35:38-51: Irrefutable pattern failed for pattern (l5 : ll6) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 ([])) (: O_Empty ?2))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 ([]))) (: O_Empty ?3))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 ([])))) (: O_Empty ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 ([]))))) (: O_Empty ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 (: ?5 ([])))))) (: O_Empty ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:35:21-34: Irrefutable pattern failed for pattern (l4 : ll5) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 (: ?5 (: ?6 ([]))))))) (: O_Empty ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:35:38-51: Irrefutable pattern failed for pattern (l5 : ll6) case case case case quadoct (O_Sub ? (: (O_Sub ?1 ([])) (: (O_Full ?2) ?3))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty ([]))) (: (O_Full ?2) ?3))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: (O_Full ?4) ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: O_Empty ([]))) ?3))) (: (O_Full ?4) ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) ?5))) (: (O_Full ?6) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: (O_Full ?4) ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: ?3 ([]))) ?4))) (: (O_Full ?5) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: ?3 (: ?4 ([])))) ?5))) (: (O_Full ?6) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: (O_Full ?4) ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: ?3 ([]))) ?4))) (: (O_Full ?5) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: (O_Full ?4) ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ?3) ([]))) (: (O_Full ?4) ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: (O_Full ?4) ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty ([]))) (: O_Empty ?3))) (: (O_Full ?4) ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) (: O_Empty ?5))) (: (O_Full ?6) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: O_Empty ?4))) (: O_Empty ?5))) (: (O_Full ?6) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: (O_Full ?4) ?5))) (: O_Empty ?6))) (: (O_Full ?7) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: (O_Sub ?4 ?5) ?6))) (: O_Empty ?7))) (: (O_Full ?8) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: (O_Full ?4) ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: O_Empty ?4))) (: (O_Full ?5) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: O_Empty ?5))) (: (O_Full ?6) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: O_Empty ([]))))) (: O_Empty ?5))) (: (O_Full ?6) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: (O_Sub ?5 ?6) ([]))))) (: O_Empty ?7))) (: (O_Full ?8) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: (O_Full ?4) ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: O_Empty ?4))) (: (O_Full ?5) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: O_Empty ?5))) (: (O_Full ?6) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: (O_Full ?4) ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: O_Empty ?4))) (: (O_Full ?5) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: (O_Full ?5) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty ([]))) (: (O_Full ?3) ?4))) (: (O_Full ?5) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) (: (O_Full ?5) ?6))) (: (O_Full ?7) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: O_Empty ?4))) (: (O_Full ?5) ?6))) (: (O_Full ?7) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: (O_Full ?4) ?5))) (: (O_Full ?6) ?7))) (: (O_Full ?8) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: (O_Sub ?4 ?5) ?6))) (: (O_Full ?7) ?8))) (: (O_Full ?9) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: (O_Full ?5) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Full ?4) ?5))) (: (O_Full ?6) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: (O_Full ?5) ?6))) (: (O_Full ?7) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: O_Empty ([]))))) (: (O_Full ?5) ?6))) (: (O_Full ?7) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: (O_Sub ?5 ?6) ([]))))) (: (O_Full ?7) ?8))) (: (O_Full ?9) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: (O_Full ?5) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Full ?4) ?5))) (: (O_Full ?6) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: (O_Full ?5) ?6))) (: (O_Full ?7) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: (O_Full ?5) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Full ?4) ?5))) (: (O_Full ?6) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: (O_Full ?6) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty ([]))) (: (O_Sub ?3 ?4) ?5))) (: (O_Full ?6) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: O_Empty ?3))) (: (O_Sub ?4 ([])) ?5))) (: (O_Full ?6) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: O_Empty ?3))) (: (O_Sub ?4 (: O_Empty ([]))) ?5))) (: (O_Full ?6) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: O_Empty ?3))) (: (O_Sub ?4 (: (O_Sub ?5 ?6) ([]))) ?7))) (: (O_Full ?8) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 ([])) ?7))) (: (O_Full ?8) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: O_Empty ([]))) ?7))) (: (O_Full ?8) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: (O_Full ?7) ([]))) ?8))) (: (O_Full ?9) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) ([]))) ?9))) (: (O_Full ?10) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) (: (O_Sub ?5 ?6) ?7))) (: (O_Full ?8) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) (: (O_Sub ?6 ([])) ?7))) (: (O_Full ?8) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) (: (O_Sub ?6 (: O_Empty ([]))) ?7))) (: (O_Full ?8) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) (: (O_Sub ?6 (: (O_Full ?7) ([]))) ?8))) (: (O_Full ?9) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) ([]))) ?9))) (: (O_Full ?10) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) (: (O_Sub ?7 ([])) ?8))) (: (O_Full ?9) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: O_Empty ([]))) ?8))) (: (O_Full ?9) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: (O_Full ?8) ([]))) ?9))) (: (O_Full ?10) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: (O_Sub ?8 ?9) ([]))) ?10))) (: (O_Full ?11) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 ([])) ?9))) (: (O_Full ?10) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: O_Empty ([]))) ?9))) (: (O_Full ?10) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: (O_Full ?9) ([]))) ?10))) (: (O_Full ?11) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: (O_Sub ?9 ?10) ([]))) ?11))) (: (O_Full ?12) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: (O_Full ?6) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Sub ?4 ?5) ?6))) (: (O_Full ?7) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: (O_Sub ?5 ?6) ?7))) (: (O_Full ?8) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: O_Empty ([]))))) (: (O_Sub ?5 ?6) ?7))) (: (O_Full ?8) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: (O_Sub ?5 ?6) ([]))))) (: (O_Sub ?7 ?8) ?9))) (: (O_Full ?10) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: (O_Full ?6) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Sub ?4 ?5) ?6))) (: (O_Full ?7) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: (O_Sub ?5 ?6) ?7))) (: (O_Full ?8) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: (O_Full ?6) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Sub ?4 ?5) ?6))) (: (O_Full ?7) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 ([])) (: (O_Full ?2) ?3))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 ([]))) (: (O_Full ?3) ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 ([])))) (: (O_Full ?4) ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: O_Empty ([]))))) (: (O_Full ?4) ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: O_Empty (: (O_Sub ?4 ([])) ?5))))) (: (O_Full ?6) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ?5) ([]))))) (: (O_Full ?6) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ([])) (: O_Empty ?5))))) (: (O_Full ?6) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 (: O_Empty ([]))) (: O_Empty ?5))))) (: (O_Full ?6) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 (: (O_Sub ?5 ?6) ([]))) (: O_Empty ?7))))) (: (O_Full ?8) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ([])) (: O_Empty ?5))))) (: (O_Full ?6) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ([])) (: (O_Full ?5) ?6))))) (: (O_Full ?7) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 (: O_Empty ([]))) (: (O_Full ?5) ?6))))) (: (O_Full ?7) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 (: (O_Sub ?5 ?6) ([]))) (: (O_Full ?7) ?8))))) (: (O_Full ?9) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ([])) (: (O_Full ?5) ?6))))) (: (O_Full ?7) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ([])) (: (O_Sub ?5 ?6) ?7))))) (: (O_Full ?8) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 (: O_Empty ([]))) (: (O_Sub ?5 ?6) ?7))))) (: (O_Full ?8) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 (: (O_Sub ?5 ?6) ([]))) (: (O_Sub ?7 ?8) ?9))))) (: (O_Full ?10) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ([])) (: (O_Sub ?5 ?6) ?7))))) (: (O_Full ?8) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 ([])) (: (O_Full ?2) ?3))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 ([]))) (: (O_Full ?3) ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 ([])))) (: (O_Full ?4) ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 ([]))))) (: (O_Full ?5) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 (: ?5 ([])))))) (: (O_Full ?6) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:35:21-34: Irrefutable pattern failed for pattern (l4 : ll5) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 (: ?5 (: O_Empty ([]))))))) (: (O_Full ?6) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:35:38-51: Irrefutable pattern failed for pattern (l5 : ll6) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 (: ?5 (: (O_Sub ?6 ?7) ([]))))))) (: (O_Full ?8) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:35:38-51: Irrefutable pattern failed for pattern (l5 : ll6) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 ([])) (: (O_Full ?2) ?3))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 ([]))) (: (O_Full ?3) ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 ([])))) (: (O_Full ?4) ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 ([]))))) (: (O_Full ?5) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 (: ?5 ([])))))) (: (O_Full ?6) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:35:21-34: Irrefutable pattern failed for pattern (l4 : ll5) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 (: ?5 (: ?6 ([]))))))) (: (O_Full ?7) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:35:38-51: Irrefutable pattern failed for pattern (l5 : ll6) case case case case quadoct (O_Sub ? (: (O_Sub ?1 ([])) (: (O_Sub ?2 ?3) ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty ([]))) (: (O_Sub ?2 ?3) ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 ([])) ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: O_Empty ([]))) ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: O_Empty (: (O_Sub ?4 ([])) ?5))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: O_Empty (: (O_Sub ?4 (: O_Empty ([]))) ?5))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: O_Empty (: (O_Sub ?4 (: (O_Sub ?5 ?6) ([]))) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: O_Empty (: (O_Sub ?4 ([])) ?5))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: O_Empty (: (O_Sub ?4 (: ?5 ([]))) ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: O_Empty (: (O_Sub ?4 ([])) ?5))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: (O_Sub ?4 ?5) ([]))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: O_Empty ?5))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: (O_Sub ?4 (: O_Empty ([]))) (: O_Empty ?5))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: (O_Sub ?4 (: (O_Sub ?5 ?6) ([]))) (: O_Empty ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: O_Empty ?5))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: (O_Sub ?4 (: ?5 ([]))) (: O_Empty ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: (O_Sub ?4 (: ?5 (: ?6 ([])))) (: O_Empty ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: O_Empty ?5))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: (O_Sub ?4 (: ?5 ([]))) (: O_Empty ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: O_Empty ?5))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: (O_Full ?5) ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: (O_Sub ?4 (: O_Empty ([]))) (: (O_Full ?5) ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: (O_Sub ?4 (: (O_Sub ?5 ?6) ([]))) (: (O_Full ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: (O_Full ?5) ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: (O_Sub ?4 (: ?5 ([]))) (: (O_Full ?6) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: (O_Sub ?4 (: ?5 (: ?6 ([])))) (: (O_Full ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: (O_Full ?5) ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: (O_Sub ?4 (: ?5 ([]))) (: (O_Full ?6) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: (O_Full ?5) ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: (O_Sub ?5 ?6) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: (O_Sub ?4 (: O_Empty ([]))) (: (O_Sub ?5 ?6) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: (O_Sub ?4 (: O_Empty (: O_Empty ?5))) (: (O_Sub ?6 ([])) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: (O_Sub ?4 (: O_Empty (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 ([])) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: (O_Sub ?4 (: (O_Sub ?5 ?6) ([]))) (: (O_Sub ?7 ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: O_Empty ?7))) (: (O_Sub ?8 ([])) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: (O_Full ?7) ?8))) (: (O_Sub ?9 ([])) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: (O_Sub ?7 ?8) ?9))) (: (O_Sub ?10 ([])) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: (O_Sub ?5 ?6) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: (O_Sub ?4 (: ?5 ([]))) (: (O_Sub ?6 ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: (O_Sub ?4 (: ?5 (: ?6 ([])))) (: (O_Sub ?7 ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: (O_Sub ?5 ?6) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: (O_Sub ?4 (: ?5 ([]))) (: (O_Sub ?6 ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: (O_Sub ?5 ?6) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ?3) ?4))) (: (O_Sub ?5 ([])) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ?3) ?4))) (: (O_Sub ?5 (: O_Empty ([]))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: (O_Sub ?4 (: O_Empty (: O_Empty ?5))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: O_Empty ([]))) ?3))) (: (O_Sub ?4 (: O_Empty (: O_Empty ?5))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) ?5))) (: (O_Sub ?6 (: O_Empty (: O_Empty ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: (O_Sub ?4 (: O_Empty (: O_Empty ?5))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: ?3 ([]))) ?4))) (: (O_Sub ?5 (: O_Empty (: O_Empty ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: ?3 (: ?4 ([])))) ?5))) (: (O_Sub ?6 (: O_Empty (: O_Empty ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: (O_Sub ?4 (: O_Empty (: O_Empty ?5))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: ?3 ([]))) ?4))) (: (O_Sub ?5 (: O_Empty (: O_Empty ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: (O_Sub ?4 (: O_Empty (: O_Empty ?5))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: (O_Sub ?4 (: O_Empty (: (O_Full ?5) ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: O_Empty ([]))) ?3))) (: (O_Sub ?4 (: O_Empty (: (O_Full ?5) ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) ?5))) (: (O_Sub ?6 (: O_Empty (: (O_Full ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: (O_Sub ?4 (: O_Empty (: (O_Full ?5) ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: ?3 ([]))) ?4))) (: (O_Sub ?5 (: O_Empty (: (O_Full ?6) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: ?3 (: ?4 ([])))) ?5))) (: (O_Sub ?6 (: O_Empty (: (O_Full ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: (O_Sub ?4 (: O_Empty (: (O_Full ?5) ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: ?3 ([]))) ?4))) (: (O_Sub ?5 (: O_Empty (: (O_Full ?6) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: (O_Sub ?4 (: O_Empty (: (O_Full ?5) ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: (O_Sub ?4 (: O_Empty (: (O_Sub ?5 ?6) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: O_Empty ([]))) ?3))) (: (O_Sub ?4 (: O_Empty (: (O_Sub ?5 ?6) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: O_Empty (: O_Empty ?3))) ?4))) (: (O_Sub ?5 (: O_Empty (: (O_Sub ?6 ([])) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) ?6))) (: (O_Sub ?7 (: O_Empty (: (O_Sub ?8 ([])) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) ?5))) (: (O_Sub ?6 (: O_Empty (: (O_Sub ?7 ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) ?6))) (: (O_Sub ?7 (: O_Empty (: (O_Sub ?8 ([])) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) ?7))) (: (O_Sub ?8 (: O_Empty (: (O_Sub ?9 ([])) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) ?8))) (: (O_Sub ?9 (: O_Empty (: (O_Sub ?10 ([])) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: (O_Sub ?4 (: O_Empty (: (O_Sub ?5 ?6) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: ?3 ([]))) ?4))) (: (O_Sub ?5 (: O_Empty (: (O_Sub ?6 ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: ?3 (: ?4 ([])))) ?5))) (: (O_Sub ?6 (: O_Empty (: (O_Sub ?7 ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: (O_Sub ?4 (: O_Empty (: (O_Sub ?5 ?6) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: ?3 ([]))) ?4))) (: (O_Sub ?5 (: O_Empty (: (O_Sub ?6 ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: (O_Sub ?4 (: O_Empty (: (O_Sub ?5 ?6) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ?3) ?4))) (: (O_Sub ?5 (: (O_Full ?6) ([]))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: (O_Sub ?4 (: (O_Full ?5) (: O_Empty ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: O_Empty ([]))) ?3))) (: (O_Sub ?4 (: (O_Full ?5) (: O_Empty ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: O_Empty ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: (O_Sub ?4 (: (O_Full ?5) (: O_Empty ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: ?3 ([]))) ?4))) (: (O_Sub ?5 (: (O_Full ?6) (: O_Empty ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: ?3 (: ?4 ([])))) ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: O_Empty ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: (O_Sub ?4 (: (O_Full ?5) (: O_Empty ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: ?3 ([]))) ?4))) (: (O_Sub ?5 (: (O_Full ?6) (: O_Empty ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: (O_Sub ?4 (: (O_Full ?5) (: O_Empty ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: (O_Sub ?4 (: (O_Full ?5) (: (O_Full ?6) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: O_Empty ([]))) ?3))) (: (O_Sub ?4 (: (O_Full ?5) (: (O_Full ?6) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: (O_Full ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: (O_Sub ?4 (: (O_Full ?5) (: (O_Full ?6) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: ?3 ([]))) ?4))) (: (O_Sub ?5 (: (O_Full ?6) (: (O_Full ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: ?3 (: ?4 ([])))) ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: (O_Full ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: (O_Sub ?4 (: (O_Full ?5) (: (O_Full ?6) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: ?3 ([]))) ?4))) (: (O_Sub ?5 (: (O_Full ?6) (: (O_Full ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: (O_Sub ?4 (: (O_Full ?5) (: (O_Full ?6) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: (O_Sub ?4 (: (O_Full ?5) (: (O_Sub ?6 ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: O_Empty ([]))) ?3))) (: (O_Sub ?4 (: (O_Full ?5) (: (O_Sub ?6 ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) ?6))) (: (O_Sub ?7 (: (O_Full ?8) (: (O_Sub ?9 ([])) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: (O_Sub ?8 ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) ?6))) (: (O_Sub ?7 (: (O_Full ?8) (: (O_Sub ?9 ([])) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) ?7))) (: (O_Sub ?8 (: (O_Full ?9) (: (O_Sub ?10 ([])) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) ?8))) (: (O_Sub ?9 (: (O_Full ?10) (: (O_Sub ?11 ([])) ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: (O_Sub ?4 (: (O_Full ?5) (: (O_Sub ?6 ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: ?3 ([]))) ?4))) (: (O_Sub ?5 (: (O_Full ?6) (: (O_Sub ?7 ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: ?3 (: ?4 ([])))) ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: (O_Sub ?8 ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: (O_Sub ?4 (: (O_Full ?5) (: (O_Sub ?6 ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: ?3 ([]))) ?4))) (: (O_Sub ?5 (: (O_Full ?6) (: (O_Sub ?7 ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: (O_Sub ?4 (: (O_Full ?5) (: (O_Sub ?6 ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ?3) ?4))) (: (O_Sub ?5 (: (O_Sub ?6 ?7) ([]))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: O_Empty ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: O_Empty ([]))) ?3))) (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: O_Empty ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: O_Empty (: O_Empty ?3))) ?4))) (: (O_Sub ?5 (: (O_Sub ?6 ([])) (: O_Empty ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) ?6))) (: (O_Sub ?7 (: (O_Sub ?8 ([])) (: O_Empty ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: O_Empty ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) ?6))) (: (O_Sub ?7 (: (O_Sub ?8 ([])) (: O_Empty ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) ?7))) (: (O_Sub ?8 (: (O_Sub ?9 ([])) (: O_Empty ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) ?8))) (: (O_Sub ?9 (: (O_Sub ?10 ([])) (: O_Empty ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: O_Empty ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: ?3 ([]))) ?4))) (: (O_Sub ?5 (: (O_Sub ?6 ?7) (: O_Empty ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: ?3 (: ?4 ([])))) ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: O_Empty ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: O_Empty ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: ?3 ([]))) ?4))) (: (O_Sub ?5 (: (O_Sub ?6 ?7) (: O_Empty ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: O_Empty ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: (O_Full ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: O_Empty ([]))) ?3))) (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: (O_Full ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: O_Empty (: O_Empty ?3))) ?4))) (: (O_Sub ?5 (: (O_Sub ?6 ([])) (: (O_Full ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) ?6))) (: (O_Sub ?7 (: (O_Sub ?8 ([])) (: (O_Full ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: (O_Full ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) ?6))) (: (O_Sub ?7 (: (O_Sub ?8 ([])) (: (O_Full ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) ?7))) (: (O_Sub ?8 (: (O_Sub ?9 ([])) (: (O_Full ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) ?8))) (: (O_Sub ?9 (: (O_Sub ?10 ([])) (: (O_Full ?11) ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: (O_Full ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: ?3 ([]))) ?4))) (: (O_Sub ?5 (: (O_Sub ?6 ?7) (: (O_Full ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: ?3 (: ?4 ([])))) ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: (O_Full ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: (O_Full ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: ?3 ([]))) ?4))) (: (O_Sub ?5 (: (O_Sub ?6 ?7) (: (O_Full ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: (O_Full ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: (O_Sub ?7 ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: O_Empty ([]))) ?3))) (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: (O_Sub ?7 ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: O_Empty (: O_Empty ?3))) ?4))) (: (O_Sub ?5 (: (O_Sub ?6 ([])) (: (O_Sub ?7 ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) ?6))) (: (O_Sub ?7 (: (O_Sub ?8 ([])) (: (O_Sub ?9 ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: (O_Sub ?9 ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) ?6))) (: (O_Sub ?7 (: (O_Sub ?8 ([])) (: (O_Sub ?9 ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) ?7))) (: (O_Sub ?8 (: (O_Sub ?9 ([])) (: (O_Sub ?10 ?11) ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) ?8))) (: (O_Sub ?9 (: (O_Sub ?10 ([])) (: (O_Sub ?11 ?12) ?13))) ?14))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: (O_Sub ?7 ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: ?3 ([]))) ?4))) (: (O_Sub ?5 (: (O_Sub ?6 ?7) (: (O_Sub ?8 ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: ?3 (: ?4 ([])))) ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: (O_Sub ?9 ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: (O_Sub ?7 ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: ?3 ([]))) ?4))) (: (O_Sub ?5 (: (O_Sub ?6 ?7) (: (O_Sub ?8 ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: (O_Sub ?7 ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ?3) ([]))) (: (O_Sub ?4 ?5) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ?3) (: O_Empty ?4))) (: (O_Sub ?5 ([])) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ?3) (: O_Empty ?4))) (: (O_Sub ?5 (: O_Empty ([]))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: (O_Sub ?4 (: O_Empty (: O_Empty ?5))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty ([]))) (: O_Empty ?3))) (: (O_Sub ?4 (: O_Empty (: O_Empty ?5))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) (: O_Empty ?5))) (: (O_Sub ?6 (: O_Empty (: O_Empty ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: (O_Sub ?4 (: O_Empty (: O_Empty ?5))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: O_Empty ?4))) (: (O_Sub ?5 (: O_Empty (: O_Empty ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: O_Empty ?5))) (: (O_Sub ?6 (: O_Empty (: O_Empty ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: (O_Sub ?4 (: O_Empty (: O_Empty ?5))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: O_Empty ?4))) (: (O_Sub ?5 (: O_Empty (: O_Empty ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: O_Empty ?5))) (: (O_Sub ?6 (: O_Empty (: O_Empty ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: (O_Sub ?4 (: O_Empty (: O_Empty ?5))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: O_Empty ?4))) (: (O_Sub ?5 (: O_Empty (: O_Empty ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: (O_Sub ?4 (: O_Empty (: (O_Full ?5) ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty ([]))) (: O_Empty ?3))) (: (O_Sub ?4 (: O_Empty (: (O_Full ?5) ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) (: O_Empty ?5))) (: (O_Sub ?6 (: O_Empty (: (O_Full ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: (O_Sub ?4 (: O_Empty (: (O_Full ?5) ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: O_Empty ?4))) (: (O_Sub ?5 (: O_Empty (: (O_Full ?6) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: O_Empty ?5))) (: (O_Sub ?6 (: O_Empty (: (O_Full ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: (O_Sub ?4 (: O_Empty (: (O_Full ?5) ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: O_Empty ?4))) (: (O_Sub ?5 (: O_Empty (: (O_Full ?6) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: O_Empty ?5))) (: (O_Sub ?6 (: O_Empty (: (O_Full ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: (O_Sub ?4 (: O_Empty (: (O_Full ?5) ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: O_Empty ?4))) (: (O_Sub ?5 (: O_Empty (: (O_Full ?6) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: (O_Sub ?4 (: O_Empty (: (O_Sub ?5 ?6) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty ([]))) (: O_Empty ?3))) (: (O_Sub ?4 (: O_Empty (: (O_Sub ?5 ?6) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: O_Empty ?3))) (: O_Empty ?4))) (: (O_Sub ?5 (: O_Empty (: (O_Sub ?6 ([])) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) (: O_Empty ?6))) (: (O_Sub ?7 (: O_Empty (: (O_Sub ?8 ([])) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) (: O_Empty ?5))) (: (O_Sub ?6 (: O_Empty (: (O_Sub ?7 ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) (: O_Empty ?6))) (: (O_Sub ?7 (: O_Empty (: (O_Sub ?8 ([])) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) (: O_Empty ?7))) (: (O_Sub ?8 (: O_Empty (: (O_Sub ?9 ([])) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) (: O_Empty ?8))) (: (O_Sub ?9 (: O_Empty (: (O_Sub ?10 ([])) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: (O_Sub ?4 (: O_Empty (: (O_Sub ?5 ?6) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: O_Empty ?4))) (: (O_Sub ?5 (: O_Empty (: (O_Sub ?6 ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: O_Empty ?5))) (: (O_Sub ?6 (: O_Empty (: (O_Sub ?7 ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: (O_Sub ?4 (: O_Empty (: (O_Sub ?5 ?6) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: O_Empty ?4))) (: (O_Sub ?5 (: O_Empty (: (O_Sub ?6 ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: O_Empty ?5))) (: (O_Sub ?6 (: O_Empty (: (O_Sub ?7 ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: (O_Sub ?4 (: O_Empty (: (O_Sub ?5 ?6) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: O_Empty ?4))) (: (O_Sub ?5 (: O_Empty (: (O_Sub ?6 ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ?3) (: O_Empty ?4))) (: (O_Sub ?5 (: (O_Full ?6) ([]))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: (O_Sub ?4 (: (O_Full ?5) (: O_Empty ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty ([]))) (: O_Empty ?3))) (: (O_Sub ?4 (: (O_Full ?5) (: O_Empty ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) (: O_Empty ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: O_Empty ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: (O_Sub ?4 (: (O_Full ?5) (: O_Empty ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: O_Empty ?4))) (: (O_Sub ?5 (: (O_Full ?6) (: O_Empty ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: O_Empty ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: O_Empty ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: (O_Sub ?4 (: (O_Full ?5) (: O_Empty ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: O_Empty ?4))) (: (O_Sub ?5 (: (O_Full ?6) (: O_Empty ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: O_Empty ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: O_Empty ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: (O_Sub ?4 (: (O_Full ?5) (: O_Empty ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: O_Empty ?4))) (: (O_Sub ?5 (: (O_Full ?6) (: O_Empty ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: (O_Sub ?4 (: (O_Full ?5) (: (O_Full ?6) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty ([]))) (: O_Empty ?3))) (: (O_Sub ?4 (: (O_Full ?5) (: (O_Full ?6) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) (: O_Empty ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: (O_Full ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: (O_Sub ?4 (: (O_Full ?5) (: (O_Full ?6) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: O_Empty ?4))) (: (O_Sub ?5 (: (O_Full ?6) (: (O_Full ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: O_Empty ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: (O_Full ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: (O_Sub ?4 (: (O_Full ?5) (: (O_Full ?6) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: O_Empty ?4))) (: (O_Sub ?5 (: (O_Full ?6) (: (O_Full ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: O_Empty ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: (O_Full ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: (O_Sub ?4 (: (O_Full ?5) (: (O_Full ?6) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: O_Empty ?4))) (: (O_Sub ?5 (: (O_Full ?6) (: (O_Full ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: (O_Sub ?4 (: (O_Full ?5) (: (O_Sub ?6 ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty ([]))) (: O_Empty ?3))) (: (O_Sub ?4 (: (O_Full ?5) (: (O_Sub ?6 ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) (: O_Empty ?6))) (: (O_Sub ?7 (: (O_Full ?8) (: (O_Sub ?9 ([])) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) (: O_Empty ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: (O_Sub ?8 ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) (: O_Empty ?6))) (: (O_Sub ?7 (: (O_Full ?8) (: (O_Sub ?9 ([])) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) (: O_Empty ?7))) (: (O_Sub ?8 (: (O_Full ?9) (: (O_Sub ?10 ([])) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) (: O_Empty ?8))) (: (O_Sub ?9 (: (O_Full ?10) (: (O_Sub ?11 ([])) ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: (O_Sub ?4 (: (O_Full ?5) (: (O_Sub ?6 ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: O_Empty ?4))) (: (O_Sub ?5 (: (O_Full ?6) (: (O_Sub ?7 ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: O_Empty ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: (O_Sub ?8 ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: (O_Sub ?4 (: (O_Full ?5) (: (O_Sub ?6 ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: O_Empty ?4))) (: (O_Sub ?5 (: (O_Full ?6) (: (O_Sub ?7 ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: O_Empty ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: (O_Sub ?8 ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: (O_Sub ?4 (: (O_Full ?5) (: (O_Sub ?6 ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: O_Empty ?4))) (: (O_Sub ?5 (: (O_Full ?6) (: (O_Sub ?7 ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ?3) (: O_Empty ?4))) (: (O_Sub ?5 (: (O_Sub ?6 ?7) ([]))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: O_Empty ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty ([]))) (: O_Empty ?3))) (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: O_Empty ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: O_Empty ?3))) (: O_Empty ?4))) (: (O_Sub ?5 (: (O_Sub ?6 ([])) (: O_Empty ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) (: O_Empty ?6))) (: (O_Sub ?7 (: (O_Sub ?8 ([])) (: O_Empty ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) (: O_Empty ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: O_Empty ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) (: O_Empty ?6))) (: (O_Sub ?7 (: (O_Sub ?8 ([])) (: O_Empty ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) (: O_Empty ?7))) (: (O_Sub ?8 (: (O_Sub ?9 ([])) (: O_Empty ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) (: O_Empty ?8))) (: (O_Sub ?9 (: (O_Sub ?10 ([])) (: O_Empty ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: O_Empty ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: O_Empty ?4))) (: (O_Sub ?5 (: (O_Sub ?6 ?7) (: O_Empty ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: O_Empty ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: O_Empty ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: O_Empty ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: O_Empty ?4))) (: (O_Sub ?5 (: (O_Sub ?6 ?7) (: O_Empty ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: O_Empty ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: O_Empty ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: O_Empty ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: O_Empty ?4))) (: (O_Sub ?5 (: (O_Sub ?6 ?7) (: O_Empty ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: (O_Full ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty ([]))) (: O_Empty ?3))) (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: (O_Full ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: O_Empty ?3))) (: O_Empty ?4))) (: (O_Sub ?5 (: (O_Sub ?6 ([])) (: (O_Full ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) (: O_Empty ?6))) (: (O_Sub ?7 (: (O_Sub ?8 ([])) (: (O_Full ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) (: O_Empty ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: (O_Full ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) (: O_Empty ?6))) (: (O_Sub ?7 (: (O_Sub ?8 ([])) (: (O_Full ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) (: O_Empty ?7))) (: (O_Sub ?8 (: (O_Sub ?9 ([])) (: (O_Full ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) (: O_Empty ?8))) (: (O_Sub ?9 (: (O_Sub ?10 ([])) (: (O_Full ?11) ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: (O_Full ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: O_Empty ?4))) (: (O_Sub ?5 (: (O_Sub ?6 ?7) (: (O_Full ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: O_Empty ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: (O_Full ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: (O_Full ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: O_Empty ?4))) (: (O_Sub ?5 (: (O_Sub ?6 ?7) (: (O_Full ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: O_Empty ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: (O_Full ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: (O_Full ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: O_Empty ?4))) (: (O_Sub ?5 (: (O_Sub ?6 ?7) (: (O_Full ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: (O_Sub ?7 ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty ([]))) (: O_Empty ?3))) (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: (O_Sub ?7 ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: O_Empty ?3))) (: O_Empty ?4))) (: (O_Sub ?5 (: (O_Sub ?6 ([])) (: (O_Sub ?7 ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) (: O_Empty ?6))) (: (O_Sub ?7 (: (O_Sub ?8 ([])) (: (O_Sub ?9 ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) (: O_Empty ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: (O_Sub ?9 ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) (: O_Empty ?6))) (: (O_Sub ?7 (: (O_Sub ?8 ([])) (: (O_Sub ?9 ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) (: O_Empty ?7))) (: (O_Sub ?8 (: (O_Sub ?9 ([])) (: (O_Sub ?10 ?11) ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) (: O_Empty ?8))) (: (O_Sub ?9 (: (O_Sub ?10 ([])) (: (O_Sub ?11 ?12) ?13))) ?14))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: (O_Sub ?7 ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: O_Empty ?4))) (: (O_Sub ?5 (: (O_Sub ?6 ?7) (: (O_Sub ?8 ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: O_Empty ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: (O_Sub ?9 ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: (O_Sub ?7 ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: O_Empty ?4))) (: (O_Sub ?5 (: (O_Sub ?6 ?7) (: (O_Sub ?8 ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: O_Empty ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: (O_Sub ?9 ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: (O_Sub ?7 ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: O_Empty ?4))) (: (O_Sub ?5 (: (O_Sub ?6 ?7) (: (O_Sub ?8 ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ?3) (: (O_Full ?4) ?5))) (: (O_Sub ?6 ([])) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ?3) (: (O_Full ?4) ?5))) (: (O_Sub ?6 (: O_Empty ([]))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: O_Empty (: O_Empty ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty ([]))) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: O_Empty (: O_Empty ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: O_Empty (: O_Empty ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: O_Empty (: O_Empty ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Full ?4) ?5))) (: (O_Sub ?6 (: O_Empty (: O_Empty ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: O_Empty (: O_Empty ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: O_Empty (: O_Empty ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Full ?4) ?5))) (: (O_Sub ?6 (: O_Empty (: O_Empty ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: O_Empty (: O_Empty ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: O_Empty (: O_Empty ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Full ?4) ?5))) (: (O_Sub ?6 (: O_Empty (: O_Empty ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: O_Empty (: (O_Full ?6) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty ([]))) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: O_Empty (: (O_Full ?6) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: O_Empty (: (O_Full ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: O_Empty (: (O_Full ?6) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Full ?4) ?5))) (: (O_Sub ?6 (: O_Empty (: (O_Full ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: O_Empty (: (O_Full ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: O_Empty (: (O_Full ?6) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Full ?4) ?5))) (: (O_Sub ?6 (: O_Empty (: (O_Full ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: O_Empty (: (O_Full ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: O_Empty (: (O_Full ?6) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Full ?4) ?5))) (: (O_Sub ?6 (: O_Empty (: (O_Full ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: O_Empty (: (O_Sub ?6 ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty ([]))) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: O_Empty (: (O_Sub ?6 ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) (: (O_Full ?6) ?7))) (: (O_Sub ?8 (: O_Empty (: (O_Sub ?9 ([])) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: O_Empty (: (O_Sub ?8 ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) (: (O_Full ?6) ?7))) (: (O_Sub ?8 (: O_Empty (: (O_Sub ?9 ([])) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) (: (O_Full ?7) ?8))) (: (O_Sub ?9 (: O_Empty (: (O_Sub ?10 ([])) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) (: (O_Full ?8) ?9))) (: (O_Sub ?10 (: O_Empty (: (O_Sub ?11 ([])) ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: O_Empty (: (O_Sub ?6 ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Full ?4) ?5))) (: (O_Sub ?6 (: O_Empty (: (O_Sub ?7 ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: O_Empty (: (O_Sub ?8 ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: O_Empty (: (O_Sub ?6 ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Full ?4) ?5))) (: (O_Sub ?6 (: O_Empty (: (O_Sub ?7 ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: O_Empty (: (O_Sub ?8 ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: O_Empty (: (O_Sub ?6 ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Full ?4) ?5))) (: (O_Sub ?6 (: O_Empty (: (O_Sub ?7 ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ?3) (: (O_Full ?4) ?5))) (: (O_Sub ?6 (: (O_Full ?7) ([]))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: (O_Full ?6) (: O_Empty ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty ([]))) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: (O_Full ?6) (: O_Empty ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: (O_Full ?8) (: O_Empty ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: (O_Full ?6) (: O_Empty ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Full ?4) ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: O_Empty ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: (O_Full ?8) (: O_Empty ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: (O_Full ?6) (: O_Empty ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Full ?4) ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: O_Empty ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: (O_Full ?8) (: O_Empty ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: (O_Full ?6) (: O_Empty ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Full ?4) ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: O_Empty ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: (O_Full ?6) (: (O_Full ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty ([]))) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: (O_Full ?6) (: (O_Full ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: (O_Full ?8) (: (O_Full ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: (O_Full ?6) (: (O_Full ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Full ?4) ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: (O_Full ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: (O_Full ?8) (: (O_Full ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: (O_Full ?6) (: (O_Full ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Full ?4) ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: (O_Full ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: (O_Full ?8) (: (O_Full ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: (O_Full ?6) (: (O_Full ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Full ?4) ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: (O_Full ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: (O_Full ?6) (: (O_Sub ?7 ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty ([]))) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: (O_Full ?6) (: (O_Sub ?7 ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) (: (O_Full ?6) ?7))) (: (O_Sub ?8 (: (O_Full ?9) (: (O_Sub ?10 ([])) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: (O_Full ?8) (: (O_Sub ?9 ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) (: (O_Full ?6) ?7))) (: (O_Sub ?8 (: (O_Full ?9) (: (O_Sub ?10 ([])) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) (: (O_Full ?7) ?8))) (: (O_Sub ?9 (: (O_Full ?10) (: (O_Sub ?11 ([])) ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) (: (O_Full ?8) ?9))) (: (O_Sub ?10 (: (O_Full ?11) (: (O_Sub ?12 ([])) ?13))) ?14))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: (O_Full ?6) (: (O_Sub ?7 ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Full ?4) ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: (O_Sub ?8 ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: (O_Full ?8) (: (O_Sub ?9 ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: (O_Full ?6) (: (O_Sub ?7 ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Full ?4) ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: (O_Sub ?8 ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: (O_Full ?8) (: (O_Sub ?9 ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: (O_Full ?6) (: (O_Sub ?7 ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Full ?4) ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: (O_Sub ?8 ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ?3) (: (O_Full ?4) ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) ([]))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: (O_Sub ?6 ?7) (: O_Empty ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty ([]))) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: (O_Sub ?6 ?7) (: O_Empty ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) (: (O_Full ?6) ?7))) (: (O_Sub ?8 (: (O_Sub ?9 ([])) (: O_Empty ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: (O_Sub ?8 ?9) (: O_Empty ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) (: (O_Full ?6) ?7))) (: (O_Sub ?8 (: (O_Sub ?9 ([])) (: O_Empty ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) (: (O_Full ?7) ?8))) (: (O_Sub ?9 (: (O_Sub ?10 ([])) (: O_Empty ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) (: (O_Full ?8) ?9))) (: (O_Sub ?10 (: (O_Sub ?11 ([])) (: O_Empty ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: (O_Sub ?6 ?7) (: O_Empty ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Full ?4) ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: O_Empty ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: (O_Sub ?8 ?9) (: O_Empty ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: (O_Sub ?6 ?7) (: O_Empty ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Full ?4) ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: O_Empty ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: (O_Sub ?8 ?9) (: O_Empty ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: (O_Sub ?6 ?7) (: O_Empty ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Full ?4) ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: O_Empty ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: (O_Sub ?6 ?7) (: (O_Full ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty ([]))) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: (O_Sub ?6 ?7) (: (O_Full ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) (: (O_Full ?6) ?7))) (: (O_Sub ?8 (: (O_Sub ?9 ([])) (: (O_Full ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: (O_Sub ?8 ?9) (: (O_Full ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) (: (O_Full ?6) ?7))) (: (O_Sub ?8 (: (O_Sub ?9 ([])) (: (O_Full ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) (: (O_Full ?7) ?8))) (: (O_Sub ?9 (: (O_Sub ?10 ([])) (: (O_Full ?11) ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) (: (O_Full ?8) ?9))) (: (O_Sub ?10 (: (O_Sub ?11 ([])) (: (O_Full ?12) ?13))) ?14))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: (O_Sub ?6 ?7) (: (O_Full ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Full ?4) ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: (O_Full ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: (O_Sub ?8 ?9) (: (O_Full ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: (O_Sub ?6 ?7) (: (O_Full ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Full ?4) ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: (O_Full ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: (O_Sub ?8 ?9) (: (O_Full ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: (O_Sub ?6 ?7) (: (O_Full ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Full ?4) ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: (O_Full ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: (O_Sub ?6 ?7) (: (O_Sub ?8 ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty ([]))) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: (O_Sub ?6 ?7) (: (O_Sub ?8 ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) (: (O_Full ?6) ?7))) (: (O_Sub ?8 (: (O_Sub ?9 ([])) (: (O_Sub ?10 ?11) ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: (O_Sub ?8 ?9) (: (O_Sub ?10 ?11) ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) (: (O_Full ?6) ?7))) (: (O_Sub ?8 (: (O_Sub ?9 ([])) (: (O_Sub ?10 ?11) ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) (: (O_Full ?7) ?8))) (: (O_Sub ?9 (: (O_Sub ?10 ([])) (: (O_Sub ?11 ?12) ?13))) ?14))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) (: (O_Full ?8) ?9))) (: (O_Sub ?10 (: (O_Sub ?11 ([])) (: (O_Sub ?12 ?13) ?14))) ?15))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: (O_Sub ?6 ?7) (: (O_Sub ?8 ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Full ?4) ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: (O_Sub ?9 ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: (O_Sub ?8 ?9) (: (O_Sub ?10 ?11) ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: (O_Sub ?6 ?7) (: (O_Sub ?8 ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Full ?4) ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: (O_Sub ?9 ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: (O_Sub ?8 ?9) (: (O_Sub ?10 ?11) ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: (O_Sub ?6 ?7) (: (O_Sub ?8 ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Full ?4) ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: (O_Sub ?9 ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ?3) (: (O_Sub ?4 ?5) ?6))) (: (O_Sub ?7 ([])) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ?3) (: (O_Sub ?4 ?5) ?6))) (: (O_Sub ?7 (: O_Empty ([]))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: O_Empty (: O_Empty ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty ([]))) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: O_Empty (: O_Empty ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: O_Empty ?3))) (: (O_Sub ?4 ([])) ?5))) (: (O_Sub ?6 (: O_Empty (: O_Empty ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 ([])) ?7))) (: (O_Sub ?8 (: O_Empty (: O_Empty ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: O_Empty (: O_Empty ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) (: (O_Sub ?6 ([])) ?7))) (: (O_Sub ?8 (: O_Empty (: O_Empty ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) (: (O_Sub ?7 ([])) ?8))) (: (O_Sub ?9 (: O_Empty (: O_Empty ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 ([])) ?9))) (: (O_Sub ?10 (: O_Empty (: O_Empty ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: O_Empty (: O_Empty ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Sub ?4 ?5) ?6))) (: (O_Sub ?7 (: O_Empty (: O_Empty ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: O_Empty (: O_Empty ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: O_Empty (: O_Empty ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Sub ?4 ?5) ?6))) (: (O_Sub ?7 (: O_Empty (: O_Empty ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: O_Empty (: O_Empty ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: O_Empty (: O_Empty ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Sub ?4 ?5) ?6))) (: (O_Sub ?7 (: O_Empty (: O_Empty ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: O_Empty (: (O_Full ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty ([]))) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: O_Empty (: (O_Full ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: O_Empty ?3))) (: (O_Sub ?4 ([])) ?5))) (: (O_Sub ?6 (: O_Empty (: (O_Full ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 ([])) ?7))) (: (O_Sub ?8 (: O_Empty (: (O_Full ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: O_Empty (: (O_Full ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) (: (O_Sub ?6 ([])) ?7))) (: (O_Sub ?8 (: O_Empty (: (O_Full ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) (: (O_Sub ?7 ([])) ?8))) (: (O_Sub ?9 (: O_Empty (: (O_Full ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 ([])) ?9))) (: (O_Sub ?10 (: O_Empty (: (O_Full ?11) ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: O_Empty (: (O_Full ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Sub ?4 ?5) ?6))) (: (O_Sub ?7 (: O_Empty (: (O_Full ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: O_Empty (: (O_Full ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: O_Empty (: (O_Full ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Sub ?4 ?5) ?6))) (: (O_Sub ?7 (: O_Empty (: (O_Full ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: O_Empty (: (O_Full ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: O_Empty (: (O_Full ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Sub ?4 ?5) ?6))) (: (O_Sub ?7 (: O_Empty (: (O_Full ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: O_Empty (: (O_Sub ?7 ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty ([]))) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: O_Empty (: (O_Sub ?7 ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: O_Empty ?3))) (: (O_Sub ?4 ([])) ?5))) (: (O_Sub ?6 (: O_Empty (: (O_Sub ?7 ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 ([])) ?7))) (: (O_Sub ?8 (: O_Empty (: (O_Sub ?9 ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: O_Empty (: (O_Sub ?9 ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) (: (O_Sub ?6 ([])) ?7))) (: (O_Sub ?8 (: O_Empty (: (O_Sub ?9 ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) (: (O_Sub ?7 ([])) ?8))) (: (O_Sub ?9 (: O_Empty (: (O_Sub ?10 ?11) ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 ([])) ?9))) (: (O_Sub ?10 (: O_Empty (: (O_Sub ?11 ?12) ?13))) ?14))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: O_Empty (: (O_Sub ?7 ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Sub ?4 ?5) ?6))) (: (O_Sub ?7 (: O_Empty (: (O_Sub ?8 ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: O_Empty (: (O_Sub ?9 ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: O_Empty (: (O_Sub ?7 ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Sub ?4 ?5) ?6))) (: (O_Sub ?7 (: O_Empty (: (O_Sub ?8 ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: O_Empty (: (O_Sub ?9 ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: O_Empty (: (O_Sub ?7 ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Sub ?4 ?5) ?6))) (: (O_Sub ?7 (: O_Empty (: (O_Sub ?8 ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ?3) (: (O_Sub ?4 ?5) ?6))) (: (O_Sub ?7 (: (O_Full ?8) ([]))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: O_Empty ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty ([]))) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: O_Empty ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: O_Empty ?3))) (: (O_Sub ?4 ([])) ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: O_Empty ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 ([])) ?7))) (: (O_Sub ?8 (: (O_Full ?9) (: O_Empty ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: (O_Full ?9) (: O_Empty ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) (: (O_Sub ?6 ([])) ?7))) (: (O_Sub ?8 (: (O_Full ?9) (: O_Empty ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) (: (O_Sub ?7 ([])) ?8))) (: (O_Sub ?9 (: (O_Full ?10) (: O_Empty ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 ([])) ?9))) (: (O_Sub ?10 (: (O_Full ?11) (: O_Empty ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: O_Empty ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Sub ?4 ?5) ?6))) (: (O_Sub ?7 (: (O_Full ?8) (: O_Empty ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: (O_Full ?9) (: O_Empty ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: O_Empty ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Sub ?4 ?5) ?6))) (: (O_Sub ?7 (: (O_Full ?8) (: O_Empty ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: (O_Full ?9) (: O_Empty ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: O_Empty ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Sub ?4 ?5) ?6))) (: (O_Sub ?7 (: (O_Full ?8) (: O_Empty ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: (O_Full ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty ([]))) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: (O_Full ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: O_Empty ?3))) (: (O_Sub ?4 ([])) ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: (O_Full ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 ([])) ?7))) (: (O_Sub ?8 (: (O_Full ?9) (: (O_Full ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: (O_Full ?9) (: (O_Full ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) (: (O_Sub ?6 ([])) ?7))) (: (O_Sub ?8 (: (O_Full ?9) (: (O_Full ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) (: (O_Sub ?7 ([])) ?8))) (: (O_Sub ?9 (: (O_Full ?10) (: (O_Full ?11) ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 ([])) ?9))) (: (O_Sub ?10 (: (O_Full ?11) (: (O_Full ?12) ?13))) ?14))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: (O_Full ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Sub ?4 ?5) ?6))) (: (O_Sub ?7 (: (O_Full ?8) (: (O_Full ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: (O_Full ?9) (: (O_Full ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: (O_Full ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Sub ?4 ?5) ?6))) (: (O_Sub ?7 (: (O_Full ?8) (: (O_Full ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: (O_Full ?9) (: (O_Full ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: (O_Full ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Sub ?4 ?5) ?6))) (: (O_Sub ?7 (: (O_Full ?8) (: (O_Full ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: (O_Sub ?8 ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty ([]))) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: (O_Sub ?8 ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: O_Empty ?3))) (: (O_Sub ?4 ([])) ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: (O_Sub ?8 ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 ([])) ?7))) (: (O_Sub ?8 (: (O_Full ?9) (: (O_Sub ?10 ?11) ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: (O_Full ?9) (: (O_Sub ?10 ?11) ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) (: (O_Sub ?6 ([])) ?7))) (: (O_Sub ?8 (: (O_Full ?9) (: (O_Sub ?10 ?11) ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) (: (O_Sub ?7 ([])) ?8))) (: (O_Sub ?9 (: (O_Full ?10) (: (O_Sub ?11 ?12) ?13))) ?14))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 ([])) ?9))) (: (O_Sub ?10 (: (O_Full ?11) (: (O_Sub ?12 ?13) ?14))) ?15))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: (O_Sub ?8 ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Sub ?4 ?5) ?6))) (: (O_Sub ?7 (: (O_Full ?8) (: (O_Sub ?9 ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: (O_Full ?9) (: (O_Sub ?10 ?11) ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: (O_Sub ?8 ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Sub ?4 ?5) ?6))) (: (O_Sub ?7 (: (O_Full ?8) (: (O_Sub ?9 ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: (O_Full ?9) (: (O_Sub ?10 ?11) ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: (O_Sub ?8 ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Sub ?4 ?5) ?6))) (: (O_Sub ?7 (: (O_Full ?8) (: (O_Sub ?9 ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ?3) (: (O_Sub ?4 ?5) ?6))) (: (O_Sub ?7 (: (O_Sub ?8 ?9) ([]))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: O_Empty ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty ([]))) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: O_Empty ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: O_Empty ?3))) (: (O_Sub ?4 ([])) ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: O_Empty ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 ([])) ?7))) (: (O_Sub ?8 (: (O_Sub ?9 ?10) (: O_Empty ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: (O_Sub ?9 ?10) (: O_Empty ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) (: (O_Sub ?6 ([])) ?7))) (: (O_Sub ?8 (: (O_Sub ?9 ?10) (: O_Empty ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) (: (O_Sub ?7 ([])) ?8))) (: (O_Sub ?9 (: (O_Sub ?10 ?11) (: O_Empty ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 ([])) ?9))) (: (O_Sub ?10 (: (O_Sub ?11 ?12) (: O_Empty ?13))) ?14))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: O_Empty ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Sub ?4 ?5) ?6))) (: (O_Sub ?7 (: (O_Sub ?8 ?9) (: O_Empty ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: (O_Sub ?9 ?10) (: O_Empty ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: O_Empty ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Sub ?4 ?5) ?6))) (: (O_Sub ?7 (: (O_Sub ?8 ?9) (: O_Empty ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: (O_Sub ?9 ?10) (: O_Empty ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: O_Empty ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Sub ?4 ?5) ?6))) (: (O_Sub ?7 (: (O_Sub ?8 ?9) (: O_Empty ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: (O_Full ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty ([]))) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: (O_Full ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: O_Empty ?3))) (: (O_Sub ?4 ([])) ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: (O_Full ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 ([])) ?7))) (: (O_Sub ?8 (: (O_Sub ?9 ?10) (: (O_Full ?11) ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: (O_Sub ?9 ?10) (: (O_Full ?11) ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) (: (O_Sub ?6 ([])) ?7))) (: (O_Sub ?8 (: (O_Sub ?9 ?10) (: (O_Full ?11) ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) (: (O_Sub ?7 ([])) ?8))) (: (O_Sub ?9 (: (O_Sub ?10 ?11) (: (O_Full ?12) ?13))) ?14))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 ([])) ?9))) (: (O_Sub ?10 (: (O_Sub ?11 ?12) (: (O_Full ?13) ?14))) ?15))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: (O_Full ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Sub ?4 ?5) ?6))) (: (O_Sub ?7 (: (O_Sub ?8 ?9) (: (O_Full ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: (O_Sub ?9 ?10) (: (O_Full ?11) ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: (O_Full ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Sub ?4 ?5) ?6))) (: (O_Sub ?7 (: (O_Sub ?8 ?9) (: (O_Full ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: (O_Sub ?9 ?10) (: (O_Full ?11) ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: (O_Full ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Sub ?4 ?5) ?6))) (: (O_Sub ?7 (: (O_Sub ?8 ?9) (: (O_Full ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: (O_Sub ?9 ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty ([]))) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: (O_Sub ?9 ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: O_Empty ?3))) (: (O_Sub ?4 ([])) ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: (O_Sub ?9 ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 ([])) ?7))) (: (O_Sub ?8 (: (O_Sub ?9 ?10) (: (O_Sub ?11 ?12) ?13))) ?14))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: (O_Sub ?9 ?10) (: (O_Sub ?11 ?12) ?13))) ?14))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) (: (O_Sub ?6 ([])) ?7))) (: (O_Sub ?8 (: (O_Sub ?9 ?10) (: (O_Sub ?11 ?12) ?13))) ?14))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) (: (O_Sub ?7 ([])) ?8))) (: (O_Sub ?9 (: (O_Sub ?10 ?11) (: (O_Sub ?12 ?13) ?14))) ?15))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 ([])) ?9))) (: (O_Sub ?10 (: (O_Sub ?11 ?12) (: (O_Sub ?13 ?14) ?15))) ?16))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: (O_Sub ?9 ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Sub ?4 ?5) ?6))) (: (O_Sub ?7 (: (O_Sub ?8 ?9) (: (O_Sub ?10 ?11) ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: (O_Sub ?9 ?10) (: (O_Sub ?11 ?12) ?13))) ?14))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: (O_Sub ?9 ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Sub ?4 ?5) ?6))) (: (O_Sub ?7 (: (O_Sub ?8 ?9) (: (O_Sub ?10 ?11) ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: (O_Sub ?9 ?10) (: (O_Sub ?11 ?12) ?13))) ?14))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: (O_Sub ?9 ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Sub ?4 ?5) ?6))) (: (O_Sub ?7 (: (O_Sub ?8 ?9) (: (O_Sub ?10 ?11) ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 ([])) (: (O_Sub ?2 ?3) ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 ([]))) (: (O_Sub ?3 ?4) ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 ([])))) (: (O_Sub ?4 ?5) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: O_Empty ([]))))) (: (O_Sub ?4 ?5) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: O_Empty (: O_Empty ?4))))) (: (O_Sub ?5 ([])) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: O_Empty (: O_Empty ?4))))) (: (O_Sub ?5 (: ?6 ([]))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: O_Empty (: O_Empty ?4))))) (: (O_Sub ?5 (: ?6 (: ?7 ([])))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:44:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: O_Empty (: O_Empty ?4))))) (: (O_Sub ?5 (: ?6 (: ?7 (: O_Empty ([]))))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:44:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: O_Empty (: O_Empty ?4))))) (: (O_Sub ?5 (: ?6 (: ?7 (: (O_Sub ?8 ?9) ([]))))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:44:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: O_Empty (: (O_Sub ?4 ?5) ?6))))) (: (O_Sub ?7 ([])) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: O_Empty (: (O_Sub ?4 ?5) ?6))))) (: (O_Sub ?7 (: ?8 ([]))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: O_Empty (: (O_Sub ?4 ?5) ?6))))) (: (O_Sub ?7 (: ?8 (: ?9 ([])))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:44:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: O_Empty (: (O_Sub ?4 ?5) ?6))))) (: (O_Sub ?7 (: ?8 (: ?9 (: O_Empty ([]))))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:44:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: O_Empty (: (O_Sub ?4 ?5) ?6))))) (: (O_Sub ?7 (: ?8 (: ?9 (: (O_Full ?10) ([]))))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:44:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: O_Empty (: (O_Sub ?4 ?5) ?6))))) (: (O_Sub ?7 (: ?8 (: ?9 (: (O_Sub ?10 ?11) ([]))))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:44:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ?5) ([]))))) (: (O_Sub ?6 ?7) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ?5) (: O_Empty ?6))))) (: (O_Sub ?7 ([])) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ?5) (: O_Empty ?6))))) (: (O_Sub ?7 (: ?8 ([]))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ?5) (: O_Empty ?6))))) (: (O_Sub ?7 (: ?8 (: ?9 ([])))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:44:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ?5) (: O_Empty ?6))))) (: (O_Sub ?7 (: ?8 (: ?9 (: O_Empty ([]))))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:44:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ?5) (: O_Empty ?6))))) (: (O_Sub ?7 (: ?8 (: ?9 (: (O_Full ?10) ([]))))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:44:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ?5) (: O_Empty ?6))))) (: (O_Sub ?7 (: ?8 (: ?9 (: (O_Sub ?10 ?11) ([]))))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:44:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ?5) (: (O_Full ?6) ?7))))) (: (O_Sub ?8 ([])) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ?5) (: (O_Full ?6) ?7))))) (: (O_Sub ?8 (: ?9 ([]))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ?5) (: (O_Full ?6) ?7))))) (: (O_Sub ?8 (: ?9 (: ?10 ([])))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:44:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ?5) (: (O_Full ?6) ?7))))) (: (O_Sub ?8 (: ?9 (: ?10 (: O_Empty ([]))))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:44:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ?5) (: (O_Full ?6) ?7))))) (: (O_Sub ?8 (: ?9 (: ?10 (: (O_Full ?11) ([]))))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:44:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ?5) (: (O_Full ?6) ?7))))) (: (O_Sub ?8 (: ?9 (: ?10 (: (O_Sub ?11 ?12) ([]))))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:44:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ?5) (: (O_Sub ?6 ?7) ?8))))) (: (O_Sub ?9 ([])) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ?5) (: (O_Sub ?6 ?7) ?8))))) (: (O_Sub ?9 (: ?10 ([]))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ?5) (: (O_Sub ?6 ?7) ?8))))) (: (O_Sub ?9 (: ?10 (: ?11 ([])))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:44:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ?5) (: (O_Sub ?6 ?7) ?8))))) (: (O_Sub ?9 (: ?10 (: ?11 (: O_Empty ([]))))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:44:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ?5) (: (O_Sub ?6 ?7) ?8))))) (: (O_Sub ?9 (: ?10 (: ?11 (: (O_Full ?12) ([]))))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:44:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ?5) (: (O_Sub ?6 ?7) ?8))))) (: (O_Sub ?9 (: ?10 (: ?11 (: (O_Sub ?12 ?13) ([]))))) ?14))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:44:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 ([])) (: (O_Sub ?2 ?3) ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 ([]))) (: (O_Sub ?3 ?4) ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 ([])))) (: (O_Sub ?4 ?5) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 ([]))))) (: (O_Sub ?5 ?6) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 (: ?5 ([])))))) (: (O_Sub ?6 ?7) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:35:21-34: Irrefutable pattern failed for pattern (l4 : ll5) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 (: ?5 (: O_Empty ([]))))))) (: (O_Sub ?6 ?7) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:35:38-51: Irrefutable pattern failed for pattern (l5 : ll6) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 (: ?5 (: O_Empty (: O_Empty ?6))))))) (: (O_Sub ?7 ([])) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 (: ?5 (: O_Empty (: O_Empty ?6))))))) (: (O_Sub ?7 (: ?8 ([]))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 (: ?5 (: O_Empty (: O_Empty ?6))))))) (: (O_Sub ?7 (: ?8 (: ?9 ([])))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:44:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 (: ?5 (: O_Empty (: O_Empty ?6))))))) (: (O_Sub ?7 (: ?8 (: ?9 (: ?10 ([]))))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:44:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 (: ?5 (: O_Empty (: O_Empty ?6))))))) (: (O_Sub ?7 (: ?8 (: ?9 (: ?10 (: ?11 ([])))))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:45:21-34: Irrefutable pattern failed for pattern (l4 : ll5) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 (: ?5 (: O_Empty (: (O_Sub ?6 ?7) ?8))))))) (: (O_Sub ?9 ([])) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 (: ?5 (: O_Empty (: (O_Sub ?6 ?7) ?8))))))) (: (O_Sub ?9 (: ?10 ([]))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 (: ?5 (: O_Empty (: (O_Sub ?6 ?7) ?8))))))) (: (O_Sub ?9 (: ?10 (: ?11 ([])))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:44:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 (: ?5 (: O_Empty (: (O_Sub ?6 ?7) ?8))))))) (: (O_Sub ?9 (: ?10 (: ?11 (: ?12 ([]))))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:44:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 (: ?5 (: O_Empty (: (O_Sub ?6 ?7) ?8))))))) (: (O_Sub ?9 (: ?10 (: ?11 (: ?12 (: ?13 ([])))))) ?14))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:45:21-34: Irrefutable pattern failed for pattern (l4 : ll5) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 (: ?5 (: (O_Sub ?6 ?7) ([]))))))) (: (O_Sub ?8 ?9) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:35:38-51: Irrefutable pattern failed for pattern (l5 : ll6) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 (: ?5 (: (O_Sub ?6 ?7) (: O_Empty ?8))))))) (: (O_Sub ?9 ([])) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 (: ?5 (: (O_Sub ?6 ?7) (: O_Empty ?8))))))) (: (O_Sub ?9 (: ?10 ([]))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 (: ?5 (: (O_Sub ?6 ?7) (: O_Empty ?8))))))) (: (O_Sub ?9 (: ?10 (: ?11 ([])))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:44:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 (: ?5 (: (O_Sub ?6 ?7) (: O_Empty ?8))))))) (: (O_Sub ?9 (: ?10 (: ?11 (: ?12 ([]))))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:44:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 (: ?5 (: (O_Sub ?6 ?7) (: O_Empty ?8))))))) (: (O_Sub ?9 (: ?10 (: ?11 (: ?12 (: ?13 ([])))))) ?14))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:45:21-34: Irrefutable pattern failed for pattern (l4 : ll5) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 (: ?5 (: (O_Sub ?6 ?7) (: (O_Full ?8) ?9))))))) (: (O_Sub ?10 ([])) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 (: ?5 (: (O_Sub ?6 ?7) (: (O_Full ?8) ?9))))))) (: (O_Sub ?10 (: ?11 ([]))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 (: ?5 (: (O_Sub ?6 ?7) (: (O_Full ?8) ?9))))))) (: (O_Sub ?10 (: ?11 (: ?12 ([])))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:44:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 (: ?5 (: (O_Sub ?6 ?7) (: (O_Full ?8) ?9))))))) (: (O_Sub ?10 (: ?11 (: ?12 (: ?13 ([]))))) ?14))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:44:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 (: ?5 (: (O_Sub ?6 ?7) (: (O_Full ?8) ?9))))))) (: (O_Sub ?10 (: ?11 (: ?12 (: ?13 (: ?14 ([])))))) ?15))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:45:21-34: Irrefutable pattern failed for pattern (l4 : ll5) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 (: ?5 (: (O_Sub ?6 ?7) (: (O_Sub ?8 ?9) ?10))))))) (: (O_Sub ?11 ([])) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 (: ?5 (: (O_Sub ?6 ?7) (: (O_Sub ?8 ?9) ?10))))))) (: (O_Sub ?11 (: ?12 ([]))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 (: ?5 (: (O_Sub ?6 ?7) (: (O_Sub ?8 ?9) ?10))))))) (: (O_Sub ?11 (: ?12 (: ?13 ([])))) ?14))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:44:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 (: ?5 (: (O_Sub ?6 ?7) (: (O_Sub ?8 ?9) ?10))))))) (: (O_Sub ?11 (: ?12 (: ?13 (: ?14 ([]))))) ?15))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:44:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 (: ?5 (: (O_Sub ?6 ?7) (: (O_Sub ?8 ?9) ?10))))))) (: (O_Sub ?11 (: ?12 (: ?13 (: ?14 (: ?15 ([])))))) ?16))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:45:21-34: Irrefutable pattern failed for pattern (l4 : ll5) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 ([])) (: (O_Sub ?2 ?3) ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 ([]))) (: (O_Sub ?3 ?4) ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 ([])))) (: (O_Sub ?4 ?5) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 ([]))))) (: (O_Sub ?5 ?6) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 (: ?5 ([])))))) (: (O_Sub ?6 ?7) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:35:21-34: Irrefutable pattern failed for pattern (l4 : ll5) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 (: ?5 (: ?6 ([]))))))) (: (O_Sub ?7 ?8) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:35:38-51: Irrefutable pattern failed for pattern (l5 : ll6) case case case quadoct (O_Sub ? ([])) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case quadoct (O_Sub ? (: ?1 ([]))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case quadoct (O_Sub ? (: ?1 (: ?2 ([])))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case quadoct (O_Sub ? (: ?1 (: ?2 (: O_Empty ([]))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: O_Empty (: (O_Sub ?3 ([])) ?4))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: O_Empty (: (O_Sub ?3 (: O_Empty ([]))) ?4))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: O_Empty (: (O_Sub ?3 (: (O_Sub ?4 ?5) ([]))) ?6))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: O_Empty (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: O_Empty ?5))) ?6))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: O_Empty (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: (O_Full ?5) ?6))) ?7))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: O_Empty (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: (O_Sub ?5 ?6) ?7))) ?8))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: O_Empty (: (O_Sub ?3 ([])) ?4))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: O_Empty (: (O_Sub ?3 (: ?4 ([]))) ?5))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: O_Empty (: (O_Sub ?3 (: ?4 (: ?5 ([])))) ?6))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: O_Empty (: (O_Sub ?3 (: ?4 (: ?5 (: O_Empty ([]))))) ?6))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: O_Empty (: (O_Sub ?3 (: ?4 (: ?5 (: (O_Sub ?6 ?7) ([]))))) ?8))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: O_Empty (: (O_Sub ?3 ([])) ?4))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: O_Empty (: (O_Sub ?3 (: ?4 ([]))) ?5))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: O_Empty (: (O_Sub ?3 (: ?4 (: ?5 ([])))) ?6))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: O_Empty (: (O_Sub ?3 ([])) ?4))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: O_Empty (: (O_Sub ?3 (: ?4 ([]))) ?5))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 ?4) ([]))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 ([])) (: O_Empty ?4))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: O_Empty ([]))) (: O_Empty ?4))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: O_Empty (: (O_Sub ?4 ([])) ?5))) (: O_Empty ?6))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ?5) ([]))) (: O_Empty ?6))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: O_Empty ?5))) (: O_Empty ?6))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 (: O_Empty ([]))) (: O_Empty ?5))) (: O_Empty ?6))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 (: (O_Sub ?5 ?6) ([]))) (: O_Empty ?7))) (: O_Empty ?8))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: O_Empty ?5))) (: O_Empty ?6))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: (O_Full ?5) ?6))) (: O_Empty ?7))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 (: O_Empty ([]))) (: (O_Full ?5) ?6))) (: O_Empty ?7))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 (: (O_Sub ?5 ?6) ([]))) (: (O_Full ?7) ?8))) (: O_Empty ?9))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: (O_Full ?5) ?6))) (: O_Empty ?7))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: (O_Sub ?5 ?6) ?7))) (: O_Empty ?8))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 (: O_Empty ([]))) (: (O_Sub ?5 ?6) ?7))) (: O_Empty ?8))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 (: (O_Sub ?5 ?6) ([]))) (: (O_Sub ?7 ?8) ?9))) (: O_Empty ?10))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: (O_Sub ?5 ?6) ?7))) (: O_Empty ?8))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 ([])) (: O_Empty ?4))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: ?4 ([]))) (: O_Empty ?5))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: ?4 (: ?5 ([])))) (: O_Empty ?6))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: ?4 (: ?5 (: O_Empty ([]))))) (: O_Empty ?6))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: ?4 (: ?5 (: (O_Sub ?6 ?7) ([]))))) (: O_Empty ?8))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 ([])) (: O_Empty ?4))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: ?4 ([]))) (: O_Empty ?5))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: ?4 (: ?5 ([])))) (: O_Empty ?6))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: ?4 (: ?5 (: ?6 ([]))))) (: O_Empty ?7))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 ([])) (: O_Empty ?4))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: ?4 ([]))) (: O_Empty ?5))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: ?4 (: ?5 ([])))) (: O_Empty ?6))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 ([])) (: (O_Full ?4) ?5))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: O_Empty ([]))) (: (O_Full ?4) ?5))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: O_Empty (: (O_Sub ?4 ([])) ?5))) (: (O_Full ?6) ?7))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ?5) ([]))) (: (O_Full ?6) ?7))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: O_Empty ?5))) (: (O_Full ?6) ?7))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 (: O_Empty ([]))) (: O_Empty ?5))) (: (O_Full ?6) ?7))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 (: (O_Sub ?5 ?6) ([]))) (: O_Empty ?7))) (: (O_Full ?8) ?9))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: O_Empty ?5))) (: (O_Full ?6) ?7))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: (O_Full ?5) ?6))) (: (O_Full ?7) ?8))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 (: O_Empty ([]))) (: (O_Full ?5) ?6))) (: (O_Full ?7) ?8))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 (: (O_Sub ?5 ?6) ([]))) (: (O_Full ?7) ?8))) (: (O_Full ?9) ?10))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: (O_Full ?5) ?6))) (: (O_Full ?7) ?8))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: (O_Sub ?5 ?6) ?7))) (: (O_Full ?8) ?9))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 (: O_Empty ([]))) (: (O_Sub ?5 ?6) ?7))) (: (O_Full ?8) ?9))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 (: (O_Sub ?5 ?6) ([]))) (: (O_Sub ?7 ?8) ?9))) (: (O_Full ?10) ?11))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: (O_Sub ?5 ?6) ?7))) (: (O_Full ?8) ?9))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 ([])) (: (O_Full ?4) ?5))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: ?4 ([]))) (: (O_Full ?5) ?6))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: ?4 (: ?5 ([])))) (: (O_Full ?6) ?7))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: ?4 (: ?5 (: O_Empty ([]))))) (: (O_Full ?6) ?7))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: ?4 (: ?5 (: (O_Sub ?6 ?7) ([]))))) (: (O_Full ?8) ?9))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 ([])) (: (O_Full ?4) ?5))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: ?4 ([]))) (: (O_Full ?5) ?6))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: ?4 (: ?5 ([])))) (: (O_Full ?6) ?7))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: ?4 (: ?5 (: ?6 ([]))))) (: (O_Full ?7) ?8))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 ([])) (: (O_Full ?4) ?5))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: ?4 ([]))) (: (O_Full ?5) ?6))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: ?4 (: ?5 ([])))) (: (O_Full ?6) ?7))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 ([])) (: (O_Sub ?4 ?5) ?6))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: O_Empty ([]))) (: (O_Sub ?4 ?5) ?6))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: O_Empty (: O_Empty ?4))) (: (O_Sub ?5 ([])) ?6))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: O_Empty (: O_Empty ?4))) (: (O_Sub ?5 (: O_Empty ([]))) ?6))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: O_Empty (: O_Empty ?4))) (: (O_Sub ?5 (: (O_Sub ?6 ?7) ([]))) ?8))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: O_Empty (: O_Empty ?4))) (: (O_Sub ?5 (: (O_Sub ?6 ([])) (: O_Empty ?7))) ?8))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: O_Empty (: O_Empty ?4))) (: (O_Sub ?5 (: (O_Sub ?6 ([])) (: (O_Full ?7) ?8))) ?9))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: O_Empty (: O_Empty ?4))) (: (O_Sub ?5 (: (O_Sub ?6 ([])) (: (O_Sub ?7 ?8) ?9))) ?10))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: O_Empty (: (O_Sub ?4 ?5) ?6))) (: (O_Sub ?7 ([])) ?8))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: O_Empty (: (O_Sub ?4 ?5) ?6))) (: (O_Sub ?7 (: O_Empty ([]))) ?8))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: O_Empty (: (O_Sub ?4 ([])) ?5))) (: (O_Sub ?6 (: O_Empty (: O_Empty ?7))) ?8))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: O_Empty (: (O_Sub ?4 ([])) ?5))) (: (O_Sub ?6 (: O_Empty (: (O_Full ?7) ?8))) ?9))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: O_Empty (: (O_Sub ?4 ([])) ?5))) (: (O_Sub ?6 (: O_Empty (: (O_Sub ?7 ?8) ?9))) ?10))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: O_Empty (: (O_Sub ?4 ?5) ?6))) (: (O_Sub ?7 (: (O_Full ?8) ([]))) ?9))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: O_Empty (: (O_Sub ?4 ([])) ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: O_Empty ?8))) ?9))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: O_Empty (: (O_Sub ?4 ([])) ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: (O_Full ?8) ?9))) ?10))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: O_Empty (: (O_Sub ?4 ([])) ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: (O_Sub ?8 ?9) ?10))) ?11))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: O_Empty (: (O_Sub ?4 ?5) ?6))) (: (O_Sub ?7 (: (O_Sub ?8 ?9) ([]))) ?10))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: O_Empty (: (O_Sub ?4 ([])) ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: O_Empty ?9))) ?10))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: O_Empty (: (O_Sub ?4 ([])) ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: (O_Full ?9) ?10))) ?11))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: O_Empty (: (O_Sub ?4 ([])) ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: (O_Sub ?9 ?10) ?11))) ?12))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ?5) ([]))) (: (O_Sub ?6 ?7) ?8))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ?5) (: O_Empty ?6))) (: (O_Sub ?7 ([])) ?8))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ?5) (: O_Empty ?6))) (: (O_Sub ?7 (: O_Empty ([]))) ?8))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: O_Empty ?5))) (: (O_Sub ?6 (: O_Empty (: O_Empty ?7))) ?8))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: O_Empty ?5))) (: (O_Sub ?6 (: O_Empty (: (O_Full ?7) ?8))) ?9))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: O_Empty ?5))) (: (O_Sub ?6 (: O_Empty (: (O_Sub ?7 ?8) ?9))) ?10))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ?5) (: O_Empty ?6))) (: (O_Sub ?7 (: (O_Full ?8) ([]))) ?9))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: O_Empty ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: O_Empty ?8))) ?9))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: O_Empty ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: (O_Full ?8) ?9))) ?10))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: O_Empty ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: (O_Sub ?8 ?9) ?10))) ?11))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ?5) (: O_Empty ?6))) (: (O_Sub ?7 (: (O_Sub ?8 ?9) ([]))) ?10))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: O_Empty ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: O_Empty ?9))) ?10))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: O_Empty ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: (O_Full ?9) ?10))) ?11))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: O_Empty ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: (O_Sub ?9 ?10) ?11))) ?12))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ?5) (: (O_Full ?6) ?7))) (: (O_Sub ?8 ([])) ?9))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ?5) (: (O_Full ?6) ?7))) (: (O_Sub ?8 (: O_Empty ([]))) ?9))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: O_Empty (: O_Empty ?8))) ?9))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: O_Empty (: (O_Full ?8) ?9))) ?10))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: O_Empty (: (O_Sub ?8 ?9) ?10))) ?11))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ?5) (: (O_Full ?6) ?7))) (: (O_Sub ?8 (: (O_Full ?9) ([]))) ?10))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: (O_Full ?8) (: O_Empty ?9))) ?10))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: (O_Full ?8) (: (O_Full ?9) ?10))) ?11))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: (O_Full ?8) (: (O_Sub ?9 ?10) ?11))) ?12))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ?5) (: (O_Full ?6) ?7))) (: (O_Sub ?8 (: (O_Sub ?9 ?10) ([]))) ?11))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: (O_Sub ?8 ?9) (: O_Empty ?10))) ?11))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: (O_Sub ?8 ?9) (: (O_Full ?10) ?11))) ?12))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: (O_Sub ?8 ?9) (: (O_Sub ?10 ?11) ?12))) ?13))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ?5) (: (O_Sub ?6 ?7) ?8))) (: (O_Sub ?9 ([])) ?10))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ?5) (: (O_Sub ?6 ?7) ?8))) (: (O_Sub ?9 (: O_Empty ([]))) ?10))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: O_Empty (: O_Empty ?9))) ?10))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: O_Empty (: (O_Full ?9) ?10))) ?11))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: O_Empty (: (O_Sub ?9 ?10) ?11))) ?12))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ?5) (: (O_Sub ?6 ?7) ?8))) (: (O_Sub ?9 (: (O_Full ?10) ([]))) ?11))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: (O_Full ?9) (: O_Empty ?10))) ?11))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: (O_Full ?9) (: (O_Full ?10) ?11))) ?12))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: (O_Full ?9) (: (O_Sub ?10 ?11) ?12))) ?13))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ?5) (: (O_Sub ?6 ?7) ?8))) (: (O_Sub ?9 (: (O_Sub ?10 ?11) ([]))) ?12))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: (O_Sub ?9 ?10) (: O_Empty ?11))) ?12))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: (O_Sub ?9 ?10) (: (O_Full ?11) ?12))) ?13))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: (O_Sub ?9 ?10) (: (O_Sub ?11 ?12) ?13))) ?14))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 ([])) (: (O_Sub ?4 ?5) ?6))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: ?4 ([]))) (: (O_Sub ?5 ?6) ?7))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: ?4 (: ?5 ([])))) (: (O_Sub ?6 ?7) ?8))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: ?4 (: ?5 (: O_Empty ([]))))) (: (O_Sub ?6 ?7) ?8))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: ?4 (: ?5 (: O_Empty (: O_Empty ?6))))) (: (O_Sub ?7 ([])) ?8))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: ?4 (: ?5 (: O_Empty (: O_Empty ?6))))) (: (O_Sub ?7 (: ?8 ([]))) ?9))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: ?4 (: ?5 (: O_Empty (: O_Empty ?6))))) (: (O_Sub ?7 (: ?8 (: ?9 ([])))) ?10))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:44:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: ?4 (: ?5 (: O_Empty (: O_Empty ?6))))) (: (O_Sub ?7 (: ?8 (: ?9 (: O_Empty ([]))))) ?10))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:44:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: ?4 (: ?5 (: O_Empty (: O_Empty ?6))))) (: (O_Sub ?7 (: ?8 (: ?9 (: (O_Sub ?10 ?11) ([]))))) ?12))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:44:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: ?4 (: ?5 (: O_Empty (: (O_Sub ?6 ?7) ?8))))) (: (O_Sub ?9 ([])) ?10))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: ?4 (: ?5 (: O_Empty (: (O_Sub ?6 ?7) ?8))))) (: (O_Sub ?9 (: ?10 ([]))) ?11))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: ?4 (: ?5 (: O_Empty (: (O_Sub ?6 ?7) ?8))))) (: (O_Sub ?9 (: ?10 (: ?11 ([])))) ?12))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:44:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: ?4 (: ?5 (: O_Empty (: (O_Sub ?6 ?7) ?8))))) (: (O_Sub ?9 (: ?10 (: ?11 (: O_Empty ([]))))) ?12))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:44:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: ?4 (: ?5 (: O_Empty (: (O_Sub ?6 ?7) ?8))))) (: (O_Sub ?9 (: ?10 (: ?11 (: (O_Full ?12) ([]))))) ?13))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:44:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: ?4 (: ?5 (: O_Empty (: (O_Sub ?6 ?7) ?8))))) (: (O_Sub ?9 (: ?10 (: ?11 (: (O_Sub ?12 ?13) ([]))))) ?14))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:44:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: ?4 (: ?5 (: (O_Sub ?6 ?7) ([]))))) (: (O_Sub ?8 ?9) ?10))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: ?4 (: ?5 (: (O_Sub ?6 ?7) (: O_Empty ?8))))) (: (O_Sub ?9 ([])) ?10))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: ?4 (: ?5 (: (O_Sub ?6 ?7) (: O_Empty ?8))))) (: (O_Sub ?9 (: ?10 ([]))) ?11))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: ?4 (: ?5 (: (O_Sub ?6 ?7) (: O_Empty ?8))))) (: (O_Sub ?9 (: ?10 (: ?11 ([])))) ?12))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:44:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: ?4 (: ?5 (: (O_Sub ?6 ?7) (: O_Empty ?8))))) (: (O_Sub ?9 (: ?10 (: ?11 (: O_Empty ([]))))) ?12))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:44:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: ?4 (: ?5 (: (O_Sub ?6 ?7) (: O_Empty ?8))))) (: (O_Sub ?9 (: ?10 (: ?11 (: (O_Full ?12) ([]))))) ?13))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:44:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: ?4 (: ?5 (: (O_Sub ?6 ?7) (: O_Empty ?8))))) (: (O_Sub ?9 (: ?10 (: ?11 (: (O_Sub ?12 ?13) ([]))))) ?14))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:44:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: ?4 (: ?5 (: (O_Sub ?6 ?7) (: (O_Full ?8) ?9))))) (: (O_Sub ?10 ([])) ?11))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: ?4 (: ?5 (: (O_Sub ?6 ?7) (: (O_Full ?8) ?9))))) (: (O_Sub ?10 (: ?11 ([]))) ?12))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: ?4 (: ?5 (: (O_Sub ?6 ?7) (: (O_Full ?8) ?9))))) (: (O_Sub ?10 (: ?11 (: ?12 ([])))) ?13))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:44:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: ?4 (: ?5 (: (O_Sub ?6 ?7) (: (O_Full ?8) ?9))))) (: (O_Sub ?10 (: ?11 (: ?12 (: O_Empty ([]))))) ?13))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:44:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: ?4 (: ?5 (: (O_Sub ?6 ?7) (: (O_Full ?8) ?9))))) (: (O_Sub ?10 (: ?11 (: ?12 (: (O_Full ?13) ([]))))) ?14))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:44:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: ?4 (: ?5 (: (O_Sub ?6 ?7) (: (O_Full ?8) ?9))))) (: (O_Sub ?10 (: ?11 (: ?12 (: (O_Sub ?13 ?14) ([]))))) ?15))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:44:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: ?4 (: ?5 (: (O_Sub ?6 ?7) (: (O_Sub ?8 ?9) ?10))))) (: (O_Sub ?11 ([])) ?12))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: ?4 (: ?5 (: (O_Sub ?6 ?7) (: (O_Sub ?8 ?9) ?10))))) (: (O_Sub ?11 (: ?12 ([]))) ?13))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: ?4 (: ?5 (: (O_Sub ?6 ?7) (: (O_Sub ?8 ?9) ?10))))) (: (O_Sub ?11 (: ?12 (: ?13 ([])))) ?14))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:44:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: ?4 (: ?5 (: (O_Sub ?6 ?7) (: (O_Sub ?8 ?9) ?10))))) (: (O_Sub ?11 (: ?12 (: ?13 (: O_Empty ([]))))) ?14))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:44:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: ?4 (: ?5 (: (O_Sub ?6 ?7) (: (O_Sub ?8 ?9) ?10))))) (: (O_Sub ?11 (: ?12 (: ?13 (: (O_Full ?14) ([]))))) ?15))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:44:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: ?4 (: ?5 (: (O_Sub ?6 ?7) (: (O_Sub ?8 ?9) ?10))))) (: (O_Sub ?11 (: ?12 (: ?13 (: (O_Sub ?14 ?15) ([]))))) ?16))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:44:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 ([])) (: (O_Sub ?4 ?5) ?6))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: ?4 ([]))) (: (O_Sub ?5 ?6) ?7))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: ?4 (: ?5 ([])))) (: (O_Sub ?6 ?7) ?8))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: ?4 (: ?5 (: ?6 ([]))))) (: (O_Sub ?7 ?8) ?9))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 ([])) (: (O_Sub ?4 ?5) ?6))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: ?4 ([]))) (: (O_Sub ?5 ?6) ?7))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: ?4 (: ?5 ([])))) (: (O_Sub ?6 ?7) ?8))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case quadoct (O_Sub ? ([])) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case quadoct (O_Sub ? (: ?1 ([]))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case quadoct (O_Sub ? (: ?1 (: ?2 ([])))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 ([]))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 ([])))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:35:21-34: Irrefutable pattern failed for pattern (l4 : ll5) case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 (: O_Empty ([]))))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:35:38-51: Irrefutable pattern failed for pattern (l5 : ll6) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 (: O_Empty (: (O_Sub ?5 ([])) ?6))))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 (: O_Empty (: (O_Sub ?5 (: O_Empty ([]))) ?6))))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 (: O_Empty (: (O_Sub ?5 (: (O_Sub ?6 ?7) ([]))) ?8))))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 (: O_Empty (: (O_Sub ?5 ([])) ?6))))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 (: (O_Sub ?5 ?6) ([]))))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:35:38-51: Irrefutable pattern failed for pattern (l5 : ll6) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 (: (O_Sub ?5 ([])) (: O_Empty ?6))))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 (: (O_Sub ?5 (: O_Empty ([]))) (: O_Empty ?6))))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 (: (O_Sub ?5 (: (O_Sub ?6 ?7) ([]))) (: O_Empty ?8))))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 (: (O_Sub ?5 ([])) (: O_Empty ?6))))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 (: (O_Sub ?5 (: ?6 ([]))) (: O_Empty ?7))))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 (: (O_Sub ?5 ([])) (: O_Empty ?6))))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 (: (O_Sub ?5 ([])) (: (O_Full ?6) ?7))))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 (: (O_Sub ?5 (: O_Empty ([]))) (: (O_Full ?6) ?7))))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 (: (O_Sub ?5 (: (O_Sub ?6 ?7) ([]))) (: (O_Full ?8) ?9))))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 (: (O_Sub ?5 ([])) (: (O_Full ?6) ?7))))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 (: (O_Sub ?5 (: ?6 ([]))) (: (O_Full ?7) ?8))))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 (: (O_Sub ?5 ([])) (: (O_Full ?6) ?7))))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 (: (O_Sub ?5 ([])) (: (O_Sub ?6 ?7) ?8))))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 (: (O_Sub ?5 (: O_Empty ([]))) (: (O_Sub ?6 ?7) ?8))))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 (: (O_Sub ?5 (: O_Empty (: O_Empty ?6))) (: (O_Sub ?7 ([])) ?8))))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 (: (O_Sub ?5 (: O_Empty (: O_Empty ?6))) (: (O_Sub ?7 (: O_Empty ([]))) ?8))))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 (: (O_Sub ?5 (: O_Empty (: O_Empty ?6))) (: (O_Sub ?7 (: (O_Sub ?8 ?9) ([]))) ?10))))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 (: (O_Sub ?5 (: O_Empty (: (O_Sub ?6 ?7) ?8))) (: (O_Sub ?9 ([])) ?10))))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 (: (O_Sub ?5 (: O_Empty (: (O_Sub ?6 ?7) ?8))) (: (O_Sub ?9 (: O_Empty ([]))) ?10))))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 (: (O_Sub ?5 (: O_Empty (: (O_Sub ?6 ?7) ?8))) (: (O_Sub ?9 (: (O_Full ?10) ([]))) ?11))))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 (: (O_Sub ?5 (: O_Empty (: (O_Sub ?6 ?7) ?8))) (: (O_Sub ?9 (: (O_Sub ?10 ?11) ([]))) ?12))))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 (: (O_Sub ?5 (: (O_Sub ?6 ?7) ([]))) (: (O_Sub ?8 ?9) ?10))))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 (: (O_Sub ?5 (: (O_Sub ?6 ?7) (: O_Empty ?8))) (: (O_Sub ?9 ([])) ?10))))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 (: (O_Sub ?5 (: (O_Sub ?6 ?7) (: O_Empty ?8))) (: (O_Sub ?9 (: O_Empty ([]))) ?10))))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 (: (O_Sub ?5 (: (O_Sub ?6 ?7) (: O_Empty ?8))) (: (O_Sub ?9 (: (O_Full ?10) ([]))) ?11))))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 (: (O_Sub ?5 (: (O_Sub ?6 ?7) (: O_Empty ?8))) (: (O_Sub ?9 (: (O_Sub ?10 ?11) ([]))) ?12))))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 (: (O_Sub ?5 (: (O_Sub ?6 ?7) (: (O_Full ?8) ?9))) (: (O_Sub ?10 ([])) ?11))))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 (: (O_Sub ?5 (: (O_Sub ?6 ?7) (: (O_Full ?8) ?9))) (: (O_Sub ?10 (: O_Empty ([]))) ?11))))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 (: (O_Sub ?5 (: (O_Sub ?6 ?7) (: (O_Full ?8) ?9))) (: (O_Sub ?10 (: (O_Full ?11) ([]))) ?12))))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 (: (O_Sub ?5 (: (O_Sub ?6 ?7) (: (O_Full ?8) ?9))) (: (O_Sub ?10 (: (O_Sub ?11 ?12) ([]))) ?13))))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 (: (O_Sub ?5 (: (O_Sub ?6 ?7) (: (O_Sub ?8 ?9) ?10))) (: (O_Sub ?11 ([])) ?12))))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 (: (O_Sub ?5 (: (O_Sub ?6 ?7) (: (O_Sub ?8 ?9) ?10))) (: (O_Sub ?11 (: O_Empty ([]))) ?12))))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 (: (O_Sub ?5 (: (O_Sub ?6 ?7) (: (O_Sub ?8 ?9) ?10))) (: (O_Sub ?11 (: (O_Full ?12) ([]))) ?13))))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 (: (O_Sub ?5 (: (O_Sub ?6 ?7) (: (O_Sub ?8 ?9) ?10))) (: (O_Sub ?11 (: (O_Sub ?12 ?13) ([]))) ?14))))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 (: (O_Sub ?5 ([])) (: (O_Sub ?6 ?7) ?8))))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 (: (O_Sub ?5 (: ?6 ([]))) (: (O_Sub ?7 ?8) ?9))))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 (: (O_Sub ?5 ([])) (: (O_Sub ?6 ?7) ?8))))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? ([])) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: ?1 ([]))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 ([])))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 ([]))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 ([])))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:35:21-34: Irrefutable pattern failed for pattern (l4 : ll5) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 (: ?5 ([]))))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:35:38-51: Irrefutable pattern failed for pattern (l5 : ll6) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 (: ?5 (: ?6 ([])))))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:36:21-34: Irrefutable pattern failed for pattern (l6 : ll7) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 (: ?5 (: ?6 (: O_Empty ([]))))))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:36:38-51: Irrefutable pattern failed for pattern (l7 : ll8) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 (: ?5 (: ?6 (: (O_Sub ?7 ?8) ([]))))))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:36:38-51: Irrefutable pattern failed for pattern (l7 : ll8) case case quadoct (O_Sub ? ([])) of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case quadoct (O_Sub ? (: O_Empty ([]))) of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 ([])) ?2))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: O_Empty ([]))) ?2))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: O_Empty ([]))) ?3))) ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) ?5))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: ?3 ([]))) ?4))) ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: ?3 (: ?4 ([])))) ?5))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: ?3 ([]))) ?4))) ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 ?3) ([]))) ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty ([]))) (: O_Empty ?3))) ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) (: O_Empty ?5))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: O_Empty ?4))) (: O_Empty ?5))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: (O_Full ?4) ?5))) (: O_Empty ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: (O_Sub ?4 ?5) ?6))) (: O_Empty ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: O_Empty ?4))) ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: O_Empty ?5))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: O_Empty ([]))))) (: O_Empty ?5))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: (O_Sub ?5 ?6) ([]))))) (: O_Empty ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: O_Empty ?4))) ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: O_Empty ?5))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: O_Empty ?4))) ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty ([]))) (: (O_Full ?3) ?4))) ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) (: (O_Full ?5) ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: O_Empty ?4))) (: (O_Full ?5) ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: (O_Full ?4) ?5))) (: (O_Full ?6) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: (O_Sub ?4 ?5) ?6))) (: (O_Full ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Full ?4) ?5))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: (O_Full ?5) ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: O_Empty ([]))))) (: (O_Full ?5) ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: (O_Sub ?5 ?6) ([]))))) (: (O_Full ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Full ?4) ?5))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: (O_Full ?5) ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Full ?4) ?5))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty ([]))) (: (O_Sub ?3 ?4) ?5))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: O_Empty ?3))) (: (O_Sub ?4 ([])) ?5))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: O_Empty ?3))) (: (O_Sub ?4 (: O_Empty ([]))) ?5))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: O_Empty ?3))) (: (O_Sub ?4 (: (O_Sub ?5 ?6) ([]))) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 ([])) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: O_Empty ([]))) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: (O_Full ?7) ([]))) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) ([]))) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) (: (O_Sub ?5 ?6) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) (: (O_Sub ?6 ([])) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) (: (O_Sub ?6 (: O_Empty ([]))) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) (: (O_Sub ?6 (: (O_Full ?7) ([]))) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) ([]))) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) (: (O_Sub ?7 ([])) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: O_Empty ([]))) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: (O_Full ?8) ([]))) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: (O_Sub ?8 ?9) ([]))) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 ([])) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: O_Empty ([]))) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: (O_Full ?9) ([]))) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: (O_Sub ?9 ?10) ([]))) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Sub ?4 ?5) ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: (O_Sub ?5 ?6) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: O_Empty ([]))))) (: (O_Sub ?5 ?6) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: (O_Sub ?5 ?6) ([]))))) (: (O_Sub ?7 ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Sub ?4 ?5) ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: (O_Sub ?5 ?6) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Sub ?4 ?5) ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 ([])) ?2))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: ?2 ([]))) ?3))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: ?2 (: ?3 ([])))) ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: ?2 (: ?3 (: O_Empty ([]))))) ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: ?2 (: ?3 (: O_Empty (: (O_Sub ?4 ([])) ?5))))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ?5) ([]))))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ([])) (: O_Empty ?5))))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 (: O_Empty ([]))) (: O_Empty ?5))))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 (: (O_Sub ?5 ?6) ([]))) (: O_Empty ?7))))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ([])) (: O_Empty ?5))))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ([])) (: (O_Full ?5) ?6))))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 (: O_Empty ([]))) (: (O_Full ?5) ?6))))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 (: (O_Sub ?5 ?6) ([]))) (: (O_Full ?7) ?8))))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ([])) (: (O_Full ?5) ?6))))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ([])) (: (O_Sub ?5 ?6) ?7))))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 (: O_Empty ([]))) (: (O_Sub ?5 ?6) ?7))))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 (: (O_Sub ?5 ?6) ([]))) (: (O_Sub ?7 ?8) ?9))))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ([])) (: (O_Sub ?5 ?6) ?7))))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 ([])) ?2))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: ?2 ([]))) ?3))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: ?2 (: ?3 ([])))) ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 ([]))))) ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 (: ?5 ([])))))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:35:21-34: Irrefutable pattern failed for pattern (l4 : ll5) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 (: ?5 (: O_Empty ([]))))))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:35:38-51: Irrefutable pattern failed for pattern (l5 : ll6) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 (: ?5 (: (O_Sub ?6 ?7) ([]))))))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:35:38-51: Irrefutable pattern failed for pattern (l5 : ll6) case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 ([])) ?2))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: ?2 ([]))) ?3))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: ?2 (: ?3 ([])))) ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 ([]))))) ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 (: ?5 ([])))))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:35:21-34: Irrefutable pattern failed for pattern (l4 : ll5) case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 (: ?5 (: ?6 ([]))))))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:35:38-51: Irrefutable pattern failed for pattern (l5 : ll6) case case quadoct (O_Sub ? (: (O_Sub ?1 ?2) ([]))) of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case quadoct (O_Sub ? (: (O_Sub ?1 ([])) (: O_Empty ?2))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty ([]))) (: O_Empty ?2))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: O_Empty ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: O_Empty ([]))) ?3))) (: O_Empty ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) ?5))) (: O_Empty ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: O_Empty ?4))) ?5))) (: O_Empty ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: (O_Full ?4) ?5))) ?6))) (: O_Empty ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: (O_Sub ?4 ?5) ?6))) ?7))) (: O_Empty ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: O_Empty ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: ?3 ([]))) ?4))) (: O_Empty ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: ?3 (: ?4 ([])))) ?5))) (: O_Empty ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: ?3 (: ?4 (: O_Empty ([]))))) ?5))) (: O_Empty ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: ?3 (: ?4 (: (O_Sub ?5 ?6) ([]))))) ?7))) (: O_Empty ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: O_Empty ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: ?3 ([]))) ?4))) (: O_Empty ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: ?3 (: ?4 ([])))) ?5))) (: O_Empty ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: O_Empty ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: ?3 ([]))) ?4))) (: O_Empty ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ?3) ([]))) (: O_Empty ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: O_Empty ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty ([]))) (: O_Empty ?3))) (: O_Empty ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ([])) ?4))) (: O_Empty ?5))) (: O_Empty ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) (: O_Empty ?5))) (: O_Empty ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: O_Empty ?4))) (: O_Empty ?5))) (: O_Empty ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 (: O_Empty ([]))) (: O_Empty ?4))) (: O_Empty ?5))) (: O_Empty ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 (: (O_Sub ?4 ?5) ([]))) (: O_Empty ?6))) (: O_Empty ?7))) (: O_Empty ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: O_Empty ?4))) (: O_Empty ?5))) (: O_Empty ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: (O_Full ?4) ?5))) (: O_Empty ?6))) (: O_Empty ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 (: O_Empty ([]))) (: (O_Full ?4) ?5))) (: O_Empty ?6))) (: O_Empty ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 (: (O_Sub ?4 ?5) ([]))) (: (O_Full ?6) ?7))) (: O_Empty ?8))) (: O_Empty ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: (O_Full ?4) ?5))) (: O_Empty ?6))) (: O_Empty ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: (O_Sub ?4 ?5) ?6))) (: O_Empty ?7))) (: O_Empty ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 (: O_Empty ([]))) (: (O_Sub ?4 ?5) ?6))) (: O_Empty ?7))) (: O_Empty ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 (: (O_Sub ?4 ?5) ([]))) (: (O_Sub ?6 ?7) ?8))) (: O_Empty ?9))) (: O_Empty ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: (O_Sub ?4 ?5) ?6))) (: O_Empty ?7))) (: O_Empty ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: O_Empty ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: O_Empty ?4))) (: O_Empty ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: O_Empty ?5))) (: O_Empty ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: O_Empty ([]))))) (: O_Empty ?5))) (: O_Empty ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: (O_Sub ?5 ?6) ([]))))) (: O_Empty ?7))) (: O_Empty ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: O_Empty ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: O_Empty ?4))) (: O_Empty ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: O_Empty ?5))) (: O_Empty ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: ?5 ([]))))) (: O_Empty ?6))) (: O_Empty ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: O_Empty ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: O_Empty ?4))) (: O_Empty ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: O_Empty ?5))) (: O_Empty ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: O_Empty ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty ([]))) (: (O_Full ?3) ?4))) (: O_Empty ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ([])) ?4))) (: (O_Full ?5) ?6))) (: O_Empty ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) (: (O_Full ?5) ?6))) (: O_Empty ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: O_Empty ?4))) (: (O_Full ?5) ?6))) (: O_Empty ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 (: O_Empty ([]))) (: O_Empty ?4))) (: (O_Full ?5) ?6))) (: O_Empty ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 (: (O_Sub ?4 ?5) ([]))) (: O_Empty ?6))) (: (O_Full ?7) ?8))) (: O_Empty ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: O_Empty ?4))) (: (O_Full ?5) ?6))) (: O_Empty ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: (O_Full ?4) ?5))) (: (O_Full ?6) ?7))) (: O_Empty ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 (: O_Empty ([]))) (: (O_Full ?4) ?5))) (: (O_Full ?6) ?7))) (: O_Empty ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 (: (O_Sub ?4 ?5) ([]))) (: (O_Full ?6) ?7))) (: (O_Full ?8) ?9))) (: O_Empty ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: (O_Full ?4) ?5))) (: (O_Full ?6) ?7))) (: O_Empty ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: (O_Sub ?4 ?5) ?6))) (: (O_Full ?7) ?8))) (: O_Empty ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 (: O_Empty ([]))) (: (O_Sub ?4 ?5) ?6))) (: (O_Full ?7) ?8))) (: O_Empty ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 (: (O_Sub ?4 ?5) ([]))) (: (O_Sub ?6 ?7) ?8))) (: (O_Full ?9) ?10))) (: O_Empty ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: (O_Sub ?4 ?5) ?6))) (: (O_Full ?7) ?8))) (: O_Empty ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: O_Empty ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Full ?4) ?5))) (: O_Empty ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: (O_Full ?5) ?6))) (: O_Empty ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: O_Empty ([]))))) (: (O_Full ?5) ?6))) (: O_Empty ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: (O_Sub ?5 ?6) ([]))))) (: (O_Full ?7) ?8))) (: O_Empty ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: O_Empty ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Full ?4) ?5))) (: O_Empty ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: (O_Full ?5) ?6))) (: O_Empty ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: ?5 ([]))))) (: (O_Full ?6) ?7))) (: O_Empty ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: O_Empty ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Full ?4) ?5))) (: O_Empty ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: (O_Full ?5) ?6))) (: O_Empty ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: O_Empty ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty ([]))) (: (O_Sub ?3 ?4) ?5))) (: O_Empty ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: O_Empty ?3))) (: (O_Sub ?4 ([])) ?5))) (: O_Empty ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: O_Empty ?3))) (: (O_Sub ?4 (: O_Empty ([]))) ?5))) (: O_Empty ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: O_Empty ?3))) (: (O_Sub ?4 (: (O_Sub ?5 ?6) ([]))) ?7))) (: O_Empty ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: O_Empty ?3))) (: (O_Sub ?4 (: (O_Sub ?5 ([])) (: O_Empty ?6))) ?7))) (: O_Empty ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: O_Empty ?3))) (: (O_Sub ?4 (: (O_Sub ?5 ([])) (: (O_Full ?6) ?7))) ?8))) (: O_Empty ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: O_Empty ?3))) (: (O_Sub ?4 (: (O_Sub ?5 ([])) (: (O_Sub ?6 ?7) ?8))) ?9))) (: O_Empty ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 ([])) ?7))) (: O_Empty ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: O_Empty ([]))) ?7))) (: O_Empty ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ([])) ?4))) (: (O_Sub ?5 (: O_Empty (: O_Empty ?6))) ?7))) (: O_Empty ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ([])) ?4))) (: (O_Sub ?5 (: O_Empty (: (O_Full ?6) ?7))) ?8))) (: O_Empty ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ([])) ?4))) (: (O_Sub ?5 (: O_Empty (: (O_Sub ?6 ?7) ?8))) ?9))) (: O_Empty ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: (O_Full ?7) ([]))) ?8))) (: O_Empty ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ([])) ?4))) (: (O_Sub ?5 (: (O_Full ?6) (: O_Empty ?7))) ?8))) (: O_Empty ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ([])) ?4))) (: (O_Sub ?5 (: (O_Full ?6) (: (O_Full ?7) ?8))) ?9))) (: O_Empty ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ([])) ?4))) (: (O_Sub ?5 (: (O_Full ?6) (: (O_Sub ?7 ?8) ?9))) ?10))) (: O_Empty ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) ([]))) ?9))) (: O_Empty ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ([])) ?4))) (: (O_Sub ?5 (: (O_Sub ?6 ?7) (: O_Empty ?8))) ?9))) (: O_Empty ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ([])) ?4))) (: (O_Sub ?5 (: (O_Sub ?6 ?7) (: (O_Full ?8) ?9))) ?10))) (: O_Empty ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ([])) ?4))) (: (O_Sub ?5 (: (O_Sub ?6 ?7) (: (O_Sub ?8 ?9) ?10))) ?11))) (: O_Empty ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) (: (O_Sub ?5 ?6) ?7))) (: O_Empty ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) (: (O_Sub ?6 ([])) ?7))) (: O_Empty ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) (: (O_Sub ?6 (: O_Empty ([]))) ?7))) (: O_Empty ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: O_Empty ?4))) (: (O_Sub ?5 (: O_Empty (: O_Empty ?6))) ?7))) (: O_Empty ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: O_Empty ?4))) (: (O_Sub ?5 (: O_Empty (: (O_Full ?6) ?7))) ?8))) (: O_Empty ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: O_Empty ?4))) (: (O_Sub ?5 (: O_Empty (: (O_Sub ?6 ?7) ?8))) ?9))) (: O_Empty ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) (: (O_Sub ?6 (: (O_Full ?7) ([]))) ?8))) (: O_Empty ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: O_Empty ?4))) (: (O_Sub ?5 (: (O_Full ?6) (: O_Empty ?7))) ?8))) (: O_Empty ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: O_Empty ?4))) (: (O_Sub ?5 (: (O_Full ?6) (: (O_Full ?7) ?8))) ?9))) (: O_Empty ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: O_Empty ?4))) (: (O_Sub ?5 (: (O_Full ?6) (: (O_Sub ?7 ?8) ?9))) ?10))) (: O_Empty ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) ([]))) ?9))) (: O_Empty ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: O_Empty ?4))) (: (O_Sub ?5 (: (O_Sub ?6 ?7) (: O_Empty ?8))) ?9))) (: O_Empty ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: O_Empty ?4))) (: (O_Sub ?5 (: (O_Sub ?6 ?7) (: (O_Full ?8) ?9))) ?10))) (: O_Empty ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: O_Empty ?4))) (: (O_Sub ?5 (: (O_Sub ?6 ?7) (: (O_Sub ?8 ?9) ?10))) ?11))) (: O_Empty ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) (: (O_Sub ?7 ([])) ?8))) (: O_Empty ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: O_Empty ([]))) ?8))) (: O_Empty ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: (O_Full ?4) ?5))) (: (O_Sub ?6 (: O_Empty (: O_Empty ?7))) ?8))) (: O_Empty ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: (O_Full ?4) ?5))) (: (O_Sub ?6 (: O_Empty (: (O_Full ?7) ?8))) ?9))) (: O_Empty ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: (O_Full ?4) ?5))) (: (O_Sub ?6 (: O_Empty (: (O_Sub ?7 ?8) ?9))) ?10))) (: O_Empty ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: (O_Full ?8) ([]))) ?9))) (: O_Empty ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: (O_Full ?4) ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: O_Empty ?8))) ?9))) (: O_Empty ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: (O_Full ?4) ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: (O_Full ?8) ?9))) ?10))) (: O_Empty ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: (O_Full ?4) ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: (O_Sub ?8 ?9) ?10))) ?11))) (: O_Empty ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: (O_Sub ?8 ?9) ([]))) ?10))) (: O_Empty ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: (O_Full ?4) ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: O_Empty ?9))) ?10))) (: O_Empty ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: (O_Full ?4) ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: (O_Full ?9) ?10))) ?11))) (: O_Empty ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: (O_Full ?4) ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: (O_Sub ?9 ?10) ?11))) ?12))) (: O_Empty ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 ([])) ?9))) (: O_Empty ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: O_Empty ([]))) ?9))) (: O_Empty ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: (O_Sub ?4 ?5) ?6))) (: (O_Sub ?7 (: O_Empty (: O_Empty ?8))) ?9))) (: O_Empty ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: (O_Sub ?4 ?5) ?6))) (: (O_Sub ?7 (: O_Empty (: (O_Full ?8) ?9))) ?10))) (: O_Empty ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: (O_Sub ?4 ?5) ?6))) (: (O_Sub ?7 (: O_Empty (: (O_Sub ?8 ?9) ?10))) ?11))) (: O_Empty ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: (O_Full ?9) ([]))) ?10))) (: O_Empty ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: (O_Sub ?4 ?5) ?6))) (: (O_Sub ?7 (: (O_Full ?8) (: O_Empty ?9))) ?10))) (: O_Empty ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: (O_Sub ?4 ?5) ?6))) (: (O_Sub ?7 (: (O_Full ?8) (: (O_Full ?9) ?10))) ?11))) (: O_Empty ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: (O_Sub ?4 ?5) ?6))) (: (O_Sub ?7 (: (O_Full ?8) (: (O_Sub ?9 ?10) ?11))) ?12))) (: O_Empty ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: (O_Sub ?9 ?10) ([]))) ?11))) (: O_Empty ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: (O_Sub ?4 ?5) ?6))) (: (O_Sub ?7 (: (O_Sub ?8 ?9) (: O_Empty ?10))) ?11))) (: O_Empty ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: (O_Sub ?4 ?5) ?6))) (: (O_Sub ?7 (: (O_Sub ?8 ?9) (: (O_Full ?10) ?11))) ?12))) (: O_Empty ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: (O_Sub ?4 ?5) ?6))) (: (O_Sub ?7 (: (O_Sub ?8 ?9) (: (O_Sub ?10 ?11) ?12))) ?13))) (: O_Empty ?14))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: O_Empty ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Sub ?4 ?5) ?6))) (: O_Empty ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: (O_Sub ?5 ?6) ?7))) (: O_Empty ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: O_Empty ([]))))) (: (O_Sub ?5 ?6) ?7))) (: O_Empty ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: O_Empty (: O_Empty ?5))))) (: (O_Sub ?6 ([])) ?7))) (: O_Empty ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: O_Empty (: O_Empty ?5))))) (: (O_Sub ?6 (: ?7 ([]))) ?8))) (: O_Empty ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: O_Empty (: O_Empty ?5))))) (: (O_Sub ?6 (: ?7 (: ?8 ([])))) ?9))) (: O_Empty ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:44:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: O_Empty (: (O_Sub ?5 ?6) ?7))))) (: (O_Sub ?8 ([])) ?9))) (: O_Empty ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: O_Empty (: (O_Sub ?5 ?6) ?7))))) (: (O_Sub ?8 (: ?9 ([]))) ?10))) (: O_Empty ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: O_Empty (: (O_Sub ?5 ?6) ?7))))) (: (O_Sub ?8 (: ?9 (: ?10 ([])))) ?11))) (: O_Empty ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:44:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: (O_Sub ?5 ?6) ([]))))) (: (O_Sub ?7 ?8) ?9))) (: O_Empty ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: (O_Sub ?5 ?6) (: O_Empty ?7))))) (: (O_Sub ?8 ([])) ?9))) (: O_Empty ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: (O_Sub ?5 ?6) (: O_Empty ?7))))) (: (O_Sub ?8 (: ?9 ([]))) ?10))) (: O_Empty ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: (O_Sub ?5 ?6) (: O_Empty ?7))))) (: (O_Sub ?8 (: ?9 (: ?10 ([])))) ?11))) (: O_Empty ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:44:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: (O_Sub ?5 ?6) (: (O_Full ?7) ?8))))) (: (O_Sub ?9 ([])) ?10))) (: O_Empty ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: (O_Sub ?5 ?6) (: (O_Full ?7) ?8))))) (: (O_Sub ?9 (: ?10 ([]))) ?11))) (: O_Empty ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: (O_Sub ?5 ?6) (: (O_Full ?7) ?8))))) (: (O_Sub ?9 (: ?10 (: ?11 ([])))) ?12))) (: O_Empty ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:44:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: (O_Sub ?5 ?6) (: (O_Sub ?7 ?8) ?9))))) (: (O_Sub ?10 ([])) ?11))) (: O_Empty ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: (O_Sub ?5 ?6) (: (O_Sub ?7 ?8) ?9))))) (: (O_Sub ?10 (: ?11 ([]))) ?12))) (: O_Empty ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: (O_Sub ?5 ?6) (: (O_Sub ?7 ?8) ?9))))) (: (O_Sub ?10 (: ?11 (: ?12 ([])))) ?13))) (: O_Empty ?14))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:44:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: O_Empty ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Sub ?4 ?5) ?6))) (: O_Empty ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: (O_Sub ?5 ?6) ?7))) (: O_Empty ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: ?5 ([]))))) (: (O_Sub ?6 ?7) ?8))) (: O_Empty ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: O_Empty ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Sub ?4 ?5) ?6))) (: O_Empty ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: (O_Sub ?5 ?6) ?7))) (: O_Empty ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 ([])) (: O_Empty ?2))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 ([]))) (: O_Empty ?3))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 ([])))) (: O_Empty ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: O_Empty ([]))))) (: O_Empty ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: O_Empty (: (O_Sub ?4 ([])) ?5))))) (: O_Empty ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: O_Empty (: (O_Sub ?4 (: O_Empty ([]))) ?5))))) (: O_Empty ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: O_Empty (: (O_Sub ?4 (: (O_Sub ?5 ?6) ([]))) ?7))))) (: O_Empty ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: O_Empty (: (O_Sub ?4 ([])) ?5))))) (: O_Empty ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ?5) ([]))))) (: O_Empty ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ([])) (: O_Empty ?5))))) (: O_Empty ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 (: O_Empty ([]))) (: O_Empty ?5))))) (: O_Empty ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 (: (O_Sub ?5 ?6) ([]))) (: O_Empty ?7))))) (: O_Empty ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ([])) (: O_Empty ?5))))) (: O_Empty ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 (: ?5 ([]))) (: O_Empty ?6))))) (: O_Empty ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ([])) (: O_Empty ?5))))) (: O_Empty ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ([])) (: (O_Full ?5) ?6))))) (: O_Empty ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 (: O_Empty ([]))) (: (O_Full ?5) ?6))))) (: O_Empty ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 (: (O_Sub ?5 ?6) ([]))) (: (O_Full ?7) ?8))))) (: O_Empty ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ([])) (: (O_Full ?5) ?6))))) (: O_Empty ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 (: ?5 ([]))) (: (O_Full ?6) ?7))))) (: O_Empty ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ([])) (: (O_Full ?5) ?6))))) (: O_Empty ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ([])) (: (O_Sub ?5 ?6) ?7))))) (: O_Empty ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 (: O_Empty ([]))) (: (O_Sub ?5 ?6) ?7))))) (: O_Empty ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 (: O_Empty (: O_Empty ?5))) (: (O_Sub ?6 ([])) ?7))))) (: O_Empty ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 (: O_Empty (: O_Empty ?5))) (: (O_Sub ?6 (: O_Empty ([]))) ?7))))) (: O_Empty ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 (: O_Empty (: O_Empty ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) ([]))) ?9))))) (: O_Empty ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 (: O_Empty (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 ([])) ?9))))) (: O_Empty ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 (: O_Empty (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: O_Empty ([]))) ?9))))) (: O_Empty ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 (: O_Empty (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: (O_Full ?9) ([]))) ?10))))) (: O_Empty ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 (: O_Empty (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: (O_Sub ?9 ?10) ([]))) ?11))))) (: O_Empty ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 (: (O_Sub ?5 ?6) ([]))) (: (O_Sub ?7 ?8) ?9))))) (: O_Empty ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: O_Empty ?7))) (: (O_Sub ?8 ([])) ?9))))) (: O_Empty ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: O_Empty ?7))) (: (O_Sub ?8 (: O_Empty ([]))) ?9))))) (: O_Empty ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: O_Empty ?7))) (: (O_Sub ?8 (: (O_Full ?9) ([]))) ?10))))) (: O_Empty ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: O_Empty ?7))) (: (O_Sub ?8 (: (O_Sub ?9 ?10) ([]))) ?11))))) (: O_Empty ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: (O_Full ?7) ?8))) (: (O_Sub ?9 ([])) ?10))))) (: O_Empty ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: (O_Full ?7) ?8))) (: (O_Sub ?9 (: O_Empty ([]))) ?10))))) (: O_Empty ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: (O_Full ?7) ?8))) (: (O_Sub ?9 (: (O_Full ?10) ([]))) ?11))))) (: O_Empty ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: (O_Full ?7) ?8))) (: (O_Sub ?9 (: (O_Sub ?10 ?11) ([]))) ?12))))) (: O_Empty ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: (O_Sub ?7 ?8) ?9))) (: (O_Sub ?10 ([])) ?11))))) (: O_Empty ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: (O_Sub ?7 ?8) ?9))) (: (O_Sub ?10 (: O_Empty ([]))) ?11))))) (: O_Empty ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: (O_Sub ?7 ?8) ?9))) (: (O_Sub ?10 (: (O_Full ?11) ([]))) ?12))))) (: O_Empty ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: (O_Sub ?7 ?8) ?9))) (: (O_Sub ?10 (: (O_Sub ?11 ?12) ([]))) ?13))))) (: O_Empty ?14))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ([])) (: (O_Sub ?5 ?6) ?7))))) (: O_Empty ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 (: ?5 ([]))) (: (O_Sub ?6 ?7) ?8))))) (: O_Empty ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ([])) (: (O_Sub ?5 ?6) ?7))))) (: O_Empty ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 ([])) (: O_Empty ?2))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 ([]))) (: O_Empty ?3))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 ([])))) (: O_Empty ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 ([]))))) (: O_Empty ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 (: ?5 ([])))))) (: O_Empty ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:35:21-34: Irrefutable pattern failed for pattern (l4 : ll5) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 (: ?5 (: O_Empty ([]))))))) (: O_Empty ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:35:38-51: Irrefutable pattern failed for pattern (l5 : ll6) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 (: ?5 (: (O_Sub ?6 ?7) ([]))))))) (: O_Empty ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:35:38-51: Irrefutable pattern failed for pattern (l5 : ll6) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 ([])) (: O_Empty ?2))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 ([]))) (: O_Empty ?3))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 ([])))) (: O_Empty ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 ([]))))) (: O_Empty ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 (: ?5 ([])))))) (: O_Empty ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:35:21-34: Irrefutable pattern failed for pattern (l4 : ll5) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 (: ?5 (: ?6 ([]))))))) (: O_Empty ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:35:38-51: Irrefutable pattern failed for pattern (l5 : ll6) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 (: ?5 (: ?6 (: ?7 ([])))))))) (: O_Empty ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:36:21-34: Irrefutable pattern failed for pattern (l6 : ll7) case case case case quadoct (O_Sub ? (: (O_Sub ?1 ([])) (: (O_Full ?2) ?3))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty ([]))) (: (O_Full ?2) ?3))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: (O_Full ?4) ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: O_Empty ([]))) ?3))) (: (O_Full ?4) ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) ?5))) (: (O_Full ?6) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: O_Empty ?4))) ?5))) (: (O_Full ?6) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: (O_Full ?4) ?5))) ?6))) (: (O_Full ?7) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: (O_Sub ?4 ?5) ?6))) ?7))) (: (O_Full ?8) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: (O_Full ?4) ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: ?3 ([]))) ?4))) (: (O_Full ?5) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: ?3 (: ?4 ([])))) ?5))) (: (O_Full ?6) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: ?3 (: ?4 (: O_Empty ([]))))) ?5))) (: (O_Full ?6) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: ?3 (: ?4 (: (O_Sub ?5 ?6) ([]))))) ?7))) (: (O_Full ?8) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: (O_Full ?4) ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: ?3 ([]))) ?4))) (: (O_Full ?5) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: ?3 (: ?4 ([])))) ?5))) (: (O_Full ?6) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: (O_Full ?4) ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: ?3 ([]))) ?4))) (: (O_Full ?5) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ?3) ([]))) (: (O_Full ?4) ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: (O_Full ?4) ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty ([]))) (: O_Empty ?3))) (: (O_Full ?4) ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ([])) ?4))) (: O_Empty ?5))) (: (O_Full ?6) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) (: O_Empty ?5))) (: (O_Full ?6) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: O_Empty ?4))) (: O_Empty ?5))) (: (O_Full ?6) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 (: O_Empty ([]))) (: O_Empty ?4))) (: O_Empty ?5))) (: (O_Full ?6) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 (: (O_Sub ?4 ?5) ([]))) (: O_Empty ?6))) (: O_Empty ?7))) (: (O_Full ?8) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: O_Empty ?4))) (: O_Empty ?5))) (: (O_Full ?6) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: (O_Full ?4) ?5))) (: O_Empty ?6))) (: (O_Full ?7) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 (: O_Empty ([]))) (: (O_Full ?4) ?5))) (: O_Empty ?6))) (: (O_Full ?7) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 (: (O_Sub ?4 ?5) ([]))) (: (O_Full ?6) ?7))) (: O_Empty ?8))) (: (O_Full ?9) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: (O_Full ?4) ?5))) (: O_Empty ?6))) (: (O_Full ?7) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: (O_Sub ?4 ?5) ?6))) (: O_Empty ?7))) (: (O_Full ?8) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 (: O_Empty ([]))) (: (O_Sub ?4 ?5) ?6))) (: O_Empty ?7))) (: (O_Full ?8) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 (: (O_Sub ?4 ?5) ([]))) (: (O_Sub ?6 ?7) ?8))) (: O_Empty ?9))) (: (O_Full ?10) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: (O_Sub ?4 ?5) ?6))) (: O_Empty ?7))) (: (O_Full ?8) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: (O_Full ?4) ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: O_Empty ?4))) (: (O_Full ?5) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: O_Empty ?5))) (: (O_Full ?6) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: O_Empty ([]))))) (: O_Empty ?5))) (: (O_Full ?6) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: (O_Sub ?5 ?6) ([]))))) (: O_Empty ?7))) (: (O_Full ?8) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: (O_Full ?4) ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: O_Empty ?4))) (: (O_Full ?5) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: O_Empty ?5))) (: (O_Full ?6) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: ?5 ([]))))) (: O_Empty ?6))) (: (O_Full ?7) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: (O_Full ?4) ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: O_Empty ?4))) (: (O_Full ?5) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: O_Empty ?5))) (: (O_Full ?6) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: (O_Full ?5) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty ([]))) (: (O_Full ?3) ?4))) (: (O_Full ?5) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ([])) ?4))) (: (O_Full ?5) ?6))) (: (O_Full ?7) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) (: (O_Full ?5) ?6))) (: (O_Full ?7) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: O_Empty ?4))) (: (O_Full ?5) ?6))) (: (O_Full ?7) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 (: O_Empty ([]))) (: O_Empty ?4))) (: (O_Full ?5) ?6))) (: (O_Full ?7) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 (: (O_Sub ?4 ?5) ([]))) (: O_Empty ?6))) (: (O_Full ?7) ?8))) (: (O_Full ?9) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: O_Empty ?4))) (: (O_Full ?5) ?6))) (: (O_Full ?7) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: (O_Full ?4) ?5))) (: (O_Full ?6) ?7))) (: (O_Full ?8) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 (: O_Empty ([]))) (: (O_Full ?4) ?5))) (: (O_Full ?6) ?7))) (: (O_Full ?8) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 (: (O_Sub ?4 ?5) ([]))) (: (O_Full ?6) ?7))) (: (O_Full ?8) ?9))) (: (O_Full ?10) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: (O_Full ?4) ?5))) (: (O_Full ?6) ?7))) (: (O_Full ?8) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: (O_Sub ?4 ?5) ?6))) (: (O_Full ?7) ?8))) (: (O_Full ?9) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 (: O_Empty ([]))) (: (O_Sub ?4 ?5) ?6))) (: (O_Full ?7) ?8))) (: (O_Full ?9) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 (: (O_Sub ?4 ?5) ([]))) (: (O_Sub ?6 ?7) ?8))) (: (O_Full ?9) ?10))) (: (O_Full ?11) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: (O_Sub ?4 ?5) ?6))) (: (O_Full ?7) ?8))) (: (O_Full ?9) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: (O_Full ?5) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Full ?4) ?5))) (: (O_Full ?6) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: (O_Full ?5) ?6))) (: (O_Full ?7) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: O_Empty ([]))))) (: (O_Full ?5) ?6))) (: (O_Full ?7) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: (O_Sub ?5 ?6) ([]))))) (: (O_Full ?7) ?8))) (: (O_Full ?9) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: (O_Full ?5) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Full ?4) ?5))) (: (O_Full ?6) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: (O_Full ?5) ?6))) (: (O_Full ?7) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: ?5 ([]))))) (: (O_Full ?6) ?7))) (: (O_Full ?8) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: (O_Full ?5) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Full ?4) ?5))) (: (O_Full ?6) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: (O_Full ?5) ?6))) (: (O_Full ?7) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: (O_Full ?6) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty ([]))) (: (O_Sub ?3 ?4) ?5))) (: (O_Full ?6) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: O_Empty ?3))) (: (O_Sub ?4 ([])) ?5))) (: (O_Full ?6) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: O_Empty ?3))) (: (O_Sub ?4 (: O_Empty ([]))) ?5))) (: (O_Full ?6) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: O_Empty ?3))) (: (O_Sub ?4 (: (O_Sub ?5 ?6) ([]))) ?7))) (: (O_Full ?8) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: O_Empty ?3))) (: (O_Sub ?4 (: (O_Sub ?5 ([])) (: O_Empty ?6))) ?7))) (: (O_Full ?8) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: O_Empty ?3))) (: (O_Sub ?4 (: (O_Sub ?5 ([])) (: (O_Full ?6) ?7))) ?8))) (: (O_Full ?9) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: O_Empty ?3))) (: (O_Sub ?4 (: (O_Sub ?5 ([])) (: (O_Sub ?6 ?7) ?8))) ?9))) (: (O_Full ?10) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 ([])) ?7))) (: (O_Full ?8) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: O_Empty ([]))) ?7))) (: (O_Full ?8) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ([])) ?4))) (: (O_Sub ?5 (: O_Empty (: O_Empty ?6))) ?7))) (: (O_Full ?8) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ([])) ?4))) (: (O_Sub ?5 (: O_Empty (: (O_Full ?6) ?7))) ?8))) (: (O_Full ?9) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ([])) ?4))) (: (O_Sub ?5 (: O_Empty (: (O_Sub ?6 ?7) ?8))) ?9))) (: (O_Full ?10) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: (O_Full ?7) ([]))) ?8))) (: (O_Full ?9) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ([])) ?4))) (: (O_Sub ?5 (: (O_Full ?6) (: O_Empty ?7))) ?8))) (: (O_Full ?9) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ([])) ?4))) (: (O_Sub ?5 (: (O_Full ?6) (: (O_Full ?7) ?8))) ?9))) (: (O_Full ?10) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ([])) ?4))) (: (O_Sub ?5 (: (O_Full ?6) (: (O_Sub ?7 ?8) ?9))) ?10))) (: (O_Full ?11) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) ([]))) ?9))) (: (O_Full ?10) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ([])) ?4))) (: (O_Sub ?5 (: (O_Sub ?6 ?7) (: O_Empty ?8))) ?9))) (: (O_Full ?10) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ([])) ?4))) (: (O_Sub ?5 (: (O_Sub ?6 ?7) (: (O_Full ?8) ?9))) ?10))) (: (O_Full ?11) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ([])) ?4))) (: (O_Sub ?5 (: (O_Sub ?6 ?7) (: (O_Sub ?8 ?9) ?10))) ?11))) (: (O_Full ?12) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) (: (O_Sub ?5 ?6) ?7))) (: (O_Full ?8) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) (: (O_Sub ?6 ([])) ?7))) (: (O_Full ?8) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) (: (O_Sub ?6 (: O_Empty ([]))) ?7))) (: (O_Full ?8) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: O_Empty ?4))) (: (O_Sub ?5 (: O_Empty (: O_Empty ?6))) ?7))) (: (O_Full ?8) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: O_Empty ?4))) (: (O_Sub ?5 (: O_Empty (: (O_Full ?6) ?7))) ?8))) (: (O_Full ?9) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: O_Empty ?4))) (: (O_Sub ?5 (: O_Empty (: (O_Sub ?6 ?7) ?8))) ?9))) (: (O_Full ?10) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) (: (O_Sub ?6 (: (O_Full ?7) ([]))) ?8))) (: (O_Full ?9) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: O_Empty ?4))) (: (O_Sub ?5 (: (O_Full ?6) (: O_Empty ?7))) ?8))) (: (O_Full ?9) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: O_Empty ?4))) (: (O_Sub ?5 (: (O_Full ?6) (: (O_Full ?7) ?8))) ?9))) (: (O_Full ?10) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: O_Empty ?4))) (: (O_Sub ?5 (: (O_Full ?6) (: (O_Sub ?7 ?8) ?9))) ?10))) (: (O_Full ?11) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) ([]))) ?9))) (: (O_Full ?10) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: O_Empty ?4))) (: (O_Sub ?5 (: (O_Sub ?6 ?7) (: O_Empty ?8))) ?9))) (: (O_Full ?10) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: O_Empty ?4))) (: (O_Sub ?5 (: (O_Sub ?6 ?7) (: (O_Full ?8) ?9))) ?10))) (: (O_Full ?11) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: O_Empty ?4))) (: (O_Sub ?5 (: (O_Sub ?6 ?7) (: (O_Sub ?8 ?9) ?10))) ?11))) (: (O_Full ?12) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) (: (O_Sub ?7 ([])) ?8))) (: (O_Full ?9) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: O_Empty ([]))) ?8))) (: (O_Full ?9) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: (O_Full ?4) ?5))) (: (O_Sub ?6 (: O_Empty (: O_Empty ?7))) ?8))) (: (O_Full ?9) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: (O_Full ?4) ?5))) (: (O_Sub ?6 (: O_Empty (: (O_Full ?7) ?8))) ?9))) (: (O_Full ?10) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: (O_Full ?4) ?5))) (: (O_Sub ?6 (: O_Empty (: (O_Sub ?7 ?8) ?9))) ?10))) (: (O_Full ?11) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: (O_Full ?8) ([]))) ?9))) (: (O_Full ?10) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: (O_Full ?4) ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: O_Empty ?8))) ?9))) (: (O_Full ?10) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: (O_Full ?4) ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: (O_Full ?8) ?9))) ?10))) (: (O_Full ?11) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: (O_Full ?4) ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: (O_Sub ?8 ?9) ?10))) ?11))) (: (O_Full ?12) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: (O_Sub ?8 ?9) ([]))) ?10))) (: (O_Full ?11) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: (O_Full ?4) ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: O_Empty ?9))) ?10))) (: (O_Full ?11) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: (O_Full ?4) ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: (O_Full ?9) ?10))) ?11))) (: (O_Full ?12) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: (O_Full ?4) ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: (O_Sub ?9 ?10) ?11))) ?12))) (: (O_Full ?13) ?14))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 ([])) ?9))) (: (O_Full ?10) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: O_Empty ([]))) ?9))) (: (O_Full ?10) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: (O_Sub ?4 ?5) ?6))) (: (O_Sub ?7 (: O_Empty (: O_Empty ?8))) ?9))) (: (O_Full ?10) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: (O_Sub ?4 ?5) ?6))) (: (O_Sub ?7 (: O_Empty (: (O_Full ?8) ?9))) ?10))) (: (O_Full ?11) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: (O_Sub ?4 ?5) ?6))) (: (O_Sub ?7 (: O_Empty (: (O_Sub ?8 ?9) ?10))) ?11))) (: (O_Full ?12) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: (O_Full ?9) ([]))) ?10))) (: (O_Full ?11) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: (O_Sub ?4 ?5) ?6))) (: (O_Sub ?7 (: (O_Full ?8) (: O_Empty ?9))) ?10))) (: (O_Full ?11) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: (O_Sub ?4 ?5) ?6))) (: (O_Sub ?7 (: (O_Full ?8) (: (O_Full ?9) ?10))) ?11))) (: (O_Full ?12) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: (O_Sub ?4 ?5) ?6))) (: (O_Sub ?7 (: (O_Full ?8) (: (O_Sub ?9 ?10) ?11))) ?12))) (: (O_Full ?13) ?14))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: (O_Sub ?9 ?10) ([]))) ?11))) (: (O_Full ?12) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: (O_Sub ?4 ?5) ?6))) (: (O_Sub ?7 (: (O_Sub ?8 ?9) (: O_Empty ?10))) ?11))) (: (O_Full ?12) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: (O_Sub ?4 ?5) ?6))) (: (O_Sub ?7 (: (O_Sub ?8 ?9) (: (O_Full ?10) ?11))) ?12))) (: (O_Full ?13) ?14))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: (O_Sub ?4 ?5) ?6))) (: (O_Sub ?7 (: (O_Sub ?8 ?9) (: (O_Sub ?10 ?11) ?12))) ?13))) (: (O_Full ?14) ?15))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: (O_Full ?6) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Sub ?4 ?5) ?6))) (: (O_Full ?7) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: (O_Sub ?5 ?6) ?7))) (: (O_Full ?8) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: O_Empty ([]))))) (: (O_Sub ?5 ?6) ?7))) (: (O_Full ?8) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: O_Empty (: O_Empty ?5))))) (: (O_Sub ?6 ([])) ?7))) (: (O_Full ?8) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: O_Empty (: O_Empty ?5))))) (: (O_Sub ?6 (: ?7 ([]))) ?8))) (: (O_Full ?9) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: O_Empty (: O_Empty ?5))))) (: (O_Sub ?6 (: ?7 (: ?8 ([])))) ?9))) (: (O_Full ?10) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:44:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: O_Empty (: (O_Sub ?5 ?6) ?7))))) (: (O_Sub ?8 ([])) ?9))) (: (O_Full ?10) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: O_Empty (: (O_Sub ?5 ?6) ?7))))) (: (O_Sub ?8 (: ?9 ([]))) ?10))) (: (O_Full ?11) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: O_Empty (: (O_Sub ?5 ?6) ?7))))) (: (O_Sub ?8 (: ?9 (: ?10 ([])))) ?11))) (: (O_Full ?12) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:44:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: (O_Sub ?5 ?6) ([]))))) (: (O_Sub ?7 ?8) ?9))) (: (O_Full ?10) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: (O_Sub ?5 ?6) (: O_Empty ?7))))) (: (O_Sub ?8 ([])) ?9))) (: (O_Full ?10) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: (O_Sub ?5 ?6) (: O_Empty ?7))))) (: (O_Sub ?8 (: ?9 ([]))) ?10))) (: (O_Full ?11) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: (O_Sub ?5 ?6) (: O_Empty ?7))))) (: (O_Sub ?8 (: ?9 (: ?10 ([])))) ?11))) (: (O_Full ?12) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:44:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: (O_Sub ?5 ?6) (: (O_Full ?7) ?8))))) (: (O_Sub ?9 ([])) ?10))) (: (O_Full ?11) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: (O_Sub ?5 ?6) (: (O_Full ?7) ?8))))) (: (O_Sub ?9 (: ?10 ([]))) ?11))) (: (O_Full ?12) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: (O_Sub ?5 ?6) (: (O_Full ?7) ?8))))) (: (O_Sub ?9 (: ?10 (: ?11 ([])))) ?12))) (: (O_Full ?13) ?14))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:44:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: (O_Sub ?5 ?6) (: (O_Sub ?7 ?8) ?9))))) (: (O_Sub ?10 ([])) ?11))) (: (O_Full ?12) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: (O_Sub ?5 ?6) (: (O_Sub ?7 ?8) ?9))))) (: (O_Sub ?10 (: ?11 ([]))) ?12))) (: (O_Full ?13) ?14))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: (O_Sub ?5 ?6) (: (O_Sub ?7 ?8) ?9))))) (: (O_Sub ?10 (: ?11 (: ?12 ([])))) ?13))) (: (O_Full ?14) ?15))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:44:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: (O_Full ?6) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Sub ?4 ?5) ?6))) (: (O_Full ?7) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: (O_Sub ?5 ?6) ?7))) (: (O_Full ?8) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: ?5 ([]))))) (: (O_Sub ?6 ?7) ?8))) (: (O_Full ?9) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: (O_Full ?6) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Sub ?4 ?5) ?6))) (: (O_Full ?7) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: (O_Sub ?5 ?6) ?7))) (: (O_Full ?8) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 ([])) (: (O_Full ?2) ?3))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 ([]))) (: (O_Full ?3) ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 ([])))) (: (O_Full ?4) ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: O_Empty ([]))))) (: (O_Full ?4) ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: O_Empty (: (O_Sub ?4 ([])) ?5))))) (: (O_Full ?6) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: O_Empty (: (O_Sub ?4 (: O_Empty ([]))) ?5))))) (: (O_Full ?6) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: O_Empty (: (O_Sub ?4 (: (O_Sub ?5 ?6) ([]))) ?7))))) (: (O_Full ?8) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: O_Empty (: (O_Sub ?4 ([])) ?5))))) (: (O_Full ?6) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ?5) ([]))))) (: (O_Full ?6) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ([])) (: O_Empty ?5))))) (: (O_Full ?6) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 (: O_Empty ([]))) (: O_Empty ?5))))) (: (O_Full ?6) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 (: (O_Sub ?5 ?6) ([]))) (: O_Empty ?7))))) (: (O_Full ?8) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ([])) (: O_Empty ?5))))) (: (O_Full ?6) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 (: ?5 ([]))) (: O_Empty ?6))))) (: (O_Full ?7) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ([])) (: O_Empty ?5))))) (: (O_Full ?6) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ([])) (: (O_Full ?5) ?6))))) (: (O_Full ?7) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 (: O_Empty ([]))) (: (O_Full ?5) ?6))))) (: (O_Full ?7) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 (: (O_Sub ?5 ?6) ([]))) (: (O_Full ?7) ?8))))) (: (O_Full ?9) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ([])) (: (O_Full ?5) ?6))))) (: (O_Full ?7) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 (: ?5 ([]))) (: (O_Full ?6) ?7))))) (: (O_Full ?8) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ([])) (: (O_Full ?5) ?6))))) (: (O_Full ?7) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ([])) (: (O_Sub ?5 ?6) ?7))))) (: (O_Full ?8) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 (: O_Empty ([]))) (: (O_Sub ?5 ?6) ?7))))) (: (O_Full ?8) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 (: O_Empty (: O_Empty ?5))) (: (O_Sub ?6 ([])) ?7))))) (: (O_Full ?8) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 (: O_Empty (: O_Empty ?5))) (: (O_Sub ?6 (: O_Empty ([]))) ?7))))) (: (O_Full ?8) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 (: O_Empty (: O_Empty ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) ([]))) ?9))))) (: (O_Full ?10) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 (: O_Empty (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 ([])) ?9))))) (: (O_Full ?10) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 (: O_Empty (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: O_Empty ([]))) ?9))))) (: (O_Full ?10) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 (: O_Empty (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: (O_Full ?9) ([]))) ?10))))) (: (O_Full ?11) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 (: O_Empty (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: (O_Sub ?9 ?10) ([]))) ?11))))) (: (O_Full ?12) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 (: (O_Sub ?5 ?6) ([]))) (: (O_Sub ?7 ?8) ?9))))) (: (O_Full ?10) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: O_Empty ?7))) (: (O_Sub ?8 ([])) ?9))))) (: (O_Full ?10) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: O_Empty ?7))) (: (O_Sub ?8 (: O_Empty ([]))) ?9))))) (: (O_Full ?10) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: O_Empty ?7))) (: (O_Sub ?8 (: (O_Full ?9) ([]))) ?10))))) (: (O_Full ?11) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: O_Empty ?7))) (: (O_Sub ?8 (: (O_Sub ?9 ?10) ([]))) ?11))))) (: (O_Full ?12) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: (O_Full ?7) ?8))) (: (O_Sub ?9 ([])) ?10))))) (: (O_Full ?11) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: (O_Full ?7) ?8))) (: (O_Sub ?9 (: O_Empty ([]))) ?10))))) (: (O_Full ?11) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: (O_Full ?7) ?8))) (: (O_Sub ?9 (: (O_Full ?10) ([]))) ?11))))) (: (O_Full ?12) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: (O_Full ?7) ?8))) (: (O_Sub ?9 (: (O_Sub ?10 ?11) ([]))) ?12))))) (: (O_Full ?13) ?14))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: (O_Sub ?7 ?8) ?9))) (: (O_Sub ?10 ([])) ?11))))) (: (O_Full ?12) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: (O_Sub ?7 ?8) ?9))) (: (O_Sub ?10 (: O_Empty ([]))) ?11))))) (: (O_Full ?12) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: (O_Sub ?7 ?8) ?9))) (: (O_Sub ?10 (: (O_Full ?11) ([]))) ?12))))) (: (O_Full ?13) ?14))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: (O_Sub ?7 ?8) ?9))) (: (O_Sub ?10 (: (O_Sub ?11 ?12) ([]))) ?13))))) (: (O_Full ?14) ?15))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ([])) (: (O_Sub ?5 ?6) ?7))))) (: (O_Full ?8) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 (: ?5 ([]))) (: (O_Sub ?6 ?7) ?8))))) (: (O_Full ?9) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ([])) (: (O_Sub ?5 ?6) ?7))))) (: (O_Full ?8) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 ([])) (: (O_Full ?2) ?3))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 ([]))) (: (O_Full ?3) ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 ([])))) (: (O_Full ?4) ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 ([]))))) (: (O_Full ?5) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 (: ?5 ([])))))) (: (O_Full ?6) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:35:21-34: Irrefutable pattern failed for pattern (l4 : ll5) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 (: ?5 (: O_Empty ([]))))))) (: (O_Full ?6) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:35:38-51: Irrefutable pattern failed for pattern (l5 : ll6) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 (: ?5 (: (O_Sub ?6 ?7) ([]))))))) (: (O_Full ?8) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:35:38-51: Irrefutable pattern failed for pattern (l5 : ll6) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 ([])) (: (O_Full ?2) ?3))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 ([]))) (: (O_Full ?3) ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 ([])))) (: (O_Full ?4) ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 ([]))))) (: (O_Full ?5) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 (: ?5 ([])))))) (: (O_Full ?6) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:35:21-34: Irrefutable pattern failed for pattern (l4 : ll5) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 (: ?5 (: ?6 ([]))))))) (: (O_Full ?7) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:35:38-51: Irrefutable pattern failed for pattern (l5 : ll6) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 (: ?5 (: ?6 (: ?7 ([])))))))) (: (O_Full ?8) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:36:21-34: Irrefutable pattern failed for pattern (l6 : ll7) case case case case quadoct (O_Sub ? (: (O_Sub ?1 ([])) (: (O_Sub ?2 ?3) ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty ([]))) (: (O_Sub ?2 ?3) ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 ([])) ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: O_Empty ([]))) ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: O_Empty (: (O_Sub ?4 ([])) ?5))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: O_Empty (: (O_Sub ?4 (: O_Empty ([]))) ?5))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: O_Empty (: (O_Sub ?4 (: (O_Sub ?5 ?6) ([]))) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: O_Empty (: (O_Sub ?4 ([])) ?5))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: O_Empty (: (O_Sub ?4 (: ?5 ([]))) ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: O_Empty (: (O_Sub ?4 (: ?5 (: ?6 ([])))) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: O_Empty (: (O_Sub ?4 ([])) ?5))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: O_Empty (: (O_Sub ?4 (: ?5 ([]))) ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: O_Empty (: (O_Sub ?4 ([])) ?5))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: (O_Sub ?4 ?5) ([]))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: O_Empty ?5))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: (O_Sub ?4 (: O_Empty ([]))) (: O_Empty ?5))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: (O_Sub ?4 (: (O_Sub ?5 ?6) ([]))) (: O_Empty ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: (O_Sub ?4 (: (O_Sub ?5 ([])) (: O_Empty ?6))) (: O_Empty ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: (O_Sub ?4 (: (O_Sub ?5 ([])) (: (O_Full ?6) ?7))) (: O_Empty ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: (O_Sub ?4 (: (O_Sub ?5 ([])) (: (O_Sub ?6 ?7) ?8))) (: O_Empty ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: O_Empty ?5))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: (O_Sub ?4 (: ?5 ([]))) (: O_Empty ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: (O_Sub ?4 (: ?5 (: ?6 ([])))) (: O_Empty ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: (O_Sub ?4 (: ?5 (: ?6 (: O_Empty ([]))))) (: O_Empty ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: (O_Sub ?4 (: ?5 (: ?6 (: (O_Sub ?7 ?8) ([]))))) (: O_Empty ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: O_Empty ?5))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: (O_Sub ?4 (: ?5 ([]))) (: O_Empty ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: (O_Sub ?4 (: ?5 (: ?6 ([])))) (: O_Empty ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: O_Empty ?5))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: (O_Sub ?4 (: ?5 ([]))) (: O_Empty ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: (O_Full ?5) ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: (O_Sub ?4 (: O_Empty ([]))) (: (O_Full ?5) ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: (O_Sub ?4 (: (O_Sub ?5 ?6) ([]))) (: (O_Full ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: (O_Sub ?4 (: (O_Sub ?5 ([])) (: O_Empty ?6))) (: (O_Full ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: (O_Sub ?4 (: (O_Sub ?5 ([])) (: (O_Full ?6) ?7))) (: (O_Full ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: (O_Sub ?4 (: (O_Sub ?5 ([])) (: (O_Sub ?6 ?7) ?8))) (: (O_Full ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: (O_Full ?5) ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: (O_Sub ?4 (: ?5 ([]))) (: (O_Full ?6) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: (O_Sub ?4 (: ?5 (: ?6 ([])))) (: (O_Full ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: (O_Sub ?4 (: ?5 (: ?6 (: O_Empty ([]))))) (: (O_Full ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: (O_Sub ?4 (: ?5 (: ?6 (: (O_Sub ?7 ?8) ([]))))) (: (O_Full ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: (O_Full ?5) ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: (O_Sub ?4 (: ?5 ([]))) (: (O_Full ?6) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: (O_Sub ?4 (: ?5 (: ?6 ([])))) (: (O_Full ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: (O_Full ?5) ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: (O_Sub ?4 (: ?5 ([]))) (: (O_Full ?6) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: (O_Sub ?5 ?6) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: (O_Sub ?4 (: O_Empty ([]))) (: (O_Sub ?5 ?6) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: (O_Sub ?4 (: O_Empty (: O_Empty ?5))) (: (O_Sub ?6 ([])) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: (O_Sub ?4 (: O_Empty (: O_Empty ?5))) (: (O_Sub ?6 (: O_Empty ([]))) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: (O_Sub ?4 (: O_Empty (: O_Empty ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) ([]))) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: (O_Sub ?4 (: O_Empty (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 ([])) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: (O_Sub ?4 (: O_Empty (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: O_Empty ([]))) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: (O_Sub ?4 (: O_Empty (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: (O_Full ?9) ([]))) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: (O_Sub ?4 (: O_Empty (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: (O_Sub ?9 ?10) ([]))) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: (O_Sub ?4 (: (O_Sub ?5 ?6) ([]))) (: (O_Sub ?7 ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: O_Empty ?7))) (: (O_Sub ?8 ([])) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: O_Empty ?7))) (: (O_Sub ?8 (: O_Empty ([]))) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: O_Empty ?7))) (: (O_Sub ?8 (: (O_Full ?9) ([]))) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: O_Empty ?7))) (: (O_Sub ?8 (: (O_Sub ?9 ?10) ([]))) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: (O_Full ?7) ?8))) (: (O_Sub ?9 ([])) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: (O_Full ?7) ?8))) (: (O_Sub ?9 (: O_Empty ([]))) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: (O_Full ?7) ?8))) (: (O_Sub ?9 (: (O_Full ?10) ([]))) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: (O_Full ?7) ?8))) (: (O_Sub ?9 (: (O_Sub ?10 ?11) ([]))) ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: (O_Sub ?7 ?8) ?9))) (: (O_Sub ?10 ([])) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: (O_Sub ?7 ?8) ?9))) (: (O_Sub ?10 (: O_Empty ([]))) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: (O_Sub ?7 ?8) ?9))) (: (O_Sub ?10 (: (O_Full ?11) ([]))) ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: (O_Sub ?7 ?8) ?9))) (: (O_Sub ?10 (: (O_Sub ?11 ?12) ([]))) ?13))) ?14))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: (O_Sub ?5 ?6) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: (O_Sub ?4 (: ?5 ([]))) (: (O_Sub ?6 ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: (O_Sub ?4 (: ?5 (: ?6 ([])))) (: (O_Sub ?7 ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: (O_Sub ?4 (: ?5 (: ?6 (: O_Empty ([]))))) (: (O_Sub ?7 ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: (O_Sub ?4 (: ?5 (: ?6 (: (O_Sub ?7 ?8) ([]))))) (: (O_Sub ?9 ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: (O_Sub ?5 ?6) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: (O_Sub ?4 (: ?5 ([]))) (: (O_Sub ?6 ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: (O_Sub ?4 (: ?5 (: ?6 ([])))) (: (O_Sub ?7 ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: (O_Sub ?5 ?6) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: O_Empty ?2))) (: (O_Sub ?3 (: (O_Sub ?4 (: ?5 ([]))) (: (O_Sub ?6 ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ?3) ?4))) (: (O_Sub ?5 ([])) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ?3) ?4))) (: (O_Sub ?5 (: O_Empty ([]))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: (O_Sub ?4 (: O_Empty (: O_Empty ?5))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: O_Empty ([]))) ?3))) (: (O_Sub ?4 (: O_Empty (: O_Empty ?5))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) ?5))) (: (O_Sub ?6 (: O_Empty (: O_Empty ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: O_Empty ?4))) ?5))) (: (O_Sub ?6 (: O_Empty (: O_Empty ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: (O_Full ?4) ?5))) ?6))) (: (O_Sub ?7 (: O_Empty (: O_Empty ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: (O_Sub ?4 ?5) ?6))) ?7))) (: (O_Sub ?8 (: O_Empty (: O_Empty ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: (O_Sub ?4 (: O_Empty (: O_Empty ?5))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: ?3 ([]))) ?4))) (: (O_Sub ?5 (: O_Empty (: O_Empty ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: ?3 (: ?4 ([])))) ?5))) (: (O_Sub ?6 (: O_Empty (: O_Empty ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: ?3 (: ?4 (: O_Empty ([]))))) ?5))) (: (O_Sub ?6 (: O_Empty (: O_Empty ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: ?3 (: ?4 (: (O_Sub ?5 ?6) ([]))))) ?7))) (: (O_Sub ?8 (: O_Empty (: O_Empty ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: (O_Sub ?4 (: O_Empty (: O_Empty ?5))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: ?3 ([]))) ?4))) (: (O_Sub ?5 (: O_Empty (: O_Empty ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: ?3 (: ?4 ([])))) ?5))) (: (O_Sub ?6 (: O_Empty (: O_Empty ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: (O_Sub ?4 (: O_Empty (: O_Empty ?5))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: ?3 ([]))) ?4))) (: (O_Sub ?5 (: O_Empty (: O_Empty ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: (O_Sub ?4 (: O_Empty (: (O_Full ?5) ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: O_Empty ([]))) ?3))) (: (O_Sub ?4 (: O_Empty (: (O_Full ?5) ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) ?5))) (: (O_Sub ?6 (: O_Empty (: (O_Full ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: O_Empty ?4))) ?5))) (: (O_Sub ?6 (: O_Empty (: (O_Full ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: (O_Full ?4) ?5))) ?6))) (: (O_Sub ?7 (: O_Empty (: (O_Full ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: (O_Sub ?4 ?5) ?6))) ?7))) (: (O_Sub ?8 (: O_Empty (: (O_Full ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: (O_Sub ?4 (: O_Empty (: (O_Full ?5) ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: ?3 ([]))) ?4))) (: (O_Sub ?5 (: O_Empty (: (O_Full ?6) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: ?3 (: ?4 ([])))) ?5))) (: (O_Sub ?6 (: O_Empty (: (O_Full ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: ?3 (: ?4 (: O_Empty ([]))))) ?5))) (: (O_Sub ?6 (: O_Empty (: (O_Full ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: ?3 (: ?4 (: (O_Sub ?5 ?6) ([]))))) ?7))) (: (O_Sub ?8 (: O_Empty (: (O_Full ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: (O_Sub ?4 (: O_Empty (: (O_Full ?5) ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: ?3 ([]))) ?4))) (: (O_Sub ?5 (: O_Empty (: (O_Full ?6) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: ?3 (: ?4 ([])))) ?5))) (: (O_Sub ?6 (: O_Empty (: (O_Full ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: (O_Sub ?4 (: O_Empty (: (O_Full ?5) ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: ?3 ([]))) ?4))) (: (O_Sub ?5 (: O_Empty (: (O_Full ?6) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: (O_Sub ?4 (: O_Empty (: (O_Sub ?5 ?6) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: O_Empty ([]))) ?3))) (: (O_Sub ?4 (: O_Empty (: (O_Sub ?5 ?6) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: O_Empty (: O_Empty ?3))) ?4))) (: (O_Sub ?5 (: O_Empty (: (O_Sub ?6 ([])) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: O_Empty (: O_Empty ?3))) ?4))) (: (O_Sub ?5 (: O_Empty (: (O_Sub ?6 (: O_Empty ([]))) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: O_Empty (: O_Empty ?3))) ?4))) (: (O_Sub ?5 (: O_Empty (: (O_Sub ?6 (: (O_Sub ?7 ?8) ([]))) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) ?6))) (: (O_Sub ?7 (: O_Empty (: (O_Sub ?8 ([])) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) ?6))) (: (O_Sub ?7 (: O_Empty (: (O_Sub ?8 (: O_Empty ([]))) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) ?6))) (: (O_Sub ?7 (: O_Empty (: (O_Sub ?8 (: (O_Full ?9) ([]))) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) ?6))) (: (O_Sub ?7 (: O_Empty (: (O_Sub ?8 (: (O_Sub ?9 ?10) ([]))) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) ?5))) (: (O_Sub ?6 (: O_Empty (: (O_Sub ?7 ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) ?6))) (: (O_Sub ?7 (: O_Empty (: (O_Sub ?8 ([])) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) ?6))) (: (O_Sub ?7 (: O_Empty (: (O_Sub ?8 (: O_Empty ([]))) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) ?6))) (: (O_Sub ?7 (: O_Empty (: (O_Sub ?8 (: (O_Full ?9) ([]))) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) ?6))) (: (O_Sub ?7 (: O_Empty (: (O_Sub ?8 (: (O_Sub ?9 ?10) ([]))) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) ?7))) (: (O_Sub ?8 (: O_Empty (: (O_Sub ?9 ([])) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) ?7))) (: (O_Sub ?8 (: O_Empty (: (O_Sub ?9 (: O_Empty ([]))) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) ?7))) (: (O_Sub ?8 (: O_Empty (: (O_Sub ?9 (: (O_Full ?10) ([]))) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) ?7))) (: (O_Sub ?8 (: O_Empty (: (O_Sub ?9 (: (O_Sub ?10 ?11) ([]))) ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) ?8))) (: (O_Sub ?9 (: O_Empty (: (O_Sub ?10 ([])) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) ?8))) (: (O_Sub ?9 (: O_Empty (: (O_Sub ?10 (: O_Empty ([]))) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) ?8))) (: (O_Sub ?9 (: O_Empty (: (O_Sub ?10 (: (O_Full ?11) ([]))) ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) ?8))) (: (O_Sub ?9 (: O_Empty (: (O_Sub ?10 (: (O_Sub ?11 ?12) ([]))) ?13))) ?14))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: (O_Sub ?4 (: O_Empty (: (O_Sub ?5 ?6) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: ?3 ([]))) ?4))) (: (O_Sub ?5 (: O_Empty (: (O_Sub ?6 ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: ?3 (: ?4 ([])))) ?5))) (: (O_Sub ?6 (: O_Empty (: (O_Sub ?7 ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: ?3 (: ?4 (: O_Empty ([]))))) ?5))) (: (O_Sub ?6 (: O_Empty (: (O_Sub ?7 ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: ?3 (: ?4 (: (O_Sub ?5 ?6) ([]))))) ?7))) (: (O_Sub ?8 (: O_Empty (: (O_Sub ?9 ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: (O_Sub ?4 (: O_Empty (: (O_Sub ?5 ?6) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: ?3 ([]))) ?4))) (: (O_Sub ?5 (: O_Empty (: (O_Sub ?6 ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: ?3 (: ?4 ([])))) ?5))) (: (O_Sub ?6 (: O_Empty (: (O_Sub ?7 ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: (O_Sub ?4 (: O_Empty (: (O_Sub ?5 ?6) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: ?3 ([]))) ?4))) (: (O_Sub ?5 (: O_Empty (: (O_Sub ?6 ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ?3) ?4))) (: (O_Sub ?5 (: (O_Full ?6) ([]))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: (O_Sub ?4 (: (O_Full ?5) (: O_Empty ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: O_Empty ([]))) ?3))) (: (O_Sub ?4 (: (O_Full ?5) (: O_Empty ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: O_Empty ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: O_Empty ?4))) ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: O_Empty ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: (O_Full ?4) ?5))) ?6))) (: (O_Sub ?7 (: (O_Full ?8) (: O_Empty ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: (O_Sub ?4 ?5) ?6))) ?7))) (: (O_Sub ?8 (: (O_Full ?9) (: O_Empty ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: (O_Sub ?4 (: (O_Full ?5) (: O_Empty ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: ?3 ([]))) ?4))) (: (O_Sub ?5 (: (O_Full ?6) (: O_Empty ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: ?3 (: ?4 ([])))) ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: O_Empty ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: ?3 (: ?4 (: O_Empty ([]))))) ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: O_Empty ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: ?3 (: ?4 (: (O_Sub ?5 ?6) ([]))))) ?7))) (: (O_Sub ?8 (: (O_Full ?9) (: O_Empty ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: (O_Sub ?4 (: (O_Full ?5) (: O_Empty ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: ?3 ([]))) ?4))) (: (O_Sub ?5 (: (O_Full ?6) (: O_Empty ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: ?3 (: ?4 ([])))) ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: O_Empty ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: (O_Sub ?4 (: (O_Full ?5) (: O_Empty ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: ?3 ([]))) ?4))) (: (O_Sub ?5 (: (O_Full ?6) (: O_Empty ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: (O_Sub ?4 (: (O_Full ?5) (: (O_Full ?6) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: O_Empty ([]))) ?3))) (: (O_Sub ?4 (: (O_Full ?5) (: (O_Full ?6) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: (O_Full ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: O_Empty ?4))) ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: (O_Full ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: (O_Full ?4) ?5))) ?6))) (: (O_Sub ?7 (: (O_Full ?8) (: (O_Full ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: (O_Sub ?4 ?5) ?6))) ?7))) (: (O_Sub ?8 (: (O_Full ?9) (: (O_Full ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: (O_Sub ?4 (: (O_Full ?5) (: (O_Full ?6) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: ?3 ([]))) ?4))) (: (O_Sub ?5 (: (O_Full ?6) (: (O_Full ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: ?3 (: ?4 ([])))) ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: (O_Full ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: ?3 (: ?4 (: O_Empty ([]))))) ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: (O_Full ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: ?3 (: ?4 (: (O_Sub ?5 ?6) ([]))))) ?7))) (: (O_Sub ?8 (: (O_Full ?9) (: (O_Full ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: (O_Sub ?4 (: (O_Full ?5) (: (O_Full ?6) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: ?3 ([]))) ?4))) (: (O_Sub ?5 (: (O_Full ?6) (: (O_Full ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: ?3 (: ?4 ([])))) ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: (O_Full ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: (O_Sub ?4 (: (O_Full ?5) (: (O_Full ?6) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: ?3 ([]))) ?4))) (: (O_Sub ?5 (: (O_Full ?6) (: (O_Full ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: (O_Sub ?4 (: (O_Full ?5) (: (O_Sub ?6 ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: O_Empty ([]))) ?3))) (: (O_Sub ?4 (: (O_Full ?5) (: (O_Sub ?6 ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) ?6))) (: (O_Sub ?7 (: (O_Full ?8) (: (O_Sub ?9 ([])) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) ?6))) (: (O_Sub ?7 (: (O_Full ?8) (: (O_Sub ?9 (: O_Empty ([]))) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) ?6))) (: (O_Sub ?7 (: (O_Full ?8) (: (O_Sub ?9 (: (O_Full ?10) ([]))) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) ?6))) (: (O_Sub ?7 (: (O_Full ?8) (: (O_Sub ?9 (: (O_Sub ?10 ?11) ([]))) ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: (O_Sub ?8 ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) ?6))) (: (O_Sub ?7 (: (O_Full ?8) (: (O_Sub ?9 ([])) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) ?6))) (: (O_Sub ?7 (: (O_Full ?8) (: (O_Sub ?9 (: O_Empty ([]))) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) ?6))) (: (O_Sub ?7 (: (O_Full ?8) (: (O_Sub ?9 (: (O_Full ?10) ([]))) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) ?6))) (: (O_Sub ?7 (: (O_Full ?8) (: (O_Sub ?9 (: (O_Sub ?10 ?11) ([]))) ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) ?7))) (: (O_Sub ?8 (: (O_Full ?9) (: (O_Sub ?10 ([])) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) ?7))) (: (O_Sub ?8 (: (O_Full ?9) (: (O_Sub ?10 (: O_Empty ([]))) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) ?7))) (: (O_Sub ?8 (: (O_Full ?9) (: (O_Sub ?10 (: (O_Full ?11) ([]))) ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) ?7))) (: (O_Sub ?8 (: (O_Full ?9) (: (O_Sub ?10 (: (O_Sub ?11 ?12) ([]))) ?13))) ?14))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) ?8))) (: (O_Sub ?9 (: (O_Full ?10) (: (O_Sub ?11 ([])) ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) ?8))) (: (O_Sub ?9 (: (O_Full ?10) (: (O_Sub ?11 (: O_Empty ([]))) ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) ?8))) (: (O_Sub ?9 (: (O_Full ?10) (: (O_Sub ?11 (: (O_Full ?12) ([]))) ?13))) ?14))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) ?8))) (: (O_Sub ?9 (: (O_Full ?10) (: (O_Sub ?11 (: (O_Sub ?12 ?13) ([]))) ?14))) ?15))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: (O_Sub ?4 (: (O_Full ?5) (: (O_Sub ?6 ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: ?3 ([]))) ?4))) (: (O_Sub ?5 (: (O_Full ?6) (: (O_Sub ?7 ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: ?3 (: ?4 ([])))) ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: (O_Sub ?8 ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: ?3 (: ?4 (: O_Empty ([]))))) ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: (O_Sub ?8 ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: ?3 (: ?4 (: (O_Sub ?5 ?6) ([]))))) ?7))) (: (O_Sub ?8 (: (O_Full ?9) (: (O_Sub ?10 ?11) ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: (O_Sub ?4 (: (O_Full ?5) (: (O_Sub ?6 ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: ?3 ([]))) ?4))) (: (O_Sub ?5 (: (O_Full ?6) (: (O_Sub ?7 ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: ?3 (: ?4 ([])))) ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: (O_Sub ?8 ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: (O_Sub ?4 (: (O_Full ?5) (: (O_Sub ?6 ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: ?3 ([]))) ?4))) (: (O_Sub ?5 (: (O_Full ?6) (: (O_Sub ?7 ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ?3) ?4))) (: (O_Sub ?5 (: (O_Sub ?6 ?7) ([]))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: O_Empty ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: O_Empty ([]))) ?3))) (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: O_Empty ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: O_Empty (: O_Empty ?3))) ?4))) (: (O_Sub ?5 (: (O_Sub ?6 ([])) (: O_Empty ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: O_Empty (: O_Empty ?3))) ?4))) (: (O_Sub ?5 (: (O_Sub ?6 (: O_Empty ([]))) (: O_Empty ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: O_Empty (: O_Empty ?3))) ?4))) (: (O_Sub ?5 (: (O_Sub ?6 (: (O_Sub ?7 ?8) ([]))) (: O_Empty ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) ?6))) (: (O_Sub ?7 (: (O_Sub ?8 ([])) (: O_Empty ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) ?6))) (: (O_Sub ?7 (: (O_Sub ?8 (: O_Empty ([]))) (: O_Empty ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) ?6))) (: (O_Sub ?7 (: (O_Sub ?8 (: (O_Full ?9) ([]))) (: O_Empty ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) ?6))) (: (O_Sub ?7 (: (O_Sub ?8 (: (O_Sub ?9 ?10) ([]))) (: O_Empty ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: O_Empty ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) ?6))) (: (O_Sub ?7 (: (O_Sub ?8 ([])) (: O_Empty ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) ?6))) (: (O_Sub ?7 (: (O_Sub ?8 (: O_Empty ([]))) (: O_Empty ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) ?6))) (: (O_Sub ?7 (: (O_Sub ?8 (: (O_Full ?9) ([]))) (: O_Empty ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) ?6))) (: (O_Sub ?7 (: (O_Sub ?8 (: (O_Sub ?9 ?10) ([]))) (: O_Empty ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) ?7))) (: (O_Sub ?8 (: (O_Sub ?9 ([])) (: O_Empty ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) ?7))) (: (O_Sub ?8 (: (O_Sub ?9 (: O_Empty ([]))) (: O_Empty ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) ?7))) (: (O_Sub ?8 (: (O_Sub ?9 (: (O_Full ?10) ([]))) (: O_Empty ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) ?7))) (: (O_Sub ?8 (: (O_Sub ?9 (: (O_Sub ?10 ?11) ([]))) (: O_Empty ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) ?8))) (: (O_Sub ?9 (: (O_Sub ?10 ([])) (: O_Empty ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) ?8))) (: (O_Sub ?9 (: (O_Sub ?10 (: O_Empty ([]))) (: O_Empty ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) ?8))) (: (O_Sub ?9 (: (O_Sub ?10 (: (O_Full ?11) ([]))) (: O_Empty ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) ?8))) (: (O_Sub ?9 (: (O_Sub ?10 (: (O_Sub ?11 ?12) ([]))) (: O_Empty ?13))) ?14))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: O_Empty ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: ?3 ([]))) ?4))) (: (O_Sub ?5 (: (O_Sub ?6 ?7) (: O_Empty ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: ?3 (: ?4 ([])))) ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: O_Empty ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: ?3 (: ?4 (: O_Empty ([]))))) ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: O_Empty ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: ?3 (: ?4 (: (O_Sub ?5 ?6) ([]))))) ?7))) (: (O_Sub ?8 (: (O_Sub ?9 ?10) (: O_Empty ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: O_Empty ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: ?3 ([]))) ?4))) (: (O_Sub ?5 (: (O_Sub ?6 ?7) (: O_Empty ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: ?3 (: ?4 ([])))) ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: O_Empty ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: O_Empty ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: ?3 ([]))) ?4))) (: (O_Sub ?5 (: (O_Sub ?6 ?7) (: O_Empty ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: (O_Full ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: O_Empty ([]))) ?3))) (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: (O_Full ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: O_Empty (: O_Empty ?3))) ?4))) (: (O_Sub ?5 (: (O_Sub ?6 ([])) (: (O_Full ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: O_Empty (: O_Empty ?3))) ?4))) (: (O_Sub ?5 (: (O_Sub ?6 (: O_Empty ([]))) (: (O_Full ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: O_Empty (: O_Empty ?3))) ?4))) (: (O_Sub ?5 (: (O_Sub ?6 (: (O_Sub ?7 ?8) ([]))) (: (O_Full ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) ?6))) (: (O_Sub ?7 (: (O_Sub ?8 ([])) (: (O_Full ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) ?6))) (: (O_Sub ?7 (: (O_Sub ?8 (: O_Empty ([]))) (: (O_Full ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) ?6))) (: (O_Sub ?7 (: (O_Sub ?8 (: (O_Full ?9) ([]))) (: (O_Full ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) ?6))) (: (O_Sub ?7 (: (O_Sub ?8 (: (O_Sub ?9 ?10) ([]))) (: (O_Full ?11) ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: (O_Full ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) ?6))) (: (O_Sub ?7 (: (O_Sub ?8 ([])) (: (O_Full ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) ?6))) (: (O_Sub ?7 (: (O_Sub ?8 (: O_Empty ([]))) (: (O_Full ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) ?6))) (: (O_Sub ?7 (: (O_Sub ?8 (: (O_Full ?9) ([]))) (: (O_Full ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) ?6))) (: (O_Sub ?7 (: (O_Sub ?8 (: (O_Sub ?9 ?10) ([]))) (: (O_Full ?11) ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) ?7))) (: (O_Sub ?8 (: (O_Sub ?9 ([])) (: (O_Full ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) ?7))) (: (O_Sub ?8 (: (O_Sub ?9 (: O_Empty ([]))) (: (O_Full ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) ?7))) (: (O_Sub ?8 (: (O_Sub ?9 (: (O_Full ?10) ([]))) (: (O_Full ?11) ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) ?7))) (: (O_Sub ?8 (: (O_Sub ?9 (: (O_Sub ?10 ?11) ([]))) (: (O_Full ?12) ?13))) ?14))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) ?8))) (: (O_Sub ?9 (: (O_Sub ?10 ([])) (: (O_Full ?11) ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) ?8))) (: (O_Sub ?9 (: (O_Sub ?10 (: O_Empty ([]))) (: (O_Full ?11) ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) ?8))) (: (O_Sub ?9 (: (O_Sub ?10 (: (O_Full ?11) ([]))) (: (O_Full ?12) ?13))) ?14))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) ?8))) (: (O_Sub ?9 (: (O_Sub ?10 (: (O_Sub ?11 ?12) ([]))) (: (O_Full ?13) ?14))) ?15))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: (O_Full ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: ?3 ([]))) ?4))) (: (O_Sub ?5 (: (O_Sub ?6 ?7) (: (O_Full ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: ?3 (: ?4 ([])))) ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: (O_Full ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: ?3 (: ?4 (: O_Empty ([]))))) ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: (O_Full ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: ?3 (: ?4 (: (O_Sub ?5 ?6) ([]))))) ?7))) (: (O_Sub ?8 (: (O_Sub ?9 ?10) (: (O_Full ?11) ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: (O_Full ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: ?3 ([]))) ?4))) (: (O_Sub ?5 (: (O_Sub ?6 ?7) (: (O_Full ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: ?3 (: ?4 ([])))) ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: (O_Full ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: (O_Full ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: ?3 ([]))) ?4))) (: (O_Sub ?5 (: (O_Sub ?6 ?7) (: (O_Full ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: (O_Sub ?7 ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: O_Empty ([]))) ?3))) (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: (O_Sub ?7 ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: O_Empty (: O_Empty ?3))) ?4))) (: (O_Sub ?5 (: (O_Sub ?6 ([])) (: (O_Sub ?7 ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: O_Empty (: O_Empty ?3))) ?4))) (: (O_Sub ?5 (: (O_Sub ?6 (: O_Empty ([]))) (: (O_Sub ?7 ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: O_Empty (: O_Empty ?3))) ?4))) (: (O_Sub ?5 (: (O_Sub ?6 (: (O_Sub ?7 ?8) ([]))) (: (O_Sub ?9 ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) ?6))) (: (O_Sub ?7 (: (O_Sub ?8 ([])) (: (O_Sub ?9 ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) ?6))) (: (O_Sub ?7 (: (O_Sub ?8 (: O_Empty ([]))) (: (O_Sub ?9 ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) ?6))) (: (O_Sub ?7 (: (O_Sub ?8 (: (O_Full ?9) ([]))) (: (O_Sub ?10 ?11) ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) ?6))) (: (O_Sub ?7 (: (O_Sub ?8 (: (O_Sub ?9 ?10) ([]))) (: (O_Sub ?11 ?12) ?13))) ?14))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: (O_Sub ?9 ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) ?6))) (: (O_Sub ?7 (: (O_Sub ?8 ([])) (: (O_Sub ?9 ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) ?6))) (: (O_Sub ?7 (: (O_Sub ?8 (: O_Empty ([]))) (: (O_Sub ?9 ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) ?6))) (: (O_Sub ?7 (: (O_Sub ?8 (: (O_Full ?9) ([]))) (: (O_Sub ?10 ?11) ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) ?6))) (: (O_Sub ?7 (: (O_Sub ?8 (: (O_Sub ?9 ?10) ([]))) (: (O_Sub ?11 ?12) ?13))) ?14))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) ?7))) (: (O_Sub ?8 (: (O_Sub ?9 ([])) (: (O_Sub ?10 ?11) ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) ?7))) (: (O_Sub ?8 (: (O_Sub ?9 (: O_Empty ([]))) (: (O_Sub ?10 ?11) ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) ?7))) (: (O_Sub ?8 (: (O_Sub ?9 (: (O_Full ?10) ([]))) (: (O_Sub ?11 ?12) ?13))) ?14))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) ?7))) (: (O_Sub ?8 (: (O_Sub ?9 (: (O_Sub ?10 ?11) ([]))) (: (O_Sub ?12 ?13) ?14))) ?15))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) ?8))) (: (O_Sub ?9 (: (O_Sub ?10 ([])) (: (O_Sub ?11 ?12) ?13))) ?14))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) ?8))) (: (O_Sub ?9 (: (O_Sub ?10 (: O_Empty ([]))) (: (O_Sub ?11 ?12) ?13))) ?14))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) ?8))) (: (O_Sub ?9 (: (O_Sub ?10 (: (O_Full ?11) ([]))) (: (O_Sub ?12 ?13) ?14))) ?15))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) ?8))) (: (O_Sub ?9 (: (O_Sub ?10 (: (O_Sub ?11 ?12) ([]))) (: (O_Sub ?13 ?14) ?15))) ?16))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: (O_Sub ?7 ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: ?3 ([]))) ?4))) (: (O_Sub ?5 (: (O_Sub ?6 ?7) (: (O_Sub ?8 ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: ?3 (: ?4 ([])))) ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: (O_Sub ?9 ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: ?3 (: ?4 (: O_Empty ([]))))) ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: (O_Sub ?9 ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: ?3 (: ?4 (: (O_Sub ?5 ?6) ([]))))) ?7))) (: (O_Sub ?8 (: (O_Sub ?9 ?10) (: (O_Sub ?11 ?12) ?13))) ?14))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: (O_Sub ?7 ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: ?3 ([]))) ?4))) (: (O_Sub ?5 (: (O_Sub ?6 ?7) (: (O_Sub ?8 ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: ?3 (: ?4 ([])))) ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: (O_Sub ?9 ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: (O_Sub ?7 ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: ?3 ([]))) ?4))) (: (O_Sub ?5 (: (O_Sub ?6 ?7) (: (O_Sub ?8 ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ?3) ([]))) (: (O_Sub ?4 ?5) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ?3) (: O_Empty ?4))) (: (O_Sub ?5 ([])) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ?3) (: O_Empty ?4))) (: (O_Sub ?5 (: O_Empty ([]))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: (O_Sub ?4 (: O_Empty (: O_Empty ?5))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty ([]))) (: O_Empty ?3))) (: (O_Sub ?4 (: O_Empty (: O_Empty ?5))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ([])) ?4))) (: O_Empty ?5))) (: (O_Sub ?6 (: O_Empty (: O_Empty ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) (: O_Empty ?5))) (: (O_Sub ?6 (: O_Empty (: O_Empty ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: O_Empty ?4))) (: O_Empty ?5))) (: (O_Sub ?6 (: O_Empty (: O_Empty ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: (O_Full ?4) ?5))) (: O_Empty ?6))) (: (O_Sub ?7 (: O_Empty (: O_Empty ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: (O_Sub ?4 ?5) ?6))) (: O_Empty ?7))) (: (O_Sub ?8 (: O_Empty (: O_Empty ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: (O_Sub ?4 (: O_Empty (: O_Empty ?5))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: O_Empty ?4))) (: (O_Sub ?5 (: O_Empty (: O_Empty ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: O_Empty ?5))) (: (O_Sub ?6 (: O_Empty (: O_Empty ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: O_Empty ([]))))) (: O_Empty ?5))) (: (O_Sub ?6 (: O_Empty (: O_Empty ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: (O_Sub ?5 ?6) ([]))))) (: O_Empty ?7))) (: (O_Sub ?8 (: O_Empty (: O_Empty ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: (O_Sub ?4 (: O_Empty (: O_Empty ?5))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: O_Empty ?4))) (: (O_Sub ?5 (: O_Empty (: O_Empty ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: O_Empty ?5))) (: (O_Sub ?6 (: O_Empty (: O_Empty ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: ?5 ([]))))) (: O_Empty ?6))) (: (O_Sub ?7 (: O_Empty (: O_Empty ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: (O_Sub ?4 (: O_Empty (: O_Empty ?5))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: O_Empty ?4))) (: (O_Sub ?5 (: O_Empty (: O_Empty ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: O_Empty ?5))) (: (O_Sub ?6 (: O_Empty (: O_Empty ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: (O_Sub ?4 (: O_Empty (: (O_Full ?5) ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty ([]))) (: O_Empty ?3))) (: (O_Sub ?4 (: O_Empty (: (O_Full ?5) ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ([])) ?4))) (: O_Empty ?5))) (: (O_Sub ?6 (: O_Empty (: (O_Full ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) (: O_Empty ?5))) (: (O_Sub ?6 (: O_Empty (: (O_Full ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: O_Empty ?4))) (: O_Empty ?5))) (: (O_Sub ?6 (: O_Empty (: (O_Full ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: (O_Full ?4) ?5))) (: O_Empty ?6))) (: (O_Sub ?7 (: O_Empty (: (O_Full ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: (O_Sub ?4 ?5) ?6))) (: O_Empty ?7))) (: (O_Sub ?8 (: O_Empty (: (O_Full ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: (O_Sub ?4 (: O_Empty (: (O_Full ?5) ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: O_Empty ?4))) (: (O_Sub ?5 (: O_Empty (: (O_Full ?6) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: O_Empty ?5))) (: (O_Sub ?6 (: O_Empty (: (O_Full ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: O_Empty ([]))))) (: O_Empty ?5))) (: (O_Sub ?6 (: O_Empty (: (O_Full ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: (O_Sub ?5 ?6) ([]))))) (: O_Empty ?7))) (: (O_Sub ?8 (: O_Empty (: (O_Full ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: (O_Sub ?4 (: O_Empty (: (O_Full ?5) ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: O_Empty ?4))) (: (O_Sub ?5 (: O_Empty (: (O_Full ?6) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: O_Empty ?5))) (: (O_Sub ?6 (: O_Empty (: (O_Full ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: ?5 ([]))))) (: O_Empty ?6))) (: (O_Sub ?7 (: O_Empty (: (O_Full ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: (O_Sub ?4 (: O_Empty (: (O_Full ?5) ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: O_Empty ?4))) (: (O_Sub ?5 (: O_Empty (: (O_Full ?6) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: O_Empty ?5))) (: (O_Sub ?6 (: O_Empty (: (O_Full ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: (O_Sub ?4 (: O_Empty (: (O_Sub ?5 ?6) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty ([]))) (: O_Empty ?3))) (: (O_Sub ?4 (: O_Empty (: (O_Sub ?5 ?6) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: O_Empty ?3))) (: O_Empty ?4))) (: (O_Sub ?5 (: O_Empty (: (O_Sub ?6 ([])) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: O_Empty ?3))) (: O_Empty ?4))) (: (O_Sub ?5 (: O_Empty (: (O_Sub ?6 (: O_Empty ([]))) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: O_Empty ?3))) (: O_Empty ?4))) (: (O_Sub ?5 (: O_Empty (: (O_Sub ?6 (: (O_Sub ?7 ?8) ([]))) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) (: O_Empty ?6))) (: (O_Sub ?7 (: O_Empty (: (O_Sub ?8 ([])) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) (: O_Empty ?6))) (: (O_Sub ?7 (: O_Empty (: (O_Sub ?8 (: O_Empty ([]))) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) (: O_Empty ?6))) (: (O_Sub ?7 (: O_Empty (: (O_Sub ?8 (: (O_Full ?9) ([]))) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) (: O_Empty ?6))) (: (O_Sub ?7 (: O_Empty (: (O_Sub ?8 (: (O_Sub ?9 ?10) ([]))) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) (: O_Empty ?5))) (: (O_Sub ?6 (: O_Empty (: (O_Sub ?7 ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) (: O_Empty ?6))) (: (O_Sub ?7 (: O_Empty (: (O_Sub ?8 ([])) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) (: O_Empty ?6))) (: (O_Sub ?7 (: O_Empty (: (O_Sub ?8 (: O_Empty ([]))) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) (: O_Empty ?6))) (: (O_Sub ?7 (: O_Empty (: (O_Sub ?8 (: (O_Full ?9) ([]))) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) (: O_Empty ?6))) (: (O_Sub ?7 (: O_Empty (: (O_Sub ?8 (: (O_Sub ?9 ?10) ([]))) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) (: O_Empty ?7))) (: (O_Sub ?8 (: O_Empty (: (O_Sub ?9 ([])) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) (: O_Empty ?7))) (: (O_Sub ?8 (: O_Empty (: (O_Sub ?9 (: O_Empty ([]))) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) (: O_Empty ?7))) (: (O_Sub ?8 (: O_Empty (: (O_Sub ?9 (: (O_Full ?10) ([]))) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) (: O_Empty ?7))) (: (O_Sub ?8 (: O_Empty (: (O_Sub ?9 (: (O_Sub ?10 ?11) ([]))) ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) (: O_Empty ?8))) (: (O_Sub ?9 (: O_Empty (: (O_Sub ?10 ([])) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) (: O_Empty ?8))) (: (O_Sub ?9 (: O_Empty (: (O_Sub ?10 (: O_Empty ([]))) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) (: O_Empty ?8))) (: (O_Sub ?9 (: O_Empty (: (O_Sub ?10 (: (O_Full ?11) ([]))) ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) (: O_Empty ?8))) (: (O_Sub ?9 (: O_Empty (: (O_Sub ?10 (: (O_Sub ?11 ?12) ([]))) ?13))) ?14))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: (O_Sub ?4 (: O_Empty (: (O_Sub ?5 ?6) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: O_Empty ?4))) (: (O_Sub ?5 (: O_Empty (: (O_Sub ?6 ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: O_Empty ?5))) (: (O_Sub ?6 (: O_Empty (: (O_Sub ?7 ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: O_Empty ([]))))) (: O_Empty ?5))) (: (O_Sub ?6 (: O_Empty (: (O_Sub ?7 ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: (O_Sub ?5 ?6) ([]))))) (: O_Empty ?7))) (: (O_Sub ?8 (: O_Empty (: (O_Sub ?9 ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: (O_Sub ?4 (: O_Empty (: (O_Sub ?5 ?6) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: O_Empty ?4))) (: (O_Sub ?5 (: O_Empty (: (O_Sub ?6 ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: O_Empty ?5))) (: (O_Sub ?6 (: O_Empty (: (O_Sub ?7 ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: ?5 ([]))))) (: O_Empty ?6))) (: (O_Sub ?7 (: O_Empty (: (O_Sub ?8 ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: (O_Sub ?4 (: O_Empty (: (O_Sub ?5 ?6) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: O_Empty ?4))) (: (O_Sub ?5 (: O_Empty (: (O_Sub ?6 ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: O_Empty ?5))) (: (O_Sub ?6 (: O_Empty (: (O_Sub ?7 ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ?3) (: O_Empty ?4))) (: (O_Sub ?5 (: (O_Full ?6) ([]))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: (O_Sub ?4 (: (O_Full ?5) (: O_Empty ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty ([]))) (: O_Empty ?3))) (: (O_Sub ?4 (: (O_Full ?5) (: O_Empty ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ([])) ?4))) (: O_Empty ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: O_Empty ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) (: O_Empty ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: O_Empty ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: O_Empty ?4))) (: O_Empty ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: O_Empty ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: (O_Full ?4) ?5))) (: O_Empty ?6))) (: (O_Sub ?7 (: (O_Full ?8) (: O_Empty ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: (O_Sub ?4 ?5) ?6))) (: O_Empty ?7))) (: (O_Sub ?8 (: (O_Full ?9) (: O_Empty ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: (O_Sub ?4 (: (O_Full ?5) (: O_Empty ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: O_Empty ?4))) (: (O_Sub ?5 (: (O_Full ?6) (: O_Empty ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: O_Empty ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: O_Empty ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: O_Empty ([]))))) (: O_Empty ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: O_Empty ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: (O_Sub ?5 ?6) ([]))))) (: O_Empty ?7))) (: (O_Sub ?8 (: (O_Full ?9) (: O_Empty ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: (O_Sub ?4 (: (O_Full ?5) (: O_Empty ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: O_Empty ?4))) (: (O_Sub ?5 (: (O_Full ?6) (: O_Empty ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: O_Empty ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: O_Empty ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: ?5 ([]))))) (: O_Empty ?6))) (: (O_Sub ?7 (: (O_Full ?8) (: O_Empty ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: (O_Sub ?4 (: (O_Full ?5) (: O_Empty ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: O_Empty ?4))) (: (O_Sub ?5 (: (O_Full ?6) (: O_Empty ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: O_Empty ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: O_Empty ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: (O_Sub ?4 (: (O_Full ?5) (: (O_Full ?6) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty ([]))) (: O_Empty ?3))) (: (O_Sub ?4 (: (O_Full ?5) (: (O_Full ?6) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ([])) ?4))) (: O_Empty ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: (O_Full ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) (: O_Empty ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: (O_Full ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: O_Empty ?4))) (: O_Empty ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: (O_Full ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: (O_Full ?4) ?5))) (: O_Empty ?6))) (: (O_Sub ?7 (: (O_Full ?8) (: (O_Full ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: (O_Sub ?4 ?5) ?6))) (: O_Empty ?7))) (: (O_Sub ?8 (: (O_Full ?9) (: (O_Full ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: (O_Sub ?4 (: (O_Full ?5) (: (O_Full ?6) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: O_Empty ?4))) (: (O_Sub ?5 (: (O_Full ?6) (: (O_Full ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: O_Empty ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: (O_Full ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: O_Empty ([]))))) (: O_Empty ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: (O_Full ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: (O_Sub ?5 ?6) ([]))))) (: O_Empty ?7))) (: (O_Sub ?8 (: (O_Full ?9) (: (O_Full ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: (O_Sub ?4 (: (O_Full ?5) (: (O_Full ?6) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: O_Empty ?4))) (: (O_Sub ?5 (: (O_Full ?6) (: (O_Full ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: O_Empty ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: (O_Full ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: ?5 ([]))))) (: O_Empty ?6))) (: (O_Sub ?7 (: (O_Full ?8) (: (O_Full ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: (O_Sub ?4 (: (O_Full ?5) (: (O_Full ?6) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: O_Empty ?4))) (: (O_Sub ?5 (: (O_Full ?6) (: (O_Full ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: O_Empty ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: (O_Full ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: (O_Sub ?4 (: (O_Full ?5) (: (O_Sub ?6 ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty ([]))) (: O_Empty ?3))) (: (O_Sub ?4 (: (O_Full ?5) (: (O_Sub ?6 ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) (: O_Empty ?6))) (: (O_Sub ?7 (: (O_Full ?8) (: (O_Sub ?9 ([])) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) (: O_Empty ?6))) (: (O_Sub ?7 (: (O_Full ?8) (: (O_Sub ?9 (: O_Empty ([]))) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) (: O_Empty ?6))) (: (O_Sub ?7 (: (O_Full ?8) (: (O_Sub ?9 (: (O_Full ?10) ([]))) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) (: O_Empty ?6))) (: (O_Sub ?7 (: (O_Full ?8) (: (O_Sub ?9 (: (O_Sub ?10 ?11) ([]))) ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) (: O_Empty ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: (O_Sub ?8 ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) (: O_Empty ?6))) (: (O_Sub ?7 (: (O_Full ?8) (: (O_Sub ?9 ([])) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) (: O_Empty ?6))) (: (O_Sub ?7 (: (O_Full ?8) (: (O_Sub ?9 (: O_Empty ([]))) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) (: O_Empty ?6))) (: (O_Sub ?7 (: (O_Full ?8) (: (O_Sub ?9 (: (O_Full ?10) ([]))) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) (: O_Empty ?6))) (: (O_Sub ?7 (: (O_Full ?8) (: (O_Sub ?9 (: (O_Sub ?10 ?11) ([]))) ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) (: O_Empty ?7))) (: (O_Sub ?8 (: (O_Full ?9) (: (O_Sub ?10 ([])) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) (: O_Empty ?7))) (: (O_Sub ?8 (: (O_Full ?9) (: (O_Sub ?10 (: O_Empty ([]))) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) (: O_Empty ?7))) (: (O_Sub ?8 (: (O_Full ?9) (: (O_Sub ?10 (: (O_Full ?11) ([]))) ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) (: O_Empty ?7))) (: (O_Sub ?8 (: (O_Full ?9) (: (O_Sub ?10 (: (O_Sub ?11 ?12) ([]))) ?13))) ?14))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) (: O_Empty ?8))) (: (O_Sub ?9 (: (O_Full ?10) (: (O_Sub ?11 ([])) ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) (: O_Empty ?8))) (: (O_Sub ?9 (: (O_Full ?10) (: (O_Sub ?11 (: O_Empty ([]))) ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) (: O_Empty ?8))) (: (O_Sub ?9 (: (O_Full ?10) (: (O_Sub ?11 (: (O_Full ?12) ([]))) ?13))) ?14))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) (: O_Empty ?8))) (: (O_Sub ?9 (: (O_Full ?10) (: (O_Sub ?11 (: (O_Sub ?12 ?13) ([]))) ?14))) ?15))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: (O_Sub ?4 (: (O_Full ?5) (: (O_Sub ?6 ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: O_Empty ?4))) (: (O_Sub ?5 (: (O_Full ?6) (: (O_Sub ?7 ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: O_Empty ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: (O_Sub ?8 ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: O_Empty ([]))))) (: O_Empty ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: (O_Sub ?8 ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: (O_Sub ?5 ?6) ([]))))) (: O_Empty ?7))) (: (O_Sub ?8 (: (O_Full ?9) (: (O_Sub ?10 ?11) ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: (O_Sub ?4 (: (O_Full ?5) (: (O_Sub ?6 ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: O_Empty ?4))) (: (O_Sub ?5 (: (O_Full ?6) (: (O_Sub ?7 ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: O_Empty ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: (O_Sub ?8 ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: ?5 ([]))))) (: O_Empty ?6))) (: (O_Sub ?7 (: (O_Full ?8) (: (O_Sub ?9 ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: (O_Sub ?4 (: (O_Full ?5) (: (O_Sub ?6 ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: O_Empty ?4))) (: (O_Sub ?5 (: (O_Full ?6) (: (O_Sub ?7 ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: O_Empty ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: (O_Sub ?8 ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ?3) (: O_Empty ?4))) (: (O_Sub ?5 (: (O_Sub ?6 ?7) ([]))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: O_Empty ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty ([]))) (: O_Empty ?3))) (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: O_Empty ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: O_Empty ?3))) (: O_Empty ?4))) (: (O_Sub ?5 (: (O_Sub ?6 ([])) (: O_Empty ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: O_Empty ?3))) (: O_Empty ?4))) (: (O_Sub ?5 (: (O_Sub ?6 (: O_Empty ([]))) (: O_Empty ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: O_Empty ?3))) (: O_Empty ?4))) (: (O_Sub ?5 (: (O_Sub ?6 (: (O_Sub ?7 ?8) ([]))) (: O_Empty ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) (: O_Empty ?6))) (: (O_Sub ?7 (: (O_Sub ?8 ([])) (: O_Empty ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) (: O_Empty ?6))) (: (O_Sub ?7 (: (O_Sub ?8 (: O_Empty ([]))) (: O_Empty ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) (: O_Empty ?6))) (: (O_Sub ?7 (: (O_Sub ?8 (: (O_Full ?9) ([]))) (: O_Empty ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) (: O_Empty ?6))) (: (O_Sub ?7 (: (O_Sub ?8 (: (O_Sub ?9 ?10) ([]))) (: O_Empty ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) (: O_Empty ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: O_Empty ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) (: O_Empty ?6))) (: (O_Sub ?7 (: (O_Sub ?8 ([])) (: O_Empty ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) (: O_Empty ?6))) (: (O_Sub ?7 (: (O_Sub ?8 (: O_Empty ([]))) (: O_Empty ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) (: O_Empty ?6))) (: (O_Sub ?7 (: (O_Sub ?8 (: (O_Full ?9) ([]))) (: O_Empty ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) (: O_Empty ?6))) (: (O_Sub ?7 (: (O_Sub ?8 (: (O_Sub ?9 ?10) ([]))) (: O_Empty ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) (: O_Empty ?7))) (: (O_Sub ?8 (: (O_Sub ?9 ([])) (: O_Empty ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) (: O_Empty ?7))) (: (O_Sub ?8 (: (O_Sub ?9 (: O_Empty ([]))) (: O_Empty ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) (: O_Empty ?7))) (: (O_Sub ?8 (: (O_Sub ?9 (: (O_Full ?10) ([]))) (: O_Empty ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) (: O_Empty ?7))) (: (O_Sub ?8 (: (O_Sub ?9 (: (O_Sub ?10 ?11) ([]))) (: O_Empty ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) (: O_Empty ?8))) (: (O_Sub ?9 (: (O_Sub ?10 ([])) (: O_Empty ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) (: O_Empty ?8))) (: (O_Sub ?9 (: (O_Sub ?10 (: O_Empty ([]))) (: O_Empty ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) (: O_Empty ?8))) (: (O_Sub ?9 (: (O_Sub ?10 (: (O_Full ?11) ([]))) (: O_Empty ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) (: O_Empty ?8))) (: (O_Sub ?9 (: (O_Sub ?10 (: (O_Sub ?11 ?12) ([]))) (: O_Empty ?13))) ?14))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: O_Empty ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: O_Empty ?4))) (: (O_Sub ?5 (: (O_Sub ?6 ?7) (: O_Empty ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: O_Empty ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: O_Empty ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: O_Empty ([]))))) (: O_Empty ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: O_Empty ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: (O_Sub ?5 ?6) ([]))))) (: O_Empty ?7))) (: (O_Sub ?8 (: (O_Sub ?9 ?10) (: O_Empty ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: O_Empty ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: O_Empty ?4))) (: (O_Sub ?5 (: (O_Sub ?6 ?7) (: O_Empty ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: O_Empty ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: O_Empty ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: ?5 ([]))))) (: O_Empty ?6))) (: (O_Sub ?7 (: (O_Sub ?8 ?9) (: O_Empty ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: O_Empty ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: O_Empty ?4))) (: (O_Sub ?5 (: (O_Sub ?6 ?7) (: O_Empty ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: O_Empty ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: O_Empty ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: (O_Full ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty ([]))) (: O_Empty ?3))) (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: (O_Full ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: O_Empty ?3))) (: O_Empty ?4))) (: (O_Sub ?5 (: (O_Sub ?6 ([])) (: (O_Full ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: O_Empty ?3))) (: O_Empty ?4))) (: (O_Sub ?5 (: (O_Sub ?6 (: O_Empty ([]))) (: (O_Full ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: O_Empty ?3))) (: O_Empty ?4))) (: (O_Sub ?5 (: (O_Sub ?6 (: (O_Sub ?7 ?8) ([]))) (: (O_Full ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) (: O_Empty ?6))) (: (O_Sub ?7 (: (O_Sub ?8 ([])) (: (O_Full ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) (: O_Empty ?6))) (: (O_Sub ?7 (: (O_Sub ?8 (: O_Empty ([]))) (: (O_Full ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) (: O_Empty ?6))) (: (O_Sub ?7 (: (O_Sub ?8 (: (O_Full ?9) ([]))) (: (O_Full ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) (: O_Empty ?6))) (: (O_Sub ?7 (: (O_Sub ?8 (: (O_Sub ?9 ?10) ([]))) (: (O_Full ?11) ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) (: O_Empty ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: (O_Full ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) (: O_Empty ?6))) (: (O_Sub ?7 (: (O_Sub ?8 ([])) (: (O_Full ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) (: O_Empty ?6))) (: (O_Sub ?7 (: (O_Sub ?8 (: O_Empty ([]))) (: (O_Full ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) (: O_Empty ?6))) (: (O_Sub ?7 (: (O_Sub ?8 (: (O_Full ?9) ([]))) (: (O_Full ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) (: O_Empty ?6))) (: (O_Sub ?7 (: (O_Sub ?8 (: (O_Sub ?9 ?10) ([]))) (: (O_Full ?11) ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) (: O_Empty ?7))) (: (O_Sub ?8 (: (O_Sub ?9 ([])) (: (O_Full ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) (: O_Empty ?7))) (: (O_Sub ?8 (: (O_Sub ?9 (: O_Empty ([]))) (: (O_Full ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) (: O_Empty ?7))) (: (O_Sub ?8 (: (O_Sub ?9 (: (O_Full ?10) ([]))) (: (O_Full ?11) ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) (: O_Empty ?7))) (: (O_Sub ?8 (: (O_Sub ?9 (: (O_Sub ?10 ?11) ([]))) (: (O_Full ?12) ?13))) ?14))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) (: O_Empty ?8))) (: (O_Sub ?9 (: (O_Sub ?10 ([])) (: (O_Full ?11) ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) (: O_Empty ?8))) (: (O_Sub ?9 (: (O_Sub ?10 (: O_Empty ([]))) (: (O_Full ?11) ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) (: O_Empty ?8))) (: (O_Sub ?9 (: (O_Sub ?10 (: (O_Full ?11) ([]))) (: (O_Full ?12) ?13))) ?14))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) (: O_Empty ?8))) (: (O_Sub ?9 (: (O_Sub ?10 (: (O_Sub ?11 ?12) ([]))) (: (O_Full ?13) ?14))) ?15))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: (O_Full ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: O_Empty ?4))) (: (O_Sub ?5 (: (O_Sub ?6 ?7) (: (O_Full ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: O_Empty ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: (O_Full ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: O_Empty ([]))))) (: O_Empty ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: (O_Full ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: (O_Sub ?5 ?6) ([]))))) (: O_Empty ?7))) (: (O_Sub ?8 (: (O_Sub ?9 ?10) (: (O_Full ?11) ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: (O_Full ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: O_Empty ?4))) (: (O_Sub ?5 (: (O_Sub ?6 ?7) (: (O_Full ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: O_Empty ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: (O_Full ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: ?5 ([]))))) (: O_Empty ?6))) (: (O_Sub ?7 (: (O_Sub ?8 ?9) (: (O_Full ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: (O_Full ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: O_Empty ?4))) (: (O_Sub ?5 (: (O_Sub ?6 ?7) (: (O_Full ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: O_Empty ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: (O_Full ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: (O_Sub ?7 ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty ([]))) (: O_Empty ?3))) (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: (O_Sub ?7 ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: O_Empty ?3))) (: O_Empty ?4))) (: (O_Sub ?5 (: (O_Sub ?6 ([])) (: (O_Sub ?7 ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: O_Empty ?3))) (: O_Empty ?4))) (: (O_Sub ?5 (: (O_Sub ?6 (: O_Empty ([]))) (: (O_Sub ?7 ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: O_Empty ?3))) (: O_Empty ?4))) (: (O_Sub ?5 (: (O_Sub ?6 (: (O_Sub ?7 ?8) ([]))) (: (O_Sub ?9 ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) (: O_Empty ?6))) (: (O_Sub ?7 (: (O_Sub ?8 ([])) (: (O_Sub ?9 ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) (: O_Empty ?6))) (: (O_Sub ?7 (: (O_Sub ?8 (: O_Empty ([]))) (: (O_Sub ?9 ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) (: O_Empty ?6))) (: (O_Sub ?7 (: (O_Sub ?8 (: (O_Full ?9) ([]))) (: (O_Sub ?10 ?11) ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) (: O_Empty ?6))) (: (O_Sub ?7 (: (O_Sub ?8 (: (O_Sub ?9 ?10) ([]))) (: (O_Sub ?11 ?12) ?13))) ?14))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) (: O_Empty ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: (O_Sub ?9 ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) (: O_Empty ?6))) (: (O_Sub ?7 (: (O_Sub ?8 ([])) (: (O_Sub ?9 ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) (: O_Empty ?6))) (: (O_Sub ?7 (: (O_Sub ?8 (: O_Empty ([]))) (: (O_Sub ?9 ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) (: O_Empty ?6))) (: (O_Sub ?7 (: (O_Sub ?8 (: (O_Full ?9) ([]))) (: (O_Sub ?10 ?11) ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) (: O_Empty ?6))) (: (O_Sub ?7 (: (O_Sub ?8 (: (O_Sub ?9 ?10) ([]))) (: (O_Sub ?11 ?12) ?13))) ?14))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) (: O_Empty ?7))) (: (O_Sub ?8 (: (O_Sub ?9 ([])) (: (O_Sub ?10 ?11) ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) (: O_Empty ?7))) (: (O_Sub ?8 (: (O_Sub ?9 (: O_Empty ([]))) (: (O_Sub ?10 ?11) ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) (: O_Empty ?7))) (: (O_Sub ?8 (: (O_Sub ?9 (: (O_Full ?10) ([]))) (: (O_Sub ?11 ?12) ?13))) ?14))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) (: O_Empty ?7))) (: (O_Sub ?8 (: (O_Sub ?9 (: (O_Sub ?10 ?11) ([]))) (: (O_Sub ?12 ?13) ?14))) ?15))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) (: O_Empty ?8))) (: (O_Sub ?9 (: (O_Sub ?10 ([])) (: (O_Sub ?11 ?12) ?13))) ?14))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) (: O_Empty ?8))) (: (O_Sub ?9 (: (O_Sub ?10 (: O_Empty ([]))) (: (O_Sub ?11 ?12) ?13))) ?14))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) (: O_Empty ?8))) (: (O_Sub ?9 (: (O_Sub ?10 (: (O_Full ?11) ([]))) (: (O_Sub ?12 ?13) ?14))) ?15))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) (: O_Empty ?8))) (: (O_Sub ?9 (: (O_Sub ?10 (: (O_Sub ?11 ?12) ([]))) (: (O_Sub ?13 ?14) ?15))) ?16))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: (O_Sub ?7 ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: O_Empty ?4))) (: (O_Sub ?5 (: (O_Sub ?6 ?7) (: (O_Sub ?8 ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: O_Empty ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: (O_Sub ?9 ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: O_Empty ([]))))) (: O_Empty ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: (O_Sub ?9 ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: (O_Sub ?5 ?6) ([]))))) (: O_Empty ?7))) (: (O_Sub ?8 (: (O_Sub ?9 ?10) (: (O_Sub ?11 ?12) ?13))) ?14))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: (O_Sub ?7 ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: O_Empty ?4))) (: (O_Sub ?5 (: (O_Sub ?6 ?7) (: (O_Sub ?8 ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: O_Empty ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: (O_Sub ?9 ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: ?5 ([]))))) (: O_Empty ?6))) (: (O_Sub ?7 (: (O_Sub ?8 ?9) (: (O_Sub ?10 ?11) ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: (O_Sub ?7 ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: O_Empty ?4))) (: (O_Sub ?5 (: (O_Sub ?6 ?7) (: (O_Sub ?8 ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: O_Empty ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: (O_Sub ?9 ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ?3) (: (O_Full ?4) ?5))) (: (O_Sub ?6 ([])) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ?3) (: (O_Full ?4) ?5))) (: (O_Sub ?6 (: O_Empty ([]))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: O_Empty (: O_Empty ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty ([]))) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: O_Empty (: O_Empty ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ([])) ?4))) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: O_Empty (: O_Empty ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: O_Empty (: O_Empty ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: O_Empty ?4))) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: O_Empty (: O_Empty ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: (O_Full ?4) ?5))) (: (O_Full ?6) ?7))) (: (O_Sub ?8 (: O_Empty (: O_Empty ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: (O_Sub ?4 ?5) ?6))) (: (O_Full ?7) ?8))) (: (O_Sub ?9 (: O_Empty (: O_Empty ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: O_Empty (: O_Empty ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Full ?4) ?5))) (: (O_Sub ?6 (: O_Empty (: O_Empty ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: O_Empty (: O_Empty ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: O_Empty ([]))))) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: O_Empty (: O_Empty ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: (O_Sub ?5 ?6) ([]))))) (: (O_Full ?7) ?8))) (: (O_Sub ?9 (: O_Empty (: O_Empty ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: O_Empty (: O_Empty ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Full ?4) ?5))) (: (O_Sub ?6 (: O_Empty (: O_Empty ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: O_Empty (: O_Empty ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: ?5 ([]))))) (: (O_Full ?6) ?7))) (: (O_Sub ?8 (: O_Empty (: O_Empty ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: O_Empty (: O_Empty ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Full ?4) ?5))) (: (O_Sub ?6 (: O_Empty (: O_Empty ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: O_Empty (: O_Empty ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: O_Empty (: (O_Full ?6) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty ([]))) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: O_Empty (: (O_Full ?6) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ([])) ?4))) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: O_Empty (: (O_Full ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: O_Empty (: (O_Full ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: O_Empty ?4))) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: O_Empty (: (O_Full ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: (O_Full ?4) ?5))) (: (O_Full ?6) ?7))) (: (O_Sub ?8 (: O_Empty (: (O_Full ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: (O_Sub ?4 ?5) ?6))) (: (O_Full ?7) ?8))) (: (O_Sub ?9 (: O_Empty (: (O_Full ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: O_Empty (: (O_Full ?6) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Full ?4) ?5))) (: (O_Sub ?6 (: O_Empty (: (O_Full ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: O_Empty (: (O_Full ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: O_Empty ([]))))) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: O_Empty (: (O_Full ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: (O_Sub ?5 ?6) ([]))))) (: (O_Full ?7) ?8))) (: (O_Sub ?9 (: O_Empty (: (O_Full ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: O_Empty (: (O_Full ?6) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Full ?4) ?5))) (: (O_Sub ?6 (: O_Empty (: (O_Full ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: O_Empty (: (O_Full ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: ?5 ([]))))) (: (O_Full ?6) ?7))) (: (O_Sub ?8 (: O_Empty (: (O_Full ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: O_Empty (: (O_Full ?6) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Full ?4) ?5))) (: (O_Sub ?6 (: O_Empty (: (O_Full ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: O_Empty (: (O_Full ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: O_Empty (: (O_Sub ?6 ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty ([]))) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: O_Empty (: (O_Sub ?6 ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) (: (O_Full ?6) ?7))) (: (O_Sub ?8 (: O_Empty (: (O_Sub ?9 ([])) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) (: (O_Full ?6) ?7))) (: (O_Sub ?8 (: O_Empty (: (O_Sub ?9 (: O_Empty ([]))) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) (: (O_Full ?6) ?7))) (: (O_Sub ?8 (: O_Empty (: (O_Sub ?9 (: (O_Full ?10) ([]))) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) (: (O_Full ?6) ?7))) (: (O_Sub ?8 (: O_Empty (: (O_Sub ?9 (: (O_Sub ?10 ?11) ([]))) ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: O_Empty (: (O_Sub ?8 ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) (: (O_Full ?6) ?7))) (: (O_Sub ?8 (: O_Empty (: (O_Sub ?9 ([])) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) (: (O_Full ?6) ?7))) (: (O_Sub ?8 (: O_Empty (: (O_Sub ?9 (: O_Empty ([]))) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) (: (O_Full ?6) ?7))) (: (O_Sub ?8 (: O_Empty (: (O_Sub ?9 (: (O_Full ?10) ([]))) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) (: (O_Full ?6) ?7))) (: (O_Sub ?8 (: O_Empty (: (O_Sub ?9 (: (O_Sub ?10 ?11) ([]))) ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) (: (O_Full ?7) ?8))) (: (O_Sub ?9 (: O_Empty (: (O_Sub ?10 ([])) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) (: (O_Full ?7) ?8))) (: (O_Sub ?9 (: O_Empty (: (O_Sub ?10 (: O_Empty ([]))) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) (: (O_Full ?7) ?8))) (: (O_Sub ?9 (: O_Empty (: (O_Sub ?10 (: (O_Full ?11) ([]))) ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) (: (O_Full ?7) ?8))) (: (O_Sub ?9 (: O_Empty (: (O_Sub ?10 (: (O_Sub ?11 ?12) ([]))) ?13))) ?14))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) (: (O_Full ?8) ?9))) (: (O_Sub ?10 (: O_Empty (: (O_Sub ?11 ([])) ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) (: (O_Full ?8) ?9))) (: (O_Sub ?10 (: O_Empty (: (O_Sub ?11 (: O_Empty ([]))) ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) (: (O_Full ?8) ?9))) (: (O_Sub ?10 (: O_Empty (: (O_Sub ?11 (: (O_Full ?12) ([]))) ?13))) ?14))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) (: (O_Full ?8) ?9))) (: (O_Sub ?10 (: O_Empty (: (O_Sub ?11 (: (O_Sub ?12 ?13) ([]))) ?14))) ?15))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: O_Empty (: (O_Sub ?6 ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Full ?4) ?5))) (: (O_Sub ?6 (: O_Empty (: (O_Sub ?7 ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: O_Empty (: (O_Sub ?8 ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: O_Empty ([]))))) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: O_Empty (: (O_Sub ?8 ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: (O_Sub ?5 ?6) ([]))))) (: (O_Full ?7) ?8))) (: (O_Sub ?9 (: O_Empty (: (O_Sub ?10 ?11) ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: O_Empty (: (O_Sub ?6 ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Full ?4) ?5))) (: (O_Sub ?6 (: O_Empty (: (O_Sub ?7 ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: O_Empty (: (O_Sub ?8 ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: ?5 ([]))))) (: (O_Full ?6) ?7))) (: (O_Sub ?8 (: O_Empty (: (O_Sub ?9 ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: O_Empty (: (O_Sub ?6 ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Full ?4) ?5))) (: (O_Sub ?6 (: O_Empty (: (O_Sub ?7 ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: O_Empty (: (O_Sub ?8 ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ?3) (: (O_Full ?4) ?5))) (: (O_Sub ?6 (: (O_Full ?7) ([]))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: (O_Full ?6) (: O_Empty ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty ([]))) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: (O_Full ?6) (: O_Empty ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ([])) ?4))) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: (O_Full ?8) (: O_Empty ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: (O_Full ?8) (: O_Empty ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: O_Empty ?4))) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: (O_Full ?8) (: O_Empty ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: (O_Full ?4) ?5))) (: (O_Full ?6) ?7))) (: (O_Sub ?8 (: (O_Full ?9) (: O_Empty ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: (O_Sub ?4 ?5) ?6))) (: (O_Full ?7) ?8))) (: (O_Sub ?9 (: (O_Full ?10) (: O_Empty ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: (O_Full ?6) (: O_Empty ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Full ?4) ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: O_Empty ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: (O_Full ?8) (: O_Empty ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: O_Empty ([]))))) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: (O_Full ?8) (: O_Empty ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: (O_Sub ?5 ?6) ([]))))) (: (O_Full ?7) ?8))) (: (O_Sub ?9 (: (O_Full ?10) (: O_Empty ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: (O_Full ?6) (: O_Empty ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Full ?4) ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: O_Empty ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: (O_Full ?8) (: O_Empty ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: ?5 ([]))))) (: (O_Full ?6) ?7))) (: (O_Sub ?8 (: (O_Full ?9) (: O_Empty ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: (O_Full ?6) (: O_Empty ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Full ?4) ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: O_Empty ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: (O_Full ?8) (: O_Empty ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: (O_Full ?6) (: (O_Full ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty ([]))) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: (O_Full ?6) (: (O_Full ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ([])) ?4))) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: (O_Full ?8) (: (O_Full ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: (O_Full ?8) (: (O_Full ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: O_Empty ?4))) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: (O_Full ?8) (: (O_Full ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: (O_Full ?4) ?5))) (: (O_Full ?6) ?7))) (: (O_Sub ?8 (: (O_Full ?9) (: (O_Full ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: (O_Sub ?4 ?5) ?6))) (: (O_Full ?7) ?8))) (: (O_Sub ?9 (: (O_Full ?10) (: (O_Full ?11) ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: (O_Full ?6) (: (O_Full ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Full ?4) ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: (O_Full ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: (O_Full ?8) (: (O_Full ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: O_Empty ([]))))) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: (O_Full ?8) (: (O_Full ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: (O_Sub ?5 ?6) ([]))))) (: (O_Full ?7) ?8))) (: (O_Sub ?9 (: (O_Full ?10) (: (O_Full ?11) ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: (O_Full ?6) (: (O_Full ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Full ?4) ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: (O_Full ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: (O_Full ?8) (: (O_Full ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: ?5 ([]))))) (: (O_Full ?6) ?7))) (: (O_Sub ?8 (: (O_Full ?9) (: (O_Full ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: (O_Full ?6) (: (O_Full ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Full ?4) ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: (O_Full ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: (O_Full ?8) (: (O_Full ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: (O_Full ?6) (: (O_Sub ?7 ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty ([]))) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: (O_Full ?6) (: (O_Sub ?7 ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) (: (O_Full ?6) ?7))) (: (O_Sub ?8 (: (O_Full ?9) (: (O_Sub ?10 ([])) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) (: (O_Full ?6) ?7))) (: (O_Sub ?8 (: (O_Full ?9) (: (O_Sub ?10 (: O_Empty ([]))) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) (: (O_Full ?6) ?7))) (: (O_Sub ?8 (: (O_Full ?9) (: (O_Sub ?10 (: (O_Full ?11) ([]))) ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) (: (O_Full ?6) ?7))) (: (O_Sub ?8 (: (O_Full ?9) (: (O_Sub ?10 (: (O_Sub ?11 ?12) ([]))) ?13))) ?14))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: (O_Full ?8) (: (O_Sub ?9 ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) (: (O_Full ?6) ?7))) (: (O_Sub ?8 (: (O_Full ?9) (: (O_Sub ?10 ([])) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) (: (O_Full ?6) ?7))) (: (O_Sub ?8 (: (O_Full ?9) (: (O_Sub ?10 (: O_Empty ([]))) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) (: (O_Full ?6) ?7))) (: (O_Sub ?8 (: (O_Full ?9) (: (O_Sub ?10 (: (O_Full ?11) ([]))) ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) (: (O_Full ?6) ?7))) (: (O_Sub ?8 (: (O_Full ?9) (: (O_Sub ?10 (: (O_Sub ?11 ?12) ([]))) ?13))) ?14))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) (: (O_Full ?7) ?8))) (: (O_Sub ?9 (: (O_Full ?10) (: (O_Sub ?11 ([])) ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) (: (O_Full ?7) ?8))) (: (O_Sub ?9 (: (O_Full ?10) (: (O_Sub ?11 (: O_Empty ([]))) ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) (: (O_Full ?7) ?8))) (: (O_Sub ?9 (: (O_Full ?10) (: (O_Sub ?11 (: (O_Full ?12) ([]))) ?13))) ?14))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) (: (O_Full ?7) ?8))) (: (O_Sub ?9 (: (O_Full ?10) (: (O_Sub ?11 (: (O_Sub ?12 ?13) ([]))) ?14))) ?15))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) (: (O_Full ?8) ?9))) (: (O_Sub ?10 (: (O_Full ?11) (: (O_Sub ?12 ([])) ?13))) ?14))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) (: (O_Full ?8) ?9))) (: (O_Sub ?10 (: (O_Full ?11) (: (O_Sub ?12 (: O_Empty ([]))) ?13))) ?14))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) (: (O_Full ?8) ?9))) (: (O_Sub ?10 (: (O_Full ?11) (: (O_Sub ?12 (: (O_Full ?13) ([]))) ?14))) ?15))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) (: (O_Full ?8) ?9))) (: (O_Sub ?10 (: (O_Full ?11) (: (O_Sub ?12 (: (O_Sub ?13 ?14) ([]))) ?15))) ?16))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: (O_Full ?6) (: (O_Sub ?7 ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Full ?4) ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: (O_Sub ?8 ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: (O_Full ?8) (: (O_Sub ?9 ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: O_Empty ([]))))) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: (O_Full ?8) (: (O_Sub ?9 ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: (O_Sub ?5 ?6) ([]))))) (: (O_Full ?7) ?8))) (: (O_Sub ?9 (: (O_Full ?10) (: (O_Sub ?11 ?12) ?13))) ?14))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: (O_Full ?6) (: (O_Sub ?7 ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Full ?4) ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: (O_Sub ?8 ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: (O_Full ?8) (: (O_Sub ?9 ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: ?5 ([]))))) (: (O_Full ?6) ?7))) (: (O_Sub ?8 (: (O_Full ?9) (: (O_Sub ?10 ?11) ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: (O_Full ?6) (: (O_Sub ?7 ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Full ?4) ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: (O_Sub ?8 ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: (O_Full ?8) (: (O_Sub ?9 ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ?3) (: (O_Full ?4) ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) ([]))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: (O_Sub ?6 ?7) (: O_Empty ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty ([]))) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: (O_Sub ?6 ?7) (: O_Empty ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) (: (O_Full ?6) ?7))) (: (O_Sub ?8 (: (O_Sub ?9 ([])) (: O_Empty ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) (: (O_Full ?6) ?7))) (: (O_Sub ?8 (: (O_Sub ?9 (: O_Empty ([]))) (: O_Empty ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) (: (O_Full ?6) ?7))) (: (O_Sub ?8 (: (O_Sub ?9 (: (O_Full ?10) ([]))) (: O_Empty ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) (: (O_Full ?6) ?7))) (: (O_Sub ?8 (: (O_Sub ?9 (: (O_Sub ?10 ?11) ([]))) (: O_Empty ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: (O_Sub ?8 ?9) (: O_Empty ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) (: (O_Full ?6) ?7))) (: (O_Sub ?8 (: (O_Sub ?9 ([])) (: O_Empty ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) (: (O_Full ?6) ?7))) (: (O_Sub ?8 (: (O_Sub ?9 (: O_Empty ([]))) (: O_Empty ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) (: (O_Full ?6) ?7))) (: (O_Sub ?8 (: (O_Sub ?9 (: (O_Full ?10) ([]))) (: O_Empty ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) (: (O_Full ?6) ?7))) (: (O_Sub ?8 (: (O_Sub ?9 (: (O_Sub ?10 ?11) ([]))) (: O_Empty ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) (: (O_Full ?7) ?8))) (: (O_Sub ?9 (: (O_Sub ?10 ([])) (: O_Empty ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) (: (O_Full ?7) ?8))) (: (O_Sub ?9 (: (O_Sub ?10 (: O_Empty ([]))) (: O_Empty ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) (: (O_Full ?7) ?8))) (: (O_Sub ?9 (: (O_Sub ?10 (: (O_Full ?11) ([]))) (: O_Empty ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) (: (O_Full ?7) ?8))) (: (O_Sub ?9 (: (O_Sub ?10 (: (O_Sub ?11 ?12) ([]))) (: O_Empty ?13))) ?14))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) (: (O_Full ?8) ?9))) (: (O_Sub ?10 (: (O_Sub ?11 ([])) (: O_Empty ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) (: (O_Full ?8) ?9))) (: (O_Sub ?10 (: (O_Sub ?11 (: O_Empty ([]))) (: O_Empty ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) (: (O_Full ?8) ?9))) (: (O_Sub ?10 (: (O_Sub ?11 (: (O_Full ?12) ([]))) (: O_Empty ?13))) ?14))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) (: (O_Full ?8) ?9))) (: (O_Sub ?10 (: (O_Sub ?11 (: (O_Sub ?12 ?13) ([]))) (: O_Empty ?14))) ?15))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: (O_Sub ?6 ?7) (: O_Empty ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Full ?4) ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: O_Empty ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: (O_Sub ?8 ?9) (: O_Empty ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: O_Empty ([]))))) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: (O_Sub ?8 ?9) (: O_Empty ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: (O_Sub ?5 ?6) ([]))))) (: (O_Full ?7) ?8))) (: (O_Sub ?9 (: (O_Sub ?10 ?11) (: O_Empty ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: (O_Sub ?6 ?7) (: O_Empty ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Full ?4) ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: O_Empty ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: (O_Sub ?8 ?9) (: O_Empty ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: ?5 ([]))))) (: (O_Full ?6) ?7))) (: (O_Sub ?8 (: (O_Sub ?9 ?10) (: O_Empty ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: (O_Sub ?6 ?7) (: O_Empty ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Full ?4) ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: O_Empty ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: (O_Sub ?8 ?9) (: O_Empty ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: (O_Sub ?6 ?7) (: (O_Full ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty ([]))) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: (O_Sub ?6 ?7) (: (O_Full ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) (: (O_Full ?6) ?7))) (: (O_Sub ?8 (: (O_Sub ?9 ([])) (: (O_Full ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) (: (O_Full ?6) ?7))) (: (O_Sub ?8 (: (O_Sub ?9 (: O_Empty ([]))) (: (O_Full ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) (: (O_Full ?6) ?7))) (: (O_Sub ?8 (: (O_Sub ?9 (: (O_Full ?10) ([]))) (: (O_Full ?11) ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) (: (O_Full ?6) ?7))) (: (O_Sub ?8 (: (O_Sub ?9 (: (O_Sub ?10 ?11) ([]))) (: (O_Full ?12) ?13))) ?14))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: (O_Sub ?8 ?9) (: (O_Full ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) (: (O_Full ?6) ?7))) (: (O_Sub ?8 (: (O_Sub ?9 ([])) (: (O_Full ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) (: (O_Full ?6) ?7))) (: (O_Sub ?8 (: (O_Sub ?9 (: O_Empty ([]))) (: (O_Full ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) (: (O_Full ?6) ?7))) (: (O_Sub ?8 (: (O_Sub ?9 (: (O_Full ?10) ([]))) (: (O_Full ?11) ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) (: (O_Full ?6) ?7))) (: (O_Sub ?8 (: (O_Sub ?9 (: (O_Sub ?10 ?11) ([]))) (: (O_Full ?12) ?13))) ?14))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) (: (O_Full ?7) ?8))) (: (O_Sub ?9 (: (O_Sub ?10 ([])) (: (O_Full ?11) ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) (: (O_Full ?7) ?8))) (: (O_Sub ?9 (: (O_Sub ?10 (: O_Empty ([]))) (: (O_Full ?11) ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) (: (O_Full ?7) ?8))) (: (O_Sub ?9 (: (O_Sub ?10 (: (O_Full ?11) ([]))) (: (O_Full ?12) ?13))) ?14))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) (: (O_Full ?7) ?8))) (: (O_Sub ?9 (: (O_Sub ?10 (: (O_Sub ?11 ?12) ([]))) (: (O_Full ?13) ?14))) ?15))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) (: (O_Full ?8) ?9))) (: (O_Sub ?10 (: (O_Sub ?11 ([])) (: (O_Full ?12) ?13))) ?14))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) (: (O_Full ?8) ?9))) (: (O_Sub ?10 (: (O_Sub ?11 (: O_Empty ([]))) (: (O_Full ?12) ?13))) ?14))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) (: (O_Full ?8) ?9))) (: (O_Sub ?10 (: (O_Sub ?11 (: (O_Full ?12) ([]))) (: (O_Full ?13) ?14))) ?15))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) (: (O_Full ?8) ?9))) (: (O_Sub ?10 (: (O_Sub ?11 (: (O_Sub ?12 ?13) ([]))) (: (O_Full ?14) ?15))) ?16))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: (O_Sub ?6 ?7) (: (O_Full ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Full ?4) ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: (O_Full ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: (O_Sub ?8 ?9) (: (O_Full ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: O_Empty ([]))))) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: (O_Sub ?8 ?9) (: (O_Full ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: (O_Sub ?5 ?6) ([]))))) (: (O_Full ?7) ?8))) (: (O_Sub ?9 (: (O_Sub ?10 ?11) (: (O_Full ?12) ?13))) ?14))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: (O_Sub ?6 ?7) (: (O_Full ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Full ?4) ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: (O_Full ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: (O_Sub ?8 ?9) (: (O_Full ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: ?5 ([]))))) (: (O_Full ?6) ?7))) (: (O_Sub ?8 (: (O_Sub ?9 ?10) (: (O_Full ?11) ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: (O_Sub ?6 ?7) (: (O_Full ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Full ?4) ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: (O_Full ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: (O_Sub ?8 ?9) (: (O_Full ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: (O_Sub ?6 ?7) (: (O_Sub ?8 ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty ([]))) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: (O_Sub ?6 ?7) (: (O_Sub ?8 ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) (: (O_Full ?6) ?7))) (: (O_Sub ?8 (: (O_Sub ?9 ([])) (: (O_Sub ?10 ?11) ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) (: (O_Full ?6) ?7))) (: (O_Sub ?8 (: (O_Sub ?9 (: O_Empty ([]))) (: (O_Sub ?10 ?11) ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) (: (O_Full ?6) ?7))) (: (O_Sub ?8 (: (O_Sub ?9 (: (O_Full ?10) ([]))) (: (O_Sub ?11 ?12) ?13))) ?14))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) (: (O_Full ?6) ?7))) (: (O_Sub ?8 (: (O_Sub ?9 (: (O_Sub ?10 ?11) ([]))) (: (O_Sub ?12 ?13) ?14))) ?15))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: (O_Sub ?8 ?9) (: (O_Sub ?10 ?11) ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) (: (O_Full ?6) ?7))) (: (O_Sub ?8 (: (O_Sub ?9 ([])) (: (O_Sub ?10 ?11) ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) (: (O_Full ?6) ?7))) (: (O_Sub ?8 (: (O_Sub ?9 (: O_Empty ([]))) (: (O_Sub ?10 ?11) ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) (: (O_Full ?6) ?7))) (: (O_Sub ?8 (: (O_Sub ?9 (: (O_Full ?10) ([]))) (: (O_Sub ?11 ?12) ?13))) ?14))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) (: (O_Full ?6) ?7))) (: (O_Sub ?8 (: (O_Sub ?9 (: (O_Sub ?10 ?11) ([]))) (: (O_Sub ?12 ?13) ?14))) ?15))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) (: (O_Full ?7) ?8))) (: (O_Sub ?9 (: (O_Sub ?10 ([])) (: (O_Sub ?11 ?12) ?13))) ?14))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) (: (O_Full ?7) ?8))) (: (O_Sub ?9 (: (O_Sub ?10 (: O_Empty ([]))) (: (O_Sub ?11 ?12) ?13))) ?14))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) (: (O_Full ?7) ?8))) (: (O_Sub ?9 (: (O_Sub ?10 (: (O_Full ?11) ([]))) (: (O_Sub ?12 ?13) ?14))) ?15))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) (: (O_Full ?7) ?8))) (: (O_Sub ?9 (: (O_Sub ?10 (: (O_Sub ?11 ?12) ([]))) (: (O_Sub ?13 ?14) ?15))) ?16))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) (: (O_Full ?8) ?9))) (: (O_Sub ?10 (: (O_Sub ?11 ([])) (: (O_Sub ?12 ?13) ?14))) ?15))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) (: (O_Full ?8) ?9))) (: (O_Sub ?10 (: (O_Sub ?11 (: O_Empty ([]))) (: (O_Sub ?12 ?13) ?14))) ?15))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) (: (O_Full ?8) ?9))) (: (O_Sub ?10 (: (O_Sub ?11 (: (O_Full ?12) ([]))) (: (O_Sub ?13 ?14) ?15))) ?16))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) (: (O_Full ?8) ?9))) (: (O_Sub ?10 (: (O_Sub ?11 (: (O_Sub ?12 ?13) ([]))) (: (O_Sub ?14 ?15) ?16))) ?17))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: (O_Sub ?6 ?7) (: (O_Sub ?8 ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Full ?4) ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: (O_Sub ?9 ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: (O_Sub ?8 ?9) (: (O_Sub ?10 ?11) ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: O_Empty ([]))))) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: (O_Sub ?8 ?9) (: (O_Sub ?10 ?11) ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: (O_Sub ?5 ?6) ([]))))) (: (O_Full ?7) ?8))) (: (O_Sub ?9 (: (O_Sub ?10 ?11) (: (O_Sub ?12 ?13) ?14))) ?15))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: (O_Sub ?6 ?7) (: (O_Sub ?8 ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Full ?4) ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: (O_Sub ?9 ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: (O_Sub ?8 ?9) (: (O_Sub ?10 ?11) ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: ?5 ([]))))) (: (O_Full ?6) ?7))) (: (O_Sub ?8 (: (O_Sub ?9 ?10) (: (O_Sub ?11 ?12) ?13))) ?14))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) (: (O_Sub ?5 (: (O_Sub ?6 ?7) (: (O_Sub ?8 ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Full ?4) ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: (O_Sub ?9 ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: (O_Sub ?8 ?9) (: (O_Sub ?10 ?11) ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ?3) (: (O_Sub ?4 ?5) ?6))) (: (O_Sub ?7 ([])) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ?3) (: (O_Sub ?4 ?5) ?6))) (: (O_Sub ?7 (: O_Empty ([]))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: O_Empty (: O_Empty ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty ([]))) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: O_Empty (: O_Empty ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: O_Empty ?3))) (: (O_Sub ?4 ([])) ?5))) (: (O_Sub ?6 (: O_Empty (: O_Empty ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: O_Empty ?3))) (: (O_Sub ?4 (: O_Empty ([]))) ?5))) (: (O_Sub ?6 (: O_Empty (: O_Empty ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: O_Empty ?3))) (: (O_Sub ?4 (: (O_Sub ?5 ?6) ([]))) ?7))) (: (O_Sub ?8 (: O_Empty (: O_Empty ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 ([])) ?7))) (: (O_Sub ?8 (: O_Empty (: O_Empty ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: O_Empty ([]))) ?7))) (: (O_Sub ?8 (: O_Empty (: O_Empty ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: (O_Full ?7) ([]))) ?8))) (: (O_Sub ?9 (: O_Empty (: O_Empty ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) ([]))) ?9))) (: (O_Sub ?10 (: O_Empty (: O_Empty ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: O_Empty (: O_Empty ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) (: (O_Sub ?6 ([])) ?7))) (: (O_Sub ?8 (: O_Empty (: O_Empty ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) (: (O_Sub ?6 (: O_Empty ([]))) ?7))) (: (O_Sub ?8 (: O_Empty (: O_Empty ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) (: (O_Sub ?6 (: (O_Full ?7) ([]))) ?8))) (: (O_Sub ?9 (: O_Empty (: O_Empty ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) ([]))) ?9))) (: (O_Sub ?10 (: O_Empty (: O_Empty ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) (: (O_Sub ?7 ([])) ?8))) (: (O_Sub ?9 (: O_Empty (: O_Empty ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: O_Empty ([]))) ?8))) (: (O_Sub ?9 (: O_Empty (: O_Empty ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: (O_Full ?8) ([]))) ?9))) (: (O_Sub ?10 (: O_Empty (: O_Empty ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: (O_Sub ?8 ?9) ([]))) ?10))) (: (O_Sub ?11 (: O_Empty (: O_Empty ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 ([])) ?9))) (: (O_Sub ?10 (: O_Empty (: O_Empty ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: O_Empty ([]))) ?9))) (: (O_Sub ?10 (: O_Empty (: O_Empty ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: (O_Full ?9) ([]))) ?10))) (: (O_Sub ?11 (: O_Empty (: O_Empty ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: (O_Sub ?9 ?10) ([]))) ?11))) (: (O_Sub ?12 (: O_Empty (: O_Empty ?13))) ?14))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: O_Empty (: O_Empty ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Sub ?4 ?5) ?6))) (: (O_Sub ?7 (: O_Empty (: O_Empty ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: O_Empty (: O_Empty ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: O_Empty ([]))))) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: O_Empty (: O_Empty ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: (O_Sub ?5 ?6) ([]))))) (: (O_Sub ?7 ?8) ?9))) (: (O_Sub ?10 (: O_Empty (: O_Empty ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: O_Empty (: O_Empty ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Sub ?4 ?5) ?6))) (: (O_Sub ?7 (: O_Empty (: O_Empty ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: O_Empty (: O_Empty ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: ?5 ([]))))) (: (O_Sub ?6 ?7) ?8))) (: (O_Sub ?9 (: O_Empty (: O_Empty ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: O_Empty (: O_Empty ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Sub ?4 ?5) ?6))) (: (O_Sub ?7 (: O_Empty (: O_Empty ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: O_Empty (: O_Empty ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: O_Empty (: (O_Full ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty ([]))) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: O_Empty (: (O_Full ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: O_Empty ?3))) (: (O_Sub ?4 ([])) ?5))) (: (O_Sub ?6 (: O_Empty (: (O_Full ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: O_Empty ?3))) (: (O_Sub ?4 (: O_Empty ([]))) ?5))) (: (O_Sub ?6 (: O_Empty (: (O_Full ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: O_Empty ?3))) (: (O_Sub ?4 (: (O_Sub ?5 ?6) ([]))) ?7))) (: (O_Sub ?8 (: O_Empty (: (O_Full ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 ([])) ?7))) (: (O_Sub ?8 (: O_Empty (: (O_Full ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: O_Empty ([]))) ?7))) (: (O_Sub ?8 (: O_Empty (: (O_Full ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: (O_Full ?7) ([]))) ?8))) (: (O_Sub ?9 (: O_Empty (: (O_Full ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) ([]))) ?9))) (: (O_Sub ?10 (: O_Empty (: (O_Full ?11) ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: O_Empty (: (O_Full ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) (: (O_Sub ?6 ([])) ?7))) (: (O_Sub ?8 (: O_Empty (: (O_Full ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) (: (O_Sub ?6 (: O_Empty ([]))) ?7))) (: (O_Sub ?8 (: O_Empty (: (O_Full ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) (: (O_Sub ?6 (: (O_Full ?7) ([]))) ?8))) (: (O_Sub ?9 (: O_Empty (: (O_Full ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) ([]))) ?9))) (: (O_Sub ?10 (: O_Empty (: (O_Full ?11) ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) (: (O_Sub ?7 ([])) ?8))) (: (O_Sub ?9 (: O_Empty (: (O_Full ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: O_Empty ([]))) ?8))) (: (O_Sub ?9 (: O_Empty (: (O_Full ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: (O_Full ?8) ([]))) ?9))) (: (O_Sub ?10 (: O_Empty (: (O_Full ?11) ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: (O_Sub ?8 ?9) ([]))) ?10))) (: (O_Sub ?11 (: O_Empty (: (O_Full ?12) ?13))) ?14))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 ([])) ?9))) (: (O_Sub ?10 (: O_Empty (: (O_Full ?11) ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: O_Empty ([]))) ?9))) (: (O_Sub ?10 (: O_Empty (: (O_Full ?11) ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: (O_Full ?9) ([]))) ?10))) (: (O_Sub ?11 (: O_Empty (: (O_Full ?12) ?13))) ?14))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: (O_Sub ?9 ?10) ([]))) ?11))) (: (O_Sub ?12 (: O_Empty (: (O_Full ?13) ?14))) ?15))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: O_Empty (: (O_Full ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Sub ?4 ?5) ?6))) (: (O_Sub ?7 (: O_Empty (: (O_Full ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: O_Empty (: (O_Full ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: O_Empty ([]))))) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: O_Empty (: (O_Full ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: (O_Sub ?5 ?6) ([]))))) (: (O_Sub ?7 ?8) ?9))) (: (O_Sub ?10 (: O_Empty (: (O_Full ?11) ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: O_Empty (: (O_Full ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Sub ?4 ?5) ?6))) (: (O_Sub ?7 (: O_Empty (: (O_Full ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: O_Empty (: (O_Full ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: ?5 ([]))))) (: (O_Sub ?6 ?7) ?8))) (: (O_Sub ?9 (: O_Empty (: (O_Full ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: O_Empty (: (O_Full ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Sub ?4 ?5) ?6))) (: (O_Sub ?7 (: O_Empty (: (O_Full ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: O_Empty (: (O_Full ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: O_Empty (: (O_Sub ?7 ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty ([]))) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: O_Empty (: (O_Sub ?7 ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: O_Empty ?3))) (: (O_Sub ?4 ([])) ?5))) (: (O_Sub ?6 (: O_Empty (: (O_Sub ?7 ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: O_Empty ?3))) (: (O_Sub ?4 (: O_Empty ([]))) ?5))) (: (O_Sub ?6 (: O_Empty (: (O_Sub ?7 ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: O_Empty ?3))) (: (O_Sub ?4 (: (O_Sub ?5 ?6) ([]))) ?7))) (: (O_Sub ?8 (: O_Empty (: (O_Sub ?9 ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 ([])) ?7))) (: (O_Sub ?8 (: O_Empty (: (O_Sub ?9 ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: O_Empty ([]))) ?7))) (: (O_Sub ?8 (: O_Empty (: (O_Sub ?9 ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: (O_Full ?7) ([]))) ?8))) (: (O_Sub ?9 (: O_Empty (: (O_Sub ?10 ?11) ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) ([]))) ?9))) (: (O_Sub ?10 (: O_Empty (: (O_Sub ?11 ?12) ?13))) ?14))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: O_Empty (: (O_Sub ?9 ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) (: (O_Sub ?6 ([])) ?7))) (: (O_Sub ?8 (: O_Empty (: (O_Sub ?9 ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) (: (O_Sub ?6 (: O_Empty ([]))) ?7))) (: (O_Sub ?8 (: O_Empty (: (O_Sub ?9 ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) (: (O_Sub ?6 (: (O_Full ?7) ([]))) ?8))) (: (O_Sub ?9 (: O_Empty (: (O_Sub ?10 ?11) ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) ([]))) ?9))) (: (O_Sub ?10 (: O_Empty (: (O_Sub ?11 ?12) ?13))) ?14))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) (: (O_Sub ?7 ([])) ?8))) (: (O_Sub ?9 (: O_Empty (: (O_Sub ?10 ?11) ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: O_Empty ([]))) ?8))) (: (O_Sub ?9 (: O_Empty (: (O_Sub ?10 ?11) ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: (O_Full ?8) ([]))) ?9))) (: (O_Sub ?10 (: O_Empty (: (O_Sub ?11 ?12) ?13))) ?14))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: (O_Sub ?8 ?9) ([]))) ?10))) (: (O_Sub ?11 (: O_Empty (: (O_Sub ?12 ?13) ?14))) ?15))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 ([])) ?9))) (: (O_Sub ?10 (: O_Empty (: (O_Sub ?11 ?12) ?13))) ?14))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: O_Empty ([]))) ?9))) (: (O_Sub ?10 (: O_Empty (: (O_Sub ?11 ?12) ?13))) ?14))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: (O_Full ?9) ([]))) ?10))) (: (O_Sub ?11 (: O_Empty (: (O_Sub ?12 ?13) ?14))) ?15))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: (O_Sub ?9 ?10) ([]))) ?11))) (: (O_Sub ?12 (: O_Empty (: (O_Sub ?13 ?14) ?15))) ?16))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: O_Empty (: (O_Sub ?7 ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Sub ?4 ?5) ?6))) (: (O_Sub ?7 (: O_Empty (: (O_Sub ?8 ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: O_Empty (: (O_Sub ?9 ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: O_Empty ([]))))) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: O_Empty (: (O_Sub ?9 ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: (O_Sub ?5 ?6) ([]))))) (: (O_Sub ?7 ?8) ?9))) (: (O_Sub ?10 (: O_Empty (: (O_Sub ?11 ?12) ?13))) ?14))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: O_Empty (: (O_Sub ?7 ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Sub ?4 ?5) ?6))) (: (O_Sub ?7 (: O_Empty (: (O_Sub ?8 ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: O_Empty (: (O_Sub ?9 ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: ?5 ([]))))) (: (O_Sub ?6 ?7) ?8))) (: (O_Sub ?9 (: O_Empty (: (O_Sub ?10 ?11) ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: O_Empty (: (O_Sub ?7 ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Sub ?4 ?5) ?6))) (: (O_Sub ?7 (: O_Empty (: (O_Sub ?8 ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: O_Empty (: (O_Sub ?9 ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ?3) (: (O_Sub ?4 ?5) ?6))) (: (O_Sub ?7 (: (O_Full ?8) ([]))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: O_Empty ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty ([]))) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: O_Empty ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: O_Empty ?3))) (: (O_Sub ?4 ([])) ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: O_Empty ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: O_Empty ?3))) (: (O_Sub ?4 (: O_Empty ([]))) ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: O_Empty ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: O_Empty ?3))) (: (O_Sub ?4 (: (O_Sub ?5 ?6) ([]))) ?7))) (: (O_Sub ?8 (: (O_Full ?9) (: O_Empty ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 ([])) ?7))) (: (O_Sub ?8 (: (O_Full ?9) (: O_Empty ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: O_Empty ([]))) ?7))) (: (O_Sub ?8 (: (O_Full ?9) (: O_Empty ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: (O_Full ?7) ([]))) ?8))) (: (O_Sub ?9 (: (O_Full ?10) (: O_Empty ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) ([]))) ?9))) (: (O_Sub ?10 (: (O_Full ?11) (: O_Empty ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: (O_Full ?9) (: O_Empty ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) (: (O_Sub ?6 ([])) ?7))) (: (O_Sub ?8 (: (O_Full ?9) (: O_Empty ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) (: (O_Sub ?6 (: O_Empty ([]))) ?7))) (: (O_Sub ?8 (: (O_Full ?9) (: O_Empty ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) (: (O_Sub ?6 (: (O_Full ?7) ([]))) ?8))) (: (O_Sub ?9 (: (O_Full ?10) (: O_Empty ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) ([]))) ?9))) (: (O_Sub ?10 (: (O_Full ?11) (: O_Empty ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) (: (O_Sub ?7 ([])) ?8))) (: (O_Sub ?9 (: (O_Full ?10) (: O_Empty ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: O_Empty ([]))) ?8))) (: (O_Sub ?9 (: (O_Full ?10) (: O_Empty ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: (O_Full ?8) ([]))) ?9))) (: (O_Sub ?10 (: (O_Full ?11) (: O_Empty ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: (O_Sub ?8 ?9) ([]))) ?10))) (: (O_Sub ?11 (: (O_Full ?12) (: O_Empty ?13))) ?14))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 ([])) ?9))) (: (O_Sub ?10 (: (O_Full ?11) (: O_Empty ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: O_Empty ([]))) ?9))) (: (O_Sub ?10 (: (O_Full ?11) (: O_Empty ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: (O_Full ?9) ([]))) ?10))) (: (O_Sub ?11 (: (O_Full ?12) (: O_Empty ?13))) ?14))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: (O_Sub ?9 ?10) ([]))) ?11))) (: (O_Sub ?12 (: (O_Full ?13) (: O_Empty ?14))) ?15))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: O_Empty ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Sub ?4 ?5) ?6))) (: (O_Sub ?7 (: (O_Full ?8) (: O_Empty ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: (O_Full ?9) (: O_Empty ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: O_Empty ([]))))) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: (O_Full ?9) (: O_Empty ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: (O_Sub ?5 ?6) ([]))))) (: (O_Sub ?7 ?8) ?9))) (: (O_Sub ?10 (: (O_Full ?11) (: O_Empty ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: O_Empty ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Sub ?4 ?5) ?6))) (: (O_Sub ?7 (: (O_Full ?8) (: O_Empty ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: (O_Full ?9) (: O_Empty ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: ?5 ([]))))) (: (O_Sub ?6 ?7) ?8))) (: (O_Sub ?9 (: (O_Full ?10) (: O_Empty ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: O_Empty ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Sub ?4 ?5) ?6))) (: (O_Sub ?7 (: (O_Full ?8) (: O_Empty ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: (O_Full ?9) (: O_Empty ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: (O_Full ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty ([]))) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: (O_Full ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: O_Empty ?3))) (: (O_Sub ?4 ([])) ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: (O_Full ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: O_Empty ?3))) (: (O_Sub ?4 (: O_Empty ([]))) ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: (O_Full ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: O_Empty ?3))) (: (O_Sub ?4 (: (O_Sub ?5 ?6) ([]))) ?7))) (: (O_Sub ?8 (: (O_Full ?9) (: (O_Full ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 ([])) ?7))) (: (O_Sub ?8 (: (O_Full ?9) (: (O_Full ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: O_Empty ([]))) ?7))) (: (O_Sub ?8 (: (O_Full ?9) (: (O_Full ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: (O_Full ?7) ([]))) ?8))) (: (O_Sub ?9 (: (O_Full ?10) (: (O_Full ?11) ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) ([]))) ?9))) (: (O_Sub ?10 (: (O_Full ?11) (: (O_Full ?12) ?13))) ?14))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: (O_Full ?9) (: (O_Full ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) (: (O_Sub ?6 ([])) ?7))) (: (O_Sub ?8 (: (O_Full ?9) (: (O_Full ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) (: (O_Sub ?6 (: O_Empty ([]))) ?7))) (: (O_Sub ?8 (: (O_Full ?9) (: (O_Full ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) (: (O_Sub ?6 (: (O_Full ?7) ([]))) ?8))) (: (O_Sub ?9 (: (O_Full ?10) (: (O_Full ?11) ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) ([]))) ?9))) (: (O_Sub ?10 (: (O_Full ?11) (: (O_Full ?12) ?13))) ?14))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) (: (O_Sub ?7 ([])) ?8))) (: (O_Sub ?9 (: (O_Full ?10) (: (O_Full ?11) ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: O_Empty ([]))) ?8))) (: (O_Sub ?9 (: (O_Full ?10) (: (O_Full ?11) ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: (O_Full ?8) ([]))) ?9))) (: (O_Sub ?10 (: (O_Full ?11) (: (O_Full ?12) ?13))) ?14))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: (O_Sub ?8 ?9) ([]))) ?10))) (: (O_Sub ?11 (: (O_Full ?12) (: (O_Full ?13) ?14))) ?15))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 ([])) ?9))) (: (O_Sub ?10 (: (O_Full ?11) (: (O_Full ?12) ?13))) ?14))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: O_Empty ([]))) ?9))) (: (O_Sub ?10 (: (O_Full ?11) (: (O_Full ?12) ?13))) ?14))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: (O_Full ?9) ([]))) ?10))) (: (O_Sub ?11 (: (O_Full ?12) (: (O_Full ?13) ?14))) ?15))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: (O_Sub ?9 ?10) ([]))) ?11))) (: (O_Sub ?12 (: (O_Full ?13) (: (O_Full ?14) ?15))) ?16))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: (O_Full ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Sub ?4 ?5) ?6))) (: (O_Sub ?7 (: (O_Full ?8) (: (O_Full ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: (O_Full ?9) (: (O_Full ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: O_Empty ([]))))) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: (O_Full ?9) (: (O_Full ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: (O_Sub ?5 ?6) ([]))))) (: (O_Sub ?7 ?8) ?9))) (: (O_Sub ?10 (: (O_Full ?11) (: (O_Full ?12) ?13))) ?14))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: (O_Full ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Sub ?4 ?5) ?6))) (: (O_Sub ?7 (: (O_Full ?8) (: (O_Full ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: (O_Full ?9) (: (O_Full ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: ?5 ([]))))) (: (O_Sub ?6 ?7) ?8))) (: (O_Sub ?9 (: (O_Full ?10) (: (O_Full ?11) ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: (O_Full ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Sub ?4 ?5) ?6))) (: (O_Sub ?7 (: (O_Full ?8) (: (O_Full ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: (O_Full ?9) (: (O_Full ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: (O_Sub ?8 ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty ([]))) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: (O_Sub ?8 ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: O_Empty ?3))) (: (O_Sub ?4 ([])) ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: (O_Sub ?8 ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: O_Empty ?3))) (: (O_Sub ?4 (: O_Empty ([]))) ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: (O_Sub ?8 ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: O_Empty ?3))) (: (O_Sub ?4 (: (O_Sub ?5 ?6) ([]))) ?7))) (: (O_Sub ?8 (: (O_Full ?9) (: (O_Sub ?10 ?11) ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 ([])) ?7))) (: (O_Sub ?8 (: (O_Full ?9) (: (O_Sub ?10 ?11) ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: O_Empty ([]))) ?7))) (: (O_Sub ?8 (: (O_Full ?9) (: (O_Sub ?10 ?11) ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: (O_Full ?7) ([]))) ?8))) (: (O_Sub ?9 (: (O_Full ?10) (: (O_Sub ?11 ?12) ?13))) ?14))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) ([]))) ?9))) (: (O_Sub ?10 (: (O_Full ?11) (: (O_Sub ?12 ?13) ?14))) ?15))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: (O_Full ?9) (: (O_Sub ?10 ?11) ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) (: (O_Sub ?6 ([])) ?7))) (: (O_Sub ?8 (: (O_Full ?9) (: (O_Sub ?10 ?11) ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) (: (O_Sub ?6 (: O_Empty ([]))) ?7))) (: (O_Sub ?8 (: (O_Full ?9) (: (O_Sub ?10 ?11) ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) (: (O_Sub ?6 (: (O_Full ?7) ([]))) ?8))) (: (O_Sub ?9 (: (O_Full ?10) (: (O_Sub ?11 ?12) ?13))) ?14))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) ([]))) ?9))) (: (O_Sub ?10 (: (O_Full ?11) (: (O_Sub ?12 ?13) ?14))) ?15))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) (: (O_Sub ?7 ([])) ?8))) (: (O_Sub ?9 (: (O_Full ?10) (: (O_Sub ?11 ?12) ?13))) ?14))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: O_Empty ([]))) ?8))) (: (O_Sub ?9 (: (O_Full ?10) (: (O_Sub ?11 ?12) ?13))) ?14))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: (O_Full ?8) ([]))) ?9))) (: (O_Sub ?10 (: (O_Full ?11) (: (O_Sub ?12 ?13) ?14))) ?15))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: (O_Sub ?8 ?9) ([]))) ?10))) (: (O_Sub ?11 (: (O_Full ?12) (: (O_Sub ?13 ?14) ?15))) ?16))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 ([])) ?9))) (: (O_Sub ?10 (: (O_Full ?11) (: (O_Sub ?12 ?13) ?14))) ?15))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: O_Empty ([]))) ?9))) (: (O_Sub ?10 (: (O_Full ?11) (: (O_Sub ?12 ?13) ?14))) ?15))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: (O_Full ?9) ([]))) ?10))) (: (O_Sub ?11 (: (O_Full ?12) (: (O_Sub ?13 ?14) ?15))) ?16))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: (O_Sub ?9 ?10) ([]))) ?11))) (: (O_Sub ?12 (: (O_Full ?13) (: (O_Sub ?14 ?15) ?16))) ?17))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: (O_Sub ?8 ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Sub ?4 ?5) ?6))) (: (O_Sub ?7 (: (O_Full ?8) (: (O_Sub ?9 ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: (O_Full ?9) (: (O_Sub ?10 ?11) ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: O_Empty ([]))))) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: (O_Full ?9) (: (O_Sub ?10 ?11) ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: (O_Sub ?5 ?6) ([]))))) (: (O_Sub ?7 ?8) ?9))) (: (O_Sub ?10 (: (O_Full ?11) (: (O_Sub ?12 ?13) ?14))) ?15))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: (O_Sub ?8 ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Sub ?4 ?5) ?6))) (: (O_Sub ?7 (: (O_Full ?8) (: (O_Sub ?9 ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: (O_Full ?9) (: (O_Sub ?10 ?11) ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: ?5 ([]))))) (: (O_Sub ?6 ?7) ?8))) (: (O_Sub ?9 (: (O_Full ?10) (: (O_Sub ?11 ?12) ?13))) ?14))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: (O_Sub ?8 ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Sub ?4 ?5) ?6))) (: (O_Sub ?7 (: (O_Full ?8) (: (O_Sub ?9 ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: (O_Full ?9) (: (O_Sub ?10 ?11) ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ?3) (: (O_Sub ?4 ?5) ?6))) (: (O_Sub ?7 (: (O_Sub ?8 ?9) ([]))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: O_Empty ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty ([]))) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: O_Empty ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: O_Empty ?3))) (: (O_Sub ?4 ([])) ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: O_Empty ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: O_Empty ?3))) (: (O_Sub ?4 (: O_Empty ([]))) ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: O_Empty ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: O_Empty ?3))) (: (O_Sub ?4 (: (O_Sub ?5 ?6) ([]))) ?7))) (: (O_Sub ?8 (: (O_Sub ?9 ?10) (: O_Empty ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 ([])) ?7))) (: (O_Sub ?8 (: (O_Sub ?9 ?10) (: O_Empty ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: O_Empty ([]))) ?7))) (: (O_Sub ?8 (: (O_Sub ?9 ?10) (: O_Empty ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: (O_Full ?7) ([]))) ?8))) (: (O_Sub ?9 (: (O_Sub ?10 ?11) (: O_Empty ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) ([]))) ?9))) (: (O_Sub ?10 (: (O_Sub ?11 ?12) (: O_Empty ?13))) ?14))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: (O_Sub ?9 ?10) (: O_Empty ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) (: (O_Sub ?6 ([])) ?7))) (: (O_Sub ?8 (: (O_Sub ?9 ?10) (: O_Empty ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) (: (O_Sub ?6 (: O_Empty ([]))) ?7))) (: (O_Sub ?8 (: (O_Sub ?9 ?10) (: O_Empty ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) (: (O_Sub ?6 (: (O_Full ?7) ([]))) ?8))) (: (O_Sub ?9 (: (O_Sub ?10 ?11) (: O_Empty ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) ([]))) ?9))) (: (O_Sub ?10 (: (O_Sub ?11 ?12) (: O_Empty ?13))) ?14))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) (: (O_Sub ?7 ([])) ?8))) (: (O_Sub ?9 (: (O_Sub ?10 ?11) (: O_Empty ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: O_Empty ([]))) ?8))) (: (O_Sub ?9 (: (O_Sub ?10 ?11) (: O_Empty ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: (O_Full ?8) ([]))) ?9))) (: (O_Sub ?10 (: (O_Sub ?11 ?12) (: O_Empty ?13))) ?14))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: (O_Sub ?8 ?9) ([]))) ?10))) (: (O_Sub ?11 (: (O_Sub ?12 ?13) (: O_Empty ?14))) ?15))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 ([])) ?9))) (: (O_Sub ?10 (: (O_Sub ?11 ?12) (: O_Empty ?13))) ?14))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: O_Empty ([]))) ?9))) (: (O_Sub ?10 (: (O_Sub ?11 ?12) (: O_Empty ?13))) ?14))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: (O_Full ?9) ([]))) ?10))) (: (O_Sub ?11 (: (O_Sub ?12 ?13) (: O_Empty ?14))) ?15))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: (O_Sub ?9 ?10) ([]))) ?11))) (: (O_Sub ?12 (: (O_Sub ?13 ?14) (: O_Empty ?15))) ?16))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: O_Empty ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Sub ?4 ?5) ?6))) (: (O_Sub ?7 (: (O_Sub ?8 ?9) (: O_Empty ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: (O_Sub ?9 ?10) (: O_Empty ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: O_Empty ([]))))) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: (O_Sub ?9 ?10) (: O_Empty ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: (O_Sub ?5 ?6) ([]))))) (: (O_Sub ?7 ?8) ?9))) (: (O_Sub ?10 (: (O_Sub ?11 ?12) (: O_Empty ?13))) ?14))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: O_Empty ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Sub ?4 ?5) ?6))) (: (O_Sub ?7 (: (O_Sub ?8 ?9) (: O_Empty ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: (O_Sub ?9 ?10) (: O_Empty ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: ?5 ([]))))) (: (O_Sub ?6 ?7) ?8))) (: (O_Sub ?9 (: (O_Sub ?10 ?11) (: O_Empty ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: O_Empty ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Sub ?4 ?5) ?6))) (: (O_Sub ?7 (: (O_Sub ?8 ?9) (: O_Empty ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: (O_Sub ?9 ?10) (: O_Empty ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: (O_Full ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty ([]))) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: (O_Full ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: O_Empty ?3))) (: (O_Sub ?4 ([])) ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: (O_Full ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: O_Empty ?3))) (: (O_Sub ?4 (: O_Empty ([]))) ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: (O_Full ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: O_Empty ?3))) (: (O_Sub ?4 (: (O_Sub ?5 ?6) ([]))) ?7))) (: (O_Sub ?8 (: (O_Sub ?9 ?10) (: (O_Full ?11) ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 ([])) ?7))) (: (O_Sub ?8 (: (O_Sub ?9 ?10) (: (O_Full ?11) ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: O_Empty ([]))) ?7))) (: (O_Sub ?8 (: (O_Sub ?9 ?10) (: (O_Full ?11) ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: (O_Full ?7) ([]))) ?8))) (: (O_Sub ?9 (: (O_Sub ?10 ?11) (: (O_Full ?12) ?13))) ?14))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) ([]))) ?9))) (: (O_Sub ?10 (: (O_Sub ?11 ?12) (: (O_Full ?13) ?14))) ?15))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: (O_Sub ?9 ?10) (: (O_Full ?11) ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) (: (O_Sub ?6 ([])) ?7))) (: (O_Sub ?8 (: (O_Sub ?9 ?10) (: (O_Full ?11) ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) (: (O_Sub ?6 (: O_Empty ([]))) ?7))) (: (O_Sub ?8 (: (O_Sub ?9 ?10) (: (O_Full ?11) ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) (: (O_Sub ?6 (: (O_Full ?7) ([]))) ?8))) (: (O_Sub ?9 (: (O_Sub ?10 ?11) (: (O_Full ?12) ?13))) ?14))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) ([]))) ?9))) (: (O_Sub ?10 (: (O_Sub ?11 ?12) (: (O_Full ?13) ?14))) ?15))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) (: (O_Sub ?7 ([])) ?8))) (: (O_Sub ?9 (: (O_Sub ?10 ?11) (: (O_Full ?12) ?13))) ?14))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: O_Empty ([]))) ?8))) (: (O_Sub ?9 (: (O_Sub ?10 ?11) (: (O_Full ?12) ?13))) ?14))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: (O_Full ?8) ([]))) ?9))) (: (O_Sub ?10 (: (O_Sub ?11 ?12) (: (O_Full ?13) ?14))) ?15))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: (O_Sub ?8 ?9) ([]))) ?10))) (: (O_Sub ?11 (: (O_Sub ?12 ?13) (: (O_Full ?14) ?15))) ?16))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 ([])) ?9))) (: (O_Sub ?10 (: (O_Sub ?11 ?12) (: (O_Full ?13) ?14))) ?15))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: O_Empty ([]))) ?9))) (: (O_Sub ?10 (: (O_Sub ?11 ?12) (: (O_Full ?13) ?14))) ?15))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: (O_Full ?9) ([]))) ?10))) (: (O_Sub ?11 (: (O_Sub ?12 ?13) (: (O_Full ?14) ?15))) ?16))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: (O_Sub ?9 ?10) ([]))) ?11))) (: (O_Sub ?12 (: (O_Sub ?13 ?14) (: (O_Full ?15) ?16))) ?17))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: (O_Full ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Sub ?4 ?5) ?6))) (: (O_Sub ?7 (: (O_Sub ?8 ?9) (: (O_Full ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: (O_Sub ?9 ?10) (: (O_Full ?11) ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: O_Empty ([]))))) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: (O_Sub ?9 ?10) (: (O_Full ?11) ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: (O_Sub ?5 ?6) ([]))))) (: (O_Sub ?7 ?8) ?9))) (: (O_Sub ?10 (: (O_Sub ?11 ?12) (: (O_Full ?13) ?14))) ?15))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: (O_Full ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Sub ?4 ?5) ?6))) (: (O_Sub ?7 (: (O_Sub ?8 ?9) (: (O_Full ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: (O_Sub ?9 ?10) (: (O_Full ?11) ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: ?5 ([]))))) (: (O_Sub ?6 ?7) ?8))) (: (O_Sub ?9 (: (O_Sub ?10 ?11) (: (O_Full ?12) ?13))) ?14))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: (O_Full ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Sub ?4 ?5) ?6))) (: (O_Sub ?7 (: (O_Sub ?8 ?9) (: (O_Full ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: (O_Sub ?9 ?10) (: (O_Full ?11) ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: (O_Sub ?9 ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty ([]))) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: (O_Sub ?9 ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: O_Empty ?3))) (: (O_Sub ?4 ([])) ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: (O_Sub ?9 ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: O_Empty ?3))) (: (O_Sub ?4 (: O_Empty ([]))) ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: (O_Sub ?9 ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: O_Empty ?3))) (: (O_Sub ?4 (: (O_Sub ?5 ?6) ([]))) ?7))) (: (O_Sub ?8 (: (O_Sub ?9 ?10) (: (O_Sub ?11 ?12) ?13))) ?14))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 ([])) ?7))) (: (O_Sub ?8 (: (O_Sub ?9 ?10) (: (O_Sub ?11 ?12) ?13))) ?14))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: O_Empty ([]))) ?7))) (: (O_Sub ?8 (: (O_Sub ?9 ?10) (: (O_Sub ?11 ?12) ?13))) ?14))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: (O_Full ?7) ([]))) ?8))) (: (O_Sub ?9 (: (O_Sub ?10 ?11) (: (O_Sub ?12 ?13) ?14))) ?15))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) ([]))) ?9))) (: (O_Sub ?10 (: (O_Sub ?11 ?12) (: (O_Sub ?13 ?14) ?15))) ?16))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: (O_Sub ?9 ?10) (: (O_Sub ?11 ?12) ?13))) ?14))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) (: (O_Sub ?6 ([])) ?7))) (: (O_Sub ?8 (: (O_Sub ?9 ?10) (: (O_Sub ?11 ?12) ?13))) ?14))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) (: (O_Sub ?6 (: O_Empty ([]))) ?7))) (: (O_Sub ?8 (: (O_Sub ?9 ?10) (: (O_Sub ?11 ?12) ?13))) ?14))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) (: (O_Sub ?6 (: (O_Full ?7) ([]))) ?8))) (: (O_Sub ?9 (: (O_Sub ?10 ?11) (: (O_Sub ?12 ?13) ?14))) ?15))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) ([]))) ?9))) (: (O_Sub ?10 (: (O_Sub ?11 ?12) (: (O_Sub ?13 ?14) ?15))) ?16))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) (: (O_Sub ?7 ([])) ?8))) (: (O_Sub ?9 (: (O_Sub ?10 ?11) (: (O_Sub ?12 ?13) ?14))) ?15))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: O_Empty ([]))) ?8))) (: (O_Sub ?9 (: (O_Sub ?10 ?11) (: (O_Sub ?12 ?13) ?14))) ?15))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: (O_Full ?8) ([]))) ?9))) (: (O_Sub ?10 (: (O_Sub ?11 ?12) (: (O_Sub ?13 ?14) ?15))) ?16))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: (O_Sub ?8 ?9) ([]))) ?10))) (: (O_Sub ?11 (: (O_Sub ?12 ?13) (: (O_Sub ?14 ?15) ?16))) ?17))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 ([])) ?9))) (: (O_Sub ?10 (: (O_Sub ?11 ?12) (: (O_Sub ?13 ?14) ?15))) ?16))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: O_Empty ([]))) ?9))) (: (O_Sub ?10 (: (O_Sub ?11 ?12) (: (O_Sub ?13 ?14) ?15))) ?16))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: (O_Full ?9) ([]))) ?10))) (: (O_Sub ?11 (: (O_Sub ?12 ?13) (: (O_Sub ?14 ?15) ?16))) ?17))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: (O_Sub ?9 ?10) ([]))) ?11))) (: (O_Sub ?12 (: (O_Sub ?13 ?14) (: (O_Sub ?15 ?16) ?17))) ?18))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: (O_Sub ?9 ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Sub ?4 ?5) ?6))) (: (O_Sub ?7 (: (O_Sub ?8 ?9) (: (O_Sub ?10 ?11) ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: (O_Sub ?9 ?10) (: (O_Sub ?11 ?12) ?13))) ?14))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: O_Empty ([]))))) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: (O_Sub ?9 ?10) (: (O_Sub ?11 ?12) ?13))) ?14))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: (O_Sub ?5 ?6) ([]))))) (: (O_Sub ?7 ?8) ?9))) (: (O_Sub ?10 (: (O_Sub ?11 ?12) (: (O_Sub ?13 ?14) ?15))) ?16))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: (O_Sub ?9 ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Sub ?4 ?5) ?6))) (: (O_Sub ?7 (: (O_Sub ?8 ?9) (: (O_Sub ?10 ?11) ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: (O_Sub ?9 ?10) (: (O_Sub ?11 ?12) ?13))) ?14))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: ?5 ([]))))) (: (O_Sub ?6 ?7) ?8))) (: (O_Sub ?9 (: (O_Sub ?10 ?11) (: (O_Sub ?12 ?13) ?14))) ?15))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: (O_Sub ?9 ?10) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Sub ?4 ?5) ?6))) (: (O_Sub ?7 (: (O_Sub ?8 ?9) (: (O_Sub ?10 ?11) ?12))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: (O_Sub ?9 ?10) (: (O_Sub ?11 ?12) ?13))) ?14))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 ([])) (: (O_Sub ?2 ?3) ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 ([]))) (: (O_Sub ?3 ?4) ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 ([])))) (: (O_Sub ?4 ?5) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: O_Empty ([]))))) (: (O_Sub ?4 ?5) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: O_Empty (: O_Empty ?4))))) (: (O_Sub ?5 ([])) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: O_Empty (: O_Empty ?4))))) (: (O_Sub ?5 (: ?6 ([]))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: O_Empty (: O_Empty ?4))))) (: (O_Sub ?5 (: ?6 (: ?7 ([])))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:44:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: O_Empty (: O_Empty ?4))))) (: (O_Sub ?5 (: ?6 (: ?7 (: O_Empty ([]))))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:44:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: O_Empty (: O_Empty ?4))))) (: (O_Sub ?5 (: ?6 (: ?7 (: O_Empty (: (O_Sub ?8 ([])) ?9))))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: O_Empty (: O_Empty ?4))))) (: (O_Sub ?5 (: ?6 (: ?7 (: (O_Sub ?8 ?9) ([]))))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:44:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: O_Empty (: O_Empty ?4))))) (: (O_Sub ?5 (: ?6 (: ?7 (: (O_Sub ?8 ([])) (: O_Empty ?9))))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: O_Empty (: O_Empty ?4))))) (: (O_Sub ?5 (: ?6 (: ?7 (: (O_Sub ?8 ([])) (: O_Empty ?9))))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: O_Empty (: O_Empty ?4))))) (: (O_Sub ?5 (: ?6 (: ?7 (: (O_Sub ?8 ([])) (: (O_Full ?9) ?10))))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: O_Empty (: O_Empty ?4))))) (: (O_Sub ?5 (: ?6 (: ?7 (: (O_Sub ?8 ([])) (: (O_Full ?9) ?10))))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: O_Empty (: O_Empty ?4))))) (: (O_Sub ?5 (: ?6 (: ?7 (: (O_Sub ?8 ([])) (: (O_Sub ?9 ?10) ?11))))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: O_Empty (: O_Empty ?4))))) (: (O_Sub ?5 (: ?6 (: ?7 (: (O_Sub ?8 ([])) (: (O_Sub ?9 ?10) ?11))))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: O_Empty (: (O_Sub ?4 ?5) ?6))))) (: (O_Sub ?7 ([])) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: O_Empty (: (O_Sub ?4 ?5) ?6))))) (: (O_Sub ?7 (: ?8 ([]))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: O_Empty (: (O_Sub ?4 ?5) ?6))))) (: (O_Sub ?7 (: ?8 (: ?9 ([])))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:44:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: O_Empty (: (O_Sub ?4 ?5) ?6))))) (: (O_Sub ?7 (: ?8 (: ?9 (: O_Empty ([]))))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:44:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: O_Empty (: (O_Sub ?4 ([])) ?5))))) (: (O_Sub ?6 (: ?7 (: ?8 (: O_Empty (: O_Empty ?9))))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: O_Empty (: (O_Sub ?4 ([])) ?5))))) (: (O_Sub ?6 (: ?7 (: ?8 (: O_Empty (: O_Empty ?9))))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: O_Empty (: (O_Sub ?4 ([])) ?5))))) (: (O_Sub ?6 (: ?7 (: ?8 (: O_Empty (: (O_Full ?9) ?10))))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: O_Empty (: (O_Sub ?4 ([])) ?5))))) (: (O_Sub ?6 (: ?7 (: ?8 (: O_Empty (: (O_Full ?9) ?10))))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: O_Empty (: (O_Sub ?4 ([])) ?5))))) (: (O_Sub ?6 (: ?7 (: ?8 (: O_Empty (: (O_Sub ?9 ?10) ?11))))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: O_Empty (: (O_Sub ?4 ([])) ?5))))) (: (O_Sub ?6 (: ?7 (: ?8 (: O_Empty (: (O_Sub ?9 ?10) ?11))))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: O_Empty (: (O_Sub ?4 ?5) ?6))))) (: (O_Sub ?7 (: ?8 (: ?9 (: (O_Full ?10) ([]))))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:44:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: O_Empty (: (O_Sub ?4 ([])) ?5))))) (: (O_Sub ?6 (: ?7 (: ?8 (: (O_Full ?9) (: O_Empty ?10))))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: O_Empty (: (O_Sub ?4 ([])) ?5))))) (: (O_Sub ?6 (: ?7 (: ?8 (: (O_Full ?9) (: O_Empty ?10))))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: O_Empty (: (O_Sub ?4 ([])) ?5))))) (: (O_Sub ?6 (: ?7 (: ?8 (: (O_Full ?9) (: (O_Full ?10) ?11))))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: O_Empty (: (O_Sub ?4 ([])) ?5))))) (: (O_Sub ?6 (: ?7 (: ?8 (: (O_Full ?9) (: (O_Full ?10) ?11))))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: O_Empty (: (O_Sub ?4 ([])) ?5))))) (: (O_Sub ?6 (: ?7 (: ?8 (: (O_Full ?9) (: (O_Sub ?10 ?11) ?12))))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: O_Empty (: (O_Sub ?4 ([])) ?5))))) (: (O_Sub ?6 (: ?7 (: ?8 (: (O_Full ?9) (: (O_Sub ?10 ?11) ?12))))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: O_Empty (: (O_Sub ?4 ?5) ?6))))) (: (O_Sub ?7 (: ?8 (: ?9 (: (O_Sub ?10 ?11) ([]))))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:44:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: O_Empty (: (O_Sub ?4 ([])) ?5))))) (: (O_Sub ?6 (: ?7 (: ?8 (: (O_Sub ?9 ?10) (: O_Empty ?11))))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: O_Empty (: (O_Sub ?4 ([])) ?5))))) (: (O_Sub ?6 (: ?7 (: ?8 (: (O_Sub ?9 ?10) (: O_Empty ?11))))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: O_Empty (: (O_Sub ?4 ([])) ?5))))) (: (O_Sub ?6 (: ?7 (: ?8 (: (O_Sub ?9 ?10) (: (O_Full ?11) ?12))))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: O_Empty (: (O_Sub ?4 ([])) ?5))))) (: (O_Sub ?6 (: ?7 (: ?8 (: (O_Sub ?9 ?10) (: (O_Full ?11) ?12))))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: O_Empty (: (O_Sub ?4 ([])) ?5))))) (: (O_Sub ?6 (: ?7 (: ?8 (: (O_Sub ?9 ?10) (: (O_Sub ?11 ?12) ?13))))) ?14))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: O_Empty (: (O_Sub ?4 ([])) ?5))))) (: (O_Sub ?6 (: ?7 (: ?8 (: (O_Sub ?9 ?10) (: (O_Sub ?11 ?12) ?13))))) ?14))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ?5) ([]))))) (: (O_Sub ?6 ?7) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ?5) (: O_Empty ?6))))) (: (O_Sub ?7 ([])) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ?5) (: O_Empty ?6))))) (: (O_Sub ?7 (: ?8 ([]))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ?5) (: O_Empty ?6))))) (: (O_Sub ?7 (: ?8 (: ?9 ([])))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:44:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ?5) (: O_Empty ?6))))) (: (O_Sub ?7 (: ?8 (: ?9 (: O_Empty ([]))))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:44:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ([])) (: O_Empty ?5))))) (: (O_Sub ?6 (: ?7 (: ?8 (: O_Empty (: O_Empty ?9))))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ([])) (: O_Empty ?5))))) (: (O_Sub ?6 (: ?7 (: ?8 (: O_Empty (: O_Empty ?9))))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ([])) (: O_Empty ?5))))) (: (O_Sub ?6 (: ?7 (: ?8 (: O_Empty (: (O_Full ?9) ?10))))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ([])) (: O_Empty ?5))))) (: (O_Sub ?6 (: ?7 (: ?8 (: O_Empty (: (O_Full ?9) ?10))))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ([])) (: O_Empty ?5))))) (: (O_Sub ?6 (: ?7 (: ?8 (: O_Empty (: (O_Sub ?9 ?10) ?11))))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ([])) (: O_Empty ?5))))) (: (O_Sub ?6 (: ?7 (: ?8 (: O_Empty (: (O_Sub ?9 ?10) ?11))))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ?5) (: O_Empty ?6))))) (: (O_Sub ?7 (: ?8 (: ?9 (: (O_Full ?10) ([]))))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:44:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ([])) (: O_Empty ?5))))) (: (O_Sub ?6 (: ?7 (: ?8 (: (O_Full ?9) (: O_Empty ?10))))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ([])) (: O_Empty ?5))))) (: (O_Sub ?6 (: ?7 (: ?8 (: (O_Full ?9) (: O_Empty ?10))))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ([])) (: O_Empty ?5))))) (: (O_Sub ?6 (: ?7 (: ?8 (: (O_Full ?9) (: (O_Full ?10) ?11))))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ([])) (: O_Empty ?5))))) (: (O_Sub ?6 (: ?7 (: ?8 (: (O_Full ?9) (: (O_Full ?10) ?11))))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ([])) (: O_Empty ?5))))) (: (O_Sub ?6 (: ?7 (: ?8 (: (O_Full ?9) (: (O_Sub ?10 ?11) ?12))))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ([])) (: O_Empty ?5))))) (: (O_Sub ?6 (: ?7 (: ?8 (: (O_Full ?9) (: (O_Sub ?10 ?11) ?12))))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ?5) (: O_Empty ?6))))) (: (O_Sub ?7 (: ?8 (: ?9 (: (O_Sub ?10 ?11) ([]))))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:44:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ([])) (: O_Empty ?5))))) (: (O_Sub ?6 (: ?7 (: ?8 (: (O_Sub ?9 ?10) (: O_Empty ?11))))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ([])) (: O_Empty ?5))))) (: (O_Sub ?6 (: ?7 (: ?8 (: (O_Sub ?9 ?10) (: O_Empty ?11))))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ([])) (: O_Empty ?5))))) (: (O_Sub ?6 (: ?7 (: ?8 (: (O_Sub ?9 ?10) (: (O_Full ?11) ?12))))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ([])) (: O_Empty ?5))))) (: (O_Sub ?6 (: ?7 (: ?8 (: (O_Sub ?9 ?10) (: (O_Full ?11) ?12))))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ([])) (: O_Empty ?5))))) (: (O_Sub ?6 (: ?7 (: ?8 (: (O_Sub ?9 ?10) (: (O_Sub ?11 ?12) ?13))))) ?14))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ([])) (: O_Empty ?5))))) (: (O_Sub ?6 (: ?7 (: ?8 (: (O_Sub ?9 ?10) (: (O_Sub ?11 ?12) ?13))))) ?14))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ?5) (: (O_Full ?6) ?7))))) (: (O_Sub ?8 ([])) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ?5) (: (O_Full ?6) ?7))))) (: (O_Sub ?8 (: ?9 ([]))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ?5) (: (O_Full ?6) ?7))))) (: (O_Sub ?8 (: ?9 (: ?10 ([])))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:44:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ?5) (: (O_Full ?6) ?7))))) (: (O_Sub ?8 (: ?9 (: ?10 (: O_Empty ([]))))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:44:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ([])) (: (O_Full ?5) ?6))))) (: (O_Sub ?7 (: ?8 (: ?9 (: O_Empty (: O_Empty ?10))))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ([])) (: (O_Full ?5) ?6))))) (: (O_Sub ?7 (: ?8 (: ?9 (: O_Empty (: O_Empty ?10))))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ([])) (: (O_Full ?5) ?6))))) (: (O_Sub ?7 (: ?8 (: ?9 (: O_Empty (: (O_Full ?10) ?11))))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ([])) (: (O_Full ?5) ?6))))) (: (O_Sub ?7 (: ?8 (: ?9 (: O_Empty (: (O_Full ?10) ?11))))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ([])) (: (O_Full ?5) ?6))))) (: (O_Sub ?7 (: ?8 (: ?9 (: O_Empty (: (O_Sub ?10 ?11) ?12))))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ([])) (: (O_Full ?5) ?6))))) (: (O_Sub ?7 (: ?8 (: ?9 (: O_Empty (: (O_Sub ?10 ?11) ?12))))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ?5) (: (O_Full ?6) ?7))))) (: (O_Sub ?8 (: ?9 (: ?10 (: (O_Full ?11) ([]))))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:44:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ([])) (: (O_Full ?5) ?6))))) (: (O_Sub ?7 (: ?8 (: ?9 (: (O_Full ?10) (: O_Empty ?11))))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ([])) (: (O_Full ?5) ?6))))) (: (O_Sub ?7 (: ?8 (: ?9 (: (O_Full ?10) (: O_Empty ?11))))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ([])) (: (O_Full ?5) ?6))))) (: (O_Sub ?7 (: ?8 (: ?9 (: (O_Full ?10) (: (O_Full ?11) ?12))))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ([])) (: (O_Full ?5) ?6))))) (: (O_Sub ?7 (: ?8 (: ?9 (: (O_Full ?10) (: (O_Full ?11) ?12))))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ([])) (: (O_Full ?5) ?6))))) (: (O_Sub ?7 (: ?8 (: ?9 (: (O_Full ?10) (: (O_Sub ?11 ?12) ?13))))) ?14))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ([])) (: (O_Full ?5) ?6))))) (: (O_Sub ?7 (: ?8 (: ?9 (: (O_Full ?10) (: (O_Sub ?11 ?12) ?13))))) ?14))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ?5) (: (O_Full ?6) ?7))))) (: (O_Sub ?8 (: ?9 (: ?10 (: (O_Sub ?11 ?12) ([]))))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:44:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ([])) (: (O_Full ?5) ?6))))) (: (O_Sub ?7 (: ?8 (: ?9 (: (O_Sub ?10 ?11) (: O_Empty ?12))))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ([])) (: (O_Full ?5) ?6))))) (: (O_Sub ?7 (: ?8 (: ?9 (: (O_Sub ?10 ?11) (: O_Empty ?12))))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ([])) (: (O_Full ?5) ?6))))) (: (O_Sub ?7 (: ?8 (: ?9 (: (O_Sub ?10 ?11) (: (O_Full ?12) ?13))))) ?14))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ([])) (: (O_Full ?5) ?6))))) (: (O_Sub ?7 (: ?8 (: ?9 (: (O_Sub ?10 ?11) (: (O_Full ?12) ?13))))) ?14))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ([])) (: (O_Full ?5) ?6))))) (: (O_Sub ?7 (: ?8 (: ?9 (: (O_Sub ?10 ?11) (: (O_Sub ?12 ?13) ?14))))) ?15))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ([])) (: (O_Full ?5) ?6))))) (: (O_Sub ?7 (: ?8 (: ?9 (: (O_Sub ?10 ?11) (: (O_Sub ?12 ?13) ?14))))) ?15))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ?5) (: (O_Sub ?6 ?7) ?8))))) (: (O_Sub ?9 ([])) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ?5) (: (O_Sub ?6 ?7) ?8))))) (: (O_Sub ?9 (: ?10 ([]))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ?5) (: (O_Sub ?6 ?7) ?8))))) (: (O_Sub ?9 (: ?10 (: ?11 ([])))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:44:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ?5) (: (O_Sub ?6 ?7) ?8))))) (: (O_Sub ?9 (: ?10 (: ?11 (: O_Empty ([]))))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:44:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ([])) (: (O_Sub ?5 ?6) ?7))))) (: (O_Sub ?8 (: ?9 (: ?10 (: O_Empty (: O_Empty ?11))))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ([])) (: (O_Sub ?5 ?6) ?7))))) (: (O_Sub ?8 (: ?9 (: ?10 (: O_Empty (: O_Empty ?11))))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ([])) (: (O_Sub ?5 ?6) ?7))))) (: (O_Sub ?8 (: ?9 (: ?10 (: O_Empty (: (O_Full ?11) ?12))))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ([])) (: (O_Sub ?5 ?6) ?7))))) (: (O_Sub ?8 (: ?9 (: ?10 (: O_Empty (: (O_Full ?11) ?12))))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ([])) (: (O_Sub ?5 ?6) ?7))))) (: (O_Sub ?8 (: ?9 (: ?10 (: O_Empty (: (O_Sub ?11 ?12) ?13))))) ?14))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ([])) (: (O_Sub ?5 ?6) ?7))))) (: (O_Sub ?8 (: ?9 (: ?10 (: O_Empty (: (O_Sub ?11 ?12) ?13))))) ?14))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ?5) (: (O_Sub ?6 ?7) ?8))))) (: (O_Sub ?9 (: ?10 (: ?11 (: (O_Full ?12) ([]))))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:44:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ([])) (: (O_Sub ?5 ?6) ?7))))) (: (O_Sub ?8 (: ?9 (: ?10 (: (O_Full ?11) (: O_Empty ?12))))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ([])) (: (O_Sub ?5 ?6) ?7))))) (: (O_Sub ?8 (: ?9 (: ?10 (: (O_Full ?11) (: O_Empty ?12))))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ([])) (: (O_Sub ?5 ?6) ?7))))) (: (O_Sub ?8 (: ?9 (: ?10 (: (O_Full ?11) (: (O_Full ?12) ?13))))) ?14))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ([])) (: (O_Sub ?5 ?6) ?7))))) (: (O_Sub ?8 (: ?9 (: ?10 (: (O_Full ?11) (: (O_Full ?12) ?13))))) ?14))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ([])) (: (O_Sub ?5 ?6) ?7))))) (: (O_Sub ?8 (: ?9 (: ?10 (: (O_Full ?11) (: (O_Sub ?12 ?13) ?14))))) ?15))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ([])) (: (O_Sub ?5 ?6) ?7))))) (: (O_Sub ?8 (: ?9 (: ?10 (: (O_Full ?11) (: (O_Sub ?12 ?13) ?14))))) ?15))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ?5) (: (O_Sub ?6 ?7) ?8))))) (: (O_Sub ?9 (: ?10 (: ?11 (: (O_Sub ?12 ?13) ([]))))) ?14))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:44:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ([])) (: (O_Sub ?5 ?6) ?7))))) (: (O_Sub ?8 (: ?9 (: ?10 (: (O_Sub ?11 ?12) (: O_Empty ?13))))) ?14))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ([])) (: (O_Sub ?5 ?6) ?7))))) (: (O_Sub ?8 (: ?9 (: ?10 (: (O_Sub ?11 ?12) (: O_Empty ?13))))) ?14))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ([])) (: (O_Sub ?5 ?6) ?7))))) (: (O_Sub ?8 (: ?9 (: ?10 (: (O_Sub ?11 ?12) (: (O_Full ?13) ?14))))) ?15))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ([])) (: (O_Sub ?5 ?6) ?7))))) (: (O_Sub ?8 (: ?9 (: ?10 (: (O_Sub ?11 ?12) (: (O_Full ?13) ?14))))) ?15))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ([])) (: (O_Sub ?5 ?6) ?7))))) (: (O_Sub ?8 (: ?9 (: ?10 (: (O_Sub ?11 ?12) (: (O_Sub ?13 ?14) ?15))))) ?16))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: (O_Sub ?4 ([])) (: (O_Sub ?5 ?6) ?7))))) (: (O_Sub ?8 (: ?9 (: ?10 (: (O_Sub ?11 ?12) (: (O_Sub ?13 ?14) ?15))))) ?16))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 ([])) (: (O_Sub ?2 ?3) ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 ([]))) (: (O_Sub ?3 ?4) ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 ([])))) (: (O_Sub ?4 ?5) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 ([]))))) (: (O_Sub ?5 ?6) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 (: ?5 ([])))))) (: (O_Sub ?6 ?7) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:35:21-34: Irrefutable pattern failed for pattern (l4 : ll5) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 (: ?5 (: O_Empty ([]))))))) (: (O_Sub ?6 ?7) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:35:38-51: Irrefutable pattern failed for pattern (l5 : ll6) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 (: ?5 (: O_Empty (: O_Empty ?6))))))) (: (O_Sub ?7 ([])) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 (: ?5 (: O_Empty (: O_Empty ?6))))))) (: (O_Sub ?7 (: ?8 ([]))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 (: ?5 (: O_Empty (: O_Empty ?6))))))) (: (O_Sub ?7 (: ?8 (: ?9 ([])))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:44:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 (: ?5 (: O_Empty (: O_Empty ?6))))))) (: (O_Sub ?7 (: ?8 (: ?9 (: ?10 ([]))))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:44:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 (: ?5 (: O_Empty (: O_Empty ?6))))))) (: (O_Sub ?7 (: ?8 (: ?9 (: ?10 (: ?11 ([])))))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:45:21-34: Irrefutable pattern failed for pattern (l4 : ll5) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 (: ?5 (: O_Empty (: O_Empty ?6))))))) (: (O_Sub ?7 (: ?8 (: ?9 (: ?10 (: ?11 (: O_Empty ([]))))))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:45:38-51: Irrefutable pattern failed for pattern (l5 : ll6) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 (: ?5 (: O_Empty (: O_Empty ?6))))))) (: (O_Sub ?7 (: ?8 (: ?9 (: ?10 (: ?11 (: (O_Sub ?12 ?13) ([]))))))) ?14))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:45:38-51: Irrefutable pattern failed for pattern (l5 : ll6) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 (: ?5 (: O_Empty (: (O_Sub ?6 ?7) ?8))))))) (: (O_Sub ?9 ([])) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 (: ?5 (: O_Empty (: (O_Sub ?6 ?7) ?8))))))) (: (O_Sub ?9 (: ?10 ([]))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 (: ?5 (: O_Empty (: (O_Sub ?6 ?7) ?8))))))) (: (O_Sub ?9 (: ?10 (: ?11 ([])))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:44:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 (: ?5 (: O_Empty (: (O_Sub ?6 ?7) ?8))))))) (: (O_Sub ?9 (: ?10 (: ?11 (: ?12 ([]))))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:44:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 (: ?5 (: O_Empty (: (O_Sub ?6 ?7) ?8))))))) (: (O_Sub ?9 (: ?10 (: ?11 (: ?12 (: ?13 ([])))))) ?14))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:45:21-34: Irrefutable pattern failed for pattern (l4 : ll5) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 (: ?5 (: O_Empty (: (O_Sub ?6 ?7) ?8))))))) (: (O_Sub ?9 (: ?10 (: ?11 (: ?12 (: ?13 (: O_Empty ([]))))))) ?14))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:45:38-51: Irrefutable pattern failed for pattern (l5 : ll6) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 (: ?5 (: O_Empty (: (O_Sub ?6 ?7) ?8))))))) (: (O_Sub ?9 (: ?10 (: ?11 (: ?12 (: ?13 (: (O_Full ?14) ([]))))))) ?15))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:45:38-51: Irrefutable pattern failed for pattern (l5 : ll6) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 (: ?5 (: O_Empty (: (O_Sub ?6 ?7) ?8))))))) (: (O_Sub ?9 (: ?10 (: ?11 (: ?12 (: ?13 (: (O_Sub ?14 ?15) ([]))))))) ?16))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:45:38-51: Irrefutable pattern failed for pattern (l5 : ll6) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 (: ?5 (: (O_Sub ?6 ?7) ([]))))))) (: (O_Sub ?8 ?9) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:35:38-51: Irrefutable pattern failed for pattern (l5 : ll6) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 (: ?5 (: (O_Sub ?6 ?7) (: O_Empty ?8))))))) (: (O_Sub ?9 ([])) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 (: ?5 (: (O_Sub ?6 ?7) (: O_Empty ?8))))))) (: (O_Sub ?9 (: ?10 ([]))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 (: ?5 (: (O_Sub ?6 ?7) (: O_Empty ?8))))))) (: (O_Sub ?9 (: ?10 (: ?11 ([])))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:44:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 (: ?5 (: (O_Sub ?6 ?7) (: O_Empty ?8))))))) (: (O_Sub ?9 (: ?10 (: ?11 (: ?12 ([]))))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:44:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 (: ?5 (: (O_Sub ?6 ?7) (: O_Empty ?8))))))) (: (O_Sub ?9 (: ?10 (: ?11 (: ?12 (: ?13 ([])))))) ?14))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:45:21-34: Irrefutable pattern failed for pattern (l4 : ll5) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 (: ?5 (: (O_Sub ?6 ?7) (: O_Empty ?8))))))) (: (O_Sub ?9 (: ?10 (: ?11 (: ?12 (: ?13 (: O_Empty ([]))))))) ?14))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:45:38-51: Irrefutable pattern failed for pattern (l5 : ll6) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 (: ?5 (: (O_Sub ?6 ?7) (: O_Empty ?8))))))) (: (O_Sub ?9 (: ?10 (: ?11 (: ?12 (: ?13 (: (O_Full ?14) ([]))))))) ?15))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:45:38-51: Irrefutable pattern failed for pattern (l5 : ll6) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 (: ?5 (: (O_Sub ?6 ?7) (: O_Empty ?8))))))) (: (O_Sub ?9 (: ?10 (: ?11 (: ?12 (: ?13 (: (O_Sub ?14 ?15) ([]))))))) ?16))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:45:38-51: Irrefutable pattern failed for pattern (l5 : ll6) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 (: ?5 (: (O_Sub ?6 ?7) (: (O_Full ?8) ?9))))))) (: (O_Sub ?10 ([])) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 (: ?5 (: (O_Sub ?6 ?7) (: (O_Full ?8) ?9))))))) (: (O_Sub ?10 (: ?11 ([]))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 (: ?5 (: (O_Sub ?6 ?7) (: (O_Full ?8) ?9))))))) (: (O_Sub ?10 (: ?11 (: ?12 ([])))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:44:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 (: ?5 (: (O_Sub ?6 ?7) (: (O_Full ?8) ?9))))))) (: (O_Sub ?10 (: ?11 (: ?12 (: ?13 ([]))))) ?14))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:44:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 (: ?5 (: (O_Sub ?6 ?7) (: (O_Full ?8) ?9))))))) (: (O_Sub ?10 (: ?11 (: ?12 (: ?13 (: ?14 ([])))))) ?15))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:45:21-34: Irrefutable pattern failed for pattern (l4 : ll5) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 (: ?5 (: (O_Sub ?6 ?7) (: (O_Full ?8) ?9))))))) (: (O_Sub ?10 (: ?11 (: ?12 (: ?13 (: ?14 (: O_Empty ([]))))))) ?15))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:45:38-51: Irrefutable pattern failed for pattern (l5 : ll6) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 (: ?5 (: (O_Sub ?6 ?7) (: (O_Full ?8) ?9))))))) (: (O_Sub ?10 (: ?11 (: ?12 (: ?13 (: ?14 (: (O_Full ?15) ([]))))))) ?16))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:45:38-51: Irrefutable pattern failed for pattern (l5 : ll6) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 (: ?5 (: (O_Sub ?6 ?7) (: (O_Full ?8) ?9))))))) (: (O_Sub ?10 (: ?11 (: ?12 (: ?13 (: ?14 (: (O_Sub ?15 ?16) ([]))))))) ?17))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:45:38-51: Irrefutable pattern failed for pattern (l5 : ll6) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 (: ?5 (: (O_Sub ?6 ?7) (: (O_Sub ?8 ?9) ?10))))))) (: (O_Sub ?11 ([])) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 (: ?5 (: (O_Sub ?6 ?7) (: (O_Sub ?8 ?9) ?10))))))) (: (O_Sub ?11 (: ?12 ([]))) ?13))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 (: ?5 (: (O_Sub ?6 ?7) (: (O_Sub ?8 ?9) ?10))))))) (: (O_Sub ?11 (: ?12 (: ?13 ([])))) ?14))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:44:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 (: ?5 (: (O_Sub ?6 ?7) (: (O_Sub ?8 ?9) ?10))))))) (: (O_Sub ?11 (: ?12 (: ?13 (: ?14 ([]))))) ?15))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:44:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 (: ?5 (: (O_Sub ?6 ?7) (: (O_Sub ?8 ?9) ?10))))))) (: (O_Sub ?11 (: ?12 (: ?13 (: ?14 (: ?15 ([])))))) ?16))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:45:21-34: Irrefutable pattern failed for pattern (l4 : ll5) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 (: ?5 (: (O_Sub ?6 ?7) (: (O_Sub ?8 ?9) ?10))))))) (: (O_Sub ?11 (: ?12 (: ?13 (: ?14 (: ?15 (: O_Empty ([]))))))) ?16))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:45:38-51: Irrefutable pattern failed for pattern (l5 : ll6) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 (: ?5 (: (O_Sub ?6 ?7) (: (O_Sub ?8 ?9) ?10))))))) (: (O_Sub ?11 (: ?12 (: ?13 (: ?14 (: ?15 (: (O_Full ?16) ([]))))))) ?17))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:45:38-51: Irrefutable pattern failed for pattern (l5 : ll6) case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 (: ?5 (: (O_Sub ?6 ?7) (: (O_Sub ?8 ?9) ?10))))))) (: (O_Sub ?11 (: ?12 (: ?13 (: ?14 (: ?15 (: (O_Sub ?16 ?17) ([]))))))) ?18))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:45:38-51: Irrefutable pattern failed for pattern (l5 : ll6) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 ([])) (: (O_Sub ?2 ?3) ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 ([]))) (: (O_Sub ?3 ?4) ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 ([])))) (: (O_Sub ?4 ?5) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 ([]))))) (: (O_Sub ?5 ?6) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 (: ?5 ([])))))) (: (O_Sub ?6 ?7) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:35:21-34: Irrefutable pattern failed for pattern (l4 : ll5) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 (: ?5 (: ?6 ([]))))))) (: (O_Sub ?7 ?8) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:35:38-51: Irrefutable pattern failed for pattern (l5 : ll6) case case case case case case case quadoct (O_Sub ? (: (O_Sub ?1 (: ?2 (: ?3 (: ?4 (: ?5 (: ?6 (: ?7 ([])))))))) (: (O_Sub ?8 ?9) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:36:21-34: Irrefutable pattern failed for pattern (l6 : ll7) case case case quadoct (O_Sub ? ([])) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case quadoct (O_Sub ? (: ?1 ([]))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case quadoct (O_Sub ? (: ?1 (: ?2 ([])))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case quadoct (O_Sub ? (: ?1 (: ?2 (: O_Empty ([]))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: O_Empty (: (O_Sub ?3 ([])) ?4))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: O_Empty (: (O_Sub ?3 (: O_Empty ([]))) ?4))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: O_Empty (: (O_Sub ?3 (: O_Empty (: (O_Sub ?4 ([])) ?5))) ?6))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: O_Empty (: (O_Sub ?3 (: (O_Sub ?4 ?5) ([]))) ?6))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: O_Empty (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: O_Empty ?5))) ?6))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: O_Empty (: (O_Sub ?3 (: (O_Sub ?4 (: O_Empty ([]))) (: O_Empty ?5))) ?6))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: O_Empty (: (O_Sub ?3 (: (O_Sub ?4 (: (O_Sub ?5 ?6) ([]))) (: O_Empty ?7))) ?8))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: O_Empty (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: O_Empty ?5))) ?6))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: O_Empty (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: (O_Full ?5) ?6))) ?7))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: O_Empty (: (O_Sub ?3 (: (O_Sub ?4 (: O_Empty ([]))) (: (O_Full ?5) ?6))) ?7))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: O_Empty (: (O_Sub ?3 (: (O_Sub ?4 (: (O_Sub ?5 ?6) ([]))) (: (O_Full ?7) ?8))) ?9))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: O_Empty (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: (O_Full ?5) ?6))) ?7))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: O_Empty (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: (O_Sub ?5 ?6) ?7))) ?8))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: O_Empty (: (O_Sub ?3 (: (O_Sub ?4 (: O_Empty ([]))) (: (O_Sub ?5 ?6) ?7))) ?8))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: O_Empty (: (O_Sub ?3 (: (O_Sub ?4 (: (O_Sub ?5 ?6) ([]))) (: (O_Sub ?7 ?8) ?9))) ?10))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: O_Empty (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: (O_Sub ?5 ?6) ?7))) ?8))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: O_Empty (: (O_Sub ?3 ([])) ?4))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: O_Empty (: (O_Sub ?3 (: ?4 ([]))) ?5))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: O_Empty (: (O_Sub ?3 (: ?4 (: ?5 ([])))) ?6))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: O_Empty (: (O_Sub ?3 (: ?4 (: ?5 (: O_Empty ([]))))) ?6))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: O_Empty (: (O_Sub ?3 (: ?4 (: ?5 (: (O_Sub ?6 ?7) ([]))))) ?8))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: O_Empty (: (O_Sub ?3 ([])) ?4))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: O_Empty (: (O_Sub ?3 (: ?4 ([]))) ?5))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: O_Empty (: (O_Sub ?3 (: ?4 (: ?5 ([])))) ?6))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: O_Empty (: (O_Sub ?3 (: ?4 (: ?5 (: ?6 ([]))))) ?7))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: O_Empty (: (O_Sub ?3 ([])) ?4))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: O_Empty (: (O_Sub ?3 (: ?4 ([]))) ?5))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: O_Empty (: (O_Sub ?3 (: ?4 (: ?5 ([])))) ?6))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 ?4) ([]))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 ([])) (: O_Empty ?4))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: O_Empty ([]))) (: O_Empty ?4))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: O_Empty (: (O_Sub ?4 ([])) ?5))) (: O_Empty ?6))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: O_Empty (: (O_Sub ?4 (: O_Empty ([]))) ?5))) (: O_Empty ?6))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: O_Empty (: (O_Sub ?4 (: (O_Sub ?5 ?6) ([]))) ?7))) (: O_Empty ?8))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: O_Empty (: (O_Sub ?4 ([])) ?5))) (: O_Empty ?6))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ?5) ([]))) (: O_Empty ?6))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: O_Empty ?5))) (: O_Empty ?6))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 (: O_Empty ([]))) (: O_Empty ?5))) (: O_Empty ?6))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 (: (O_Sub ?5 ?6) ([]))) (: O_Empty ?7))) (: O_Empty ?8))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: O_Empty ?5))) (: O_Empty ?6))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 (: ?5 ([]))) (: O_Empty ?6))) (: O_Empty ?7))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: O_Empty ?5))) (: O_Empty ?6))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: (O_Full ?5) ?6))) (: O_Empty ?7))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 (: O_Empty ([]))) (: (O_Full ?5) ?6))) (: O_Empty ?7))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 (: (O_Sub ?5 ?6) ([]))) (: (O_Full ?7) ?8))) (: O_Empty ?9))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: (O_Full ?5) ?6))) (: O_Empty ?7))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 (: ?5 ([]))) (: (O_Full ?6) ?7))) (: O_Empty ?8))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: (O_Full ?5) ?6))) (: O_Empty ?7))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: (O_Sub ?5 ?6) ?7))) (: O_Empty ?8))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 (: O_Empty ([]))) (: (O_Sub ?5 ?6) ?7))) (: O_Empty ?8))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 (: O_Empty (: O_Empty ?5))) (: (O_Sub ?6 ([])) ?7))) (: O_Empty ?8))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 (: O_Empty (: O_Empty ?5))) (: (O_Sub ?6 (: O_Empty ([]))) ?7))) (: O_Empty ?8))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 (: O_Empty (: O_Empty ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) ([]))) ?9))) (: O_Empty ?10))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 (: O_Empty (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 ([])) ?9))) (: O_Empty ?10))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 (: O_Empty (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: O_Empty ([]))) ?9))) (: O_Empty ?10))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 (: O_Empty (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: (O_Full ?9) ([]))) ?10))) (: O_Empty ?11))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 (: O_Empty (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: (O_Sub ?9 ?10) ([]))) ?11))) (: O_Empty ?12))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 (: (O_Sub ?5 ?6) ([]))) (: (O_Sub ?7 ?8) ?9))) (: O_Empty ?10))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: O_Empty ?7))) (: (O_Sub ?8 ([])) ?9))) (: O_Empty ?10))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: O_Empty ?7))) (: (O_Sub ?8 (: O_Empty ([]))) ?9))) (: O_Empty ?10))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: O_Empty ?7))) (: (O_Sub ?8 (: (O_Full ?9) ([]))) ?10))) (: O_Empty ?11))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: O_Empty ?7))) (: (O_Sub ?8 (: (O_Sub ?9 ?10) ([]))) ?11))) (: O_Empty ?12))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: (O_Full ?7) ?8))) (: (O_Sub ?9 ([])) ?10))) (: O_Empty ?11))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: (O_Full ?7) ?8))) (: (O_Sub ?9 (: O_Empty ([]))) ?10))) (: O_Empty ?11))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: (O_Full ?7) ?8))) (: (O_Sub ?9 (: (O_Full ?10) ([]))) ?11))) (: O_Empty ?12))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: (O_Full ?7) ?8))) (: (O_Sub ?9 (: (O_Sub ?10 ?11) ([]))) ?12))) (: O_Empty ?13))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: (O_Sub ?7 ?8) ?9))) (: (O_Sub ?10 ([])) ?11))) (: O_Empty ?12))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: (O_Sub ?7 ?8) ?9))) (: (O_Sub ?10 (: O_Empty ([]))) ?11))) (: O_Empty ?12))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: (O_Sub ?7 ?8) ?9))) (: (O_Sub ?10 (: (O_Full ?11) ([]))) ?12))) (: O_Empty ?13))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: (O_Sub ?7 ?8) ?9))) (: (O_Sub ?10 (: (O_Sub ?11 ?12) ([]))) ?13))) (: O_Empty ?14))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: (O_Sub ?5 ?6) ?7))) (: O_Empty ?8))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 (: ?5 ([]))) (: (O_Sub ?6 ?7) ?8))) (: O_Empty ?9))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: (O_Sub ?5 ?6) ?7))) (: O_Empty ?8))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 ([])) (: O_Empty ?4))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: ?4 ([]))) (: O_Empty ?5))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: ?4 (: ?5 ([])))) (: O_Empty ?6))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: ?4 (: ?5 (: O_Empty ([]))))) (: O_Empty ?6))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: ?4 (: ?5 (: (O_Sub ?6 ?7) ([]))))) (: O_Empty ?8))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 ([])) (: O_Empty ?4))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: ?4 ([]))) (: O_Empty ?5))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: ?4 (: ?5 ([])))) (: O_Empty ?6))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: ?4 (: ?5 (: ?6 ([]))))) (: O_Empty ?7))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: ?4 (: ?5 (: ?6 (: ?7 ([])))))) (: O_Empty ?8))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:35:21-34: Irrefutable pattern failed for pattern (l4 : ll5) case case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 ([])) (: O_Empty ?4))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: ?4 ([]))) (: O_Empty ?5))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: ?4 (: ?5 ([])))) (: O_Empty ?6))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: ?4 (: ?5 (: ?6 ([]))))) (: O_Empty ?7))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 ([])) (: (O_Full ?4) ?5))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: O_Empty ([]))) (: (O_Full ?4) ?5))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: O_Empty (: (O_Sub ?4 ([])) ?5))) (: (O_Full ?6) ?7))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: O_Empty (: (O_Sub ?4 (: O_Empty ([]))) ?5))) (: (O_Full ?6) ?7))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: O_Empty (: (O_Sub ?4 (: (O_Sub ?5 ?6) ([]))) ?7))) (: (O_Full ?8) ?9))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: O_Empty (: (O_Sub ?4 ([])) ?5))) (: (O_Full ?6) ?7))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ?5) ([]))) (: (O_Full ?6) ?7))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: O_Empty ?5))) (: (O_Full ?6) ?7))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 (: O_Empty ([]))) (: O_Empty ?5))) (: (O_Full ?6) ?7))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 (: (O_Sub ?5 ?6) ([]))) (: O_Empty ?7))) (: (O_Full ?8) ?9))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: O_Empty ?5))) (: (O_Full ?6) ?7))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 (: ?5 ([]))) (: O_Empty ?6))) (: (O_Full ?7) ?8))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: O_Empty ?5))) (: (O_Full ?6) ?7))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: (O_Full ?5) ?6))) (: (O_Full ?7) ?8))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 (: O_Empty ([]))) (: (O_Full ?5) ?6))) (: (O_Full ?7) ?8))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 (: (O_Sub ?5 ?6) ([]))) (: (O_Full ?7) ?8))) (: (O_Full ?9) ?10))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: (O_Full ?5) ?6))) (: (O_Full ?7) ?8))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 (: ?5 ([]))) (: (O_Full ?6) ?7))) (: (O_Full ?8) ?9))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: (O_Full ?5) ?6))) (: (O_Full ?7) ?8))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: (O_Sub ?5 ?6) ?7))) (: (O_Full ?8) ?9))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 (: O_Empty ([]))) (: (O_Sub ?5 ?6) ?7))) (: (O_Full ?8) ?9))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 (: O_Empty (: O_Empty ?5))) (: (O_Sub ?6 ([])) ?7))) (: (O_Full ?8) ?9))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 (: O_Empty (: O_Empty ?5))) (: (O_Sub ?6 (: O_Empty ([]))) ?7))) (: (O_Full ?8) ?9))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 (: O_Empty (: O_Empty ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) ([]))) ?9))) (: (O_Full ?10) ?11))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 (: O_Empty (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 ([])) ?9))) (: (O_Full ?10) ?11))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 (: O_Empty (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: O_Empty ([]))) ?9))) (: (O_Full ?10) ?11))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 (: O_Empty (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: (O_Full ?9) ([]))) ?10))) (: (O_Full ?11) ?12))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 (: O_Empty (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: (O_Sub ?9 ?10) ([]))) ?11))) (: (O_Full ?12) ?13))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 (: (O_Sub ?5 ?6) ([]))) (: (O_Sub ?7 ?8) ?9))) (: (O_Full ?10) ?11))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: O_Empty ?7))) (: (O_Sub ?8 ([])) ?9))) (: (O_Full ?10) ?11))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: O_Empty ?7))) (: (O_Sub ?8 (: O_Empty ([]))) ?9))) (: (O_Full ?10) ?11))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: O_Empty ?7))) (: (O_Sub ?8 (: (O_Full ?9) ([]))) ?10))) (: (O_Full ?11) ?12))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: O_Empty ?7))) (: (O_Sub ?8 (: (O_Sub ?9 ?10) ([]))) ?11))) (: (O_Full ?12) ?13))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: (O_Full ?7) ?8))) (: (O_Sub ?9 ([])) ?10))) (: (O_Full ?11) ?12))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: (O_Full ?7) ?8))) (: (O_Sub ?9 (: O_Empty ([]))) ?10))) (: (O_Full ?11) ?12))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: (O_Full ?7) ?8))) (: (O_Sub ?9 (: (O_Full ?10) ([]))) ?11))) (: (O_Full ?12) ?13))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: (O_Full ?7) ?8))) (: (O_Sub ?9 (: (O_Sub ?10 ?11) ([]))) ?12))) (: (O_Full ?13) ?14))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: (O_Sub ?7 ?8) ?9))) (: (O_Sub ?10 ([])) ?11))) (: (O_Full ?12) ?13))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: (O_Sub ?7 ?8) ?9))) (: (O_Sub ?10 (: O_Empty ([]))) ?11))) (: (O_Full ?12) ?13))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: (O_Sub ?7 ?8) ?9))) (: (O_Sub ?10 (: (O_Full ?11) ([]))) ?12))) (: (O_Full ?13) ?14))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 (: (O_Sub ?5 ?6) (: (O_Sub ?7 ?8) ?9))) (: (O_Sub ?10 (: (O_Sub ?11 ?12) ([]))) ?13))) (: (O_Full ?14) ?15))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: (O_Sub ?5 ?6) ?7))) (: (O_Full ?8) ?9))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 (: ?5 ([]))) (: (O_Sub ?6 ?7) ?8))) (: (O_Full ?9) ?10))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: (O_Sub ?5 ?6) ?7))) (: (O_Full ?8) ?9))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 ([])) (: (O_Full ?4) ?5))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: ?4 ([]))) (: (O_Full ?5) ?6))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: ?4 (: ?5 ([])))) (: (O_Full ?6) ?7))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: ?4 (: ?5 (: O_Empty ([]))))) (: (O_Full ?6) ?7))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: ?4 (: ?5 (: (O_Sub ?6 ?7) ([]))))) (: (O_Full ?8) ?9))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 ([])) (: (O_Full ?4) ?5))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: ?4 ([]))) (: (O_Full ?5) ?6))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: ?4 (: ?5 ([])))) (: (O_Full ?6) ?7))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: ?4 (: ?5 (: ?6 ([]))))) (: (O_Full ?7) ?8))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: ?4 (: ?5 (: ?6 (: ?7 ([])))))) (: (O_Full ?8) ?9))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:35:21-34: Irrefutable pattern failed for pattern (l4 : ll5) case case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 ([])) (: (O_Full ?4) ?5))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: ?4 ([]))) (: (O_Full ?5) ?6))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: ?4 (: ?5 ([])))) (: (O_Full ?6) ?7))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: ?4 (: ?5 (: ?6 ([]))))) (: (O_Full ?7) ?8))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 ([])) (: (O_Sub ?4 ?5) ?6))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: O_Empty ([]))) (: (O_Sub ?4 ?5) ?6))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: O_Empty (: O_Empty ?4))) (: (O_Sub ?5 ([])) ?6))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: O_Empty (: O_Empty ?4))) (: (O_Sub ?5 (: O_Empty ([]))) ?6))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: O_Empty (: O_Empty ?4))) (: (O_Sub ?5 (: O_Empty (: (O_Sub ?6 ([])) ?7))) ?8))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: O_Empty (: O_Empty ?4))) (: (O_Sub ?5 (: (O_Sub ?6 ?7) ([]))) ?8))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: O_Empty (: O_Empty ?4))) (: (O_Sub ?5 (: (O_Sub ?6 ([])) (: O_Empty ?7))) ?8))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: O_Empty (: O_Empty ?4))) (: (O_Sub ?5 (: (O_Sub ?6 (: O_Empty ([]))) (: O_Empty ?7))) ?8))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: O_Empty (: O_Empty ?4))) (: (O_Sub ?5 (: (O_Sub ?6 (: (O_Sub ?7 ?8) ([]))) (: O_Empty ?9))) ?10))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: O_Empty (: O_Empty ?4))) (: (O_Sub ?5 (: (O_Sub ?6 ([])) (: O_Empty ?7))) ?8))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: O_Empty (: O_Empty ?4))) (: (O_Sub ?5 (: (O_Sub ?6 ([])) (: (O_Full ?7) ?8))) ?9))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: O_Empty (: O_Empty ?4))) (: (O_Sub ?5 (: (O_Sub ?6 (: O_Empty ([]))) (: (O_Full ?7) ?8))) ?9))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: O_Empty (: O_Empty ?4))) (: (O_Sub ?5 (: (O_Sub ?6 (: (O_Sub ?7 ?8) ([]))) (: (O_Full ?9) ?10))) ?11))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: O_Empty (: O_Empty ?4))) (: (O_Sub ?5 (: (O_Sub ?6 ([])) (: (O_Full ?7) ?8))) ?9))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: O_Empty (: O_Empty ?4))) (: (O_Sub ?5 (: (O_Sub ?6 ([])) (: (O_Sub ?7 ?8) ?9))) ?10))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: O_Empty (: O_Empty ?4))) (: (O_Sub ?5 (: (O_Sub ?6 (: O_Empty ([]))) (: (O_Sub ?7 ?8) ?9))) ?10))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: O_Empty (: O_Empty ?4))) (: (O_Sub ?5 (: (O_Sub ?6 (: (O_Sub ?7 ?8) ([]))) (: (O_Sub ?9 ?10) ?11))) ?12))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: O_Empty (: O_Empty ?4))) (: (O_Sub ?5 (: (O_Sub ?6 ([])) (: (O_Sub ?7 ?8) ?9))) ?10))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: O_Empty (: (O_Sub ?4 ?5) ?6))) (: (O_Sub ?7 ([])) ?8))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: O_Empty (: (O_Sub ?4 ?5) ?6))) (: (O_Sub ?7 (: O_Empty ([]))) ?8))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: O_Empty (: (O_Sub ?4 ([])) ?5))) (: (O_Sub ?6 (: O_Empty (: O_Empty ?7))) ?8))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: O_Empty (: (O_Sub ?4 (: O_Empty ([]))) ?5))) (: (O_Sub ?6 (: O_Empty (: O_Empty ?7))) ?8))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: O_Empty (: (O_Sub ?4 (: (O_Sub ?5 ?6) ([]))) ?7))) (: (O_Sub ?8 (: O_Empty (: O_Empty ?9))) ?10))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: O_Empty (: (O_Sub ?4 ([])) ?5))) (: (O_Sub ?6 (: O_Empty (: O_Empty ?7))) ?8))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: O_Empty (: (O_Sub ?4 ([])) ?5))) (: (O_Sub ?6 (: O_Empty (: (O_Full ?7) ?8))) ?9))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: O_Empty (: (O_Sub ?4 (: O_Empty ([]))) ?5))) (: (O_Sub ?6 (: O_Empty (: (O_Full ?7) ?8))) ?9))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: O_Empty (: (O_Sub ?4 (: (O_Sub ?5 ?6) ([]))) ?7))) (: (O_Sub ?8 (: O_Empty (: (O_Full ?9) ?10))) ?11))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: O_Empty (: (O_Sub ?4 ([])) ?5))) (: (O_Sub ?6 (: O_Empty (: (O_Full ?7) ?8))) ?9))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: O_Empty (: (O_Sub ?4 ([])) ?5))) (: (O_Sub ?6 (: O_Empty (: (O_Sub ?7 ?8) ?9))) ?10))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: O_Empty (: (O_Sub ?4 (: O_Empty ([]))) ?5))) (: (O_Sub ?6 (: O_Empty (: (O_Sub ?7 ?8) ?9))) ?10))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: O_Empty (: (O_Sub ?4 (: (O_Sub ?5 ?6) ([]))) ?7))) (: (O_Sub ?8 (: O_Empty (: (O_Sub ?9 ?10) ?11))) ?12))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: O_Empty (: (O_Sub ?4 ([])) ?5))) (: (O_Sub ?6 (: O_Empty (: (O_Sub ?7 ?8) ?9))) ?10))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: O_Empty (: (O_Sub ?4 ?5) ?6))) (: (O_Sub ?7 (: (O_Full ?8) ([]))) ?9))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: O_Empty (: (O_Sub ?4 ([])) ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: O_Empty ?8))) ?9))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: O_Empty (: (O_Sub ?4 (: O_Empty ([]))) ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: O_Empty ?8))) ?9))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: O_Empty (: (O_Sub ?4 (: (O_Sub ?5 ?6) ([]))) ?7))) (: (O_Sub ?8 (: (O_Full ?9) (: O_Empty ?10))) ?11))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: O_Empty (: (O_Sub ?4 ([])) ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: O_Empty ?8))) ?9))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: O_Empty (: (O_Sub ?4 ([])) ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: (O_Full ?8) ?9))) ?10))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: O_Empty (: (O_Sub ?4 (: O_Empty ([]))) ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: (O_Full ?8) ?9))) ?10))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: O_Empty (: (O_Sub ?4 (: (O_Sub ?5 ?6) ([]))) ?7))) (: (O_Sub ?8 (: (O_Full ?9) (: (O_Full ?10) ?11))) ?12))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: O_Empty (: (O_Sub ?4 ([])) ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: (O_Full ?8) ?9))) ?10))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: O_Empty (: (O_Sub ?4 ([])) ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: (O_Sub ?8 ?9) ?10))) ?11))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: O_Empty (: (O_Sub ?4 (: O_Empty ([]))) ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: (O_Sub ?8 ?9) ?10))) ?11))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: O_Empty (: (O_Sub ?4 (: (O_Sub ?5 ?6) ([]))) ?7))) (: (O_Sub ?8 (: (O_Full ?9) (: (O_Sub ?10 ?11) ?12))) ?13))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: O_Empty (: (O_Sub ?4 ([])) ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: (O_Sub ?8 ?9) ?10))) ?11))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: O_Empty (: (O_Sub ?4 ?5) ?6))) (: (O_Sub ?7 (: (O_Sub ?8 ?9) ([]))) ?10))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: O_Empty (: (O_Sub ?4 ([])) ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: O_Empty ?9))) ?10))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: O_Empty (: (O_Sub ?4 (: O_Empty ([]))) ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: O_Empty ?9))) ?10))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: O_Empty (: (O_Sub ?4 (: (O_Sub ?5 ?6) ([]))) ?7))) (: (O_Sub ?8 (: (O_Sub ?9 ?10) (: O_Empty ?11))) ?12))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: O_Empty (: (O_Sub ?4 ([])) ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: O_Empty ?9))) ?10))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: O_Empty (: (O_Sub ?4 ([])) ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: (O_Full ?9) ?10))) ?11))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: O_Empty (: (O_Sub ?4 (: O_Empty ([]))) ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: (O_Full ?9) ?10))) ?11))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: O_Empty (: (O_Sub ?4 (: (O_Sub ?5 ?6) ([]))) ?7))) (: (O_Sub ?8 (: (O_Sub ?9 ?10) (: (O_Full ?11) ?12))) ?13))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: O_Empty (: (O_Sub ?4 ([])) ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: (O_Full ?9) ?10))) ?11))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: O_Empty (: (O_Sub ?4 ([])) ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: (O_Sub ?9 ?10) ?11))) ?12))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: O_Empty (: (O_Sub ?4 (: O_Empty ([]))) ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: (O_Sub ?9 ?10) ?11))) ?12))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: O_Empty (: (O_Sub ?4 (: (O_Sub ?5 ?6) ([]))) ?7))) (: (O_Sub ?8 (: (O_Sub ?9 ?10) (: (O_Sub ?11 ?12) ?13))) ?14))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: O_Empty (: (O_Sub ?4 ([])) ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: (O_Sub ?9 ?10) ?11))) ?12))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ?5) ([]))) (: (O_Sub ?6 ?7) ?8))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ?5) (: O_Empty ?6))) (: (O_Sub ?7 ([])) ?8))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ?5) (: O_Empty ?6))) (: (O_Sub ?7 (: O_Empty ([]))) ?8))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: O_Empty ?5))) (: (O_Sub ?6 (: O_Empty (: O_Empty ?7))) ?8))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 (: O_Empty ([]))) (: O_Empty ?5))) (: (O_Sub ?6 (: O_Empty (: O_Empty ?7))) ?8))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 (: (O_Sub ?5 ?6) ([]))) (: O_Empty ?7))) (: (O_Sub ?8 (: O_Empty (: O_Empty ?9))) ?10))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: O_Empty ?5))) (: (O_Sub ?6 (: O_Empty (: O_Empty ?7))) ?8))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 (: ?5 ([]))) (: O_Empty ?6))) (: (O_Sub ?7 (: O_Empty (: O_Empty ?8))) ?9))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: O_Empty ?5))) (: (O_Sub ?6 (: O_Empty (: (O_Full ?7) ?8))) ?9))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 (: O_Empty ([]))) (: O_Empty ?5))) (: (O_Sub ?6 (: O_Empty (: (O_Full ?7) ?8))) ?9))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 (: (O_Sub ?5 ?6) ([]))) (: O_Empty ?7))) (: (O_Sub ?8 (: O_Empty (: (O_Full ?9) ?10))) ?11))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: O_Empty ?5))) (: (O_Sub ?6 (: O_Empty (: (O_Full ?7) ?8))) ?9))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 (: ?5 ([]))) (: O_Empty ?6))) (: (O_Sub ?7 (: O_Empty (: (O_Full ?8) ?9))) ?10))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: O_Empty ?5))) (: (O_Sub ?6 (: O_Empty (: (O_Sub ?7 ?8) ?9))) ?10))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 (: O_Empty ([]))) (: O_Empty ?5))) (: (O_Sub ?6 (: O_Empty (: (O_Sub ?7 ?8) ?9))) ?10))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 (: (O_Sub ?5 ?6) ([]))) (: O_Empty ?7))) (: (O_Sub ?8 (: O_Empty (: (O_Sub ?9 ?10) ?11))) ?12))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: O_Empty ?5))) (: (O_Sub ?6 (: O_Empty (: (O_Sub ?7 ?8) ?9))) ?10))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 (: ?5 ([]))) (: O_Empty ?6))) (: (O_Sub ?7 (: O_Empty (: (O_Sub ?8 ?9) ?10))) ?11))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ?5) (: O_Empty ?6))) (: (O_Sub ?7 (: (O_Full ?8) ([]))) ?9))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: O_Empty ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: O_Empty ?8))) ?9))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 (: O_Empty ([]))) (: O_Empty ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: O_Empty ?8))) ?9))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 (: (O_Sub ?5 ?6) ([]))) (: O_Empty ?7))) (: (O_Sub ?8 (: (O_Full ?9) (: O_Empty ?10))) ?11))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: O_Empty ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: O_Empty ?8))) ?9))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 (: ?5 ([]))) (: O_Empty ?6))) (: (O_Sub ?7 (: (O_Full ?8) (: O_Empty ?9))) ?10))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: O_Empty ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: (O_Full ?8) ?9))) ?10))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 (: O_Empty ([]))) (: O_Empty ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: (O_Full ?8) ?9))) ?10))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 (: (O_Sub ?5 ?6) ([]))) (: O_Empty ?7))) (: (O_Sub ?8 (: (O_Full ?9) (: (O_Full ?10) ?11))) ?12))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: O_Empty ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: (O_Full ?8) ?9))) ?10))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 (: ?5 ([]))) (: O_Empty ?6))) (: (O_Sub ?7 (: (O_Full ?8) (: (O_Full ?9) ?10))) ?11))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: O_Empty ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: (O_Sub ?8 ?9) ?10))) ?11))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 (: O_Empty ([]))) (: O_Empty ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: (O_Sub ?8 ?9) ?10))) ?11))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 (: (O_Sub ?5 ?6) ([]))) (: O_Empty ?7))) (: (O_Sub ?8 (: (O_Full ?9) (: (O_Sub ?10 ?11) ?12))) ?13))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: O_Empty ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: (O_Sub ?8 ?9) ?10))) ?11))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 (: ?5 ([]))) (: O_Empty ?6))) (: (O_Sub ?7 (: (O_Full ?8) (: (O_Sub ?9 ?10) ?11))) ?12))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ?5) (: O_Empty ?6))) (: (O_Sub ?7 (: (O_Sub ?8 ?9) ([]))) ?10))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: O_Empty ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: O_Empty ?9))) ?10))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 (: O_Empty ([]))) (: O_Empty ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: O_Empty ?9))) ?10))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 (: (O_Sub ?5 ?6) ([]))) (: O_Empty ?7))) (: (O_Sub ?8 (: (O_Sub ?9 ?10) (: O_Empty ?11))) ?12))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: O_Empty ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: O_Empty ?9))) ?10))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 (: ?5 ([]))) (: O_Empty ?6))) (: (O_Sub ?7 (: (O_Sub ?8 ?9) (: O_Empty ?10))) ?11))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: O_Empty ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: (O_Full ?9) ?10))) ?11))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 (: O_Empty ([]))) (: O_Empty ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: (O_Full ?9) ?10))) ?11))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 (: (O_Sub ?5 ?6) ([]))) (: O_Empty ?7))) (: (O_Sub ?8 (: (O_Sub ?9 ?10) (: (O_Full ?11) ?12))) ?13))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: O_Empty ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: (O_Full ?9) ?10))) ?11))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 (: ?5 ([]))) (: O_Empty ?6))) (: (O_Sub ?7 (: (O_Sub ?8 ?9) (: (O_Full ?10) ?11))) ?12))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: O_Empty ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: (O_Sub ?9 ?10) ?11))) ?12))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 (: O_Empty ([]))) (: O_Empty ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: (O_Sub ?9 ?10) ?11))) ?12))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 (: (O_Sub ?5 ?6) ([]))) (: O_Empty ?7))) (: (O_Sub ?8 (: (O_Sub ?9 ?10) (: (O_Sub ?11 ?12) ?13))) ?14))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: O_Empty ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: (O_Sub ?9 ?10) ?11))) ?12))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 (: ?5 ([]))) (: O_Empty ?6))) (: (O_Sub ?7 (: (O_Sub ?8 ?9) (: (O_Sub ?10 ?11) ?12))) ?13))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ?5) (: (O_Full ?6) ?7))) (: (O_Sub ?8 ([])) ?9))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ?5) (: (O_Full ?6) ?7))) (: (O_Sub ?8 (: O_Empty ([]))) ?9))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: O_Empty (: O_Empty ?8))) ?9))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 (: O_Empty ([]))) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: O_Empty (: O_Empty ?8))) ?9))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 (: (O_Sub ?5 ?6) ([]))) (: (O_Full ?7) ?8))) (: (O_Sub ?9 (: O_Empty (: O_Empty ?10))) ?11))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: O_Empty (: O_Empty ?8))) ?9))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 (: ?5 ([]))) (: (O_Full ?6) ?7))) (: (O_Sub ?8 (: O_Empty (: O_Empty ?9))) ?10))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: O_Empty (: (O_Full ?8) ?9))) ?10))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 (: O_Empty ([]))) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: O_Empty (: (O_Full ?8) ?9))) ?10))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 (: (O_Sub ?5 ?6) ([]))) (: (O_Full ?7) ?8))) (: (O_Sub ?9 (: O_Empty (: (O_Full ?10) ?11))) ?12))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: O_Empty (: (O_Full ?8) ?9))) ?10))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 (: ?5 ([]))) (: (O_Full ?6) ?7))) (: (O_Sub ?8 (: O_Empty (: (O_Full ?9) ?10))) ?11))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: O_Empty (: (O_Sub ?8 ?9) ?10))) ?11))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 (: O_Empty ([]))) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: O_Empty (: (O_Sub ?8 ?9) ?10))) ?11))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 (: (O_Sub ?5 ?6) ([]))) (: (O_Full ?7) ?8))) (: (O_Sub ?9 (: O_Empty (: (O_Sub ?10 ?11) ?12))) ?13))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: O_Empty (: (O_Sub ?8 ?9) ?10))) ?11))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 (: ?5 ([]))) (: (O_Full ?6) ?7))) (: (O_Sub ?8 (: O_Empty (: (O_Sub ?9 ?10) ?11))) ?12))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ?5) (: (O_Full ?6) ?7))) (: (O_Sub ?8 (: (O_Full ?9) ([]))) ?10))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: (O_Full ?8) (: O_Empty ?9))) ?10))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 (: O_Empty ([]))) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: (O_Full ?8) (: O_Empty ?9))) ?10))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 (: (O_Sub ?5 ?6) ([]))) (: (O_Full ?7) ?8))) (: (O_Sub ?9 (: (O_Full ?10) (: O_Empty ?11))) ?12))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: (O_Full ?8) (: O_Empty ?9))) ?10))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 (: ?5 ([]))) (: (O_Full ?6) ?7))) (: (O_Sub ?8 (: (O_Full ?9) (: O_Empty ?10))) ?11))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: (O_Full ?8) (: (O_Full ?9) ?10))) ?11))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 (: O_Empty ([]))) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: (O_Full ?8) (: (O_Full ?9) ?10))) ?11))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 (: (O_Sub ?5 ?6) ([]))) (: (O_Full ?7) ?8))) (: (O_Sub ?9 (: (O_Full ?10) (: (O_Full ?11) ?12))) ?13))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: (O_Full ?8) (: (O_Full ?9) ?10))) ?11))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 (: ?5 ([]))) (: (O_Full ?6) ?7))) (: (O_Sub ?8 (: (O_Full ?9) (: (O_Full ?10) ?11))) ?12))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: (O_Full ?8) (: (O_Sub ?9 ?10) ?11))) ?12))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 (: O_Empty ([]))) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: (O_Full ?8) (: (O_Sub ?9 ?10) ?11))) ?12))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 (: (O_Sub ?5 ?6) ([]))) (: (O_Full ?7) ?8))) (: (O_Sub ?9 (: (O_Full ?10) (: (O_Sub ?11 ?12) ?13))) ?14))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: (O_Full ?8) (: (O_Sub ?9 ?10) ?11))) ?12))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 (: ?5 ([]))) (: (O_Full ?6) ?7))) (: (O_Sub ?8 (: (O_Full ?9) (: (O_Sub ?10 ?11) ?12))) ?13))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ?5) (: (O_Full ?6) ?7))) (: (O_Sub ?8 (: (O_Sub ?9 ?10) ([]))) ?11))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: (O_Sub ?8 ?9) (: O_Empty ?10))) ?11))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 (: O_Empty ([]))) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: (O_Sub ?8 ?9) (: O_Empty ?10))) ?11))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 (: (O_Sub ?5 ?6) ([]))) (: (O_Full ?7) ?8))) (: (O_Sub ?9 (: (O_Sub ?10 ?11) (: O_Empty ?12))) ?13))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: (O_Sub ?8 ?9) (: O_Empty ?10))) ?11))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 (: ?5 ([]))) (: (O_Full ?6) ?7))) (: (O_Sub ?8 (: (O_Sub ?9 ?10) (: O_Empty ?11))) ?12))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: (O_Sub ?8 ?9) (: (O_Full ?10) ?11))) ?12))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 (: O_Empty ([]))) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: (O_Sub ?8 ?9) (: (O_Full ?10) ?11))) ?12))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 (: (O_Sub ?5 ?6) ([]))) (: (O_Full ?7) ?8))) (: (O_Sub ?9 (: (O_Sub ?10 ?11) (: (O_Full ?12) ?13))) ?14))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: (O_Sub ?8 ?9) (: (O_Full ?10) ?11))) ?12))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 (: ?5 ([]))) (: (O_Full ?6) ?7))) (: (O_Sub ?8 (: (O_Sub ?9 ?10) (: (O_Full ?11) ?12))) ?13))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: (O_Sub ?8 ?9) (: (O_Sub ?10 ?11) ?12))) ?13))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 (: O_Empty ([]))) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: (O_Sub ?8 ?9) (: (O_Sub ?10 ?11) ?12))) ?13))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 (: (O_Sub ?5 ?6) ([]))) (: (O_Full ?7) ?8))) (: (O_Sub ?9 (: (O_Sub ?10 ?11) (: (O_Sub ?12 ?13) ?14))) ?15))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: (O_Sub ?8 ?9) (: (O_Sub ?10 ?11) ?12))) ?13))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 (: ?5 ([]))) (: (O_Full ?6) ?7))) (: (O_Sub ?8 (: (O_Sub ?9 ?10) (: (O_Sub ?11 ?12) ?13))) ?14))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ?5) (: (O_Sub ?6 ?7) ?8))) (: (O_Sub ?9 ([])) ?10))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ?5) (: (O_Sub ?6 ?7) ?8))) (: (O_Sub ?9 (: O_Empty ([]))) ?10))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: O_Empty (: O_Empty ?9))) ?10))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 (: O_Empty ([]))) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: O_Empty (: O_Empty ?9))) ?10))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 (: (O_Sub ?5 ?6) ([]))) (: (O_Sub ?7 ?8) ?9))) (: (O_Sub ?10 (: O_Empty (: O_Empty ?11))) ?12))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: O_Empty (: O_Empty ?9))) ?10))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 (: ?5 ([]))) (: (O_Sub ?6 ?7) ?8))) (: (O_Sub ?9 (: O_Empty (: O_Empty ?10))) ?11))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: O_Empty (: (O_Full ?9) ?10))) ?11))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 (: O_Empty ([]))) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: O_Empty (: (O_Full ?9) ?10))) ?11))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 (: (O_Sub ?5 ?6) ([]))) (: (O_Sub ?7 ?8) ?9))) (: (O_Sub ?10 (: O_Empty (: (O_Full ?11) ?12))) ?13))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: O_Empty (: (O_Full ?9) ?10))) ?11))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 (: ?5 ([]))) (: (O_Sub ?6 ?7) ?8))) (: (O_Sub ?9 (: O_Empty (: (O_Full ?10) ?11))) ?12))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: O_Empty (: (O_Sub ?9 ?10) ?11))) ?12))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 (: O_Empty ([]))) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: O_Empty (: (O_Sub ?9 ?10) ?11))) ?12))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 (: (O_Sub ?5 ?6) ([]))) (: (O_Sub ?7 ?8) ?9))) (: (O_Sub ?10 (: O_Empty (: (O_Sub ?11 ?12) ?13))) ?14))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: O_Empty (: (O_Sub ?9 ?10) ?11))) ?12))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 (: ?5 ([]))) (: (O_Sub ?6 ?7) ?8))) (: (O_Sub ?9 (: O_Empty (: (O_Sub ?10 ?11) ?12))) ?13))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ?5) (: (O_Sub ?6 ?7) ?8))) (: (O_Sub ?9 (: (O_Full ?10) ([]))) ?11))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: (O_Full ?9) (: O_Empty ?10))) ?11))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 (: O_Empty ([]))) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: (O_Full ?9) (: O_Empty ?10))) ?11))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 (: (O_Sub ?5 ?6) ([]))) (: (O_Sub ?7 ?8) ?9))) (: (O_Sub ?10 (: (O_Full ?11) (: O_Empty ?12))) ?13))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: (O_Full ?9) (: O_Empty ?10))) ?11))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 (: ?5 ([]))) (: (O_Sub ?6 ?7) ?8))) (: (O_Sub ?9 (: (O_Full ?10) (: O_Empty ?11))) ?12))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: (O_Full ?9) (: (O_Full ?10) ?11))) ?12))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 (: O_Empty ([]))) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: (O_Full ?9) (: (O_Full ?10) ?11))) ?12))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 (: (O_Sub ?5 ?6) ([]))) (: (O_Sub ?7 ?8) ?9))) (: (O_Sub ?10 (: (O_Full ?11) (: (O_Full ?12) ?13))) ?14))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: (O_Full ?9) (: (O_Full ?10) ?11))) ?12))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 (: ?5 ([]))) (: (O_Sub ?6 ?7) ?8))) (: (O_Sub ?9 (: (O_Full ?10) (: (O_Full ?11) ?12))) ?13))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: (O_Full ?9) (: (O_Sub ?10 ?11) ?12))) ?13))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 (: O_Empty ([]))) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: (O_Full ?9) (: (O_Sub ?10 ?11) ?12))) ?13))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 (: (O_Sub ?5 ?6) ([]))) (: (O_Sub ?7 ?8) ?9))) (: (O_Sub ?10 (: (O_Full ?11) (: (O_Sub ?12 ?13) ?14))) ?15))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: (O_Full ?9) (: (O_Sub ?10 ?11) ?12))) ?13))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 (: ?5 ([]))) (: (O_Sub ?6 ?7) ?8))) (: (O_Sub ?9 (: (O_Full ?10) (: (O_Sub ?11 ?12) ?13))) ?14))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ?5) (: (O_Sub ?6 ?7) ?8))) (: (O_Sub ?9 (: (O_Sub ?10 ?11) ([]))) ?12))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: (O_Sub ?9 ?10) (: O_Empty ?11))) ?12))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 (: O_Empty ([]))) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: (O_Sub ?9 ?10) (: O_Empty ?11))) ?12))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 (: (O_Sub ?5 ?6) ([]))) (: (O_Sub ?7 ?8) ?9))) (: (O_Sub ?10 (: (O_Sub ?11 ?12) (: O_Empty ?13))) ?14))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: (O_Sub ?9 ?10) (: O_Empty ?11))) ?12))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 (: ?5 ([]))) (: (O_Sub ?6 ?7) ?8))) (: (O_Sub ?9 (: (O_Sub ?10 ?11) (: O_Empty ?12))) ?13))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: (O_Sub ?9 ?10) (: (O_Full ?11) ?12))) ?13))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 (: O_Empty ([]))) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: (O_Sub ?9 ?10) (: (O_Full ?11) ?12))) ?13))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 (: (O_Sub ?5 ?6) ([]))) (: (O_Sub ?7 ?8) ?9))) (: (O_Sub ?10 (: (O_Sub ?11 ?12) (: (O_Full ?13) ?14))) ?15))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: (O_Sub ?9 ?10) (: (O_Full ?11) ?12))) ?13))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 (: ?5 ([]))) (: (O_Sub ?6 ?7) ?8))) (: (O_Sub ?9 (: (O_Sub ?10 ?11) (: (O_Full ?12) ?13))) ?14))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: (O_Sub ?9 ?10) (: (O_Sub ?11 ?12) ?13))) ?14))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 (: O_Empty ([]))) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: (O_Sub ?9 ?10) (: (O_Sub ?11 ?12) ?13))) ?14))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 (: (O_Sub ?5 ?6) ([]))) (: (O_Sub ?7 ?8) ?9))) (: (O_Sub ?10 (: (O_Sub ?11 ?12) (: (O_Sub ?13 ?14) ?15))) ?16))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 ([])) (: (O_Sub ?5 ?6) ?7))) (: (O_Sub ?8 (: (O_Sub ?9 ?10) (: (O_Sub ?11 ?12) ?13))) ?14))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: (O_Sub ?4 (: ?5 ([]))) (: (O_Sub ?6 ?7) ?8))) (: (O_Sub ?9 (: (O_Sub ?10 ?11) (: (O_Sub ?12 ?13) ?14))) ?15))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 ([])) (: (O_Sub ?4 ?5) ?6))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: ?4 ([]))) (: (O_Sub ?5 ?6) ?7))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: ?4 (: ?5 ([])))) (: (O_Sub ?6 ?7) ?8))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: ?4 (: ?5 (: O_Empty ([]))))) (: (O_Sub ?6 ?7) ?8))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: ?4 (: ?5 (: O_Empty (: O_Empty ?6))))) (: (O_Sub ?7 ([])) ?8))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: ?4 (: ?5 (: O_Empty (: O_Empty ?6))))) (: (O_Sub ?7 (: ?8 ([]))) ?9))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: ?4 (: ?5 (: O_Empty (: O_Empty ?6))))) (: (O_Sub ?7 (: ?8 (: ?9 ([])))) ?10))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:44:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: ?4 (: ?5 (: O_Empty (: O_Empty ?6))))) (: (O_Sub ?7 (: ?8 (: ?9 (: O_Empty ([]))))) ?10))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:44:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: ?4 (: ?5 (: O_Empty (: O_Empty ?6))))) (: (O_Sub ?7 (: ?8 (: ?9 (: (O_Sub ?10 ?11) ([]))))) ?12))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:44:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: ?4 (: ?5 (: O_Empty (: (O_Sub ?6 ?7) ?8))))) (: (O_Sub ?9 ([])) ?10))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: ?4 (: ?5 (: O_Empty (: (O_Sub ?6 ?7) ?8))))) (: (O_Sub ?9 (: ?10 ([]))) ?11))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: ?4 (: ?5 (: O_Empty (: (O_Sub ?6 ?7) ?8))))) (: (O_Sub ?9 (: ?10 (: ?11 ([])))) ?12))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:44:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: ?4 (: ?5 (: O_Empty (: (O_Sub ?6 ?7) ?8))))) (: (O_Sub ?9 (: ?10 (: ?11 (: O_Empty ([]))))) ?12))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:44:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: ?4 (: ?5 (: O_Empty (: (O_Sub ?6 ?7) ?8))))) (: (O_Sub ?9 (: ?10 (: ?11 (: (O_Full ?12) ([]))))) ?13))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:44:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: ?4 (: ?5 (: O_Empty (: (O_Sub ?6 ?7) ?8))))) (: (O_Sub ?9 (: ?10 (: ?11 (: (O_Sub ?12 ?13) ([]))))) ?14))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:44:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: ?4 (: ?5 (: (O_Sub ?6 ?7) ([]))))) (: (O_Sub ?8 ?9) ?10))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: ?4 (: ?5 (: (O_Sub ?6 ?7) (: O_Empty ?8))))) (: (O_Sub ?9 ([])) ?10))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: ?4 (: ?5 (: (O_Sub ?6 ?7) (: O_Empty ?8))))) (: (O_Sub ?9 (: ?10 ([]))) ?11))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: ?4 (: ?5 (: (O_Sub ?6 ?7) (: O_Empty ?8))))) (: (O_Sub ?9 (: ?10 (: ?11 ([])))) ?12))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:44:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: ?4 (: ?5 (: (O_Sub ?6 ?7) (: O_Empty ?8))))) (: (O_Sub ?9 (: ?10 (: ?11 (: O_Empty ([]))))) ?12))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:44:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: ?4 (: ?5 (: (O_Sub ?6 ?7) (: O_Empty ?8))))) (: (O_Sub ?9 (: ?10 (: ?11 (: (O_Full ?12) ([]))))) ?13))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:44:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: ?4 (: ?5 (: (O_Sub ?6 ?7) (: O_Empty ?8))))) (: (O_Sub ?9 (: ?10 (: ?11 (: (O_Sub ?12 ?13) ([]))))) ?14))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:44:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: ?4 (: ?5 (: (O_Sub ?6 ?7) (: (O_Full ?8) ?9))))) (: (O_Sub ?10 ([])) ?11))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: ?4 (: ?5 (: (O_Sub ?6 ?7) (: (O_Full ?8) ?9))))) (: (O_Sub ?10 (: ?11 ([]))) ?12))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: ?4 (: ?5 (: (O_Sub ?6 ?7) (: (O_Full ?8) ?9))))) (: (O_Sub ?10 (: ?11 (: ?12 ([])))) ?13))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:44:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: ?4 (: ?5 (: (O_Sub ?6 ?7) (: (O_Full ?8) ?9))))) (: (O_Sub ?10 (: ?11 (: ?12 (: O_Empty ([]))))) ?13))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:44:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: ?4 (: ?5 (: (O_Sub ?6 ?7) (: (O_Full ?8) ?9))))) (: (O_Sub ?10 (: ?11 (: ?12 (: (O_Full ?13) ([]))))) ?14))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:44:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: ?4 (: ?5 (: (O_Sub ?6 ?7) (: (O_Full ?8) ?9))))) (: (O_Sub ?10 (: ?11 (: ?12 (: (O_Sub ?13 ?14) ([]))))) ?15))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:44:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: ?4 (: ?5 (: (O_Sub ?6 ?7) (: (O_Sub ?8 ?9) ?10))))) (: (O_Sub ?11 ([])) ?12))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: ?4 (: ?5 (: (O_Sub ?6 ?7) (: (O_Sub ?8 ?9) ?10))))) (: (O_Sub ?11 (: ?12 ([]))) ?13))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: ?4 (: ?5 (: (O_Sub ?6 ?7) (: (O_Sub ?8 ?9) ?10))))) (: (O_Sub ?11 (: ?12 (: ?13 ([])))) ?14))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:44:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: ?4 (: ?5 (: (O_Sub ?6 ?7) (: (O_Sub ?8 ?9) ?10))))) (: (O_Sub ?11 (: ?12 (: ?13 (: O_Empty ([]))))) ?14))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:44:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: ?4 (: ?5 (: (O_Sub ?6 ?7) (: (O_Sub ?8 ?9) ?10))))) (: (O_Sub ?11 (: ?12 (: ?13 (: (O_Full ?14) ([]))))) ?15))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:44:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: ?4 (: ?5 (: (O_Sub ?6 ?7) (: (O_Sub ?8 ?9) ?10))))) (: (O_Sub ?11 (: ?12 (: ?13 (: (O_Sub ?14 ?15) ([]))))) ?16))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:44:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 ([])) (: (O_Sub ?4 ?5) ?6))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: ?4 ([]))) (: (O_Sub ?5 ?6) ?7))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: ?4 (: ?5 ([])))) (: (O_Sub ?6 ?7) ?8))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: ?4 (: ?5 (: ?6 ([]))))) (: (O_Sub ?7 ?8) ?9))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: ?4 (: ?5 (: ?6 (: ?7 ([])))))) (: (O_Sub ?8 ?9) ?10))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:35:21-34: Irrefutable pattern failed for pattern (l4 : ll5) case case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 ([])) (: (O_Sub ?4 ?5) ?6))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: ?4 ([]))) (: (O_Sub ?5 ?6) ?7))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: ?4 (: ?5 ([])))) (: (O_Sub ?6 ?7) ?8))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: (O_Sub ?3 (: ?4 (: ?5 (: ?6 ([]))))) (: (O_Sub ?7 ?8) ?9))))) of Q_Sub _ x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case quadoct (O_Sub ? ([])) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case quadoct (O_Sub ? (: ?1 ([]))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case quadoct (O_Sub ? (: ?1 (: ?2 ([])))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 ([]))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 ([])))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:35:21-34: Irrefutable pattern failed for pattern (l4 : ll5) case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 (: O_Empty ([]))))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:35:38-51: Irrefutable pattern failed for pattern (l5 : ll6) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 (: O_Empty (: (O_Sub ?5 ([])) ?6))))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 (: O_Empty (: (O_Sub ?5 (: O_Empty ([]))) ?6))))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 (: O_Empty (: (O_Sub ?5 (: (O_Sub ?6 ?7) ([]))) ?8))))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 (: O_Empty (: (O_Sub ?5 ([])) ?6))))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 (: O_Empty (: (O_Sub ?5 (: ?6 ([]))) ?7))))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 (: O_Empty (: (O_Sub ?5 ([])) ?6))))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 (: (O_Sub ?5 ?6) ([]))))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:35:38-51: Irrefutable pattern failed for pattern (l5 : ll6) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 (: (O_Sub ?5 ([])) (: O_Empty ?6))))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 (: (O_Sub ?5 (: O_Empty ([]))) (: O_Empty ?6))))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 (: (O_Sub ?5 (: (O_Sub ?6 ?7) ([]))) (: O_Empty ?8))))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 (: (O_Sub ?5 ([])) (: O_Empty ?6))))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 (: (O_Sub ?5 (: ?6 ([]))) (: O_Empty ?7))))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 (: (O_Sub ?5 (: ?6 (: ?7 ([])))) (: O_Empty ?8))))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 (: (O_Sub ?5 ([])) (: O_Empty ?6))))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 (: (O_Sub ?5 (: ?6 ([]))) (: O_Empty ?7))))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 (: (O_Sub ?5 ([])) (: O_Empty ?6))))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 (: (O_Sub ?5 ([])) (: (O_Full ?6) ?7))))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 (: (O_Sub ?5 (: O_Empty ([]))) (: (O_Full ?6) ?7))))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 (: (O_Sub ?5 (: (O_Sub ?6 ?7) ([]))) (: (O_Full ?8) ?9))))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 (: (O_Sub ?5 ([])) (: (O_Full ?6) ?7))))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 (: (O_Sub ?5 (: ?6 ([]))) (: (O_Full ?7) ?8))))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 (: (O_Sub ?5 (: ?6 (: ?7 ([])))) (: (O_Full ?8) ?9))))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 (: (O_Sub ?5 ([])) (: (O_Full ?6) ?7))))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 (: (O_Sub ?5 (: ?6 ([]))) (: (O_Full ?7) ?8))))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 (: (O_Sub ?5 ([])) (: (O_Full ?6) ?7))))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 (: (O_Sub ?5 ([])) (: (O_Sub ?6 ?7) ?8))))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 (: (O_Sub ?5 (: O_Empty ([]))) (: (O_Sub ?6 ?7) ?8))))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 (: (O_Sub ?5 (: O_Empty (: O_Empty ?6))) (: (O_Sub ?7 ([])) ?8))))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 (: (O_Sub ?5 (: O_Empty (: O_Empty ?6))) (: (O_Sub ?7 (: O_Empty ([]))) ?8))))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 (: (O_Sub ?5 (: O_Empty (: O_Empty ?6))) (: (O_Sub ?7 (: (O_Sub ?8 ?9) ([]))) ?10))))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 (: (O_Sub ?5 (: O_Empty (: (O_Sub ?6 ?7) ?8))) (: (O_Sub ?9 ([])) ?10))))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 (: (O_Sub ?5 (: O_Empty (: (O_Sub ?6 ?7) ?8))) (: (O_Sub ?9 (: O_Empty ([]))) ?10))))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 (: (O_Sub ?5 (: O_Empty (: (O_Sub ?6 ?7) ?8))) (: (O_Sub ?9 (: (O_Full ?10) ([]))) ?11))))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 (: (O_Sub ?5 (: O_Empty (: (O_Sub ?6 ?7) ?8))) (: (O_Sub ?9 (: (O_Sub ?10 ?11) ([]))) ?12))))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 (: (O_Sub ?5 (: (O_Sub ?6 ?7) ([]))) (: (O_Sub ?8 ?9) ?10))))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 (: (O_Sub ?5 (: (O_Sub ?6 ?7) (: O_Empty ?8))) (: (O_Sub ?9 ([])) ?10))))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 (: (O_Sub ?5 (: (O_Sub ?6 ?7) (: O_Empty ?8))) (: (O_Sub ?9 (: O_Empty ([]))) ?10))))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 (: (O_Sub ?5 (: (O_Sub ?6 ?7) (: O_Empty ?8))) (: (O_Sub ?9 (: (O_Full ?10) ([]))) ?11))))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 (: (O_Sub ?5 (: (O_Sub ?6 ?7) (: O_Empty ?8))) (: (O_Sub ?9 (: (O_Sub ?10 ?11) ([]))) ?12))))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 (: (O_Sub ?5 (: (O_Sub ?6 ?7) (: (O_Full ?8) ?9))) (: (O_Sub ?10 ([])) ?11))))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 (: (O_Sub ?5 (: (O_Sub ?6 ?7) (: (O_Full ?8) ?9))) (: (O_Sub ?10 (: O_Empty ([]))) ?11))))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 (: (O_Sub ?5 (: (O_Sub ?6 ?7) (: (O_Full ?8) ?9))) (: (O_Sub ?10 (: (O_Full ?11) ([]))) ?12))))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 (: (O_Sub ?5 (: (O_Sub ?6 ?7) (: (O_Full ?8) ?9))) (: (O_Sub ?10 (: (O_Sub ?11 ?12) ([]))) ?13))))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 (: (O_Sub ?5 (: (O_Sub ?6 ?7) (: (O_Sub ?8 ?9) ?10))) (: (O_Sub ?11 ([])) ?12))))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 (: (O_Sub ?5 (: (O_Sub ?6 ?7) (: (O_Sub ?8 ?9) ?10))) (: (O_Sub ?11 (: O_Empty ([]))) ?12))))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 (: (O_Sub ?5 (: (O_Sub ?6 ?7) (: (O_Sub ?8 ?9) ?10))) (: (O_Sub ?11 (: (O_Full ?12) ([]))) ?13))))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 (: (O_Sub ?5 (: (O_Sub ?6 ?7) (: (O_Sub ?8 ?9) ?10))) (: (O_Sub ?11 (: (O_Sub ?12 ?13) ([]))) ?14))))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 (: (O_Sub ?5 ([])) (: (O_Sub ?6 ?7) ?8))))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 (: (O_Sub ?5 (: ?6 ([]))) (: (O_Sub ?7 ?8) ?9))))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 (: (O_Sub ?5 (: ?6 (: ?7 ([])))) (: (O_Sub ?8 ?9) ?10))))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 (: (O_Sub ?5 ([])) (: (O_Sub ?6 ?7) ?8))))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 (: (O_Sub ?5 (: ?6 ([]))) (: (O_Sub ?7 ?8) ?9))))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 (: (O_Sub ?5 ([])) (: (O_Sub ?6 ?7) ?8))))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? ([])) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case quadoct (O_Sub ? (: ?1 ([]))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 ([])))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 ([]))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 ([])))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:35:21-34: Irrefutable pattern failed for pattern (l4 : ll5) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 (: ?5 ([]))))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:35:38-51: Irrefutable pattern failed for pattern (l5 : ll6) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 (: ?5 (: ?6 ([])))))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:36:21-34: Irrefutable pattern failed for pattern (l6 : ll7) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 (: ?5 (: ?6 (: O_Empty ([]))))))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:36:38-51: Irrefutable pattern failed for pattern (l7 : ll8) case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 (: ?5 (: ?6 (: (O_Sub ?7 ?8) ([]))))))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:36:38-51: Irrefutable pattern failed for pattern (l7 : ll8) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 (: ?5 (: ?6 (: (O_Sub ?7 ([])) (: O_Empty ?8))))))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 (: ?5 (: ?6 (: (O_Sub ?7 ([])) (: (O_Full ?8) ?9))))))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: ?1 (: ?2 (: ?3 (: ?4 (: ?5 (: ?6 (: (O_Sub ?7 ([])) (: (O_Sub ?8 ?9) ?10))))))))) of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case quadoct (O_Sub ? ([])) of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case quadoct (O_Sub ? (: O_Empty ([]))) of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 ([])) ?2))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: O_Empty ([]))) ?2))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: O_Empty ([]))) ?3))) ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) ?5))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: O_Empty ?4))) ?5))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: (O_Full ?4) ?5))) ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: (O_Sub ?4 ?5) ?6))) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: ?3 ([]))) ?4))) ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: ?3 (: ?4 ([])))) ?5))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: ?3 (: ?4 (: O_Empty ([]))))) ?5))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: ?3 (: ?4 (: (O_Sub ?5 ?6) ([]))))) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: ?3 ([]))) ?4))) ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: ?3 (: ?4 ([])))) ?5))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 ([])) ?3))) ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: O_Empty (: (O_Sub ?2 (: ?3 ([]))) ?4))) ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 ?3) ([]))) ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty ([]))) (: O_Empty ?3))) ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ([])) ?4))) (: O_Empty ?5))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) (: O_Empty ?5))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: O_Empty ?4))) (: O_Empty ?5))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 (: O_Empty ([]))) (: O_Empty ?4))) (: O_Empty ?5))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 (: (O_Sub ?4 ?5) ([]))) (: O_Empty ?6))) (: O_Empty ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: O_Empty ?4))) (: O_Empty ?5))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: (O_Full ?4) ?5))) (: O_Empty ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 (: O_Empty ([]))) (: (O_Full ?4) ?5))) (: O_Empty ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 (: (O_Sub ?4 ?5) ([]))) (: (O_Full ?6) ?7))) (: O_Empty ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: (O_Full ?4) ?5))) (: O_Empty ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: (O_Sub ?4 ?5) ?6))) (: O_Empty ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 (: O_Empty ([]))) (: (O_Sub ?4 ?5) ?6))) (: O_Empty ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 (: (O_Sub ?4 ?5) ([]))) (: (O_Sub ?6 ?7) ?8))) (: O_Empty ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: (O_Sub ?4 ?5) ?6))) (: O_Empty ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: O_Empty ?4))) ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: O_Empty ?5))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: O_Empty ([]))))) (: O_Empty ?5))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: (O_Sub ?5 ?6) ([]))))) (: O_Empty ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: O_Empty ?4))) ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: O_Empty ?5))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: ?5 ([]))))) (: O_Empty ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: O_Empty ?3))) ?4))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: O_Empty ?4))) ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: O_Empty ?5))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty ([]))) (: (O_Full ?3) ?4))) ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ([])) ?4))) (: (O_Full ?5) ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) (: (O_Full ?5) ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: O_Empty ?4))) (: (O_Full ?5) ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 (: O_Empty ([]))) (: O_Empty ?4))) (: (O_Full ?5) ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 (: (O_Sub ?4 ?5) ([]))) (: O_Empty ?6))) (: (O_Full ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: O_Empty ?4))) (: (O_Full ?5) ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: (O_Full ?4) ?5))) (: (O_Full ?6) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 (: O_Empty ([]))) (: (O_Full ?4) ?5))) (: (O_Full ?6) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 (: (O_Sub ?4 ?5) ([]))) (: (O_Full ?6) ?7))) (: (O_Full ?8) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: (O_Full ?4) ?5))) (: (O_Full ?6) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: (O_Sub ?4 ?5) ?6))) (: (O_Full ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 (: O_Empty ([]))) (: (O_Sub ?4 ?5) ?6))) (: (O_Full ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 (: (O_Sub ?4 ?5) ([]))) (: (O_Sub ?6 ?7) ?8))) (: (O_Full ?9) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: (O_Sub ?4 ?5) ?6))) (: (O_Full ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Full ?4) ?5))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: (O_Full ?5) ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: O_Empty ([]))))) (: (O_Full ?5) ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: (O_Sub ?5 ?6) ([]))))) (: (O_Full ?7) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Full ?4) ?5))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: (O_Full ?5) ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 (: ?5 ([]))))) (: (O_Full ?6) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:38-51: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Full ?3) ?4))) ?5))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 ([]))) (: (O_Full ?4) ?5))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: ?3 (: ?4 ([])))) (: (O_Full ?5) ?6))) ?7))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Quad.hs:34:21-34: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 ([])) (: (O_Sub ?3 ?4) ?5))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty ([]))) (: (O_Sub ?3 ?4) ?5))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: O_Empty ?3))) (: (O_Sub ?4 ([])) ?5))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: O_Empty ?3))) (: (O_Sub ?4 (: O_Empty ([]))) ?5))) ?6))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: O_Empty ?3))) (: (O_Sub ?4 (: (O_Sub ?5 ?6) ([]))) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: O_Empty ?3))) (: (O_Sub ?4 (: (O_Sub ?5 ([])) (: O_Empty ?6))) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: O_Empty ?3))) (: (O_Sub ?4 (: (O_Sub ?5 ([])) (: (O_Full ?6) ?7))) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: O_Empty ?3))) (: (O_Sub ?4 (: (O_Sub ?5 ([])) (: (O_Sub ?6 ?7) ?8))) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 ([])) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: O_Empty ([]))) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ([])) ?4))) (: (O_Sub ?5 (: O_Empty (: O_Empty ?6))) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ([])) ?4))) (: (O_Sub ?5 (: O_Empty (: (O_Full ?6) ?7))) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ([])) ?4))) (: (O_Sub ?5 (: O_Empty (: (O_Sub ?6 ?7) ?8))) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: (O_Full ?7) ([]))) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ([])) ?4))) (: (O_Sub ?5 (: (O_Full ?6) (: O_Empty ?7))) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ([])) ?4))) (: (O_Sub ?5 (: (O_Full ?6) (: (O_Full ?7) ?8))) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ([])) ?4))) (: (O_Sub ?5 (: (O_Full ?6) (: (O_Sub ?7 ?8) ?9))) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ?4) ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) ([]))) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ([])) ?4))) (: (O_Sub ?5 (: (O_Sub ?6 ?7) (: O_Empty ?8))) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ([])) ?4))) (: (O_Sub ?5 (: (O_Sub ?6 ?7) (: (O_Full ?8) ?9))) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: O_Empty (: (O_Sub ?3 ([])) ?4))) (: (O_Sub ?5 (: (O_Sub ?6 ?7) (: (O_Sub ?8 ?9) ?10))) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) ([]))) (: (O_Sub ?5 ?6) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) (: (O_Sub ?6 ([])) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) (: (O_Sub ?6 (: O_Empty ([]))) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: O_Empty ?4))) (: (O_Sub ?5 (: O_Empty (: O_Empty ?6))) ?7))) ?8))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: O_Empty ?4))) (: (O_Sub ?5 (: O_Empty (: (O_Full ?6) ?7))) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: O_Empty ?4))) (: (O_Sub ?5 (: O_Empty (: (O_Sub ?6 ?7) ?8))) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) (: (O_Sub ?6 (: (O_Full ?7) ([]))) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: O_Empty ?4))) (: (O_Sub ?5 (: (O_Full ?6) (: O_Empty ?7))) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: O_Empty ?4))) (: (O_Sub ?5 (: (O_Full ?6) (: (O_Full ?7) ?8))) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: O_Empty ?4))) (: (O_Sub ?5 (: (O_Full ?6) (: (O_Sub ?7 ?8) ?9))) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: O_Empty ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) ([]))) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: O_Empty ?4))) (: (O_Sub ?5 (: (O_Sub ?6 ?7) (: O_Empty ?8))) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: O_Empty ?4))) (: (O_Sub ?5 (: (O_Sub ?6 ?7) (: (O_Full ?8) ?9))) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: O_Empty ?4))) (: (O_Sub ?5 (: (O_Sub ?6 ?7) (: (O_Sub ?8 ?9) ?10))) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) (: (O_Sub ?7 ([])) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: O_Empty ([]))) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: (O_Full ?4) ?5))) (: (O_Sub ?6 (: O_Empty (: O_Empty ?7))) ?8))) ?9))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: (O_Full ?4) ?5))) (: (O_Sub ?6 (: O_Empty (: (O_Full ?7) ?8))) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: (O_Full ?4) ?5))) (: (O_Sub ?6 (: O_Empty (: (O_Sub ?7 ?8) ?9))) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: (O_Full ?8) ([]))) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: (O_Full ?4) ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: O_Empty ?8))) ?9))) ?10))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: (O_Full ?4) ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: (O_Full ?8) ?9))) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: (O_Full ?4) ?5))) (: (O_Sub ?6 (: (O_Full ?7) (: (O_Sub ?8 ?9) ?10))) ?11))) ?12))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ?4) (: (O_Full ?5) ?6))) (: (O_Sub ?7 (: (O_Sub ?8 ?9) ([]))) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:43:38-51: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case case case quadoct (O_Sub ? (: O_Empty (: (O_Sub ?1 (: (O_Sub ?2 (: (O_Sub ?3 ([])) (: (O_Full ?4) ?5))) (: (O_Sub ?6 (: (O_Sub ?7 ?8) (: O_Empty ?9))) ?10))) ?11))) of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x of Q_Sub _ x -> x of x : _ -> x ==> ! Quad.hs:33:21-32: Irrefutable pattern failed for pattern (l0 : ll1) Raster: Results: case case case cdraw -1 ? of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case draw -1 ? of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case cdraw -1 ? of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw -1 ? of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_NewXY ?1 ?2 ?3) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case draw -1 ? of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case draw -1 ? of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case cdraw -1 ? of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw -1 ? of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 ([])) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_NewXY ?1 ?2 ?3) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case draw -1 ? of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case draw -1 ? of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case draw -1 ? of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case cdraw -1 ? of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw -1 ? of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 ([])) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty ([]))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_NewXY ?2 ?3 ?4) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_NewXY ?1 ?2 ?3) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case draw -1 ? of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case draw -1 ? of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case draw -1 ? of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw -1 ? of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_NewXY ?1 ?2 ?3) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case cdraw -1 ? of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw -1 ? of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 ([])) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty ([]))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty ([])))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_NewXY ?2 ?3 ?4) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 ([])) ?3)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_NewXY ?2 ?3 ?4) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_NewXY ?1 ?2 ?3) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case draw -1 ? of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case draw -1 ? of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case draw -1 ? of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw -1 ? of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 ([])) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_NewXY ?1 ?2 ?3) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case cdraw -1 ? of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw -1 ? of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 ([])) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty ([]))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty ([])))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_NewXY ?2 ?3 ?4) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Full ?1) ?2))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 ([])) ?3))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_NewXY ?2 ?3 ?4) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 ([])) ?3)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty ([]))) ?3)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_NewXY ?3 ?4 ?5) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_NewXY ?2 ?3 ?4) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_NewXY ?1 ?2 ?3) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case draw -1 ? of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case draw -1 ? of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case draw -1 ? of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw -1 ? of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 ([])) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty ([]))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_NewXY ?2 ?3 ?4) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_NewXY ?1 ?2 ?3) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case cdraw -1 ? of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw -1 ? of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case cdraw -1 (Q_Full ?) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 ([])) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty ([]))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty ([])))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?2 ?3 ?4) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 ([])) ?3)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_NewXY ?2 ?3 ?4) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Full ?1) ?2))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Full ?1) ?2))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 ([])) ?3))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty ([]))) ?3))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_NewXY ?3 ?4 ?5) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_NewXY ?2 ?3 ?4) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 ([])) ?3)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty ([]))) ?3)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty ([])))) ?3)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 ([])) ?4)) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_NewXY ?3 ?4 ?5) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_NewXY ?2 ?3 ?4) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_NewXY ?1 ?2 ?3) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case draw -1 ? of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case draw -1 ? of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case draw -1 ? of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw -1 ? of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 ([])) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty ([]))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty ([])))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_NewXY ?2 ?3 ?4) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 ([])) ?3)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_NewXY ?2 ?3 ?4) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_NewXY ?1 ?2 ?3) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case cdraw -1 ? of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw -1 ? of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case cdraw -1 (Q_Full ?) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case cdraw -1 (Q_Full ?) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 ([])) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty ([]))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty ([])))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?1) ?2))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 ([])) ?3))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?2 ?3 ?4) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 ([])) ?3)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty ([]))) ?3)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_NewXY ?3 ?4 ?5) ?6)) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_NewXY ?2 ?3 ?4) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Full ?1) ?2))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Full ?1) ?2))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 ([])) ?3))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty ([]))) ?3))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty ([])))) ?3))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Full ?2) ?3)) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 ([])) ?4)) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_NewXY ?3 ?4 ?5) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_NewXY ?2 ?3 ?4) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 ([])) ?3)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty ([]))) ?3)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty ([])))) ?3)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?3)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6)))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 ([])) ?4))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 ([])) ?4)) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty ([]))) ?4)) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_NewXY ?3 ?4 ?5) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_NewXY ?2 ?3 ?4) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_NewXY ?1 ?2 ?3) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case draw -1 ? of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case draw -1 ? of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case draw -1 ? of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw -1 ? of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 ([])) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty ([]))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty ([])))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_NewXY ?2 ?3 ?4) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Full ?1) ?2))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 ([])) ?3))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_NewXY ?2 ?3 ?4) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 ([])) ?3)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty ([]))) ?3)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_NewXY ?3 ?4 ?5) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_NewXY ?2 ?3 ?4) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_NewXY ?1 ?2 ?3) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case cdraw -1 ? of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw -1 ? of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case cdraw -1 (Q_Full ?) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case cdraw -1 (Q_Full ?) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 ([])) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty ([]))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty ([])))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?1) ?2))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?1) ?2))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 ([])) ?3))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty ([]))) ?3))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_NewXY ?3 ?4 ?5) ?6)) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?2 ?3 ?4) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Full ?1) ?2)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 ([])) ?3)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty ([]))) ?3)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty ([])))) ?3)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 ([])) ?4)) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_NewXY ?3 ?4 ?5) ?6)) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_NewXY ?2 ?3 ?4) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Full ?1) ?2))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Full ?1) ?2))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 ([])) ?3))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty ([]))) ?3))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty ([])))) ?3))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?3))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6)))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 ([])) ?4))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Full ?2) ?3)) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Full ?2) ?3)) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 ([])) ?4)) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty ([]))) ?4)) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_NewXY ?3 ?4 ?5) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_NewXY ?2 ?3 ?4) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Full ?1) ?2)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 ([])) ?3)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty ([]))) ?3)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty ([])))) ?3)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?3)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) ([]))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_NewXY ?4 ?5 ?6) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6))))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 ([])) ?4)))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6)))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 ([])) ?4))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty ([]))) ?4))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 ([])) ?4)) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty ([]))) ?4)) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty ([])))) ?4)) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 ([])) ?5)) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_NewXY ?3 ?4 ?5) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_NewXY ?2 ?3 ?4) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_NewXY ?1 ?2 ?3) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case draw -1 ? of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case draw -1 ? of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case draw -1 ? of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw -1 ? of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case case draw -1 (Q_Full ?) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 ([])) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty ([]))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty ([])))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?2 ?3 ?4) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 ([])) ?3)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_NewXY ?2 ?3 ?4) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Full ?1) ?2))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Full ?1) ?2))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 ([])) ?3))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty ([]))) ?3))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_NewXY ?3 ?4 ?5) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_NewXY ?2 ?3 ?4) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 ([])) ?3)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty ([]))) ?3)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty ([])))) ?3)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 ([])) ?4)) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_NewXY ?3 ?4 ?5) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_NewXY ?2 ?3 ?4) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_NewXY ?1 ?2 ?3) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case cdraw -1 ? of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw -1 ? of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case cdraw -1 (Q_Full ?) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case cdraw -1 (Q_Full ?) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 ([])) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty ([]))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty ([])))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?1) ?2))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?1) ?2))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?1) ?2))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 ([])) ?3))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty ([]))) ?3))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty ([])))) ?3))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6))) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Full ?2) ?3)) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 ([])) ?4)) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_NewXY ?3 ?4 ?5) ?6)) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?2 ?3 ?4) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Full ?1) ?2)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Full ?1) ?2)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 ([])) ?3)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty ([]))) ?3)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty ([])))) ?3)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?3)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6)))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 ([])) ?4))) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 ([])) ?4)) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty ([]))) ?4)) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8)) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_NewXY ?3 ?4 ?5) ?6)) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_NewXY ?2 ?3 ?4) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Full ?1) ?2))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Full ?1) ?2))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Full ?1) ?2))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 ([])) ?3))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty ([]))) ?3))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty ([])))) ?3))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?3))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) ([])))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_NewXY ?4 ?5 ?6) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6))))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3)))) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 ([])) ?4)))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6)))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 ([])) ?4))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty ([]))) ?4))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Full ?2) ?3)) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Full ?2) ?3)) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 ([])) ?4)) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty ([]))) ?4)) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty ([])))) ?4)) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5)) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 ([])) ?5)) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_NewXY ?3 ?4 ?5) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_NewXY ?2 ?3 ?4) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Full ?1) ?2)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Full ?1) ?2)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 ([])) ?3)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty ([]))) ?3)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty ([])))) ?3)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?3)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) ([]))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty ([])))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Full ?3) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 ([])) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_NewXY ?4 ?5 ?6) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3))))) ?4)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 ([])) ?4))))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6))))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 ([])) ?4)))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty ([]))) ?4)))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8)))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6)))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 ([])) ?4))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty ([]))) ?4))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty ([])))) ?4))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 ([])) ?5)) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 ([])) ?4)) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty ([]))) ?4)) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty ([])))) ?4)) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?4)) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7)))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5)) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 ([])) ?5))) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 ([])) ?5)) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_NewXY ?3 ?4 ?5) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_NewXY ?2 ?3 ?4) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_NewXY ?1 ?2 ?3) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case draw -1 ? of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case draw -1 ? of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case draw -1 ? of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw -1 ? of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case case draw -1 (Q_Full ?) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case case case draw -1 (Q_Full ?) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 ([])) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty ([]))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty ([])))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?1) ?2))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 ([])) ?3))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?2 ?3 ?4) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 ([])) ?3)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty ([]))) ?3)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_NewXY ?3 ?4 ?5) ?6)) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_NewXY ?2 ?3 ?4) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Full ?1) ?2))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Full ?1) ?2))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 ([])) ?3))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty ([]))) ?3))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty ([])))) ?3))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Full ?2) ?3)) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 ([])) ?4)) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_NewXY ?3 ?4 ?5) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_NewXY ?2 ?3 ?4) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 ([])) ?3)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty ([]))) ?3)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty ([])))) ?3)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?3)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6)))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 ([])) ?4))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 ([])) ?4)) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty ([]))) ?4)) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_NewXY ?3 ?4 ?5) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_NewXY ?2 ?3 ?4) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_NewXY ?1 ?2 ?3) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case cdraw -1 ? of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw -1 ? of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case cdraw -1 (Q_Full ?) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case cdraw -1 (Q_Full ?) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case case cdraw ? (Q_Full (RGB -1.0 ?1 ?2)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Prelude.chr: bad argument: (-1) case case case case cdraw ? (Q_Sub ?1 ([])) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty ([]))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty ([])))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?1) ?2))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?1) ?2))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?1) ?2))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?1) ?2))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 ([])) ?3))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty ([]))) ?3))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty ([])))) ?3))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?3))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6)))) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 ([])) ?4))) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6))) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Full ?2) ?3)) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Full ?2) ?3)) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 ([])) ?4)) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty ([]))) ?4)) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8)) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_NewXY ?3 ?4 ?5) ?6)) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?2 ?3 ?4) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Full ?1) ?2)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Full ?1) ?2)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Full ?1) ?2)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 ([])) ?3)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty ([]))) ?3)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty ([])))) ?3)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?3)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) ([]))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6))))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 ([])) ?4)))) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6)))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 ([])) ?4))) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty ([]))) ?4))) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8))) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Full ?2) ?3)) ?4)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 ([])) ?4)) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty ([]))) ?4)) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty ([])))) ?4)) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))) ?8)) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 ([])) ?5)) ?6)) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8)) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_NewXY ?3 ?4 ?5) ?6)) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_NewXY ?2 ?3 ?4) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Full ?1) ?2))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Full ?1) ?2))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Full ?1) ?2))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Full ?1) ?2))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 ([])) ?3))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty ([]))) ?3))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty ([])))) ?3))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?3))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) ([])))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty ([]))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 ([])) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_NewXY ?4 ?5 ?6) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3))))) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 ([])) ?4))))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6))))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3)))) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3)))) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 ([])) ?4)))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty ([]))) ?4)))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8)))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6)))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 ([])) ?4))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty ([]))) ?4))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty ([])))) ?4))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))) ?8))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 ([])) ?5)) ?6))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Full ?2) ?3)) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Full ?2) ?3)) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 ([])) ?4)) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty ([]))) ?4)) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty ([])))) ?4)) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?4)) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7)))) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5)) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 ([])) ?5))) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5)) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5)) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 ([])) ?5)) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_NewXY ?3 ?4 ?5) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_NewXY ?2 ?3 ?4) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Full ?1) ?2)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Full ?1) ?2)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 ([])) ?3)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty ([]))) ?3)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty ([])))) ?3)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?3)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) ([]))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty ([])))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: Q_Empty ([]))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 ([])) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Full ?3) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Full ?3) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 ([])) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty ([]))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_NewXY ?4 ?5 ?6) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3))))) ?4)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3))))) ?4)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 ([])) ?4))))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty ([]))) ?4))))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8))))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6))))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3)))) ?4)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 ([])) ?4)))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty ([]))) ?4)))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty ([])))) ?4)))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))) ?8)))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 ([])) ?5)) ?6)))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8)))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6)))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 ([])) ?4))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty ([]))) ?4))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty ([])))) ?4))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?4))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7)))) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 ([])) ?5))) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 ([])) ?5)) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Full ?2) ?3)) ?4)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 ([])) ?4)) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty ([]))) ?4)) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty ([])))) ?4)) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?4)) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) ([]))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty ([])))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 ([])) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 ([])) ?5)))) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7)))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5)) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5)) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 ([])) ?5))) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5))) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9))) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 ([])) ?5)) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5)) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9)) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7)) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_NewXY ?3 ?4 ?5) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_NewXY ?2 ?3 ?4) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_NewXY ?1 ?2 ?3) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case draw -1 ? of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case draw -1 ? of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case draw -1 ? of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw -1 ? of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case case draw -1 (Q_Full ?) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case case case draw -1 (Q_Full ?) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case case case case draw -1 (Q_Full ?) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 ([])) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty ([]))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty ([])))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?1) ?2))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?1) ?2))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 ([])) ?3))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty ([]))) ?3))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_NewXY ?3 ?4 ?5) ?6)) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?2 ?3 ?4) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Full ?1) ?2)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 ([])) ?3)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty ([]))) ?3)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty ([])))) ?3)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 ([])) ?4)) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_NewXY ?3 ?4 ?5) ?6)) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_NewXY ?2 ?3 ?4) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Full ?1) ?2))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Full ?1) ?2))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 ([])) ?3))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty ([]))) ?3))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty ([])))) ?3))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?3))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6)))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 ([])) ?4))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Full ?2) ?3)) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Full ?2) ?3)) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 ([])) ?4)) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty ([]))) ?4)) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_NewXY ?3 ?4 ?5) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_NewXY ?2 ?3 ?4) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case case case case case draw -1 (Q_Sub ? (: (Q_Full ?1) ?2)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 ([])) ?3)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty ([]))) ?3)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty ([])))) ?3)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?3)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) ([]))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty ([])))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 ([])) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_NewXY ?4 ?5 ?6) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6))))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 ([])) ?4)))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6)))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 ([])) ?4))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty ([]))) ?4))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 ([])) ?4)) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty ([]))) ?4)) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty ([])))) ?4)) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 ([])) ?5)) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_NewXY ?3 ?4 ?5) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_NewXY ?2 ?3 ?4) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_NewXY ?1 ?2 ?3) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case cdraw -1 ? of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw -1 ? of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case cdraw -1 (Q_Full ?) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case cdraw -1 (Q_Full ?) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case case cdraw ? (Q_Full (RGB -1.0 ?1 ?2)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Prelude.chr: bad argument: (-1) case case case case cdraw ? (Q_Sub ?1 ([])) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty ([]))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty ([])))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?1) ?2))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?1) ?2))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?1) ?2))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?1) ?2))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?1) ?2))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 ([])) ?3))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty ([]))) ?3))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty ([])))) ?3))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?3))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6))))) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3)))) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 ([])) ?4)))) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6)))) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 ([])) ?4))) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty ([]))) ?4))) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8))) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6))) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Full ?2) ?3)) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Full ?2) ?3)) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Full ?2) ?3)) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 ([])) ?4)) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty ([]))) ?4)) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty ([])))) ?4)) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))) ?8)) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5)) ?6))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 ([])) ?5)) ?6)) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8)) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_NewXY ?3 ?4 ?5) ?6)) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?2 ?3 ?4) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Full ?1) ?2)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Full ?1) ?2)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Full ?1) ?2)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Full ?1) ?2)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 ([])) ?3)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty ([]))) ?3)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty ([])))) ?3)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?3)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) ([]))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 ([])) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_NewXY ?4 ?5 ?6) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3))))) ?4)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 ([])) ?4))))) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6))))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 ([])) ?4)))) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty ([]))) ?4)))) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8)))) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6)))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 ([])) ?4))) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty ([]))) ?4))) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty ([])))) ?4))) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))) ?8))) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5))) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 ([])) ?5)) ?6))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8))) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Full ?2) ?3)) ?4)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Full ?2) ?3)) ?4)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 ([])) ?4)) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty ([]))) ?4)) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty ([])))) ?4)) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?4)) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7)))) ?8)) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5)) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 ([])) ?5))) ?6)) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))) ?8)) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 ([])) ?5)) ?6)) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)) ?6)) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)) ?10)) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8)) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_NewXY ?3 ?4 ?5) ?6)) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_NewXY ?2 ?3 ?4) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Full ?1) ?2))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Full ?1) ?2))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Full ?1) ?2))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Full ?1) ?2))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 ([])) ?3))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty ([]))) ?3))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty ([])))) ?3))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?3))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) ([])))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty ([]))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 ([])) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 ([])) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_NewXY ?4 ?5 ?6) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3))))) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3))))) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 ([])) ?4))))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty ([]))) ?4))))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8))))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6))))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3)))) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3)))) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3)))) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 ([])) ?4)))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty ([]))) ?4)))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty ([])))) ?4)))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))) ?8)))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5)))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 ([])) ?5)) ?6)))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8)))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6)))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 ([])) ?4))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty ([]))) ?4))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty ([])))) ?4))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?4))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7)))) ?8))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 ([])) ?5))) ?6))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))) ?8))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 ([])) ?5)) ?6))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)) ?6))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)) ?10))) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Full ?2) ?3)) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Full ?2) ?3)) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Full ?2) ?3)) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 ([])) ?4)) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty ([]))) ?4)) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty ([])))) ?4)) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?4)) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) ([]))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty ([])))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 ([])) ?6))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))))) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4)))) ?5)) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 ([])) ?5)))) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7)))) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5)) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5)) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 ([])) ?5))) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5))) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9))) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5)) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5)) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 ([])) ?5)) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5)) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9)) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6)) ?7)) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7)) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_NewXY ?3 ?4 ?5) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_NewXY ?2 ?3 ?4) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Full ?1) ?2)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Full ?1) ?2)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 ([])) ?3)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty ([]))) ?3)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty ([])))) ?3)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?3)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) ([]))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty ([])))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: Q_Empty ([]))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: Q_Empty (: (Q_Sub ?4 ([])) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 ([])) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Full ?3) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Full ?3) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 ([])) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty ([]))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 ([])) ?6))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty ([]))) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_NewXY ?4 ?5 ?6) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3))))) ?4)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3))))) ?4)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3))))) ?4)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 ([])) ?4))))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty ([]))) ?4))))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty ([])))) ?4))))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))) ?8))))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5))))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 ([])) ?5)) ?6))))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8))))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6))))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3)))) ?4)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3)))) ?4)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 ([])) ?4)))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty ([]))) ?4)))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty ([])))) ?4)))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?4)))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7)))) ?8)))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5)))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 ([])) ?5))) ?6)))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))) ?8)))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 ([])) ?5)) ?6)))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)) ?6)))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)) ?10)))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8)))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6)))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 ([])) ?4))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty ([]))) ?4))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty ([])))) ?4))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?4))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) ([])))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty ([]))))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 ([])) ?6)))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_NewXY ?5 ?6 ?7) ?8)))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))))) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4)))) ?5))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 ([])) ?5)))) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7)))) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 ([])) ?5))) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5))) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9))) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 ([])) ?5)) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5)) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9)) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6)) ?7))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7)) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Full ?2) ?3)) ?4)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Full ?2) ?3)) ?4)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 ([])) ?4)) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty ([]))) ?4)) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty ([])))) ?4)) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?4)) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) ([]))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty ([])))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: Q_Empty ([]))))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_Sub ?5 ([])) ?6)))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8)))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Full ?4) ?5))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 ([])) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: Q_Empty ([]))) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4))))) ?5)) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 ([])) ?5))))) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 ([])) ?5)))) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)))) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)))) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7)))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5)) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5)) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 ([])) ?5))) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5))) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5))) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9))) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6))) ?7)) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9))) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 ([])) ?5)) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5)) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?5)) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8)))) ?9)) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6)) ?7)) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 ([])) ?6))) ?7)) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9)) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7)) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty ([]))) ?6)) ?7)) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)) ?11)) ?12)) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_NewXY ?3 ?4 ?5) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_NewXY ?2 ?3 ?4) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_NewXY ?1 ?2 ?3) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case draw -1 ? of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case draw -1 ? of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case draw -1 ? of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw -1 ? of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case case draw -1 (Q_Full ?) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case case case draw -1 (Q_Full ?) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case case case case draw -1 (Q_Full ?) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case case case case case draw -1 (Q_Full ?) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 ([])) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty ([]))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty ([])))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?1) ?2))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?1) ?2))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?1) ?2))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 ([])) ?3))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty ([]))) ?3))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty ([])))) ?3))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6))) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Full ?2) ?3)) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 ([])) ?4)) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_NewXY ?3 ?4 ?5) ?6)) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?2 ?3 ?4) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Full ?1) ?2)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Full ?1) ?2)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 ([])) ?3)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty ([]))) ?3)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty ([])))) ?3)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?3)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6)))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 ([])) ?4))) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 ([])) ?4)) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty ([]))) ?4)) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8)) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_NewXY ?3 ?4 ?5) ?6)) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_NewXY ?2 ?3 ?4) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Full ?1) ?2))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Full ?1) ?2))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Full ?1) ?2))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 ([])) ?3))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty ([]))) ?3))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty ([])))) ?3))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?3))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) ([])))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty ([]))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 ([])) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_NewXY ?4 ?5 ?6) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6))))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3)))) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 ([])) ?4)))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6)))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 ([])) ?4))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty ([]))) ?4))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Full ?2) ?3)) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Full ?2) ?3)) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 ([])) ?4)) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty ([]))) ?4)) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty ([])))) ?4)) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5)) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 ([])) ?5)) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_NewXY ?3 ?4 ?5) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_NewXY ?2 ?3 ?4) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case case case case case draw -1 (Q_Sub ? (: (Q_Full ?1) ?2)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case case case draw -1 (Q_Sub ? (: (Q_Full ?1) ?2)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 ([])) ?3)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty ([]))) ?3)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty ([])))) ?3)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?3)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) ([]))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty ([])))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: Q_Empty ([]))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 ([])) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Full ?3) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 ([])) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty ([]))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_NewXY ?4 ?5 ?6) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3))))) ?4)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 ([])) ?4))))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6))))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 ([])) ?4)))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty ([]))) ?4)))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8)))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6)))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 ([])) ?4))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty ([]))) ?4))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty ([])))) ?4))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 ([])) ?5)) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 ([])) ?4)) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty ([]))) ?4)) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty ([])))) ?4)) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?4)) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7)))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5)) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 ([])) ?5))) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 ([])) ?5)) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_NewXY ?3 ?4 ?5) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_NewXY ?2 ?3 ?4) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_NewXY ?1 ?2 ?3) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case cdraw -1 ? of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw -1 ? of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case cdraw -1 (Q_Full ?) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case cdraw -1 (Q_Full ?) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case case cdraw ? (Q_Full (RGB -1.0 ?1 ?2)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Prelude.chr: bad argument: (-1) case case case case case case case case case case case case case cdraw ? (Q_Full (RGB ?1 -1.0 ?2)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Prelude.chr: bad argument: (-1) case case case case cdraw ? (Q_Sub ?1 ([])) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty ([]))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty ([])))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?1) ?2))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?1) ?2))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?1) ?2))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?1) ?2))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?1) ?2))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?1) ?2))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 ([])) ?3))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty ([]))) ?3))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty ([])))) ?3))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?3))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3))))) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 ([])) ?4))))) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6))))) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3)))) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3)))) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 ([])) ?4)))) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty ([]))) ?4)))) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8)))) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6)))) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 ([])) ?4))) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty ([]))) ?4))) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty ([])))) ?4))) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))) ?8))) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5))) ?6))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 ([])) ?5)) ?6))) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8))) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6))) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Full ?2) ?3)) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Full ?2) ?3)) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Full ?2) ?3)) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Full ?2) ?3)) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 ([])) ?4)) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty ([]))) ?4)) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty ([])))) ?4)) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?4)) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7)))) ?8)) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5)) ?6))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 ([])) ?5))) ?6)) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))) ?8)) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5)) ?6))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5)) ?6))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 ([])) ?5)) ?6)) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)) ?6)) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)) ?10)) ?11))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8)) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_NewXY ?3 ?4 ?5) ?6)) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?2 ?3 ?4) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Full ?1) ?2)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Full ?1) ?2)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Full ?1) ?2)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Full ?1) ?2)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 ([])) ?3)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty ([]))) ?3)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty ([])))) ?3)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?3)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) ([]))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Full ?3) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 ([])) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_NewXY ?4 ?5 ?6) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3))))) ?4)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3))))) ?4)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 ([])) ?4))))) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty ([]))) ?4))))) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8))))) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6))))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3)))) ?4)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 ([])) ?4)))) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty ([]))) ?4)))) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty ([])))) ?4)))) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))) ?8)))) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 ([])) ?5)) ?6)))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8)))) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6)))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 ([])) ?4))) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty ([]))) ?4))) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty ([])))) ?4))) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?4))) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7)))) ?8))) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5))) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 ([])) ?5))) ?6))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))) ?8))) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5))) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5))) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 ([])) ?5)) ?6))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)) ?6))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)) ?10))) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8))) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Full ?2) ?3)) ?4)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Full ?2) ?3)) ?4)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Full ?2) ?3)) ?4)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 ([])) ?4)) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty ([]))) ?4)) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty ([])))) ?4)) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?4)) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) ([]))) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))))) ?8)) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 ([])) ?5)))) ?6)) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7)))) ?8)) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5)) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5)) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 ([])) ?5))) ?6)) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5))) ?6)) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9))) ?10)) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))) ?8)) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5)) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 ([])) ?5)) ?6)) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)) ?6)) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5)) ?6)) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9)) ?10)) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7)) ?8)) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)) ?10)) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8)) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_NewXY ?3 ?4 ?5) ?6)) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_NewXY ?2 ?3 ?4) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Full ?1) ?2))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Full ?1) ?2))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Full ?1) ?2))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Full ?1) ?2))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 ([])) ?3))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty ([]))) ?3))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty ([])))) ?3))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?3))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) ([])))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty ([]))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: Q_Empty (: (Q_Full ?3) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 ([])) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Full ?3) ?4)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 ([])) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_NewXY ?4 ?5 ?6) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3))))) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3))))) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3))))) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 ([])) ?4))))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty ([]))) ?4))))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty ([])))) ?4))))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))) ?8))))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5))))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 ([])) ?5)) ?6))))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8))))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6))))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3)))) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3)))) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3)))) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3)))) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 ([])) ?4)))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty ([]))) ?4)))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty ([])))) ?4)))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?4)))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7)))) ?8)))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5)))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 ([])) ?5))) ?6)))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))) ?8)))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5)))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5)))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 ([])) ?5)) ?6)))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)) ?6)))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)) ?10)))) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8)))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6)))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 ([])) ?4))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty ([]))) ?4))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty ([])))) ?4))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?4))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) ([])))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_NewXY ?5 ?6 ?7) ?8)))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))))) ?8))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4)))) ?5))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 ([])) ?5)))) ?6))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7)))) ?8))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 ([])) ?5))) ?6))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5))) ?6))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9))) ?10))) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))) ?8))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 ([])) ?5)) ?6))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)) ?6))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5)) ?6))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9)) ?10))) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6)) ?7))) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7)) ?8))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)) ?10))) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Full ?2) ?3)) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Full ?2) ?3)) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Full ?2) ?3)) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Full ?2) ?3)) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 ([])) ?4)) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty ([]))) ?4)) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty ([])))) ?4)) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?4)) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) ([]))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty ([])))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8)))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Full ?4) ?5))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 ([])) ?6))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10))) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4))))) ?5)) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 ([])) ?5))))) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))))) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4)))) ?5)) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4)))) ?5)) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 ([])) ?5)))) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)))) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)))) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7)))) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5)) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5)) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 ([])) ?5))) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5))) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5))) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9))) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6))) ?7)) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7))) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9))) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5)) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5)) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 ([])) ?5)) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5)) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?5)) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8)))) ?9)) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6)) ?7)) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 ([])) ?6))) ?7)) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9)) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6)) ?7)) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6)) ?7)) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7)) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty ([]))) ?6)) ?7)) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)) ?11)) ?12)) ?13))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_NewXY ?3 ?4 ?5) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_NewXY ?2 ?3 ?4) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Full ?1) ?2)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Full ?1) ?2)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case case cdraw ? (Q_Sub ?1 (: (Q_Full (RGB -1.0 ?2 ?3)) ?4)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Prelude.chr: bad argument: (-1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 ([])) ?3)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty ([]))) ?3)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty ([])))) ?3)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?3)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) ([]))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty ([])))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: Q_Empty ([]))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: Q_Empty (: (Q_Sub ?4 ([])) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: Q_Empty (: (Q_Full ?3) ?4)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 ([])) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Full ?3) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Full ?3) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 ([])) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty ([]))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8)))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 ([])) ?6))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10))) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty ([]))) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9))) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Full ?5) ?6)) ?7)) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_NewXY ?7 ?8 ?9) ?10)) ?11)) ?12)) ?13))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_NewXY ?4 ?5 ?6) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3))))) ?4)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3))))) ?4)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3))))) ?4)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3))))) ?4)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 ([])) ?4))))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty ([]))) ?4))))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty ([])))) ?4))))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?4))))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7)))) ?8))))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5))))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 ([])) ?5))) ?6))))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))) ?8))))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5))))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5))))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 ([])) ?5)) ?6))))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)) ?6))))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)) ?10))))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8))))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6))))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3)))) ?4)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3)))) ?4)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3)))) ?4)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 ([])) ?4)))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty ([]))) ?4)))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty ([])))) ?4)))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?4)))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) ([]))))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_NewXY ?5 ?6 ?7) ?8))))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))))) ?8)))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 ([])) ?5)))) ?6)))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7)))) ?8)))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5)))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5)))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 ([])) ?5))) ?6)))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5))) ?6)))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9))) ?10)))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))) ?8)))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5)))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 ([])) ?5)) ?6)))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)) ?6)))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5)) ?6)))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9)) ?10)))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7)) ?8)))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)) ?10)))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8)))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6)))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 ([])) ?4))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty ([]))) ?4))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty ([])))) ?4))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?4))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) ([])))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty ([]))))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 ([])) ?6)))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_NewXY ?5 ?6 ?7) ?8)))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4))))) ?5))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 ([])) ?5))))) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))))) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4)))) ?5))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4)))) ?5))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 ([])) ?5)))) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)))) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)))) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7)))) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 ([])) ?5))) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5))) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5))) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9))) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6))) ?7))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7))) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9))) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 ([])) ?5)) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5)) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?5)) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8)))) ?9)) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6)) ?7))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 ([])) ?6))) ?7)) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9)) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6)) ?7))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6)) ?7))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7)) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty ([]))) ?6)) ?7)) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)) ?11)) ?12))) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Full ?2) ?3)) ?4)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Full ?2) ?3)) ?4)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 ([])) ?4)) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty ([]))) ?4)) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty ([])))) ?4)) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?4)) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) ([]))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty ([])))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: Q_Empty ([]))))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_Sub ?5 ([])) ?6)))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8)))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Full ?4) ?5))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Full ?4) ?5))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 ([])) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: Q_Empty ([]))) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9))) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Full ?5) ?6)) ?7))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_NewXY ?7 ?8 ?9) ?10)) ?11)) ?12))) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4))))) ?5)) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4))))) ?5)) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 ([])) ?5))))) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5))))) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9))))) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4)))) ?5)) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 ([])) ?5)))) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)))) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5)))) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9)))) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7)))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)))) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7)))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5)) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5)) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 ([])) ?5))) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5))) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5))) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?5))) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8)))) ?9))) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6))) ?7)) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 ([])) ?6))) ?7))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9))) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6))) ?7)) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6))) ?7)) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty ([]))) ?6)) ?7))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)) ?11))) ?12)) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9))) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5)) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 ([])) ?5)) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5)) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?5)) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) ([]))) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty ([])))) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9)))) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 ([])) ?7))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 (: (Q_NewXY ?7 ?8 ?9) ?10)) ?11))) ?12)) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_NewXY ?6 ?7 ?8) ?9))) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))))) ?9)) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_Sub ?5 ([])) ?6)))) ?7)) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8)))) ?9)) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6)) ?7)) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6)) ?7)) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 ([])) ?6))) ?7)) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: Q_Empty ([]))) ?6))) ?7)) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10))) ?11)) ?12)) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9)) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7)) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty ([]))) ?6)) ?7)) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty ([])))) ?6)) ?7)) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9))) ?10)) ?11)) ?12)) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8)) ?9)) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)) ?11)) ?12)) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_NewXY ?3 ?4 ?5) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_NewXY ?2 ?3 ?4) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_NewXY ?1 ?2 ?3) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case draw -1 ? of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case draw -1 ? of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case draw -1 ? of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw -1 ? of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case case draw -1 (Q_Full ?) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case case case draw -1 (Q_Full ?) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case case case case draw -1 (Q_Full ?) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case case case case case draw -1 (Q_Full ?) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 ([])) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty ([]))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty ([])))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?1) ?2))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?1) ?2))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?1) ?2))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?1) ?2))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 ([])) ?3))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty ([]))) ?3))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty ([])))) ?3))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?3))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6)))) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 ([])) ?4))) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6))) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Full ?2) ?3)) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Full ?2) ?3)) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 ([])) ?4)) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty ([]))) ?4)) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8)) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_NewXY ?3 ?4 ?5) ?6)) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?2 ?3 ?4) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Full ?1) ?2)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Full ?1) ?2)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Full ?1) ?2)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 ([])) ?3)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty ([]))) ?3)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty ([])))) ?3)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?3)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) ([]))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_NewXY ?4 ?5 ?6) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6))))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 ([])) ?4)))) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6)))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 ([])) ?4))) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty ([]))) ?4))) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8))) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Full ?2) ?3)) ?4)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 ([])) ?4)) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty ([]))) ?4)) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty ([])))) ?4)) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))) ?8)) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 ([])) ?5)) ?6)) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8)) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_NewXY ?3 ?4 ?5) ?6)) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_NewXY ?2 ?3 ?4) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Full ?1) ?2))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Full ?1) ?2))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Full ?1) ?2))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Full ?1) ?2))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 ([])) ?3))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty ([]))) ?3))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty ([])))) ?3))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?3))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) ([])))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty ([]))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 ([])) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_NewXY ?4 ?5 ?6) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3))))) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 ([])) ?4))))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6))))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3)))) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3)))) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 ([])) ?4)))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty ([]))) ?4)))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8)))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6)))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 ([])) ?4))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty ([]))) ?4))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty ([])))) ?4))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))) ?8))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 ([])) ?5)) ?6))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Full ?2) ?3)) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Full ?2) ?3)) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 ([])) ?4)) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty ([]))) ?4)) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty ([])))) ?4)) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?4)) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7)))) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5)) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 ([])) ?5))) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5)) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5)) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 ([])) ?5)) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_NewXY ?3 ?4 ?5) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_NewXY ?2 ?3 ?4) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case case case case case draw -1 (Q_Sub ? (: (Q_Full ?1) ?2)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case case case draw -1 (Q_Sub ? (: (Q_Full ?1) ?2)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case case case case draw -1 (Q_Sub ? (: (Q_Full ?1) ?2)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 ([])) ?3)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty ([]))) ?3)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty ([])))) ?3)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?3)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) ([]))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty ([])))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: Q_Empty ([]))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 ([])) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Full ?3) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Full ?3) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 ([])) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty ([]))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_NewXY ?4 ?5 ?6) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3))))) ?4)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3))))) ?4)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 ([])) ?4))))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty ([]))) ?4))))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8))))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6))))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3)))) ?4)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 ([])) ?4)))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty ([]))) ?4)))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty ([])))) ?4)))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))) ?8)))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 ([])) ?5)) ?6)))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8)))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6)))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 ([])) ?4))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty ([]))) ?4))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty ([])))) ?4))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?4))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7)))) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 ([])) ?5))) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 ([])) ?5)) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Full ?2) ?3)) ?4)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 ([])) ?4)) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty ([]))) ?4)) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty ([])))) ?4)) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?4)) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) ([]))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty ([])))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8)))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 ([])) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 ([])) ?5)))) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7)))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5)) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5)) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 ([])) ?5))) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5))) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9))) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 ([])) ?5)) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5)) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9)) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7)) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_NewXY ?3 ?4 ?5) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_NewXY ?2 ?3 ?4) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_NewXY ?1 ?2 ?3) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case cdraw -1 ? of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw -1 ? of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case cdraw -1 (Q_Full ?) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case cdraw -1 (Q_Full ?) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case case cdraw ? (Q_Full (RGB -1.0 ?1 ?2)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Prelude.chr: bad argument: (-1) case case case case case case case case case case case case case cdraw ? (Q_Full (RGB ?1 -1.0 ?2)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Prelude.chr: bad argument: (-1) case case case case cdraw ? (Q_Sub ?1 ([])) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty ([]))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty ([])))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?1) ?2))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?1) ?2))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?1) ?2))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?1) ?2))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?1) ?2))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?1) ?2))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 ([])) ?3))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty ([]))) ?3))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty ([])))) ?3))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?3))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3))))) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3))))) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 ([])) ?4))))) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty ([]))) ?4))))) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8))))) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6))))) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3)))) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3)))) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3)))) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 ([])) ?4)))) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty ([]))) ?4)))) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty ([])))) ?4)))) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))) ?8)))) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5)))) ?6))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 ([])) ?5)) ?6)))) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8)))) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6)))) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 ([])) ?4))) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty ([]))) ?4))) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty ([])))) ?4))) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?4))) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7)))) ?8))) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5))) ?6))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 ([])) ?5))) ?6))) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))) ?8))) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5))) ?6))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5))) ?6))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 ([])) ?5)) ?6))) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)) ?6))) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)) ?10))) ?11))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8))) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6))) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Full ?2) ?3)) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Full ?2) ?3)) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Full ?2) ?3)) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Full ?2) ?3)) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Full ?2) ?3)) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 ([])) ?4)) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty ([]))) ?4)) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty ([])))) ?4)) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?4)) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) ([]))) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))))) ?8)) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4)))) ?5)) ?6))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 ([])) ?5)))) ?6)) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7)))) ?8)) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5)) ?6))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5)) ?6))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 ([])) ?5))) ?6)) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5))) ?6)) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9))) ?10)) ?11))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))) ?8)) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5)) ?6))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5)) ?6))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5)) ?6))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 ([])) ?5)) ?6)) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)) ?6)) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5)) ?6)) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9)) ?10)) ?11))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6)) ?7)) ?8))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7)) ?8)) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)) ?10)) ?11))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8)) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_NewXY ?3 ?4 ?5) ?6)) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?2 ?3 ?4) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Full ?1) ?2)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Full ?1) ?2)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Full ?1) ?2)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Full ?1) ?2)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 ([])) ?3)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty ([]))) ?3)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty ([])))) ?3)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?3)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) ([]))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Full ?3) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Full ?3) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Full ?3) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 ([])) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty ([]))) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)) ?11))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_NewXY ?4 ?5 ?6) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3))))) ?4)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3))))) ?4)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3))))) ?4)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 ([])) ?4))))) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty ([]))) ?4))))) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty ([])))) ?4))))) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))) ?8))))) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5))))) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 ([])) ?5)) ?6))))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8))))) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6))))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3)))) ?4)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3)))) ?4)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 ([])) ?4)))) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty ([]))) ?4)))) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty ([])))) ?4)))) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?4)))) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7)))) ?8)))) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5)))) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 ([])) ?5))) ?6)))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))) ?8)))) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 ([])) ?5)) ?6)))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)) ?6)))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)) ?10)))) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8)))) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6)))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 ([])) ?4))) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty ([]))) ?4))) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty ([])))) ?4))) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?4))) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) ([])))) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_NewXY ?5 ?6 ?7) ?8)))) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))))) ?8))) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4)))) ?5))) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 ([])) ?5)))) ?6))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7)))) ?8))) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5))) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5))) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 ([])) ?5))) ?6))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5))) ?6))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9))) ?10))) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))) ?8))) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5))) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5))) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5))) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 ([])) ?5)) ?6))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)) ?6))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5)) ?6))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9)) ?10))) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6)) ?7))) ?8)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7)) ?8))) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)) ?10))) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8))) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Full ?2) ?3)) ?4)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Full ?2) ?3)) ?4)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Full ?2) ?3)) ?4)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Full ?2) ?3)) ?4)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 ([])) ?4)) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty ([]))) ?4)) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty ([])))) ?4)) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?4)) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) ([]))) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty ([])))) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8)))) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Full ?4) ?5))) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 ([])) ?6))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10))) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4))))) ?5)) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 ([])) ?5))))) ?6)) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))))) ?8)) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 ([])) ?5)))) ?6)) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)))) ?6)) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)))) ?10)) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7)))) ?8)) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5)) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5)) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5)) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 ([])) ?5))) ?6)) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5))) ?6)) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5))) ?6)) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9))) ?10)) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6))) ?7)) ?8)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7))) ?8)) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9))) ?10)) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))) ?8)) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5)) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5)) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 ([])) ?5)) ?6)) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)) ?6)) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5)) ?6)) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?5)) ?6)) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8)))) ?9)) ?10)) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6)) ?7)) ?8)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 ([])) ?6))) ?7)) ?8)) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9)) ?10)) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7)) ?8)) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty ([]))) ?6)) ?7)) ?8)) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)) ?11)) ?12)) ?13)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)) ?10)) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8)) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_NewXY ?3 ?4 ?5) ?6)) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_NewXY ?2 ?3 ?4) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Full ?1) ?2))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Full ?1) ?2))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Full ?1) ?2))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Full ?1) ?2))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Full (RGB -1.0 ?2 ?3)) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Prelude.chr: bad argument: (-1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 ([])) ?3))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty ([]))) ?3))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty ([])))) ?3))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?3))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) ([])))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty ([]))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: Q_Empty (: (Q_Full ?3) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: Q_Empty (: (Q_Full ?3) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: Q_Empty (: (Q_Full ?3) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 ([])) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: Q_Empty (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)) ?11))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Full ?3) ?4)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Full ?3) ?4)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 ([])) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8)))) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 ([])) ?6))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10))) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty ([]))) ?6)) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9))) ?10)) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8)) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_NewXY ?7 ?8 ?9) ?10)) ?11)) ?12)) ?13)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_NewXY ?4 ?5 ?6) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3))))) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3))))) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3))))) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3))))) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 ([])) ?4))))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty ([]))) ?4))))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty ([])))) ?4))))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?4))))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7)))) ?8))))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5))))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 ([])) ?5))) ?6))))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))) ?8))))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5))))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5))))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 ([])) ?5)) ?6))))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)) ?6))))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)) ?10))))) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8))))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6))))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3)))) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3)))) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3)))) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3)))) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3)))) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 ([])) ?4)))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty ([]))) ?4)))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty ([])))) ?4)))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?4)))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) ([]))))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_NewXY ?5 ?6 ?7) ?8))))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))))) ?8)))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4)))) ?5)))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 ([])) ?5)))) ?6)))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7)))) ?8)))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5)))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5)))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 ([])) ?5))) ?6)))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5))) ?6)))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9))) ?10)))) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))) ?8)))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5)))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5)))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5)))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 ([])) ?5)) ?6)))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)) ?6)))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5)) ?6)))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9)) ?10)))) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6)) ?7)))) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7)) ?8)))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)) ?10)))) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8)))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6)))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 ([])) ?4))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty ([]))) ?4))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty ([])))) ?4))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?4))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) ([])))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty ([]))))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Full ?4) ?5)))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 ([])) ?6)))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)))) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_NewXY ?5 ?6 ?7) ?8)))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4))))) ?5))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 ([])) ?5))))) ?6))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))))) ?8))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4)))) ?5))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4)))) ?5))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 ([])) ?5)))) ?6))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)))) ?6))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)))) ?10))) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7)))) ?8))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 ([])) ?5))) ?6))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5))) ?6))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5))) ?6))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9))) ?10))) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6))) ?7))) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7))) ?8))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9))) ?10))) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))) ?8))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 ([])) ?5)) ?6))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)) ?6))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5)) ?6))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?5)) ?6))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8)))) ?9)) ?10))) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6)) ?7))) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 ([])) ?6))) ?7)) ?8))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9)) ?10))) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6)) ?7))) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6)) ?7))) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7)) ?8))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty ([]))) ?6)) ?7)) ?8))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)) ?11)) ?12))) ?13))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)) ?10))) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Full ?2) ?3)) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Full ?2) ?3)) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Full ?2) ?3)) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Full ?2) ?3)) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 ([])) ?4)) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty ([]))) ?4)) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty ([])))) ?4)) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?4)) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) ([]))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty ([])))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: Q_Empty ([]))))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Full ?4) ?5)))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_Sub ?5 ([])) ?6)))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)))) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8)))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Full ?4) ?5))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Full ?4) ?5))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 ([])) ?6))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: Q_Empty ([]))) ?6))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9))) ?10))) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Full ?5) ?6)) ?7))) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_NewXY ?7 ?8 ?9) ?10)) ?11)) ?12))) ?13))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10))) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4))))) ?5)) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4))))) ?5)) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 ([])) ?5))))) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5))))) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9))))) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))))) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4)))) ?5)) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4)))) ?5)) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4)))) ?5)) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 ([])) ?5)))) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)))) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5)))) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9)))) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6)))) ?7)) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7)))) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)))) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7)))) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5)) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5)) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 ([])) ?5))) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5))) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5))) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?5))) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8)))) ?9))) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6))) ?7)) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 ([])) ?6))) ?7))) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9))) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6))) ?7)) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6))) ?7)) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7))) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty ([]))) ?6)) ?7))) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)) ?11))) ?12)) ?13))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9))) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5)) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5)) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5)) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 ([])) ?5)) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5)) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?5)) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) ([]))) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty ([])))) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9)))) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 ([])) ?7))) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 (: (Q_NewXY ?7 ?8 ?9) ?10)) ?11))) ?12)) ?13))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_NewXY ?6 ?7 ?8) ?9))) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))))) ?9)) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Full ?4) ?5)))) ?6)) ?7)) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_Sub ?5 ([])) ?6)))) ?7)) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8)))) ?9)) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6)) ?7)) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6)) ?7)) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 ([])) ?6))) ?7)) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: Q_Empty ([]))) ?6))) ?7)) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10))) ?11)) ?12)) ?13))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9)) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6)) ?7)) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6)) ?7)) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7)) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty ([]))) ?6)) ?7)) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty ([])))) ?6)) ?7)) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9))) ?10)) ?11)) ?12)) ?13))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Full ?5) ?6)) ?7)) ?8)) ?9)) ?10))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8)) ?9)) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)) ?11)) ?12)) ?13))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_NewXY ?3 ?4 ?5) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_NewXY ?2 ?3 ?4) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Full ?1) ?2)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Full ?1) ?2)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case case cdraw ? (Q_Sub ?1 (: (Q_Full (RGB -1.0 ?2 ?3)) ?4)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Prelude.chr: bad argument: (-1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 ([])) ?3)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty ([]))) ?3)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty ([])))) ?3)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?3)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) ([]))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty ([])))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: Q_Empty ([]))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: Q_Empty (: (Q_Sub ?4 ([])) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)) ?11))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: Q_Empty (: (Q_Full ?3) ?4)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: Q_Empty (: (Q_Full ?3) ?4)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: Q_Empty (: (Q_Full ?3) ?4)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 ([])) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8)))) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 ([])) ?6))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10))) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: Q_Empty (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty ([]))) ?6)) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9))) ?10)) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8)) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_NewXY ?7 ?8 ?9) ?10)) ?11)) ?12)) ?13)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Full ?3) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Full ?3) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Full ?3) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 ([])) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty ([]))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Full ?4) ?5)))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_Sub ?5 ([])) ?6)))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)))) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8)))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 ([])) ?6))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: Q_Empty ([]))) ?6))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9))) ?10))) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Full ?5) ?6)) ?7))) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_NewXY ?7 ?8 ?9) ?10)) ?11)) ?12))) ?13))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10))) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty ([]))) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty ([])))) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9)))) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Full ?5) ?6))) ?7)) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: (Q_Sub ?6 ([])) ?7))) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: (Q_Sub ?6 (: (Q_NewXY ?7 ?8 ?9) ?10)) ?11))) ?12)) ?13))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9))) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Full ?5) ?6)) ?7)) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Full ?5) ?6)) ?7)) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 (: Q_Empty ([]))) ?7)) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 (: Q_Empty (: (Q_NewXY ?7 ?8 ?9) ?10))) ?11)) ?12)) ?13))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Full ?6) ?7)) ?8)) ?9)) ?10))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_Sub ?7 ([])) ?8)) ?9)) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_Sub ?7 (: (Q_NewXY ?8 ?9 ?10) ?11)) ?12)) ?13)) ?14)) ?15))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_NewXY ?7 ?8 ?9) ?10)) ?11)) ?12)) ?13))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_NewXY ?4 ?5 ?6) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3))))) ?4)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3))))) ?4)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3))))) ?4)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3))))) ?4)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3))))) ?4)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 ([])) ?4))))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty ([]))) ?4))))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty ([])))) ?4))))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?4))))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) ?5))))) ([]))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) ?5))))) (: (Q_NewXY ?6 ?7 ?8) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))))) ?8))))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4)))) ?5))))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 ([])) ?5)))) ?6))))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7)))) ?8))))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5))))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5))))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 ([])) ?5))) ?6))))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5))) ?6))))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9))) ?10))))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))) ?8))))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5))))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5))))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5))))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 ([])) ?5)) ?6))))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)) ?6))))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5)) ?6))))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9)) ?10))))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6)) ?7))))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7)) ?8))))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)) ?10))))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8))))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6))))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3)))) ?4)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3)))) ?4)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3)))) ?4)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3)))) ?4)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 ([])) ?4)))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty ([]))) ?4)))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty ([])))) ?4)))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?4)))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) ([]))))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty ?5))))) ([]))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty ?5))))) (: (Q_NewXY ?6 ?7 ?8) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Full ?4) ?5))))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 ([])) ?6))))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10))))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_NewXY ?5 ?6 ?7) ?8))))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4))))) ?5)))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 ([])) ?5))))) ?6)))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))))) ?8)))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 ([])) ?5)))) ?6)))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)))) ?6)))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)))) ?10)))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7)))) ?8)))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5)))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5)))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5)))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 ([])) ?5))) ?6)))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5))) ?6)))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5))) ?6)))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9))) ?10)))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6))) ?7)))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7))) ?8)))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9))) ?10)))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))) ?8)))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5)))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5)))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 ([])) ?5)) ?6)))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)) ?6)))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5)) ?6)))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?5)) ?6)))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8)))) ?9)) ?10)))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6)) ?7)))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 ([])) ?6))) ?7)) ?8)))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9)) ?10)))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7)) ?8)))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty ([]))) ?6)) ?7)) ?8)))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)) ?11)) ?12)))) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)) ?10)))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8)))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6)))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 ([])) ?4))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty ([]))) ?4))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty ([])))) ?4))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?4))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) ([])))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty ([]))))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: Q_Empty ?5))))) ([]))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: Q_Empty ?5))))) (: (Q_NewXY ?6 ?7 ?8) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Full ?4) ?5))))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_Sub ?5 ([])) ?6))))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10))))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 ([])) ?6)))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: Q_Empty ([]))) ?6)))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9))) ?10)))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8)))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_NewXY ?7 ?8 ?9) ?10)) ?11)) ?12)))) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_NewXY ?5 ?6 ?7) ?8)))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4))))) ?5))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4))))) ?5))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 ([])) ?5))))) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5))))) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9))))) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))))) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4)))) ?5))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4)))) ?5))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4)))) ?5))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 ([])) ?5)))) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)))) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5)))) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9)))) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6)))) ?7))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7)))) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)))) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7)))) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 ([])) ?5))) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5))) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5))) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?5))) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8)))) ?9))) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6))) ?7))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 ([])) ?6))) ?7))) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9))) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6))) ?7))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6))) ?7))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7))) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty ([]))) ?6)) ?7))) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)) ?11))) ?12))) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9))) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 ([])) ?5)) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5)) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?5)) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) ([]))) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty ([])))) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9)))) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 ([])) ?7))) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 (: (Q_NewXY ?7 ?8 ?9) ?10)) ?11))) ?12))) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_NewXY ?6 ?7 ?8) ?9))) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))))) ?9)) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Full ?4) ?5)))) ?6)) ?7))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_Sub ?5 ([])) ?6)))) ?7)) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8)))) ?9)) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6)) ?7))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6)) ?7))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 ([])) ?6))) ?7)) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: Q_Empty ([]))) ?6))) ?7)) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10))) ?11)) ?12))) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9)) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6)) ?7))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6)) ?7))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7)) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty ([]))) ?6)) ?7)) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty ([])))) ?6)) ?7)) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9))) ?10)) ?11)) ?12))) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Full ?5) ?6)) ?7)) ?8)) ?9))) ?10)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8)) ?9)) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)) ?11)) ?12))) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Full ?2) ?3)) ?4)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Full ?2) ?3)) ?4)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 ([])) ?4)) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty ([]))) ?4)) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty ([])))) ?4)) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?4)) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) ([]))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty ([])))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: Q_Empty ([]))))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) ([]))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_NewXY ?6 ?7 ?8) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: Q_Empty (: (Q_Full ?4) ?5))))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: Q_Empty (: (Q_Sub ?5 ([])) ?6))))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: Q_Empty (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10))))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Full ?4) ?5)))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_Sub ?5 ([])) ?6)))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_Sub ?5 (: Q_Empty ([]))) ?6)))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_Sub ?5 (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9))) ?10)))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8)))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_NewXY ?7 ?8 ?9) ?10)) ?11)) ?12)))) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8)))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Full ?4) ?5))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Full ?4) ?5))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 ([])) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: Q_Empty ([]))) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: Q_Empty (: Q_Empty ([])))) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9)))) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: (Q_Full ?5) ?6))) ?7))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: Q_Empty (: (Q_Sub ?6 ([])) ?7))) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: Q_Empty (: (Q_Sub ?6 (: (Q_NewXY ?7 ?8 ?9) ?10)) ?11))) ?12))) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9))) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Full ?5) ?6)) ?7))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Full ?5) ?6)) ?7))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_Sub ?6 (: Q_Empty ([]))) ?7)) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_Sub ?6 (: Q_Empty (: (Q_NewXY ?7 ?8 ?9) ?10))) ?11)) ?12))) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Full ?6) ?7)) ?8)) ?9))) ?10)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_Sub ?7 ([])) ?8)) ?9)) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_Sub ?7 (: (Q_NewXY ?8 ?9 ?10) ?11)) ?12)) ?13)) ?14))) ?15)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_NewXY ?7 ?8 ?9) ?10)) ?11)) ?12))) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4))))) ?5)) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4))))) ?5)) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4))))) ?5)) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 ([])) ?5))))) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5))))) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5))))) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9))))) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6))))) ?7)) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7))))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9))))) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4)))) ?5)) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4)))) ?5)) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 ([])) ?5)))) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)))) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5)))) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?5)))) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8)))) ?9)))) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6)))) ?7)) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 ([])) ?6))) ?7)))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9)))) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7)))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty ([]))) ?6)) ?7)))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)) ?11)))) ?12)) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)))) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7)))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5)) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5)) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5)) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 ([])) ?5))) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5))) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5))) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?5))) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) ([])))) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty ([]))))) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9))))) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 ([])) ?7)))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 (: (Q_NewXY ?7 ?8 ?9) ?10)) ?11)))) ?12)) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_NewXY ?6 ?7 ?8) ?9)))) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))))) ?9))) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Full ?4) ?5)))) ?6))) ?7)) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_Sub ?5 ([])) ?6)))) ?7))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8)))) ?9))) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6))) ?7)) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6))) ?7)) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 ([])) ?6))) ?7))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: Q_Empty ([]))) ?6))) ?7))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10))) ?11))) ?12)) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9))) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6))) ?7)) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6))) ?7)) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty ([]))) ?6)) ?7))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty ([])))) ?6)) ?7))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9))) ?10)) ?11))) ?12)) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Full ?5) ?6)) ?7)) ?8))) ?9)) ?10)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8)) ?9))) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)) ?11))) ?12)) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9))) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5)) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5)) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 ([])) ?5)) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5)) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?5)) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) ([]))) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty ([])))) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty (: Q_Empty ([]))))) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9))))) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty (: (Q_Sub ?6 ([])) ?7)))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty (: (Q_Sub ?6 (: (Q_NewXY ?7 ?8 ?9) ?10)) ?11)))) ?12)) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9)))) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Full ?5) ?6))) ?7)) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 ([])) ?7))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 (: Q_Empty ([]))) ?7))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 (: Q_Empty (: (Q_NewXY ?7 ?8 ?9) ?10))) ?11))) ?12)) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_Full ?6) ?7)) ?8))) ?9)) ?10)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 (: (Q_Sub ?7 ([])) ?8)) ?9))) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 (: (Q_Sub ?7 (: (Q_NewXY ?8 ?9 ?10) ?11)) ?12)) ?13))) ?14)) ?15)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 (: (Q_NewXY ?7 ?8 ?9) ?10)) ?11))) ?12)) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_NewXY ?6 ?7 ?8) ?9))) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?4) ?5))))) ?6)) ?7)) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?5 ([])) ?6))))) ?7)) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))))) ?9)) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_Sub ?5 ([])) ?6)))) ?7)) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_Sub ?5 (: Q_Empty ([]))) ?6)))) ?7)) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)))) ?11)) ?12)) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8)))) ?9)) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6)) ?7)) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6)) ?7)) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 ([])) ?6))) ?7)) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: Q_Empty ([]))) ?6))) ?7)) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: Q_Empty (: Q_Empty ([])))) ?6))) ?7)) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9))) ?10))) ?11)) ?12)) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Full ?5) ?6)) ?7))) ?8)) ?9)) ?10)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8))) ?9)) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10))) ?11)) ?12)) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9)) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7)) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty ([]))) ?6)) ?7)) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty ([])))) ?6)) ?7)) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?6)) ?7)) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9)))) ?10)) ?11)) ?12)) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Full ?5) ?6))) ?7)) ?8)) ?9)) ?10)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: (Q_Sub ?6 ([])) ?7))) ?8)) ?9)) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9))) ?10)) ?11)) ?12)) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8)) ?9)) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 (: Q_Empty ([]))) ?7)) ?8)) ?9)) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_NewXY ?7 ?8 ?9) ?10)) ?11)) ?12)) ?13)) ?14)) ?15)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)) ?11)) ?12)) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_NewXY ?3 ?4 ?5) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_NewXY ?2 ?3 ?4) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_NewXY ?1 ?2 ?3) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case draw -1 ? of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case draw -1 ? of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case draw -1 ? of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw -1 ? of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case case draw -1 (Q_Full ?) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case case case draw -1 (Q_Full ?) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case case case case draw -1 (Q_Full ?) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case case case case case draw -1 (Q_Full ?) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 ([])) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty ([]))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty ([])))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?1) ?2))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?1) ?2))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?1) ?2))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?1) ?2))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?1) ?2))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 ([])) ?3))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty ([]))) ?3))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty ([])))) ?3))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?3))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6))))) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3)))) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 ([])) ?4)))) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6)))) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 ([])) ?4))) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty ([]))) ?4))) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8))) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6))) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Full ?2) ?3)) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Full ?2) ?3)) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Full ?2) ?3)) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 ([])) ?4)) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty ([]))) ?4)) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty ([])))) ?4)) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))) ?8)) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5)) ?6))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 ([])) ?5)) ?6)) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8)) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_NewXY ?3 ?4 ?5) ?6)) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?2 ?3 ?4) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Full ?1) ?2)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Full ?1) ?2)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Full ?1) ?2)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Full ?1) ?2)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 ([])) ?3)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty ([]))) ?3)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty ([])))) ?3)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?3)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) ([]))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Full ?3) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 ([])) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_NewXY ?4 ?5 ?6) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3))))) ?4)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 ([])) ?4))))) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6))))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 ([])) ?4)))) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty ([]))) ?4)))) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8)))) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6)))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 ([])) ?4))) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty ([]))) ?4))) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty ([])))) ?4))) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))) ?8))) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5))) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 ([])) ?5)) ?6))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8))) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Full ?2) ?3)) ?4)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Full ?2) ?3)) ?4)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 ([])) ?4)) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty ([]))) ?4)) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty ([])))) ?4)) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?4)) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7)))) ?8)) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5)) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 ([])) ?5))) ?6)) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))) ?8)) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 ([])) ?5)) ?6)) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)) ?6)) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)) ?10)) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8)) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_NewXY ?3 ?4 ?5) ?6)) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_NewXY ?2 ?3 ?4) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Full ?1) ?2))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Full ?1) ?2))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Full ?1) ?2))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Full ?1) ?2))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Full ?1) ?2))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 ([])) ?3))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty ([]))) ?3))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty ([])))) ?3))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?3))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) ([])))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty ([]))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: Q_Empty (: (Q_Full ?3) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 ([])) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 ([])) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_NewXY ?4 ?5 ?6) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3))))) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3))))) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 ([])) ?4))))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty ([]))) ?4))))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8))))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6))))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3)))) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3)))) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3)))) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 ([])) ?4)))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty ([]))) ?4)))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty ([])))) ?4)))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))) ?8)))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5)))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 ([])) ?5)) ?6)))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8)))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6)))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 ([])) ?4))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty ([]))) ?4))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty ([])))) ?4))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?4))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7)))) ?8))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 ([])) ?5))) ?6))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))) ?8))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 ([])) ?5)) ?6))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)) ?6))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)) ?10))) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Full ?2) ?3)) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Full ?2) ?3)) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Full ?2) ?3)) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 ([])) ?4)) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty ([]))) ?4)) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty ([])))) ?4)) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?4)) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) ([]))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty ([])))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8)))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 ([])) ?6))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10))) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))))) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4)))) ?5)) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 ([])) ?5)))) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7)))) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5)) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5)) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 ([])) ?5))) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5))) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9))) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5)) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5)) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 ([])) ?5)) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5)) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9)) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6)) ?7)) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7)) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_NewXY ?3 ?4 ?5) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_NewXY ?2 ?3 ?4) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case case case case case draw -1 (Q_Sub ? (: (Q_Full ?1) ?2)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case case case draw -1 (Q_Sub ? (: (Q_Full ?1) ?2)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case case case case draw -1 (Q_Sub ? (: (Q_Full ?1) ?2)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case case case case case draw -1 (Q_Sub ? (: (Q_Full ?1) ?2)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 ([])) ?3)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty ([]))) ?3)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty ([])))) ?3)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?3)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) ([]))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty ([])))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: Q_Empty ([]))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: Q_Empty (: (Q_Sub ?4 ([])) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: Q_Empty (: (Q_Full ?3) ?4)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 ([])) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Full ?3) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Full ?3) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 ([])) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty ([]))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8)))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 ([])) ?6))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10))) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty ([]))) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9))) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Full ?5) ?6)) ?7)) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_NewXY ?7 ?8 ?9) ?10)) ?11)) ?12)) ?13))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_NewXY ?4 ?5 ?6) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3))))) ?4)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3))))) ?4)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3))))) ?4)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 ([])) ?4))))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty ([]))) ?4))))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty ([])))) ?4))))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))) ?8))))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5))))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 ([])) ?5)) ?6))))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8))))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6))))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3)))) ?4)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3)))) ?4)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 ([])) ?4)))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty ([]))) ?4)))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty ([])))) ?4)))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?4)))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7)))) ?8)))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5)))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 ([])) ?5))) ?6)))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))) ?8)))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 ([])) ?5)) ?6)))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)) ?6)))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)) ?10)))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8)))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6)))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 ([])) ?4))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty ([]))) ?4))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty ([])))) ?4))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?4))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) ([])))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty ([]))))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 ([])) ?6)))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_NewXY ?5 ?6 ?7) ?8)))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))))) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4)))) ?5))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 ([])) ?5)))) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7)))) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 ([])) ?5))) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5))) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9))) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 ([])) ?5)) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5)) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9)) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6)) ?7))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7)) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Full ?2) ?3)) ?4)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Full ?2) ?3)) ?4)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 ([])) ?4)) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty ([]))) ?4)) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty ([])))) ?4)) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?4)) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) ([]))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty ([])))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: Q_Empty ([]))))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_Sub ?5 ([])) ?6)))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8)))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Full ?4) ?5))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 ([])) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: Q_Empty ([]))) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9))) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Full ?5) ?6)) ?7))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_NewXY ?7 ?8 ?9) ?10)) ?11)) ?12))) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4))))) ?5)) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 ([])) ?5))))) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 ([])) ?5)))) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)))) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)))) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7)))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5)) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5)) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 ([])) ?5))) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5))) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5))) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9))) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6))) ?7)) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9))) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 ([])) ?5)) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5)) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?5)) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8)))) ?9)) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6)) ?7)) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 ([])) ?6))) ?7)) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9)) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7)) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty ([]))) ?6)) ?7)) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)) ?11)) ?12)) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_NewXY ?3 ?4 ?5) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_NewXY ?2 ?3 ?4) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_NewXY ?1 ?2 ?3) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case cdraw -1 ? of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw -1 ? of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case cdraw -1 (Q_Full ?) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case cdraw -1 (Q_Full ?) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case case cdraw ? (Q_Full (RGB -1.0 ?1 ?2)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Prelude.chr: bad argument: (-1) case case case case case case case case case case case case case cdraw ? (Q_Full (RGB ?1 -1.0 ?2)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Prelude.chr: bad argument: (-1) case case case case case case case case case case case case case case case cdraw ? (Q_Full (RGB ?1 ?2 -1.0)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Prelude.chr: bad argument: (-1) case case case case cdraw ? (Q_Sub ?1 ([])) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty ([]))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty ([])))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?1) ?2))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?1) ?2))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?1) ?2))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?1) ?2))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?1) ?2))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?1) ?2))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 ([])) ?3))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty ([]))) ?3))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty ([])))) ?3))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?3))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3))))) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3))))) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3))))) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 ([])) ?4))))) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty ([]))) ?4))))) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty ([])))) ?4))))) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))) ?8))))) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5))))) ?6))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 ([])) ?5)) ?6))))) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8))))) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6))))) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3)))) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3)))) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3)))) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3)))) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 ([])) ?4)))) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty ([]))) ?4)))) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty ([])))) ?4)))) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?4)))) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7)))) ?8)))) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5)))) ?6))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 ([])) ?5))) ?6)))) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))) ?8)))) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5)))) ?6))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5)))) ?6))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 ([])) ?5)) ?6)))) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)) ?6)))) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)) ?10)))) ?11))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8)))) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6)))) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 ([])) ?4))) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty ([]))) ?4))) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty ([])))) ?4))) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?4))) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) ([])))) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))))) ?8))) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4)))) ?5))) ?6))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 ([])) ?5)))) ?6))) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7)))) ?8))) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5))) ?6))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5))) ?6))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 ([])) ?5))) ?6))) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5))) ?6))) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9))) ?10))) ?11))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))) ?8))) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5))) ?6))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5))) ?6))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5))) ?6))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 ([])) ?5)) ?6))) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)) ?6))) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5)) ?6))) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9)) ?10))) ?11))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6)) ?7))) ?8))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7)) ?8))) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)) ?10))) ?11))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8))) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6))) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Full ?2) ?3)) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Full ?2) ?3)) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Full ?2) ?3)) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Full ?2) ?3)) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Full ?2) ?3)) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Full ?2) ?3)) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 ([])) ?4)) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty ([]))) ?4)) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty ([])))) ?4)) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?4)) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) ([]))) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty ([])))) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 ([])) ?6))) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4))))) ?5)) ?6))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 ([])) ?5))))) ?6)) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))))) ?8)) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4)))) ?5)) ?6))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4)))) ?5)) ?6))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 ([])) ?5)))) ?6)) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)))) ?6)) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)))) ?10)) ?11))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7)))) ?8)) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5)) ?6))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5)) ?6))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5)) ?6))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 ([])) ?5))) ?6)) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5))) ?6)) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5))) ?6)) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9))) ?10)) ?11))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6))) ?7)) ?8))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7))) ?8)) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9))) ?10)) ?11))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))) ?8)) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5)) ?6))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5)) ?6))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5)) ?6))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5)) ?6))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 ([])) ?5)) ?6)) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)) ?6)) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5)) ?6)) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?5)) ?6)) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8)))) ?9)) ?10)) ?11))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6)) ?7)) ?8))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 ([])) ?6))) ?7)) ?8)) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9)) ?10)) ?11))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6)) ?7)) ?8))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6)) ?7)) ?8))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7)) ?8)) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty ([]))) ?6)) ?7)) ?8)) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)) ?11)) ?12)) ?13))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)) ?10)) ?11))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8)) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_NewXY ?3 ?4 ?5) ?6)) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?2 ?3 ?4) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Full ?1) ?2)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Full ?1) ?2)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Full ?1) ?2)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Full ?1) ?2)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Full (RGB -1.0 ?2 ?3)) ?4)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Prelude.chr: bad argument: (-1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 ([])) ?3)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty ([]))) ?3)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty ([])))) ?3)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?3)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) ([]))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Full ?3) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Full ?3) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Full ?3) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Full ?3) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 ([])) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty ([]))) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 ([])) ?6))) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty ([]))) ?6)) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8)) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)) ?11))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_NewXY ?4 ?5 ?6) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3))))) ?4)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3))))) ?4)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3))))) ?4)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3))))) ?4)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 ([])) ?4))))) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty ([]))) ?4))))) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty ([])))) ?4))))) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?4))))) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7)))) ?8))))) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5))))) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 ([])) ?5))) ?6))))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))) ?8))))) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5))))) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5))))) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 ([])) ?5)) ?6))))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)) ?6))))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)) ?10))))) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8))))) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6))))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3)))) ?4)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3)))) ?4)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3)))) ?4)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 ([])) ?4)))) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty ([]))) ?4)))) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty ([])))) ?4)))) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?4)))) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) ([]))))) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))))) ?8)))) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 ([])) ?5)))) ?6)))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7)))) ?8)))) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5)))) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5)))) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 ([])) ?5))) ?6)))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5))) ?6)))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9))) ?10)))) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))) ?8)))) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5)))) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 ([])) ?5)) ?6)))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)) ?6)))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5)) ?6)))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9)) ?10)))) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7)) ?8)))) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)) ?10)))) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8)))) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6)))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 ([])) ?4))) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty ([]))) ?4))) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty ([])))) ?4))) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?4))) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) ([])))) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty ([]))))) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 ([])) ?6)))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_NewXY ?5 ?6 ?7) ?8)))) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4))))) ?5))) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 ([])) ?5))))) ?6))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))))) ?8))) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4)))) ?5))) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4)))) ?5))) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 ([])) ?5)))) ?6))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)))) ?6))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)))) ?10))) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7)))) ?8))) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5))) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5))) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5))) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 ([])) ?5))) ?6))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5))) ?6))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5))) ?6))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9))) ?10))) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6))) ?7))) ?8)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7))) ?8))) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9))) ?10))) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))) ?8))) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5))) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5))) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5))) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5))) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 ([])) ?5)) ?6))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)) ?6))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5)) ?6))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?5)) ?6))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8)))) ?9)) ?10))) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6)) ?7))) ?8)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 ([])) ?6))) ?7)) ?8))) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9)) ?10))) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6)) ?7))) ?8)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6)) ?7))) ?8)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7)) ?8))) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty ([]))) ?6)) ?7)) ?8))) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)) ?11)) ?12))) ?13)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)) ?10))) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8))) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Full ?2) ?3)) ?4)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Full ?2) ?3)) ?4)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Full ?2) ?3)) ?4)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Full ?2) ?3)) ?4)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 ([])) ?4)) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty ([]))) ?4)) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty ([])))) ?4)) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?4)) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) ([]))) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty ([])))) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: Q_Empty ([]))))) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_Sub ?5 ([])) ?6)))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8)))) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Full ?4) ?5))) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Full ?4) ?5))) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 ([])) ?6))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: Q_Empty ([]))) ?6))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8))) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10))) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4))))) ?5)) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4))))) ?5)) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 ([])) ?5))))) ?6)) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5))))) ?6)) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9))))) ?10)) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))))) ?8)) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4)))) ?5)) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 ([])) ?5)))) ?6)) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)))) ?6)) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5)))) ?6)) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9)))) ?10)) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7)))) ?8)) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)))) ?10)) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7)))) ?8)) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5)) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5)) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5)) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5)) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 ([])) ?5))) ?6)) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5))) ?6)) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5))) ?6)) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?5))) ?6)) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8)))) ?9))) ?10)) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6))) ?7)) ?8)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 ([])) ?6))) ?7))) ?8)) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9))) ?10)) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6))) ?7)) ?8)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6))) ?7)) ?8)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7))) ?8)) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty ([]))) ?6)) ?7))) ?8)) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)) ?11))) ?12)) ?13)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9))) ?10)) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))) ?8)) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5)) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5)) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5)) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 ([])) ?5)) ?6)) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)) ?6)) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5)) ?6)) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?5)) ?6)) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) ([]))) ?6)) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty ([])))) ?6)) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 ([])) ?7))) ?8)) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_NewXY ?6 ?7 ?8) ?9))) ?10)) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))))) ?9)) ?10)) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_Sub ?5 ([])) ?6)))) ?7)) ?8)) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8)))) ?9)) ?10)) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6)) ?7)) ?8)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6)) ?7)) ?8)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 ([])) ?6))) ?7)) ?8)) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: Q_Empty ([]))) ?6))) ?7)) ?8)) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10))) ?11)) ?12)) ?13)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9)) ?10)) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6)) ?7)) ?8)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7)) ?8)) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty ([]))) ?6)) ?7)) ?8)) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty ([])))) ?6)) ?7)) ?8)) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9))) ?10)) ?11)) ?12)) ?13)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8)) ?9)) ?10)) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)) ?11)) ?12)) ?13)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)) ?10)) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8)) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_NewXY ?3 ?4 ?5) ?6)) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_NewXY ?2 ?3 ?4) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Full ?1) ?2))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Full ?1) ?2))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Full ?1) ?2))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Full ?1) ?2))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Full (RGB -1.0 ?2 ?3)) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Prelude.chr: bad argument: (-1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 ([])) ?3))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty ([]))) ?3))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty ([])))) ?3))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?3))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) ([])))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty ([]))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: Q_Empty (: (Q_Full ?3) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: Q_Empty (: (Q_Full ?3) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: Q_Empty (: (Q_Full ?3) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: Q_Empty (: (Q_Full ?3) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 ([])) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 ([])) ?6))) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: Q_Empty (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: Q_Empty (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty ([]))) ?6)) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8)) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)) ?11))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Full ?3) ?4)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Full ?3) ?4)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Full ?3) ?4)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 ([])) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_Sub ?5 ([])) ?6)))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8)))) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 ([])) ?6))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: Q_Empty ([]))) ?6))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8))) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10))) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty ([]))) ?6)) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty ([])))) ?6)) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: (Q_Sub ?6 ([])) ?7))) ?8)) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9))) ?10)) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8)) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 (: Q_Empty ([]))) ?7)) ?8)) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_Sub ?7 ([])) ?8)) ?9)) ?10)) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_NewXY ?7 ?8 ?9) ?10)) ?11)) ?12)) ?13)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_NewXY ?4 ?5 ?6) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3))))) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3))))) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3))))) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3))))) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3))))) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 ([])) ?4))))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty ([]))) ?4))))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty ([])))) ?4))))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?4))))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) ?5))))) ([])))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))))) ?8))))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4)))) ?5))))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 ([])) ?5)))) ?6))))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7)))) ?8))))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5))))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5))))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 ([])) ?5))) ?6))))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5))) ?6))))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9))) ?10))))) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))) ?8))))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5))))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5))))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5))))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 ([])) ?5)) ?6))))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)) ?6))))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5)) ?6))))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9)) ?10))))) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6)) ?7))))) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7)) ?8))))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)) ?10))))) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8))))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6))))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3)))) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3)))) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3)))) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3)))) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3)))) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3)))) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 ([])) ?4)))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty ([]))) ?4)))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty ([])))) ?4)))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?4)))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) ([]))))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty ?5))))) ([])))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 ([])) ?6))))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_NewXY ?5 ?6 ?7) ?8))))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4))))) ?5)))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 ([])) ?5))))) ?6)))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))))) ?8)))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4)))) ?5)))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4)))) ?5)))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 ([])) ?5)))) ?6)))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)))) ?6)))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)))) ?10)))) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7)))) ?8)))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5)))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5)))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5)))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 ([])) ?5))) ?6)))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5))) ?6)))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5))) ?6)))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9))) ?10)))) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6))) ?7)))) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7))) ?8)))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9))) ?10)))) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))) ?8)))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5)))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5)))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5)))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5)))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 ([])) ?5)) ?6)))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)) ?6)))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5)) ?6)))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?5)) ?6)))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8)))) ?9)) ?10)))) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6)) ?7)))) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 ([])) ?6))) ?7)) ?8)))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9)) ?10)))) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6)) ?7)))) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6)) ?7)))) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7)) ?8)))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty ([]))) ?6)) ?7)) ?8)))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)) ?11)) ?12)))) ?13))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)) ?10)))) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8)))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6)))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 ([])) ?4))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty ([]))) ?4))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty ([])))) ?4))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?4))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) ([])))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty ([]))))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: Q_Empty ?5))))) ([])))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_Sub ?5 ([])) ?6))))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Full ?4) ?5)))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Full ?4) ?5)))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 ([])) ?6)))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: Q_Empty ([]))) ?6)))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8)))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)))) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_NewXY ?5 ?6 ?7) ?8)))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4))))) ?5))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4))))) ?5))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 ([])) ?5))))) ?6))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5))))) ?6))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9))))) ?10))) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))))) ?8))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4)))) ?5))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4)))) ?5))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4)))) ?5))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 ([])) ?5)))) ?6))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)))) ?6))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5)))) ?6))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9)))) ?10))) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6)))) ?7))) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7)))) ?8))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)))) ?10))) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7)))) ?8))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 ([])) ?5))) ?6))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5))) ?6))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5))) ?6))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?5))) ?6))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8)))) ?9))) ?10))) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6))) ?7))) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 ([])) ?6))) ?7))) ?8))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9))) ?10))) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6))) ?7))) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6))) ?7))) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7))) ?8))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty ([]))) ?6)) ?7))) ?8))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)) ?11))) ?12))) ?13))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9))) ?10))) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))) ?8))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 ([])) ?5)) ?6))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)) ?6))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5)) ?6))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?5)) ?6))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) ([]))) ?6))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty ([])))) ?6))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 ([])) ?7))) ?8))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_NewXY ?6 ?7 ?8) ?9))) ?10))) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))))) ?9)) ?10))) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Full ?4) ?5)))) ?6)) ?7))) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_Sub ?5 ([])) ?6)))) ?7)) ?8))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8)))) ?9)) ?10))) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6)) ?7))) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6)) ?7))) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 ([])) ?6))) ?7)) ?8))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: Q_Empty ([]))) ?6))) ?7)) ?8))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10))) ?11)) ?12))) ?13))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9)) ?10))) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6)) ?7))) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6)) ?7))) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7)) ?8))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty ([]))) ?6)) ?7)) ?8))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty ([])))) ?6)) ?7)) ?8))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9))) ?10)) ?11)) ?12))) ?13))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Full ?5) ?6)) ?7)) ?8)) ?9))) ?10))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8)) ?9)) ?10))) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)) ?11)) ?12))) ?13))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)) ?10))) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Full ?2) ?3)) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Full ?2) ?3)) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Full ?2) ?3)) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Full ?2) ?3)) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 ([])) ?4)) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty ([]))) ?4)) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty ([])))) ?4)) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?4)) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) ([]))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty ([])))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: Q_Empty ([]))))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) ([])))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: Q_Empty (: (Q_Sub ?5 ([])) ?6))))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Full ?4) ?5)))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Full ?4) ?5)))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_Sub ?5 ([])) ?6)))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_Sub ?5 (: Q_Empty ([]))) ?6)))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8)))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)))) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8)))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Full ?4) ?5))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Full ?4) ?5))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 ([])) ?6))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: Q_Empty ([]))) ?6))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: Q_Empty (: Q_Empty ([])))) ?6))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: Q_Empty (: (Q_Sub ?6 ([])) ?7))) ?8))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9))) ?10))) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Full ?5) ?6)) ?7))) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Full ?5) ?6)) ?7))) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_Sub ?6 (: Q_Empty ([]))) ?7)) ?8))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_Sub ?7 ([])) ?8)) ?9)) ?10))) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_NewXY ?7 ?8 ?9) ?10)) ?11)) ?12))) ?13))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10))) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4))))) ?5)) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4))))) ?5)) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4))))) ?5)) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 ([])) ?5))))) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5))))) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5))))) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9))))) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6))))) ?7)) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7))))) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9))))) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))))) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4)))) ?5)) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4)))) ?5)) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4)))) ?5)) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4)))) ?5)) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 ([])) ?5)))) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)))) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5)))) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?5)))) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8)))) ?9)))) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6)))) ?7)) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 ([])) ?6))) ?7)))) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9)))) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6)))) ?7)) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6)))) ?7)) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7)))) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty ([]))) ?6)) ?7)))) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)) ?11)))) ?12)) ?13))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)))) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7)))) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5)) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5)) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5)) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 ([])) ?5))) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5))) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5))) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?5))) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) ([])))) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty ([]))))) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 ([])) ?7)))) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_NewXY ?6 ?7 ?8) ?9)))) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))))) ?9))) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Full ?4) ?5)))) ?6))) ?7)) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_Sub ?5 ([])) ?6)))) ?7))) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8)))) ?9))) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6))) ?7)) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6))) ?7)) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 ([])) ?6))) ?7))) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: Q_Empty ([]))) ?6))) ?7))) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10))) ?11))) ?12)) ?13))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9))) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6))) ?7)) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6))) ?7)) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7))) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty ([]))) ?6)) ?7))) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty ([])))) ?6)) ?7))) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9))) ?10)) ?11))) ?12)) ?13))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Full ?5) ?6)) ?7)) ?8))) ?9)) ?10))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8)) ?9))) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)) ?11))) ?12)) ?13))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9))) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5)) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5)) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5)) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5)) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 ([])) ?5)) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5)) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?5)) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) ([]))) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty ([])))) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty (: Q_Empty ([]))))) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty (: (Q_Sub ?6 ([])) ?7)))) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9)))) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Full ?5) ?6))) ?7)) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 ([])) ?7))) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 (: Q_Empty ([]))) ?7))) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 (: (Q_Sub ?7 ([])) ?8)) ?9))) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 (: (Q_NewXY ?7 ?8 ?9) ?10)) ?11))) ?12)) ?13))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_NewXY ?6 ?7 ?8) ?9))) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?4) ?5))))) ?6)) ?7)) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?5 ([])) ?6))))) ?7)) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))))) ?9)) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Full ?4) ?5)))) ?6)) ?7)) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Full ?4) ?5)))) ?6)) ?7)) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_Sub ?5 ([])) ?6)))) ?7)) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_Sub ?5 (: Q_Empty ([]))) ?6)))) ?7)) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)))) ?11)) ?12)) ?13))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8)))) ?9)) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6)) ?7)) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6)) ?7)) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 ([])) ?6))) ?7)) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: Q_Empty ([]))) ?6))) ?7)) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: Q_Empty (: Q_Empty ([])))) ?6))) ?7)) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9))) ?10))) ?11)) ?12)) ?13))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Full ?5) ?6)) ?7))) ?8)) ?9)) ?10))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8))) ?9)) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10))) ?11)) ?12)) ?13))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9)) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6)) ?7)) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6)) ?7)) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7)) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty ([]))) ?6)) ?7)) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty ([])))) ?6)) ?7)) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?6)) ?7)) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9)))) ?10)) ?11)) ?12)) ?13))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Full ?5) ?6))) ?7)) ?8)) ?9)) ?10))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: (Q_Sub ?6 ([])) ?7))) ?8)) ?9)) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9))) ?10)) ?11)) ?12)) ?13))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Full ?5) ?6)) ?7)) ?8)) ?9)) ?10))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Full ?5) ?6)) ?7)) ?8)) ?9)) ?10))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8)) ?9)) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 (: Q_Empty ([]))) ?7)) ?8)) ?9)) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_NewXY ?7 ?8 ?9) ?10)) ?11)) ?12)) ?13)) ?14)) ?15))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)) ?11)) ?12)) ?13))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_NewXY ?3 ?4 ?5) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_NewXY ?2 ?3 ?4) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Full ?1) ?2)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Full ?1) ?2)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case case cdraw ? (Q_Sub ?1 (: (Q_Full (RGB -1.0 ?2 ?3)) ?4)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Prelude.chr: bad argument: (-1) case case case case case case case case case case case case case cdraw ? (Q_Sub ?1 (: (Q_Full (RGB ?2 -1.0 ?3)) ?4)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Prelude.chr: bad argument: (-1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 ([])) ?3)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty ([]))) ?3)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty ([])))) ?3)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?3)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) ([]))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty ([])))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: Q_Empty ([]))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: Q_Empty (: (Q_Sub ?4 ([])) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 ([])) ?6))) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty ([]))) ?6)) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8)) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)) ?11))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: Q_Empty (: (Q_Full ?3) ?4)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: Q_Empty (: (Q_Full ?3) ?4)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: Q_Empty (: (Q_Full ?3) ?4)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: Q_Empty (: (Q_Full ?3) ?4)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 ([])) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_Sub ?5 ([])) ?6)))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8)))) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 ([])) ?6))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: Q_Empty ([]))) ?6))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8))) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10))) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: Q_Empty (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: Q_Empty (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty ([]))) ?6)) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty ([])))) ?6)) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: (Q_Sub ?6 ([])) ?7))) ?8)) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9))) ?10)) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8)) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 (: Q_Empty ([]))) ?7)) ?8)) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_Sub ?7 ([])) ?8)) ?9)) ?10)) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_NewXY ?7 ?8 ?9) ?10)) ?11)) ?12)) ?13)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Full ?3) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Full ?3) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Full ?3) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Full ?3) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 ([])) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty ([]))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) ([])))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?5 ([])) ?6))))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Full ?4) ?5)))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Full ?4) ?5)))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_Sub ?5 ([])) ?6)))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_Sub ?5 (: Q_Empty ([]))) ?6)))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8)))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)))) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8)))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 ([])) ?6))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: Q_Empty ([]))) ?6))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: Q_Empty (: Q_Empty ([])))) ?6))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: Q_Empty (: (Q_Sub ?6 ([])) ?7))) ?8))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9))) ?10))) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Full ?5) ?6)) ?7))) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Full ?5) ?6)) ?7))) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: (Q_Sub ?6 (: Q_Empty ([]))) ?7)) ?8))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_Sub ?7 ([])) ?8)) ?9)) ?10))) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_NewXY ?7 ?8 ?9) ?10)) ?11)) ?12))) ?13))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10))) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty ([]))) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty ([])))) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: (Q_Sub ?6 ([])) ?7)))) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9)))) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Full ?5) ?6))) ?7)) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Full ?5) ?6))) ?7)) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: (Q_Sub ?6 ([])) ?7))) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: (Q_Sub ?6 (: Q_Empty ([]))) ?7))) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: (Q_Sub ?6 (: (Q_Sub ?7 ([])) ?8)) ?9))) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: (Q_Sub ?6 (: (Q_NewXY ?7 ?8 ?9) ?10)) ?11))) ?12)) ?13))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9))) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Full ?5) ?6)) ?7)) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Full ?5) ?6)) ?7)) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 (: Q_Empty ([]))) ?7)) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 (: Q_Empty (: Q_Empty ([])))) ?7)) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 (: Q_Empty (: (Q_Sub ?7 ([])) ?8))) ?9)) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 (: Q_Empty (: (Q_NewXY ?7 ?8 ?9) ?10))) ?11)) ?12)) ?13))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Full ?6) ?7)) ?8)) ?9)) ?10))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Full ?6) ?7)) ?8)) ?9)) ?10))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_Sub ?7 ([])) ?8)) ?9)) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_Sub ?7 (: Q_Empty ([]))) ?8)) ?9)) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_Sub ?7 (: (Q_Sub ?8 ([])) ?9)) ?10)) ?11)) ?12)) ?13))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_Sub ?7 (: (Q_NewXY ?8 ?9 ?10) ?11)) ?12)) ?13)) ?14)) ?15))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_NewXY ?7 ?8 ?9) ?10)) ?11)) ?12)) ?13))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_NewXY ?4 ?5 ?6) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3))))) ?4)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3))))) ?4)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3))))) ?4)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3))))) ?4)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3))))) ?4)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3))))) ?4)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 ([])) ?4))))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty ([]))) ?4))))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty ([])))) ?4))))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?4))))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) ?5))))) ([]))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) ?5))))) (: Q_Empty ([])))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) ?5))))) (: (Q_Sub ?6 ([])) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) ?5))))) (: (Q_NewXY ?6 ?7 ?8) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4))))) ?5))))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 ([])) ?5))))) ?6))))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))))) ?8))))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4)))) ?5))))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4)))) ?5))))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 ([])) ?5)))) ?6))))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)))) ?6))))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)))) ?10))))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7)))) ?8))))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5))))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5))))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5))))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 ([])) ?5))) ?6))))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5))) ?6))))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5))) ?6))))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9))) ?10))))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6))) ?7))))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7))) ?8))))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9))) ?10))))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))) ?8))))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5))))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5))))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5))))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5))))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 ([])) ?5)) ?6))))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)) ?6))))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5)) ?6))))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?5)) ?6))))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8)))) ?9)) ?10))))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6)) ?7))))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 ([])) ?6))) ?7)) ?8))))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9)) ?10))))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6)) ?7))))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6)) ?7))))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7)) ?8))))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty ([]))) ?6)) ?7)) ?8))))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)) ?11)) ?12))))) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)) ?10))))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8))))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6))))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3)))) ?4)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3)))) ?4)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3)))) ?4)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3)))) ?4)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 ([])) ?4)))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty ([]))) ?4)))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty ([])))) ?4)))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?4)))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) ([]))))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty ?5))))) ([]))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty ?5))))) (: Q_Empty ([])))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty ?5))))) (: (Q_Sub ?6 ([])) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty ?5))))) (: (Q_NewXY ?6 ?7 ?8) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Full ?4) ?5))))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Full ?4) ?5))))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 ([])) ?6))))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: Q_Empty ([]))) ?6))))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8))))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10))))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_NewXY ?5 ?6 ?7) ?8))))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4))))) ?5)))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4))))) ?5)))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 ([])) ?5))))) ?6)))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5))))) ?6)))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9))))) ?10)))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))))) ?8)))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4)))) ?5)))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 ([])) ?5)))) ?6)))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)))) ?6)))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5)))) ?6)))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9)))) ?10)))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7)))) ?8)))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)))) ?10)))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7)))) ?8)))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5)))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5)))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5)))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5)))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 ([])) ?5))) ?6)))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5))) ?6)))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5))) ?6)))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?5))) ?6)))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8)))) ?9))) ?10)))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6))) ?7)))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 ([])) ?6))) ?7))) ?8)))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9))) ?10)))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6))) ?7)))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6))) ?7)))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7))) ?8)))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty ([]))) ?6)) ?7))) ?8)))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)) ?11))) ?12)))) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9))) ?10)))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))) ?8)))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5)))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5)))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5)))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 ([])) ?5)) ?6)))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)) ?6)))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5)) ?6)))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?5)) ?6)))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) ([]))) ?6)))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty ([])))) ?6)))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 ([])) ?7))) ?8)))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_NewXY ?6 ?7 ?8) ?9))) ?10)))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))))) ?9)) ?10)))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_Sub ?5 ([])) ?6)))) ?7)) ?8)))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8)))) ?9)) ?10)))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6)) ?7)))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6)) ?7)))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 ([])) ?6))) ?7)) ?8)))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: Q_Empty ([]))) ?6))) ?7)) ?8)))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10))) ?11)) ?12)))) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9)) ?10)))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6)) ?7)))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7)) ?8)))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty ([]))) ?6)) ?7)) ?8)))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty ([])))) ?6)) ?7)) ?8)))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9))) ?10)) ?11)) ?12)))) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8)) ?9)) ?10)))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)) ?11)) ?12)))) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)) ?10)))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8)))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6)))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 ([])) ?4))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty ([]))) ?4))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty ([])))) ?4))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?4))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) ([])))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty ([]))))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: Q_Empty ?5))))) ([]))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty ([])))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 ([])) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: Q_Empty ?5))))) (: (Q_NewXY ?6 ?7 ?8) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Full ?4) ?5))))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Full ?4) ?5))))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_Sub ?5 ([])) ?6))))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_Sub ?5 (: Q_Empty ([]))) ?6))))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8))))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10))))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Full ?4) ?5)))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 ([])) ?6)))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: Q_Empty ([]))) ?6)))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: Q_Empty (: Q_Empty ([])))) ?6)))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: Q_Empty (: (Q_Sub ?6 ([])) ?7))) ?8)))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9))) ?10)))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8)))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_Sub ?6 (: Q_Empty ([]))) ?7)) ?8)))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_Sub ?7 ([])) ?8)) ?9)) ?10)))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_NewXY ?7 ?8 ?9) ?10)) ?11)) ?12)))) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_NewXY ?5 ?6 ?7) ?8)))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4))))) ?5))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4))))) ?5))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4))))) ?5))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 ([])) ?5))))) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5))))) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5))))) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9))))) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6))))) ?7))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7))))) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9))))) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))))) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4)))) ?5))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4)))) ?5))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4)))) ?5))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4)))) ?5))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 ([])) ?5)))) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)))) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5)))) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?5)))) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8)))) ?9)))) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6)))) ?7))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 ([])) ?6))) ?7)))) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9)))) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6)))) ?7))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6)))) ?7))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7)))) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty ([]))) ?6)) ?7)))) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)) ?11)))) ?12))) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)))) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7)))) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 ([])) ?5))) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5))) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5))) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?5))) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) ([])))) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty ([]))))) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 ([])) ?7)))) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_NewXY ?6 ?7 ?8) ?9)))) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))))) ?9))) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Full ?4) ?5)))) ?6))) ?7))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_Sub ?5 ([])) ?6)))) ?7))) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8)))) ?9))) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6))) ?7))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6))) ?7))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 ([])) ?6))) ?7))) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: Q_Empty ([]))) ?6))) ?7))) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10))) ?11))) ?12))) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9))) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6))) ?7))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6))) ?7))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7))) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty ([]))) ?6)) ?7))) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty ([])))) ?6)) ?7))) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9))) ?10)) ?11))) ?12))) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Full ?5) ?6)) ?7)) ?8))) ?9))) ?10)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8)) ?9))) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)) ?11))) ?12))) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9))) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 ([])) ?5)) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5)) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?5)) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) ([]))) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty ([])))) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty (: Q_Empty ([]))))) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty (: (Q_Sub ?6 ([])) ?7)))) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9)))) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Full ?5) ?6))) ?7))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 ([])) ?7))) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 (: Q_Empty ([]))) ?7))) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 (: (Q_Sub ?7 ([])) ?8)) ?9))) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 (: (Q_NewXY ?7 ?8 ?9) ?10)) ?11))) ?12))) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_NewXY ?6 ?7 ?8) ?9))) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?4) ?5))))) ?6)) ?7))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?5 ([])) ?6))))) ?7)) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))))) ?9)) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Full ?4) ?5)))) ?6)) ?7))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Full ?4) ?5)))) ?6)) ?7))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_Sub ?5 ([])) ?6)))) ?7)) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_Sub ?5 (: Q_Empty ([]))) ?6)))) ?7)) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)))) ?11)) ?12))) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8)))) ?9)) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6)) ?7))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6)) ?7))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 ([])) ?6))) ?7)) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: Q_Empty ([]))) ?6))) ?7)) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: Q_Empty (: Q_Empty ([])))) ?6))) ?7)) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9))) ?10))) ?11)) ?12))) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Full ?5) ?6)) ?7))) ?8)) ?9))) ?10)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8))) ?9)) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10))) ?11)) ?12))) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9)) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6)) ?7))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6)) ?7))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7)) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty ([]))) ?6)) ?7)) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty ([])))) ?6)) ?7)) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?6)) ?7)) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9)))) ?10)) ?11)) ?12))) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Full ?5) ?6))) ?7)) ?8)) ?9))) ?10)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: (Q_Sub ?6 ([])) ?7))) ?8)) ?9)) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9))) ?10)) ?11)) ?12))) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Full ?5) ?6)) ?7)) ?8)) ?9))) ?10)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Full ?5) ?6)) ?7)) ?8)) ?9))) ?10)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8)) ?9)) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 (: Q_Empty ([]))) ?7)) ?8)) ?9)) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_NewXY ?7 ?8 ?9) ?10)) ?11)) ?12)) ?13)) ?14))) ?15)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)) ?11)) ?12))) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Full ?2) ?3)) ?4)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Full ?2) ?3)) ?4)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Full (RGB -1.0 ?3 ?4)) ?5)) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Prelude.chr: bad argument: (-1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 ([])) ?4)) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty ([]))) ?4)) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty ([])))) ?4)) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?4)) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) ([]))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty ([])))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: Q_Empty ([]))))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) ([]))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty ([])))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 ([])) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_NewXY ?6 ?7 ?8) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: Q_Empty (: (Q_Full ?4) ?5))))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: Q_Empty (: (Q_Full ?4) ?5))))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: Q_Empty (: (Q_Sub ?5 ([])) ?6))))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: Q_Empty (: (Q_Sub ?5 (: Q_Empty ([]))) ?6))))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: Q_Empty (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8))))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: Q_Empty (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10))))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Full ?4) ?5)))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Full ?4) ?5)))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_Sub ?5 ([])) ?6)))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_Sub ?5 (: Q_Empty ([]))) ?6)))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_Sub ?5 (: Q_Empty (: Q_Empty ([])))) ?6)))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_Sub ?5 (: Q_Empty (: (Q_Sub ?6 ([])) ?7))) ?8)))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_Sub ?5 (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9))) ?10)))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8)))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_Sub ?5 (: (Q_Sub ?6 (: Q_Empty ([]))) ?7)) ?8)))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_Sub ?7 ([])) ?8)) ?9)) ?10)))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_NewXY ?7 ?8 ?9) ?10)) ?11)) ?12)))) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8)))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Full ?4) ?5))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Full ?4) ?5))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 ([])) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: Q_Empty ([]))) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: Q_Empty (: Q_Empty ([])))) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: (Q_Sub ?6 ([])) ?7)))) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9)))) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: (Q_Full ?5) ?6))) ?7))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: (Q_Full ?5) ?6))) ?7))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: Q_Empty (: (Q_Sub ?6 ([])) ?7))) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: Q_Empty (: (Q_Sub ?6 (: Q_Empty ([]))) ?7))) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: Q_Empty (: (Q_Sub ?6 (: (Q_Sub ?7 ([])) ?8)) ?9))) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: Q_Empty (: (Q_Sub ?6 (: (Q_NewXY ?7 ?8 ?9) ?10)) ?11))) ?12))) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9))) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Full ?5) ?6)) ?7))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Full ?5) ?6)) ?7))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_Sub ?6 (: Q_Empty ([]))) ?7)) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_Sub ?6 (: Q_Empty (: Q_Empty ([])))) ?7)) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_Sub ?6 (: Q_Empty (: (Q_Sub ?7 ([])) ?8))) ?9)) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_Sub ?6 (: Q_Empty (: (Q_NewXY ?7 ?8 ?9) ?10))) ?11)) ?12))) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Full ?6) ?7)) ?8)) ?9))) ?10)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Full ?6) ?7)) ?8)) ?9))) ?10)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_Sub ?7 ([])) ?8)) ?9)) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_Sub ?7 (: Q_Empty ([]))) ?8)) ?9)) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_Sub ?7 (: (Q_Sub ?8 ([])) ?9)) ?10)) ?11)) ?12))) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_Sub ?7 (: (Q_NewXY ?8 ?9 ?10) ?11)) ?12)) ?13)) ?14))) ?15)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_NewXY ?7 ?8 ?9) ?10)) ?11)) ?12))) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4))))) ?5)) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4))))) ?5)) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4))))) ?5)) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4))))) ?5)) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 ([])) ?5))))) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5))))) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5))))) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?5))))) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8)))) ?9))))) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6))))) ?7)) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 ([])) ?6))) ?7))))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9))))) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6))))) ?7)) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6))))) ?7)) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7))))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty ([]))) ?6)) ?7))))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)) ?11))))) ?12)) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9))))) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4)))) ?5)) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4)))) ?5)) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4)))) ?5)) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 ([])) ?5)))) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)))) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5)))) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?5)))) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) ([]))))) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty ?6))))) ([]))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 ([])) ?7))))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_NewXY ?6 ?7 ?8) ?9))))) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))))) ?9)))) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_Sub ?5 ([])) ?6)))) ?7)))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8)))) ?9)))) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6)))) ?7)) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6)))) ?7)) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 ([])) ?6))) ?7)))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: Q_Empty ([]))) ?6))) ?7)))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10))) ?11)))) ?12)) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9)))) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6)))) ?7)) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7)))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty ([]))) ?6)) ?7)))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty ([])))) ?6)) ?7)))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9))) ?10)) ?11)))) ?12)) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8)) ?9)))) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)) ?11)))) ?12)) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)))) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7)))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5)) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5)) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5)) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5)) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 ([])) ?5))) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5))) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5))) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?5))) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) ([])))) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty ([]))))) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty (: Q_Empty ?6))))) ([]))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty (: (Q_Sub ?6 ([])) ?7))))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9))))) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 ([])) ?7)))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 (: Q_Empty ([]))) ?7)))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 (: (Q_Sub ?7 ([])) ?8)) ?9)))) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 (: (Q_NewXY ?7 ?8 ?9) ?10)) ?11)))) ?12)) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_NewXY ?6 ?7 ?8) ?9)))) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?4) ?5))))) ?6))) ?7)) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?5 ([])) ?6))))) ?7))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))))) ?9))) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Full ?4) ?5)))) ?6))) ?7)) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Full ?4) ?5)))) ?6))) ?7)) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_Sub ?5 ([])) ?6)))) ?7))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_Sub ?5 (: Q_Empty ([]))) ?6)))) ?7))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)))) ?11))) ?12)) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8)))) ?9))) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6))) ?7)) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6))) ?7)) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 ([])) ?6))) ?7))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: Q_Empty ([]))) ?6))) ?7))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: Q_Empty (: Q_Empty ([])))) ?6))) ?7))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9))) ?10))) ?11))) ?12)) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Full ?5) ?6)) ?7))) ?8))) ?9)) ?10)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8))) ?9))) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10))) ?11))) ?12)) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9))) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6))) ?7)) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6))) ?7)) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty ([]))) ?6)) ?7))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty ([])))) ?6)) ?7))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?6)) ?7))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9)))) ?10)) ?11))) ?12)) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Full ?5) ?6))) ?7)) ?8))) ?9)) ?10)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: (Q_Sub ?6 ([])) ?7))) ?8)) ?9))) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9))) ?10)) ?11))) ?12)) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Full ?5) ?6)) ?7)) ?8))) ?9)) ?10)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Full ?5) ?6)) ?7)) ?8))) ?9)) ?10)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8)) ?9))) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 (: Q_Empty ([]))) ?7)) ?8)) ?9))) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_NewXY ?7 ?8 ?9) ?10)) ?11)) ?12)) ?13))) ?14)) ?15)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)) ?11))) ?12)) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9))) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5)) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5)) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 ([])) ?5)) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5)) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?5)) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) ([]))) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty ([])))) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty (: Q_Empty ([]))))) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty (: Q_Empty (: Q_Empty ?6))))) ([]))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty (: Q_Empty (: (Q_Sub ?6 ([])) ?7))))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9))))) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty (: (Q_Sub ?6 ([])) ?7)))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty (: (Q_Sub ?6 (: Q_Empty ([]))) ?7)))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty (: (Q_Sub ?6 (: (Q_Sub ?7 ([])) ?8)) ?9)))) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty (: (Q_Sub ?6 (: (Q_NewXY ?7 ?8 ?9) ?10)) ?11)))) ?12)) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9)))) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Full ?5) ?6))) ?7)) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Full ?5) ?6))) ?7)) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 ([])) ?7))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 (: Q_Empty ([]))) ?7))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 (: Q_Empty (: Q_Empty ([])))) ?7))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 (: Q_Empty (: (Q_Sub ?7 ([])) ?8))) ?9))) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 (: Q_Empty (: (Q_NewXY ?7 ?8 ?9) ?10))) ?11))) ?12)) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_Full ?6) ?7)) ?8))) ?9)) ?10)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_Full ?6) ?7)) ?8))) ?9)) ?10)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 (: (Q_Sub ?7 ([])) ?8)) ?9))) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 (: (Q_Sub ?7 (: Q_Empty ([]))) ?8)) ?9))) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 (: (Q_Sub ?7 (: (Q_Sub ?8 ([])) ?9)) ?10)) ?11))) ?12)) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 (: (Q_Sub ?7 (: (Q_NewXY ?8 ?9 ?10) ?11)) ?12)) ?13))) ?14)) ?15)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 (: (Q_NewXY ?7 ?8 ?9) ?10)) ?11))) ?12)) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_NewXY ?6 ?7 ?8) ?9))) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?4) ?5))))) ?6)) ?7)) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?4) ?5))))) ?6)) ?7)) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?5 ([])) ?6))))) ?7)) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?5 (: Q_Empty ([]))) ?6))))) ?7)) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10))))) ?11)) ?12)) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))))) ?9)) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Full ?4) ?5)))) ?6)) ?7)) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_Sub ?5 ([])) ?6)))) ?7)) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_Sub ?5 (: Q_Empty ([]))) ?6)))) ?7)) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_Sub ?5 (: Q_Empty (: Q_Empty ([])))) ?6)))) ?7)) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_Sub ?5 (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9))) ?10)))) ?11)) ?12)) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8)))) ?9)) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)))) ?11)) ?12)) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8)))) ?9)) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6)) ?7)) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6)) ?7)) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 ([])) ?6))) ?7)) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: Q_Empty ([]))) ?6))) ?7)) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: Q_Empty (: Q_Empty ([])))) ?6))) ?7)) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?6))) ?7)) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9)))) ?10))) ?11)) ?12)) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_Full ?5) ?6))) ?7))) ?8)) ?9)) ?10)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: Q_Empty (: (Q_Sub ?6 ([])) ?7))) ?8))) ?9)) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9))) ?10))) ?11)) ?12)) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Full ?5) ?6)) ?7))) ?8)) ?9)) ?10)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Full ?5) ?6)) ?7))) ?8)) ?9)) ?10)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8))) ?9)) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: (Q_Sub ?6 (: Q_Empty ([]))) ?7)) ?8))) ?9)) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_NewXY ?7 ?8 ?9) ?10)) ?11)) ?12))) ?13)) ?14)) ?15)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10))) ?11)) ?12)) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9)) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6)) ?7)) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7)) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty ([]))) ?6)) ?7)) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty ([])))) ?6)) ?7)) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?6)) ?7)) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?6))))) ([]))) ?7)) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?6))))) (: Q_Empty ([])))) ?7)) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?6))))) (: Q_Empty (: Q_Empty ([]))))) ?7)) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?6))))) (: Q_Empty (: (Q_Sub ?7 ([])) ?8)))) ?9)) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?6))))) (: Q_Empty (: (Q_NewXY ?7 ?8 ?9) ?10)))) ?11)) ?12)) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?6))))) (: (Q_Sub ?7 ([])) ?8))) ?9)) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?6))))) (: (Q_Sub ?7 (: Q_Empty ([]))) ?8))) ?9)) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?6))))) (: (Q_Sub ?7 (: (Q_Sub ?8 ([])) ?9)) ?10))) ?11)) ?12)) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?6))))) (: (Q_Sub ?7 (: (Q_NewXY ?8 ?9 ?10) ?11)) ?12))) ?13)) ?14)) ?15)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?6))))) (: (Q_NewXY ?7 ?8 ?9) ?10))) ?11)) ?12)) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9))))) ?10)) ?11)) ?12)) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: (Q_Sub ?6 ([])) ?7)))) ?8)) ?9)) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9)))) ?10)) ?11)) ?12)) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Full ?5) ?6))) ?7)) ?8)) ?9)) ?10)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Full ?5) ?6))) ?7)) ?8)) ?9)) ?10)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: (Q_Sub ?6 ([])) ?7))) ?8)) ?9)) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: (Q_Sub ?6 (: Q_Empty ([]))) ?7))) ?8)) ?9)) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: (Q_Sub ?6 (: (Q_NewXY ?7 ?8 ?9) ?10)) ?11))) ?12)) ?13)) ?14)) ?15)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9))) ?10)) ?11)) ?12)) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8)) ?9)) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 (: Q_Empty ([]))) ?7)) ?8)) ?9)) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 (: Q_Empty (: Q_Empty ([])))) ?7)) ?8)) ?9)) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 (: Q_Empty (: (Q_NewXY ?7 ?8 ?9) ?10))) ?11)) ?12)) ?13)) ?14)) ?15)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_Sub ?7 ([])) ?8)) ?9)) ?10)) ?11)) ?12)) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_NewXY ?7 ?8 ?9) ?10)) ?11)) ?12)) ?13)) ?14)) ?15)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)) ?11)) ?12)) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_NewXY ?3 ?4 ?5) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_NewXY ?2 ?3 ?4) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_NewXY ?1 ?2 ?3) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case draw -1 ? of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case draw -1 ? of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case draw -1 ? of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw -1 ? of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case case draw -1 (Q_Full ?) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case case case draw -1 (Q_Full ?) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case case case case draw -1 (Q_Full ?) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case case case case case draw -1 (Q_Full ?) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 ([])) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty ([]))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty ([])))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?1) ?2))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?1) ?2))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?1) ?2))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?1) ?2))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?1) ?2))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?1) ?2))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 ([])) ?3))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty ([]))) ?3))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty ([])))) ?3))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?3))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3))))) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 ([])) ?4))))) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6))))) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3)))) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3)))) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 ([])) ?4)))) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty ([]))) ?4)))) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8)))) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6)))) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 ([])) ?4))) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty ([]))) ?4))) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty ([])))) ?4))) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))) ?8))) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5))) ?6))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 ([])) ?5)) ?6))) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8))) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6))) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Full ?2) ?3)) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Full ?2) ?3)) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Full ?2) ?3)) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Full ?2) ?3)) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 ([])) ?4)) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty ([]))) ?4)) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty ([])))) ?4)) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?4)) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7)))) ?8)) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5)) ?6))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 ([])) ?5))) ?6)) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))) ?8)) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5)) ?6))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5)) ?6))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 ([])) ?5)) ?6)) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)) ?6)) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)) ?10)) ?11))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8)) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_NewXY ?3 ?4 ?5) ?6)) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?2 ?3 ?4) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Full ?1) ?2)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Full ?1) ?2)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Full ?1) ?2)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Full ?1) ?2)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Full ?1) ?2)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 ([])) ?3)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty ([]))) ?3)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty ([])))) ?3)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?3)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) ([]))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Full ?3) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Full ?3) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 ([])) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty ([]))) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_NewXY ?4 ?5 ?6) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3))))) ?4)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3))))) ?4)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 ([])) ?4))))) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty ([]))) ?4))))) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8))))) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6))))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3)))) ?4)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 ([])) ?4)))) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty ([]))) ?4)))) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty ([])))) ?4)))) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))) ?8)))) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 ([])) ?5)) ?6)))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8)))) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6)))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 ([])) ?4))) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty ([]))) ?4))) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty ([])))) ?4))) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?4))) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7)))) ?8))) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5))) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 ([])) ?5))) ?6))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))) ?8))) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5))) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5))) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 ([])) ?5)) ?6))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)) ?6))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)) ?10))) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8))) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Full ?2) ?3)) ?4)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Full ?2) ?3)) ?4)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Full ?2) ?3)) ?4)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 ([])) ?4)) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty ([]))) ?4)) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty ([])))) ?4)) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?4)) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) ([]))) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty ([])))) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 ([])) ?6))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))))) ?8)) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 ([])) ?5)))) ?6)) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7)))) ?8)) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5)) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5)) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 ([])) ?5))) ?6)) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5))) ?6)) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9))) ?10)) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))) ?8)) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5)) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 ([])) ?5)) ?6)) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)) ?6)) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5)) ?6)) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9)) ?10)) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7)) ?8)) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)) ?10)) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8)) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_NewXY ?3 ?4 ?5) ?6)) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_NewXY ?2 ?3 ?4) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Full ?1) ?2))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Full ?1) ?2))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Full ?1) ?2))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Full ?1) ?2))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Full ?1) ?2))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Full ?1) ?2))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 ([])) ?3))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty ([]))) ?3))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty ([])))) ?3))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?3))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) ([])))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty ([]))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: Q_Empty (: (Q_Full ?3) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: Q_Empty (: (Q_Full ?3) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 ([])) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Full ?3) ?4)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 ([])) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 ([])) ?6))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty ([]))) ?6)) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8)) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_NewXY ?4 ?5 ?6) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3))))) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3))))) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3))))) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 ([])) ?4))))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty ([]))) ?4))))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty ([])))) ?4))))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))) ?8))))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5))))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 ([])) ?5)) ?6))))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8))))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6))))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3)))) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3)))) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3)))) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3)))) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 ([])) ?4)))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty ([]))) ?4)))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty ([])))) ?4)))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?4)))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7)))) ?8)))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5)))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 ([])) ?5))) ?6)))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))) ?8)))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5)))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5)))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 ([])) ?5)) ?6)))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)) ?6)))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)) ?10)))) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8)))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6)))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 ([])) ?4))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty ([]))) ?4))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty ([])))) ?4))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?4))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) ([])))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty ([]))))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 ([])) ?6)))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_NewXY ?5 ?6 ?7) ?8)))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))))) ?8))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4)))) ?5))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 ([])) ?5)))) ?6))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7)))) ?8))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 ([])) ?5))) ?6))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5))) ?6))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9))) ?10))) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))) ?8))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 ([])) ?5)) ?6))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)) ?6))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5)) ?6))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9)) ?10))) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6)) ?7))) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7)) ?8))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)) ?10))) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Full ?2) ?3)) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Full ?2) ?3)) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Full ?2) ?3)) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Full ?2) ?3)) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 ([])) ?4)) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty ([]))) ?4)) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty ([])))) ?4)) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?4)) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) ([]))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty ([])))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: Q_Empty ([]))))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_Sub ?5 ([])) ?6)))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8)))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Full ?4) ?5))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 ([])) ?6))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: Q_Empty ([]))) ?6))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10))) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4))))) ?5)) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 ([])) ?5))))) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))))) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4)))) ?5)) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4)))) ?5)) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 ([])) ?5)))) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)))) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)))) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7)))) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5)) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5)) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 ([])) ?5))) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5))) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5))) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9))) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6))) ?7)) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7))) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9))) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5)) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5)) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 ([])) ?5)) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5)) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?5)) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8)))) ?9)) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6)) ?7)) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 ([])) ?6))) ?7)) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9)) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6)) ?7)) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6)) ?7)) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7)) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty ([]))) ?6)) ?7)) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)) ?11)) ?12)) ?13))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_NewXY ?3 ?4 ?5) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_NewXY ?2 ?3 ?4) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case case case case case draw -1 (Q_Sub ? (: (Q_Full ?1) ?2)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case case case draw -1 (Q_Sub ? (: (Q_Full ?1) ?2)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case case case case draw -1 (Q_Sub ? (: (Q_Full ?1) ?2)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case case case case case draw -1 (Q_Sub ? (: (Q_Full ?1) ?2)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 ([])) ?3)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty ([]))) ?3)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty ([])))) ?3)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?3)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) ([]))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty ([])))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: Q_Empty ([]))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: Q_Empty (: (Q_Sub ?4 ([])) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: Q_Empty (: (Q_Full ?3) ?4)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: Q_Empty (: (Q_Full ?3) ?4)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 ([])) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 ([])) ?6))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty ([]))) ?6)) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8)) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Full ?3) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Full ?3) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 ([])) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty ([]))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_Sub ?5 ([])) ?6)))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8)))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 ([])) ?6))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: Q_Empty ([]))) ?6))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10))) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty ([]))) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty ([])))) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: (Q_Sub ?6 ([])) ?7))) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9))) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Full ?5) ?6)) ?7)) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Full ?5) ?6)) ?7)) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 (: Q_Empty ([]))) ?7)) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_Sub ?7 ([])) ?8)) ?9)) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_NewXY ?7 ?8 ?9) ?10)) ?11)) ?12)) ?13))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_NewXY ?4 ?5 ?6) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3))))) ?4)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3))))) ?4)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3))))) ?4)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3))))) ?4)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 ([])) ?4))))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty ([]))) ?4))))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty ([])))) ?4))))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?4))))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7)))) ?8))))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5))))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 ([])) ?5))) ?6))))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))) ?8))))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5))))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5))))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 ([])) ?5)) ?6))))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)) ?6))))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)) ?10))))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8))))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6))))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3)))) ?4)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3)))) ?4)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3)))) ?4)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 ([])) ?4)))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty ([]))) ?4)))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty ([])))) ?4)))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?4)))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) ([]))))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty ?5))))) ([]))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 ([])) ?6))))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_NewXY ?5 ?6 ?7) ?8))))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))))) ?8)))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 ([])) ?5)))) ?6)))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7)))) ?8)))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5)))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5)))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 ([])) ?5))) ?6)))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5))) ?6)))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9))) ?10)))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))) ?8)))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5)))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 ([])) ?5)) ?6)))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)) ?6)))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5)) ?6)))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9)) ?10)))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7)) ?8)))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)) ?10)))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8)))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6)))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 ([])) ?4))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty ([]))) ?4))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty ([])))) ?4))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?4))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) ([])))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty ([]))))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: Q_Empty ?5))))) ([]))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_Sub ?5 ([])) ?6))))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 ([])) ?6)))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: Q_Empty ([]))) ?6)))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8)))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_NewXY ?5 ?6 ?7) ?8)))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4))))) ?5))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 ([])) ?5))))) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))))) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4)))) ?5))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4)))) ?5))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 ([])) ?5)))) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)))) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)))) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7)))) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 ([])) ?5))) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5))) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5))) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9))) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6))) ?7))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7))) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9))) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 ([])) ?5)) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5)) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?5)) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8)))) ?9)) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6)) ?7))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 ([])) ?6))) ?7)) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9)) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6)) ?7))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6)) ?7))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7)) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty ([]))) ?6)) ?7)) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)) ?11)) ?12))) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Full ?2) ?3)) ?4)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Full ?2) ?3)) ?4)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Full ?2) ?3)) ?4)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 ([])) ?4)) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty ([]))) ?4)) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty ([])))) ?4)) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?4)) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) ([]))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty ([])))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: Q_Empty ([]))))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) ([]))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: Q_Empty (: (Q_Sub ?5 ([])) ?6))))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_Sub ?5 ([])) ?6)))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_Sub ?5 (: Q_Empty ([]))) ?6)))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8)))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8)))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Full ?4) ?5))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Full ?4) ?5))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 ([])) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: Q_Empty ([]))) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: Q_Empty (: Q_Empty ([])))) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: Q_Empty (: (Q_Sub ?6 ([])) ?7))) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9))) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Full ?5) ?6)) ?7))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Full ?5) ?6)) ?7))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_Sub ?6 (: Q_Empty ([]))) ?7)) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_Sub ?7 ([])) ?8)) ?9)) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_NewXY ?7 ?8 ?9) ?10)) ?11)) ?12))) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4))))) ?5)) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4))))) ?5)) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 ([])) ?5))))) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5))))) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9))))) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4)))) ?5)) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 ([])) ?5)))) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)))) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5)))) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9)))) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7)))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)))) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7)))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5)) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5)) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 ([])) ?5))) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5))) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5))) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?5))) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8)))) ?9))) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6))) ?7)) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 ([])) ?6))) ?7))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9))) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6))) ?7)) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6))) ?7)) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty ([]))) ?6)) ?7))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)) ?11))) ?12)) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9))) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5)) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 ([])) ?5)) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5)) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?5)) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) ([]))) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty ([])))) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty (: Q_Empty ([]))))) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty (: (Q_Sub ?6 ([])) ?7)))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9)))) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 ([])) ?7))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 (: Q_Empty ([]))) ?7))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 (: (Q_Sub ?7 ([])) ?8)) ?9))) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 (: (Q_NewXY ?7 ?8 ?9) ?10)) ?11))) ?12)) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_NewXY ?6 ?7 ?8) ?9))) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))))) ?9)) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_Sub ?5 ([])) ?6)))) ?7)) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8)))) ?9)) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6)) ?7)) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6)) ?7)) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 ([])) ?6))) ?7)) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: Q_Empty ([]))) ?6))) ?7)) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10))) ?11)) ?12)) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9)) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7)) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty ([]))) ?6)) ?7)) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty ([])))) ?6)) ?7)) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9))) ?10)) ?11)) ?12)) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8)) ?9)) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)) ?11)) ?12)) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_NewXY ?3 ?4 ?5) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_NewXY ?2 ?3 ?4) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_NewXY ?1 ?2 ?3) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case cdraw -1 ? of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw -1 ? of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case cdraw -1 (Q_Full ?) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case cdraw -1 (Q_Full ?) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case case cdraw ? (Q_Full (RGB -1.0 ?1 ?2)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Prelude.chr: bad argument: (-1) case case case case case case case case case case case case case cdraw ? (Q_Full (RGB ?1 -1.0 ?2)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Prelude.chr: bad argument: (-1) case case case case case case case case case case case case case case case cdraw ? (Q_Full (RGB ?1 ?2 -1.0)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Prelude.chr: bad argument: (-1) case case case case cdraw ? (Q_Sub ?1 ([])) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty ([]))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty ([])))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?1) ?2))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?1) ?2))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?1) ?2))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?1) ?2))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?1) ?2))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?1) ?2))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full (RGB -1.0 ?2 ?3)) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Prelude.chr: bad argument: (-1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 ([])) ?3))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty ([]))) ?3))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty ([])))) ?3))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?3))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3))))) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3))))) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3))))) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3))))) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 ([])) ?4))))) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty ([]))) ?4))))) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty ([])))) ?4))))) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?4))))) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7)))) ?8))))) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5))))) ?6))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 ([])) ?5))) ?6))))) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))) ?8))))) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5))))) ?6))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5))))) ?6))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 ([])) ?5)) ?6))))) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)) ?6))))) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)) ?10))))) ?11))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8))))) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6))))) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3)))) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3)))) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3)))) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3)))) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3)))) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 ([])) ?4)))) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty ([]))) ?4)))) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty ([])))) ?4)))) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?4)))) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) ([]))))) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))))) ?8)))) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4)))) ?5)))) ?6))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 ([])) ?5)))) ?6)))) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7)))) ?8)))) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5)))) ?6))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5)))) ?6))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 ([])) ?5))) ?6)))) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5))) ?6)))) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9))) ?10)))) ?11))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))) ?8)))) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5)))) ?6))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5)))) ?6))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5)))) ?6))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 ([])) ?5)) ?6)))) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)) ?6)))) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5)) ?6)))) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9)) ?10)))) ?11))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6)) ?7)))) ?8))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7)) ?8)))) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)) ?10)))) ?11))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8)))) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6)))) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 ([])) ?4))) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty ([]))) ?4))) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty ([])))) ?4))) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?4))) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) ([])))) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty ([]))))) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 ([])) ?6)))) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_NewXY ?5 ?6 ?7) ?8)))) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4))))) ?5))) ?6))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 ([])) ?5))))) ?6))) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))))) ?8))) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4)))) ?5))) ?6))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4)))) ?5))) ?6))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 ([])) ?5)))) ?6))) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)))) ?6))) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)))) ?10))) ?11))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7)))) ?8))) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5))) ?6))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5))) ?6))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5))) ?6))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 ([])) ?5))) ?6))) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5))) ?6))) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5))) ?6))) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9))) ?10))) ?11))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6))) ?7))) ?8))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7))) ?8))) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9))) ?10))) ?11))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))) ?8))) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5))) ?6))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5))) ?6))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5))) ?6))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5))) ?6))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 ([])) ?5)) ?6))) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)) ?6))) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5)) ?6))) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?5)) ?6))) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8)))) ?9)) ?10))) ?11))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6)) ?7))) ?8))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 ([])) ?6))) ?7)) ?8))) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9)) ?10))) ?11))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6)) ?7))) ?8))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6)) ?7))) ?8))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7)) ?8))) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty ([]))) ?6)) ?7)) ?8))) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)) ?11)) ?12))) ?13))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)) ?10))) ?11))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8))) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6))) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Full ?2) ?3)) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Full ?2) ?3)) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Full ?2) ?3)) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Full ?2) ?3)) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Full ?2) ?3)) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Full ?2) ?3)) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 ([])) ?4)) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty ([]))) ?4)) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty ([])))) ?4)) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?4)) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) ([]))) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty ([])))) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: Q_Empty ([]))))) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_Sub ?5 ([])) ?6)))) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8)))) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Full ?4) ?5))) ?6))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Full ?4) ?5))) ?6))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 ([])) ?6))) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: Q_Empty ([]))) ?6))) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8))) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10))) ?11))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4))))) ?5)) ?6))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4))))) ?5)) ?6))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 ([])) ?5))))) ?6)) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5))))) ?6)) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9))))) ?10)) ?11))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))))) ?8)) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4)))) ?5)) ?6))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4)))) ?5)) ?6))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4)))) ?5)) ?6))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 ([])) ?5)))) ?6)) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)))) ?6)) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5)))) ?6)) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9)))) ?10)) ?11))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6)))) ?7)) ?8))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7)))) ?8)) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)))) ?10)) ?11))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7)))) ?8)) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5)) ?6))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5)) ?6))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5)) ?6))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5)) ?6))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 ([])) ?5))) ?6)) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5))) ?6)) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5))) ?6)) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?5))) ?6)) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8)))) ?9))) ?10)) ?11))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6))) ?7)) ?8))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 ([])) ?6))) ?7))) ?8)) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9))) ?10)) ?11))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6))) ?7)) ?8))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6))) ?7)) ?8))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7))) ?8)) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty ([]))) ?6)) ?7))) ?8)) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)) ?11))) ?12)) ?13))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9))) ?10)) ?11))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))) ?8)) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5)) ?6))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5)) ?6))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5)) ?6))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5)) ?6))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5)) ?6))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 ([])) ?5)) ?6)) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)) ?6)) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5)) ?6)) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?5)) ?6)) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) ([]))) ?6)) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty ([])))) ?6)) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 ([])) ?7))) ?8)) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_NewXY ?6 ?7 ?8) ?9))) ?10)) ?11))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))))) ?9)) ?10)) ?11))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Full ?4) ?5)))) ?6)) ?7)) ?8))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_Sub ?5 ([])) ?6)))) ?7)) ?8)) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8)))) ?9)) ?10)) ?11))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6)) ?7)) ?8))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6)) ?7)) ?8))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 ([])) ?6))) ?7)) ?8)) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: Q_Empty ([]))) ?6))) ?7)) ?8)) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10))) ?11)) ?12)) ?13))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9)) ?10)) ?11))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6)) ?7)) ?8))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6)) ?7)) ?8))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6)) ?7)) ?8))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7)) ?8)) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty ([]))) ?6)) ?7)) ?8)) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty ([])))) ?6)) ?7)) ?8)) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9))) ?10)) ?11)) ?12)) ?13))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Full ?5) ?6)) ?7)) ?8)) ?9)) ?10))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8)) ?9)) ?10)) ?11))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)) ?11)) ?12)) ?13))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)) ?10)) ?11))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8)) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_NewXY ?3 ?4 ?5) ?6)) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?2 ?3 ?4) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Full ?1) ?2)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Full ?1) ?2)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Full ?1) ?2)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Full ?1) ?2)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Full (RGB -1.0 ?2 ?3)) ?4)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Prelude.chr: bad argument: (-1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 ([])) ?3)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty ([]))) ?3)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty ([])))) ?3)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?3)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) ([]))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Full ?3) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Full ?3) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Full ?3) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Full ?3) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Full ?3) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 ([])) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty ([]))) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_Sub ?5 ([])) ?6)))) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8)))) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 ([])) ?6))) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: Q_Empty ([]))) ?6))) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8))) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10))) ?11))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty ([]))) ?6)) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty ([])))) ?6)) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: (Q_Sub ?6 ([])) ?7))) ?8)) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9))) ?10)) ?11))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Full ?5) ?6)) ?7)) ?8))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Full ?5) ?6)) ?7)) ?8))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8)) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 (: Q_Empty ([]))) ?7)) ?8)) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_Sub ?7 ([])) ?8)) ?9)) ?10)) ?11))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_NewXY ?7 ?8 ?9) ?10)) ?11)) ?12)) ?13))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)) ?11))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_NewXY ?4 ?5 ?6) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3))))) ?4)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3))))) ?4)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3))))) ?4)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3))))) ?4)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3))))) ?4)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 ([])) ?4))))) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty ([]))) ?4))))) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty ([])))) ?4))))) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?4))))) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) ?5))))) ([]))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))))) ?8))))) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4)))) ?5))))) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 ([])) ?5)))) ?6))))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7)))) ?8))))) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5))))) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5))))) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 ([])) ?5))) ?6))))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5))) ?6))))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9))) ?10))))) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))) ?8))))) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5))))) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5))))) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5))))) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 ([])) ?5)) ?6))))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)) ?6))))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5)) ?6))))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9)) ?10))))) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6)) ?7))))) ?8)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7)) ?8))))) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)) ?10))))) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8))))) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6))))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3)))) ?4)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3)))) ?4)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3)))) ?4)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3)))) ?4)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 ([])) ?4)))) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty ([]))) ?4)))) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty ([])))) ?4)))) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?4)))) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) ([]))))) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty ?5))))) ([]))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 ([])) ?6))))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_NewXY ?5 ?6 ?7) ?8))))) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4))))) ?5)))) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 ([])) ?5))))) ?6)))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))))) ?8)))) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 ([])) ?5)))) ?6)))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)))) ?6)))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)))) ?10)))) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7)))) ?8)))) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5)))) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5)))) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5)))) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 ([])) ?5))) ?6)))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5))) ?6)))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5))) ?6)))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9))) ?10)))) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6))) ?7)))) ?8)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7))) ?8)))) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9))) ?10)))) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))) ?8)))) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5)))) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5)))) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 ([])) ?5)) ?6)))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)) ?6)))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5)) ?6)))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?5)) ?6)))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8)))) ?9)) ?10)))) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6)) ?7)))) ?8)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 ([])) ?6))) ?7)) ?8)))) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9)) ?10)))) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7)) ?8)))) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty ([]))) ?6)) ?7)) ?8)))) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)) ?11)) ?12)))) ?13)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)) ?10)))) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8)))) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6)))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 ([])) ?4))) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty ([]))) ?4))) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty ([])))) ?4))) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?4))) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) ([])))) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty ([]))))) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: Q_Empty ?5))))) ([]))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_Sub ?5 ([])) ?6))))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))))) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 ([])) ?6)))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: Q_Empty ([]))) ?6)))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8)))) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)))) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_NewXY ?5 ?6 ?7) ?8)))) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4))))) ?5))) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4))))) ?5))) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 ([])) ?5))))) ?6))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5))))) ?6))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9))))) ?10))) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))))) ?8))) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4)))) ?5))) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4)))) ?5))) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4)))) ?5))) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 ([])) ?5)))) ?6))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)))) ?6))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5)))) ?6))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9)))) ?10))) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6)))) ?7))) ?8)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7)))) ?8))) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)))) ?10))) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7)))) ?8))) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5))) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5))) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5))) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5))) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 ([])) ?5))) ?6))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5))) ?6))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5))) ?6))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?5))) ?6))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8)))) ?9))) ?10))) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6))) ?7))) ?8)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 ([])) ?6))) ?7))) ?8))) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9))) ?10))) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6))) ?7))) ?8)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6))) ?7))) ?8)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7))) ?8))) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty ([]))) ?6)) ?7))) ?8))) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)) ?11))) ?12))) ?13)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9))) ?10))) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))) ?8))) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5))) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5))) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5))) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5))) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5))) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 ([])) ?5)) ?6))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)) ?6))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5)) ?6))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?5)) ?6))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) ([]))) ?6))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty ([])))) ?6))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 ([])) ?7))) ?8))) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_NewXY ?6 ?7 ?8) ?9))) ?10))) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))))) ?9)) ?10))) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Full ?4) ?5)))) ?6)) ?7))) ?8)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_Sub ?5 ([])) ?6)))) ?7)) ?8))) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8)))) ?9)) ?10))) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6)) ?7))) ?8)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6)) ?7))) ?8)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 ([])) ?6))) ?7)) ?8))) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: Q_Empty ([]))) ?6))) ?7)) ?8))) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10))) ?11)) ?12))) ?13)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9)) ?10))) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6)) ?7))) ?8)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6)) ?7))) ?8)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6)) ?7))) ?8)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7)) ?8))) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty ([]))) ?6)) ?7)) ?8))) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty ([])))) ?6)) ?7)) ?8))) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9))) ?10)) ?11)) ?12))) ?13)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Full ?5) ?6)) ?7)) ?8)) ?9))) ?10)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8)) ?9)) ?10))) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)) ?11)) ?12))) ?13)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)) ?10))) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8))) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Full ?2) ?3)) ?4)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Full ?2) ?3)) ?4)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Full ?2) ?3)) ?4)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Full ?2) ?3)) ?4)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 ([])) ?4)) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty ([]))) ?4)) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty ([])))) ?4)) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?4)) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) ([]))) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty ([])))) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: Q_Empty ([]))))) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) ([]))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: Q_Empty (: (Q_Sub ?5 ([])) ?6))))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))))) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_Sub ?5 ([])) ?6)))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_Sub ?5 (: Q_Empty ([]))) ?6)))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8)))) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)))) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8)))) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Full ?4) ?5))) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Full ?4) ?5))) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Full ?4) ?5))) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 ([])) ?6))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: Q_Empty ([]))) ?6))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: Q_Empty (: Q_Empty ([])))) ?6))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: Q_Empty (: (Q_Sub ?6 ([])) ?7))) ?8))) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9))) ?10))) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Full ?5) ?6)) ?7))) ?8)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Full ?5) ?6)) ?7))) ?8)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8))) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_Sub ?6 (: Q_Empty ([]))) ?7)) ?8))) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_Sub ?7 ([])) ?8)) ?9)) ?10))) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_NewXY ?7 ?8 ?9) ?10)) ?11)) ?12))) ?13)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10))) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4))))) ?5)) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4))))) ?5)) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4))))) ?5)) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 ([])) ?5))))) ?6)) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5))))) ?6)) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5))))) ?6)) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9))))) ?10)) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6))))) ?7)) ?8)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7))))) ?8)) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9))))) ?10)) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))))) ?8)) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4)))) ?5)) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4)))) ?5)) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 ([])) ?5)))) ?6)) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)))) ?6)) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5)))) ?6)) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?5)))) ?6)) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8)))) ?9)))) ?10)) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6)))) ?7)) ?8)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 ([])) ?6))) ?7)))) ?8)) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9)))) ?10)) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7)))) ?8)) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty ([]))) ?6)) ?7)))) ?8)) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)) ?11)))) ?12)) ?13)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)))) ?10)) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7)))) ?8)) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5)) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5)) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5)) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5)) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5)) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 ([])) ?5))) ?6)) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5))) ?6)) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5))) ?6)) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?5))) ?6)) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) ([])))) ?6)) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty ([]))))) ?6)) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 ([])) ?7)))) ?8)) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_NewXY ?6 ?7 ?8) ?9)))) ?10)) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))))) ?9))) ?10)) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Full ?4) ?5)))) ?6))) ?7)) ?8)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_Sub ?5 ([])) ?6)))) ?7))) ?8)) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8)))) ?9))) ?10)) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6))) ?7)) ?8)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6))) ?7)) ?8)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 ([])) ?6))) ?7))) ?8)) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: Q_Empty ([]))) ?6))) ?7))) ?8)) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10))) ?11))) ?12)) ?13)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9))) ?10)) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6))) ?7)) ?8)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6))) ?7)) ?8)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6))) ?7)) ?8)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7))) ?8)) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty ([]))) ?6)) ?7))) ?8)) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty ([])))) ?6)) ?7))) ?8)) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9))) ?10)) ?11))) ?12)) ?13)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Full ?5) ?6)) ?7)) ?8))) ?9)) ?10)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8)) ?9))) ?10)) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)) ?11))) ?12)) ?13)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9))) ?10)) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))) ?8)) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5)) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5)) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5)) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5)) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 ([])) ?5)) ?6)) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)) ?6)) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5)) ?6)) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?5)) ?6)) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) ([]))) ?6)) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty ([])))) ?6)) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty (: Q_Empty ([]))))) ?6)) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty (: (Q_Sub ?6 ([])) ?7)))) ?8)) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9)))) ?10)) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Full ?5) ?6))) ?7)) ?8)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 ([])) ?7))) ?8)) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 (: Q_Empty ([]))) ?7))) ?8)) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 (: (Q_Sub ?7 ([])) ?8)) ?9))) ?10)) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 (: (Q_NewXY ?7 ?8 ?9) ?10)) ?11))) ?12)) ?13)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_NewXY ?6 ?7 ?8) ?9))) ?10)) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?4) ?5))))) ?6)) ?7)) ?8)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?5 ([])) ?6))))) ?7)) ?8)) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))))) ?9)) ?10)) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_Sub ?5 ([])) ?6)))) ?7)) ?8)) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_Sub ?5 (: Q_Empty ([]))) ?6)))) ?7)) ?8)) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)))) ?11)) ?12)) ?13)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8)))) ?9)) ?10)) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6)) ?7)) ?8)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6)) ?7)) ?8)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6)) ?7)) ?8)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 ([])) ?6))) ?7)) ?8)) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: Q_Empty ([]))) ?6))) ?7)) ?8)) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: Q_Empty (: Q_Empty ([])))) ?6))) ?7)) ?8)) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9))) ?10))) ?11)) ?12)) ?13)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Full ?5) ?6)) ?7))) ?8)) ?9)) ?10)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8))) ?9)) ?10)) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10))) ?11)) ?12)) ?13)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9)) ?10)) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6)) ?7)) ?8)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6)) ?7)) ?8)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7)) ?8)) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty ([]))) ?6)) ?7)) ?8)) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty ([])))) ?6)) ?7)) ?8)) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?6)) ?7)) ?8)) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9)))) ?10)) ?11)) ?12)) ?13)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Full ?5) ?6))) ?7)) ?8)) ?9)) ?10)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: (Q_Sub ?6 ([])) ?7))) ?8)) ?9)) ?10)) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9))) ?10)) ?11)) ?12)) ?13)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8)) ?9)) ?10)) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 (: Q_Empty ([]))) ?7)) ?8)) ?9)) ?10)) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_NewXY ?7 ?8 ?9) ?10)) ?11)) ?12)) ?13)) ?14)) ?15)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)) ?11)) ?12)) ?13)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)) ?10)) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8)) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_NewXY ?3 ?4 ?5) ?6)) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_NewXY ?2 ?3 ?4) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Full ?1) ?2))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Full ?1) ?2))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Full ?1) ?2))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Full ?1) ?2))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Full (RGB -1.0 ?2 ?3)) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Prelude.chr: bad argument: (-1) case case case case case case case case case case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Full (RGB ?2 -1.0 ?3)) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Prelude.chr: bad argument: (-1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 ([])) ?3))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty ([]))) ?3))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty ([])))) ?3))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?3))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) ([])))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty ([]))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: Q_Empty (: (Q_Full ?3) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: Q_Empty (: (Q_Full ?3) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: Q_Empty (: (Q_Full ?3) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: Q_Empty (: (Q_Full ?3) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: Q_Empty (: (Q_Full ?3) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: Q_Empty (: (Q_Full ?3) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 ([])) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_Sub ?5 ([])) ?6)))) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8)))) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 ([])) ?6))) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: Q_Empty ([]))) ?6))) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8))) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10))) ?11))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: Q_Empty (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: Q_Empty (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: Q_Empty (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: Q_Empty (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty ([]))) ?6)) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty ([])))) ?6)) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: (Q_Sub ?6 ([])) ?7))) ?8)) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9))) ?10)) ?11))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Full ?5) ?6)) ?7)) ?8))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Full ?5) ?6)) ?7)) ?8))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8)) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 (: Q_Empty ([]))) ?7)) ?8)) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_Sub ?7 ([])) ?8)) ?9)) ?10)) ?11))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_NewXY ?7 ?8 ?9) ?10)) ?11)) ?12)) ?13))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)) ?11))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Full ?3) ?4)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Full ?3) ?4)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Full ?3) ?4)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Full ?3) ?4)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 ([])) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) ([]))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?5 ([])) ?6))))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))))) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_Sub ?5 ([])) ?6)))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_Sub ?5 (: Q_Empty ([]))) ?6)))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8)))) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)))) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8)))) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 ([])) ?6))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: Q_Empty ([]))) ?6))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: Q_Empty (: Q_Empty ([])))) ?6))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: Q_Empty (: (Q_Sub ?6 ([])) ?7))) ?8))) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9))) ?10))) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Full ?5) ?6)) ?7))) ?8)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Full ?5) ?6)) ?7))) ?8)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8))) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: (Q_Sub ?6 (: Q_Empty ([]))) ?7)) ?8))) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_Sub ?7 ([])) ?8)) ?9)) ?10))) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_NewXY ?7 ?8 ?9) ?10)) ?11)) ?12))) ?13)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10))) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty ([]))) ?6)) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty ([])))) ?6)) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?6)) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: (Q_Sub ?6 ([])) ?7)))) ?8)) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9)))) ?10)) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Full ?5) ?6))) ?7)) ?8)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Full ?5) ?6))) ?7)) ?8)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: (Q_Sub ?6 ([])) ?7))) ?8)) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: (Q_Sub ?6 (: Q_Empty ([]))) ?7))) ?8)) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: (Q_Sub ?6 (: (Q_Sub ?7 ([])) ?8)) ?9))) ?10)) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: (Q_Sub ?6 (: (Q_NewXY ?7 ?8 ?9) ?10)) ?11))) ?12)) ?13)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9))) ?10)) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Full ?5) ?6)) ?7)) ?8)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Full ?5) ?6)) ?7)) ?8)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8)) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 (: Q_Empty ([]))) ?7)) ?8)) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 (: Q_Empty (: Q_Empty ([])))) ?7)) ?8)) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 (: Q_Empty (: (Q_Sub ?7 ([])) ?8))) ?9)) ?10)) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 (: Q_Empty (: (Q_NewXY ?7 ?8 ?9) ?10))) ?11)) ?12)) ?13)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_Sub ?7 ([])) ?8)) ?9)) ?10)) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_Sub ?7 (: Q_Empty ([]))) ?8)) ?9)) ?10)) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_Sub ?7 (: (Q_Sub ?8 ([])) ?9)) ?10)) ?11)) ?12)) ?13)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_Sub ?7 (: (Q_NewXY ?8 ?9 ?10) ?11)) ?12)) ?13)) ?14)) ?15)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_NewXY ?7 ?8 ?9) ?10)) ?11)) ?12)) ?13)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_NewXY ?4 ?5 ?6) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3))))) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3))))) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3))))) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3))))) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3))))) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3))))) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 ([])) ?4))))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty ([]))) ?4))))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty ([])))) ?4))))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?4))))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) ?5))))) ([])))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) ?5))))) (: Q_Empty ([]))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) ?5))))) (: (Q_Sub ?6 ([])) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) ?5))))) (: (Q_NewXY ?6 ?7 ?8) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4))))) ?5))))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 ([])) ?5))))) ?6))))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))))) ?8))))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4)))) ?5))))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4)))) ?5))))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 ([])) ?5)))) ?6))))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)))) ?6))))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)))) ?10))))) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7)))) ?8))))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5))))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5))))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5))))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 ([])) ?5))) ?6))))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5))) ?6))))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5))) ?6))))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9))) ?10))))) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6))) ?7))))) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7))) ?8))))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9))) ?10))))) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))) ?8))))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5))))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5))))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5))))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5))))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 ([])) ?5)) ?6))))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)) ?6))))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5)) ?6))))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?5)) ?6))))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8)))) ?9)) ?10))))) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6)) ?7))))) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 ([])) ?6))) ?7)) ?8))))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9)) ?10))))) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6)) ?7))))) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6)) ?7))))) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7)) ?8))))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty ([]))) ?6)) ?7)) ?8))))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)) ?11)) ?12))))) ?13))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)) ?10))))) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8))))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6))))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3)))) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3)))) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3)))) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3)))) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3)))) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3)))) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 ([])) ?4)))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty ([]))) ?4)))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty ([])))) ?4)))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?4)))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) ([]))))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty ?5))))) ([])))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty ?5))))) (: Q_Empty ([]))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty ?5))))) (: (Q_Sub ?6 ([])) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty ?5))))) (: (Q_NewXY ?6 ?7 ?8) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Full ?4) ?5))))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Full ?4) ?5))))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 ([])) ?6))))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: Q_Empty ([]))) ?6))))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8))))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10))))) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_NewXY ?5 ?6 ?7) ?8))))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4))))) ?5)))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4))))) ?5)))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 ([])) ?5))))) ?6)))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5))))) ?6)))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9))))) ?10)))) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))))) ?8)))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4)))) ?5)))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4)))) ?5)))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4)))) ?5)))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 ([])) ?5)))) ?6)))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)))) ?6)))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5)))) ?6)))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9)))) ?10)))) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6)))) ?7)))) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7)))) ?8)))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)))) ?10)))) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7)))) ?8)))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5)))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5)))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5)))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5)))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 ([])) ?5))) ?6)))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5))) ?6)))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5))) ?6)))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?5))) ?6)))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8)))) ?9))) ?10)))) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6))) ?7)))) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 ([])) ?6))) ?7))) ?8)))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9))) ?10)))) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6))) ?7)))) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6))) ?7)))) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7))) ?8)))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty ([]))) ?6)) ?7))) ?8)))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)) ?11))) ?12)))) ?13))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9))) ?10)))) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))) ?8)))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5)))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5)))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5)))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5)))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5)))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 ([])) ?5)) ?6)))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)) ?6)))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5)) ?6)))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?5)) ?6)))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) ([]))) ?6)))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty ([])))) ?6)))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 ([])) ?7))) ?8)))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_NewXY ?6 ?7 ?8) ?9))) ?10)))) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))))) ?9)) ?10)))) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Full ?4) ?5)))) ?6)) ?7)))) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_Sub ?5 ([])) ?6)))) ?7)) ?8)))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8)))) ?9)) ?10)))) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6)) ?7)))) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6)) ?7)))) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 ([])) ?6))) ?7)) ?8)))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: Q_Empty ([]))) ?6))) ?7)) ?8)))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10))) ?11)) ?12)))) ?13))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9)) ?10)))) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6)) ?7)))) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6)) ?7)))) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6)) ?7)))) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7)) ?8)))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty ([]))) ?6)) ?7)) ?8)))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty ([])))) ?6)) ?7)) ?8)))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9))) ?10)) ?11)) ?12)))) ?13))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Full ?5) ?6)) ?7)) ?8)) ?9)))) ?10))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8)) ?9)) ?10)))) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)) ?11)) ?12)))) ?13))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)) ?10)))) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8)))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6)))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 ([])) ?4))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty ([]))) ?4))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty ([])))) ?4))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?4))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) ([])))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty ([]))))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: Q_Empty ?5))))) ([])))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty ([]))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 ([])) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: Q_Empty ?5))))) (: (Q_NewXY ?6 ?7 ?8) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Full ?4) ?5))))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Full ?4) ?5))))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_Sub ?5 ([])) ?6))))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_Sub ?5 (: Q_Empty ([]))) ?6))))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8))))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10))))) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Full ?4) ?5)))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Full ?4) ?5)))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Full ?4) ?5)))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 ([])) ?6)))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: Q_Empty ([]))) ?6)))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: Q_Empty (: Q_Empty ([])))) ?6)))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: Q_Empty (: (Q_Sub ?6 ([])) ?7))) ?8)))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9))) ?10)))) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Full ?5) ?6)) ?7)))) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Full ?5) ?6)) ?7)))) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8)))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_Sub ?6 (: Q_Empty ([]))) ?7)) ?8)))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_Sub ?7 ([])) ?8)) ?9)) ?10)))) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_NewXY ?7 ?8 ?9) ?10)) ?11)) ?12)))) ?13))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)))) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_NewXY ?5 ?6 ?7) ?8)))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4))))) ?5))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4))))) ?5))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4))))) ?5))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 ([])) ?5))))) ?6))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5))))) ?6))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5))))) ?6))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9))))) ?10))) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6))))) ?7))) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7))))) ?8))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9))))) ?10))) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))))) ?8))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4)))) ?5))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4)))) ?5))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4)))) ?5))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4)))) ?5))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 ([])) ?5)))) ?6))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)))) ?6))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5)))) ?6))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?5)))) ?6))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8)))) ?9)))) ?10))) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6)))) ?7))) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 ([])) ?6))) ?7)))) ?8))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9)))) ?10))) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6)))) ?7))) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6)))) ?7))) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7)))) ?8))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty ([]))) ?6)) ?7)))) ?8))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)) ?11)))) ?12))) ?13))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)))) ?10))) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7)))) ?8))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 ([])) ?5))) ?6))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5))) ?6))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5))) ?6))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?5))) ?6))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) ([])))) ?6))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty ([]))))) ?6))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 ([])) ?7)))) ?8))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_NewXY ?6 ?7 ?8) ?9)))) ?10))) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))))) ?9))) ?10))) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Full ?4) ?5)))) ?6))) ?7))) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_Sub ?5 ([])) ?6)))) ?7))) ?8))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8)))) ?9))) ?10))) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6))) ?7))) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6))) ?7))) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 ([])) ?6))) ?7))) ?8))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: Q_Empty ([]))) ?6))) ?7))) ?8))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10))) ?11))) ?12))) ?13))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9))) ?10))) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6))) ?7))) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6))) ?7))) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7))) ?8))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty ([]))) ?6)) ?7))) ?8))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty ([])))) ?6)) ?7))) ?8))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9))) ?10)) ?11))) ?12))) ?13))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Full ?5) ?6)) ?7)) ?8))) ?9))) ?10))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8)) ?9))) ?10))) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)) ?11))) ?12))) ?13))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9))) ?10))) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))) ?8))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 ([])) ?5)) ?6))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)) ?6))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5)) ?6))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?5)) ?6))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) ([]))) ?6))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty ([])))) ?6))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty (: Q_Empty ([]))))) ?6))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty (: (Q_Sub ?6 ([])) ?7)))) ?8))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9)))) ?10))) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Full ?5) ?6))) ?7))) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 ([])) ?7))) ?8))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 (: Q_Empty ([]))) ?7))) ?8))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 (: (Q_Sub ?7 ([])) ?8)) ?9))) ?10))) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 (: (Q_NewXY ?7 ?8 ?9) ?10)) ?11))) ?12))) ?13))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_NewXY ?6 ?7 ?8) ?9))) ?10))) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?4) ?5))))) ?6)) ?7))) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?5 ([])) ?6))))) ?7)) ?8))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))))) ?9)) ?10))) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Full ?4) ?5)))) ?6)) ?7))) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Full ?4) ?5)))) ?6)) ?7))) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_Sub ?5 ([])) ?6)))) ?7)) ?8))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_Sub ?5 (: Q_Empty ([]))) ?6)))) ?7)) ?8))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)))) ?11)) ?12))) ?13))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8)))) ?9)) ?10))) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6)) ?7))) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6)) ?7))) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 ([])) ?6))) ?7)) ?8))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: Q_Empty ([]))) ?6))) ?7)) ?8))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: Q_Empty (: Q_Empty ([])))) ?6))) ?7)) ?8))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9))) ?10))) ?11)) ?12))) ?13))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Full ?5) ?6)) ?7))) ?8)) ?9))) ?10))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8))) ?9)) ?10))) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10))) ?11)) ?12))) ?13))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9)) ?10))) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6)) ?7))) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6)) ?7))) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7)) ?8))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty ([]))) ?6)) ?7)) ?8))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty ([])))) ?6)) ?7)) ?8))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?6)) ?7)) ?8))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9)))) ?10)) ?11)) ?12))) ?13))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Full ?5) ?6))) ?7)) ?8)) ?9))) ?10))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: (Q_Sub ?6 ([])) ?7))) ?8)) ?9)) ?10))) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9))) ?10)) ?11)) ?12))) ?13))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Full ?5) ?6)) ?7)) ?8)) ?9))) ?10))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Full ?5) ?6)) ?7)) ?8)) ?9))) ?10))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8)) ?9)) ?10))) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 (: Q_Empty ([]))) ?7)) ?8)) ?9)) ?10))) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_NewXY ?7 ?8 ?9) ?10)) ?11)) ?12)) ?13)) ?14))) ?15))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)) ?11)) ?12))) ?13))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)) ?10))) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Full ?2) ?3)) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Full ?2) ?3)) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Full ?2) ?3)) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Full ?2) ?3)) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Full (RGB -1.0 ?3 ?4)) ?5)) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Prelude.chr: bad argument: (-1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 ([])) ?4)) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty ([]))) ?4)) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty ([])))) ?4)) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?4)) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) ([]))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty ([])))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: Q_Empty ([]))))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) ([])))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty ([]))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 ([])) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_NewXY ?6 ?7 ?8) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: Q_Empty (: (Q_Full ?4) ?5))))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: Q_Empty (: (Q_Full ?4) ?5))))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: Q_Empty (: (Q_Sub ?5 ([])) ?6))))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: Q_Empty (: (Q_Sub ?5 (: Q_Empty ([]))) ?6))))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: Q_Empty (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8))))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: Q_Empty (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10))))) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Full ?4) ?5)))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Full ?4) ?5)))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Full ?4) ?5)))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Full ?4) ?5)))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_Sub ?5 ([])) ?6)))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_Sub ?5 (: Q_Empty ([]))) ?6)))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_Sub ?5 (: Q_Empty (: Q_Empty ([])))) ?6)))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_Sub ?5 (: Q_Empty (: (Q_Sub ?6 ([])) ?7))) ?8)))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_Sub ?5 (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9))) ?10)))) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: (Q_Full ?5) ?6)) ?7)))) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: (Q_Full ?5) ?6)) ?7)))) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8)))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_Sub ?5 (: (Q_Sub ?6 (: Q_Empty ([]))) ?7)) ?8)))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_Sub ?7 ([])) ?8)) ?9)) ?10)))) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_NewXY ?7 ?8 ?9) ?10)) ?11)) ?12)))) ?13))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)))) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8)))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Full ?4) ?5))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Full ?4) ?5))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 ([])) ?6))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: Q_Empty ([]))) ?6))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: Q_Empty (: Q_Empty ([])))) ?6))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?6))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: (Q_Sub ?6 ([])) ?7)))) ?8))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9)))) ?10))) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: (Q_Full ?5) ?6))) ?7))) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: (Q_Full ?5) ?6))) ?7))) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: Q_Empty (: (Q_Sub ?6 ([])) ?7))) ?8))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: Q_Empty (: (Q_Sub ?6 (: Q_Empty ([]))) ?7))) ?8))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: Q_Empty (: (Q_Sub ?6 (: (Q_Sub ?7 ([])) ?8)) ?9))) ?10))) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: Q_Empty (: (Q_Sub ?6 (: (Q_NewXY ?7 ?8 ?9) ?10)) ?11))) ?12))) ?13))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9))) ?10))) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Full ?5) ?6)) ?7))) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Full ?5) ?6)) ?7))) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_Sub ?6 (: Q_Empty ([]))) ?7)) ?8))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_Sub ?6 (: Q_Empty (: Q_Empty ([])))) ?7)) ?8))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_Sub ?6 (: Q_Empty (: (Q_Sub ?7 ([])) ?8))) ?9)) ?10))) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_Sub ?6 (: Q_Empty (: (Q_NewXY ?7 ?8 ?9) ?10))) ?11)) ?12))) ?13))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Full ?6) ?7)) ?8)) ?9))) ?10))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Full ?6) ?7)) ?8)) ?9))) ?10))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_Sub ?7 ([])) ?8)) ?9)) ?10))) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_Sub ?7 (: Q_Empty ([]))) ?8)) ?9)) ?10))) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_Sub ?7 (: (Q_Sub ?8 ([])) ?9)) ?10)) ?11)) ?12))) ?13))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_Sub ?7 (: (Q_NewXY ?8 ?9 ?10) ?11)) ?12)) ?13)) ?14))) ?15))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_NewXY ?7 ?8 ?9) ?10)) ?11)) ?12))) ?13))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10))) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4))))) ?5)) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4))))) ?5)) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4))))) ?5)) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4))))) ?5)) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 ([])) ?5))))) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5))))) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5))))) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?5))))) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8)))) ?9))))) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6))))) ?7)) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 ([])) ?6))) ?7))))) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9))))) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6))))) ?7)) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6))))) ?7)) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7))))) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty ([]))) ?6)) ?7))))) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)) ?11))))) ?12)) ?13))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9))))) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))))) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4)))) ?5)) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4)))) ?5)) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4)))) ?5)) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4)))) ?5)) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4)))) ?5)) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 ([])) ?5)))) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)))) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5)))) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?5)))) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) ([]))))) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty ?6))))) ([]))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 ([])) ?7))))) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_NewXY ?6 ?7 ?8) ?9))))) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))))) ?9)))) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Full ?4) ?5)))) ?6)))) ?7)) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_Sub ?5 ([])) ?6)))) ?7)))) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8)))) ?9)))) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6)))) ?7)) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6)))) ?7)) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 ([])) ?6))) ?7)))) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: Q_Empty ([]))) ?6))) ?7)))) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10))) ?11)))) ?12)) ?13))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9)))) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6)))) ?7)) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6)))) ?7)) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6)))) ?7)) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7)))) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty ([]))) ?6)) ?7)))) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty ([])))) ?6)) ?7)))) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9))) ?10)) ?11)))) ?12)) ?13))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Full ?5) ?6)) ?7)) ?8)))) ?9)) ?10))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8)) ?9)))) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)) ?11)))) ?12)) ?13))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)))) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7)))) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5)) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5)) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5)) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5)) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 ([])) ?5))) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5))) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5))) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?5))) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) ([])))) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty ([]))))) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty (: Q_Empty ?6))))) ([]))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty (: (Q_Sub ?6 ([])) ?7))))) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9))))) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Full ?5) ?6)))) ?7)) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 ([])) ?7)))) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 (: Q_Empty ([]))) ?7)))) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 (: (Q_Sub ?7 ([])) ?8)) ?9)))) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 (: (Q_NewXY ?7 ?8 ?9) ?10)) ?11)))) ?12)) ?13))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_NewXY ?6 ?7 ?8) ?9)))) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?4) ?5))))) ?6))) ?7)) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?5 ([])) ?6))))) ?7))) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))))) ?9))) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Full ?4) ?5)))) ?6))) ?7)) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Full ?4) ?5)))) ?6))) ?7)) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_Sub ?5 ([])) ?6)))) ?7))) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_Sub ?5 (: Q_Empty ([]))) ?6)))) ?7))) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)))) ?11))) ?12)) ?13))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8)))) ?9))) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6))) ?7)) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6))) ?7)) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 ([])) ?6))) ?7))) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: Q_Empty ([]))) ?6))) ?7))) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: Q_Empty (: Q_Empty ([])))) ?6))) ?7))) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9))) ?10))) ?11))) ?12)) ?13))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Full ?5) ?6)) ?7))) ?8))) ?9)) ?10))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8))) ?9))) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10))) ?11))) ?12)) ?13))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9))) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6))) ?7)) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6))) ?7)) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7))) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty ([]))) ?6)) ?7))) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty ([])))) ?6)) ?7))) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?6)) ?7))) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9)))) ?10)) ?11))) ?12)) ?13))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Full ?5) ?6))) ?7)) ?8))) ?9)) ?10))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: (Q_Sub ?6 ([])) ?7))) ?8)) ?9))) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9))) ?10)) ?11))) ?12)) ?13))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Full ?5) ?6)) ?7)) ?8))) ?9)) ?10))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Full ?5) ?6)) ?7)) ?8))) ?9)) ?10))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8)) ?9))) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 (: Q_Empty ([]))) ?7)) ?8)) ?9))) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_NewXY ?7 ?8 ?9) ?10)) ?11)) ?12)) ?13))) ?14)) ?15))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)) ?11))) ?12)) ?13))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9))) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5)) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5)) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5)) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5)) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 ([])) ?5)) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5)) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?5)) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) ([]))) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty ([])))) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty (: Q_Empty ([]))))) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty (: Q_Empty (: Q_Empty ?6))))) ([]))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty (: Q_Empty (: (Q_Sub ?6 ([])) ?7))))) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9))))) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_Full ?5) ?6)))) ?7)) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_Full ?5) ?6)))) ?7)) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty (: (Q_Sub ?6 ([])) ?7)))) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty (: (Q_Sub ?6 (: Q_Empty ([]))) ?7)))) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty (: (Q_Sub ?6 (: (Q_Sub ?7 ([])) ?8)) ?9)))) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty (: (Q_Sub ?6 (: (Q_NewXY ?7 ?8 ?9) ?10)) ?11)))) ?12)) ?13))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9)))) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Full ?5) ?6))) ?7)) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Full ?5) ?6))) ?7)) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 ([])) ?7))) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 (: Q_Empty ([]))) ?7))) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 (: Q_Empty (: Q_Empty ([])))) ?7))) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 (: Q_Empty (: (Q_Sub ?7 ([])) ?8))) ?9))) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 (: Q_Empty (: (Q_NewXY ?7 ?8 ?9) ?10))) ?11))) ?12)) ?13))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_Full ?6) ?7)) ?8))) ?9)) ?10))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_Full ?6) ?7)) ?8))) ?9)) ?10))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 (: (Q_Sub ?7 ([])) ?8)) ?9))) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 (: (Q_Sub ?7 (: Q_Empty ([]))) ?8)) ?9))) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 (: (Q_Sub ?7 (: (Q_Sub ?8 ([])) ?9)) ?10)) ?11))) ?12)) ?13))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 (: (Q_Sub ?7 (: (Q_NewXY ?8 ?9 ?10) ?11)) ?12)) ?13))) ?14)) ?15))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 (: (Q_NewXY ?7 ?8 ?9) ?10)) ?11))) ?12)) ?13))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_NewXY ?6 ?7 ?8) ?9))) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?4) ?5))))) ?6)) ?7)) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?4) ?5))))) ?6)) ?7)) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?5 ([])) ?6))))) ?7)) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?5 (: Q_Empty ([]))) ?6))))) ?7)) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10))))) ?11)) ?12)) ?13))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))))) ?9)) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Full ?4) ?5)))) ?6)) ?7)) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Full ?4) ?5)))) ?6)) ?7)) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Full ?4) ?5)))) ?6)) ?7)) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_Sub ?5 ([])) ?6)))) ?7)) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_Sub ?5 (: Q_Empty ([]))) ?6)))) ?7)) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_Sub ?5 (: Q_Empty (: Q_Empty ([])))) ?6)))) ?7)) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_Sub ?5 (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9))) ?10)))) ?11)) ?12)) ?13))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_Full ?5) ?6)) ?7)))) ?8)) ?9)) ?10))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8)))) ?9)) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)))) ?11)) ?12)) ?13))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8)))) ?9)) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6)) ?7)) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6)) ?7)) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 ([])) ?6))) ?7)) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: Q_Empty ([]))) ?6))) ?7)) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: Q_Empty (: Q_Empty ([])))) ?6))) ?7)) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?6))) ?7)) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9)))) ?10))) ?11)) ?12)) ?13))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_Full ?5) ?6))) ?7))) ?8)) ?9)) ?10))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: Q_Empty (: (Q_Sub ?6 ([])) ?7))) ?8))) ?9)) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9))) ?10))) ?11)) ?12)) ?13))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Full ?5) ?6)) ?7))) ?8)) ?9)) ?10))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Full ?5) ?6)) ?7))) ?8)) ?9)) ?10))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8))) ?9)) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: (Q_Sub ?6 (: Q_Empty ([]))) ?7)) ?8))) ?9)) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_NewXY ?7 ?8 ?9) ?10)) ?11)) ?12))) ?13)) ?14)) ?15))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10))) ?11)) ?12)) ?13))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9)) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6)) ?7)) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6)) ?7)) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6)) ?7)) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7)) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty ([]))) ?6)) ?7)) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty ([])))) ?6)) ?7)) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?6)) ?7)) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?6))))) ([]))) ?7)) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?6))))) (: Q_Empty ([])))) ?7)) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?6))))) (: Q_Empty (: Q_Empty ([]))))) ?7)) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?6))))) (: Q_Empty (: (Q_Sub ?7 ([])) ?8)))) ?9)) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?6))))) (: Q_Empty (: (Q_NewXY ?7 ?8 ?9) ?10)))) ?11)) ?12)) ?13))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?6))))) (: (Q_Sub ?7 ([])) ?8))) ?9)) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?6))))) (: (Q_Sub ?7 (: Q_Empty ([]))) ?8))) ?9)) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?6))))) (: (Q_Sub ?7 (: (Q_Sub ?8 ([])) ?9)) ?10))) ?11)) ?12)) ?13))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?6))))) (: (Q_Sub ?7 (: (Q_NewXY ?8 ?9 ?10) ?11)) ?12))) ?13)) ?14)) ?15))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?6))))) (: (Q_NewXY ?7 ?8 ?9) ?10))) ?11)) ?12)) ?13))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9))))) ?10)) ?11)) ?12)) ?13))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_Full ?5) ?6)))) ?7)) ?8)) ?9)) ?10))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: (Q_Sub ?6 ([])) ?7)))) ?8)) ?9)) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9)))) ?10)) ?11)) ?12)) ?13))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Full ?5) ?6))) ?7)) ?8)) ?9)) ?10))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Full ?5) ?6))) ?7)) ?8)) ?9)) ?10))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: (Q_Sub ?6 ([])) ?7))) ?8)) ?9)) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: (Q_Sub ?6 (: Q_Empty ([]))) ?7))) ?8)) ?9)) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: (Q_Sub ?6 (: (Q_NewXY ?7 ?8 ?9) ?10)) ?11))) ?12)) ?13)) ?14)) ?15))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9))) ?10)) ?11)) ?12)) ?13))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Full ?5) ?6)) ?7)) ?8)) ?9)) ?10))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Full ?5) ?6)) ?7)) ?8)) ?9)) ?10))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8)) ?9)) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 (: Q_Empty ([]))) ?7)) ?8)) ?9)) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 (: Q_Empty (: Q_Empty ([])))) ?7)) ?8)) ?9)) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 (: Q_Empty (: (Q_NewXY ?7 ?8 ?9) ?10))) ?11)) ?12)) ?13)) ?14)) ?15))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Full ?6) ?7)) ?8)) ?9)) ?10)) ?11)) ?12))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_Sub ?7 ([])) ?8)) ?9)) ?10)) ?11)) ?12)) ?13))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_NewXY ?7 ?8 ?9) ?10)) ?11)) ?12)) ?13)) ?14)) ?15))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)) ?11)) ?12)) ?13))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_NewXY ?3 ?4 ?5) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: (Q_NewXY ?2 ?3 ?4) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Full ?1) ?2)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Full ?1) ?2)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case case cdraw ? (Q_Sub ?1 (: (Q_Full (RGB -1.0 ?2 ?3)) ?4)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Prelude.chr: bad argument: (-1) case case case case case case case case case case case case case cdraw ? (Q_Sub ?1 (: (Q_Full (RGB ?2 -1.0 ?3)) ?4)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Prelude.chr: bad argument: (-1) case case case case case case case case case case case case case case case case cdraw ? (Q_Sub ?1 (: (Q_Full ?2) ([]))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 ([])) ?3)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty ([]))) ?3)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty ([])))) ?3)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?3)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) ([]))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty ([])))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: Q_Empty ([]))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: Q_Empty (: (Q_Sub ?4 ([])) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_Sub ?5 ([])) ?6)))) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8)))) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 ([])) ?6))) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: Q_Empty ([]))) ?6))) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8))) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10))) ?11))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty ([]))) ?6)) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty ([])))) ?6)) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: (Q_Sub ?6 ([])) ?7))) ?8)) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9))) ?10)) ?11))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Full ?5) ?6)) ?7)) ?8))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Full ?5) ?6)) ?7)) ?8))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8)) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 (: Q_Empty ([]))) ?7)) ?8)) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_Sub ?7 ([])) ?8)) ?9)) ?10)) ?11))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_NewXY ?7 ?8 ?9) ?10)) ?11)) ?12)) ?13))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)) ?11))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: Q_Empty (: (Q_Full ?3) ?4)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: Q_Empty (: (Q_Full ?3) ?4)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: Q_Empty (: (Q_Full ?3) ?4)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: Q_Empty (: (Q_Full ?3) ?4)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Full (RGB -1.0 ?4 ?5)) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Prelude.chr: bad argument: (-1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 ([])) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) ([]))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?5 ([])) ?6))))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))))) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_Sub ?5 ([])) ?6)))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_Sub ?5 (: Q_Empty ([]))) ?6)))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8)))) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)))) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8)))) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 ([])) ?6))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: Q_Empty ([]))) ?6))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: Q_Empty (: Q_Empty ([])))) ?6))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: Q_Empty (: (Q_Sub ?6 ([])) ?7))) ?8))) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9))) ?10))) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Full ?5) ?6)) ?7))) ?8)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Full ?5) ?6)) ?7))) ?8)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8))) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: (Q_Sub ?6 (: Q_Empty ([]))) ?7)) ?8))) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_Sub ?7 ([])) ?8)) ?9)) ?10))) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_NewXY ?7 ?8 ?9) ?10)) ?11)) ?12))) ?13)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10))) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: Q_Empty (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: Q_Empty (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: Q_Empty (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: Q_Empty (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty ([]))) ?6)) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty ([])))) ?6)) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?6)) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: (Q_Sub ?6 ([])) ?7)))) ?8)) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9)))) ?10)) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Full ?5) ?6))) ?7)) ?8)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Full ?5) ?6))) ?7)) ?8)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: (Q_Sub ?6 ([])) ?7))) ?8)) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: (Q_Sub ?6 (: Q_Empty ([]))) ?7))) ?8)) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: (Q_Sub ?6 (: (Q_Sub ?7 ([])) ?8)) ?9))) ?10)) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: (Q_Sub ?6 (: (Q_NewXY ?7 ?8 ?9) ?10)) ?11))) ?12)) ?13)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9))) ?10)) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Full ?5) ?6)) ?7)) ?8)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Full ?5) ?6)) ?7)) ?8)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8)) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 (: Q_Empty ([]))) ?7)) ?8)) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 (: Q_Empty (: Q_Empty ([])))) ?7)) ?8)) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 (: Q_Empty (: (Q_Sub ?7 ([])) ?8))) ?9)) ?10)) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 (: Q_Empty (: (Q_NewXY ?7 ?8 ?9) ?10))) ?11)) ?12)) ?13)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_Sub ?7 ([])) ?8)) ?9)) ?10)) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_Sub ?7 (: Q_Empty ([]))) ?8)) ?9)) ?10)) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_Sub ?7 (: (Q_Sub ?8 ([])) ?9)) ?10)) ?11)) ?12)) ?13)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_Sub ?7 (: (Q_NewXY ?8 ?9 ?10) ?11)) ?12)) ?13)) ?14)) ?15)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_NewXY ?7 ?8 ?9) ?10)) ?11)) ?12)) ?13)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Full ?3) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Full ?3) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Full ?3) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Full ?3) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Full (RGB -1.0 ?4 ?5)) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Prelude.chr: bad argument: (-1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 ([])) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty ([]))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) ([])))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty ([]))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 ([])) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_NewXY ?6 ?7 ?8) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?4) ?5))))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?4) ?5))))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?5 ([])) ?6))))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?5 (: Q_Empty ([]))) ?6))))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8))))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10))))) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Full ?4) ?5)))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Full ?4) ?5)))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Full ?4) ?5)))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Full ?4) ?5)))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_Sub ?5 ([])) ?6)))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_Sub ?5 (: Q_Empty ([]))) ?6)))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_Sub ?5 (: Q_Empty (: Q_Empty ([])))) ?6)))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_Sub ?5 (: Q_Empty (: (Q_Sub ?6 ([])) ?7))) ?8)))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_Sub ?5 (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9))) ?10)))) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_Full ?5) ?6)) ?7)))) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_Full ?5) ?6)) ?7)))) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8)))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_Sub ?5 (: (Q_Sub ?6 (: Q_Empty ([]))) ?7)) ?8)))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_Sub ?7 ([])) ?8)) ?9)) ?10)))) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_NewXY ?7 ?8 ?9) ?10)) ?11)) ?12)))) ?13))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)))) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8)))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 ([])) ?6))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: Q_Empty ([]))) ?6))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: Q_Empty (: Q_Empty ([])))) ?6))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?6))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: (Q_Sub ?6 ([])) ?7)))) ?8))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9)))) ?10))) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_Full ?5) ?6))) ?7))) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_Full ?5) ?6))) ?7))) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: Q_Empty (: (Q_Sub ?6 ([])) ?7))) ?8))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: Q_Empty (: (Q_Sub ?6 (: Q_Empty ([]))) ?7))) ?8))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: Q_Empty (: (Q_Sub ?6 (: (Q_Sub ?7 ([])) ?8)) ?9))) ?10))) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: Q_Empty (: (Q_Sub ?6 (: (Q_NewXY ?7 ?8 ?9) ?10)) ?11))) ?12))) ?13))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9))) ?10))) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Full ?5) ?6)) ?7))) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Full ?5) ?6)) ?7))) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: (Q_Sub ?6 (: Q_Empty ([]))) ?7)) ?8))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: (Q_Sub ?6 (: Q_Empty (: Q_Empty ([])))) ?7)) ?8))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: (Q_Sub ?6 (: Q_Empty (: (Q_Sub ?7 ([])) ?8))) ?9)) ?10))) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: (Q_Sub ?6 (: Q_Empty (: (Q_NewXY ?7 ?8 ?9) ?10))) ?11)) ?12))) ?13))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Full ?6) ?7)) ?8)) ?9))) ?10))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Full ?6) ?7)) ?8)) ?9))) ?10))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_Sub ?7 ([])) ?8)) ?9)) ?10))) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_Sub ?7 (: Q_Empty ([]))) ?8)) ?9)) ?10))) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_Sub ?7 (: (Q_Sub ?8 ([])) ?9)) ?10)) ?11)) ?12))) ?13))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_Sub ?7 (: (Q_NewXY ?8 ?9 ?10) ?11)) ?12)) ?13)) ?14))) ?15))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_NewXY ?7 ?8 ?9) ?10)) ?11)) ?12))) ?13))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10))) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Full (RGB -1.0 ?5 ?6)) ?7)) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Prelude.chr: bad argument: (-1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty ([]))) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty ([])))) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?6))))) ([]))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?6 ([])) ?7))))) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9))))) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_Full ?5) ?6)))) ?7)) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_Full ?5) ?6)))) ?7)) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: (Q_Sub ?6 ([])) ?7)))) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: (Q_Sub ?6 (: Q_Empty ([]))) ?7)))) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: (Q_Sub ?6 (: (Q_Sub ?7 ([])) ?8)) ?9)))) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: (Q_Sub ?6 (: (Q_NewXY ?7 ?8 ?9) ?10)) ?11)))) ?12)) ?13))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9)))) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Full ?5) ?6))) ?7)) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Full ?5) ?6))) ?7)) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: (Q_Sub ?6 ([])) ?7))) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: (Q_Sub ?6 (: Q_Empty ([]))) ?7))) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: (Q_Sub ?6 (: Q_Empty (: Q_Empty ([])))) ?7))) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: (Q_Sub ?6 (: Q_Empty (: (Q_Sub ?7 ([])) ?8))) ?9))) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: (Q_Sub ?6 (: Q_Empty (: (Q_NewXY ?7 ?8 ?9) ?10))) ?11))) ?12)) ?13))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: (Q_Full ?6) ?7)) ?8))) ?9)) ?10))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: (Q_Full ?6) ?7)) ?8))) ?9)) ?10))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: (Q_Sub ?6 (: (Q_Sub ?7 ([])) ?8)) ?9))) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: (Q_Sub ?6 (: (Q_Sub ?7 (: Q_Empty ([]))) ?8)) ?9))) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: (Q_Sub ?6 (: (Q_Sub ?7 (: (Q_Sub ?8 ([])) ?9)) ?10)) ?11))) ?12)) ?13))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: (Q_Sub ?6 (: (Q_Sub ?7 (: (Q_NewXY ?8 ?9 ?10) ?11)) ?12)) ?13))) ?14)) ?15))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: (Q_Sub ?6 (: (Q_NewXY ?7 ?8 ?9) ?10)) ?11))) ?12)) ?13))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9))) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Full ?5) ?6)) ?7)) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Full ?5) ?6)) ?7)) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Full ?5) ?6)) ?7)) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Full ?5) ?6)) ?7)) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 (: Q_Empty ([]))) ?7)) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 (: Q_Empty (: Q_Empty ([])))) ?7)) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?7)) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 (: Q_Empty (: Q_Empty (: (Q_Sub ?7 ([])) ?8)))) ?9)) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 (: Q_Empty (: Q_Empty (: (Q_NewXY ?7 ?8 ?9) ?10)))) ?11)) ?12)) ?13))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: (Q_Full ?6) ?7))) ?8)) ?9)) ?10))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: (Q_Full ?6) ?7))) ?8)) ?9)) ?10))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 (: Q_Empty (: (Q_Sub ?7 ([])) ?8))) ?9)) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 (: Q_Empty (: (Q_Sub ?7 (: Q_Empty ([]))) ?8))) ?9)) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 (: Q_Empty (: (Q_Sub ?7 (: (Q_Sub ?8 ([])) ?9)) ?10))) ?11)) ?12)) ?13))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 (: Q_Empty (: (Q_Sub ?7 (: (Q_NewXY ?8 ?9 ?10) ?11)) ?12))) ?13)) ?14)) ?15))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 (: Q_Empty (: (Q_NewXY ?7 ?8 ?9) ?10))) ?11)) ?12)) ?13))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Full ?6) ?7)) ?8)) ?9)) ?10))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Full ?6) ?7)) ?8)) ?9)) ?10))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_Sub ?7 ([])) ?8)) ?9)) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_Sub ?7 (: Q_Empty ([]))) ?8)) ?9)) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_Sub ?7 (: Q_Empty (: Q_Empty ([])))) ?8)) ?9)) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_Sub ?7 (: Q_Empty (: (Q_Sub ?8 ([])) ?9))) ?10)) ?11)) ?12)) ?13))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_Sub ?7 (: Q_Empty (: (Q_NewXY ?8 ?9 ?10) ?11))) ?12)) ?13)) ?14)) ?15))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_Full ?7) ?8)) ?9)) ?10)) ?11)) ?12))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_Full ?7) ?8)) ?9)) ?10)) ?11)) ?12))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_Sub ?7 (: (Q_Sub ?8 ([])) ?9)) ?10)) ?11)) ?12)) ?13))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_Sub ?7 (: (Q_Sub ?8 (: Q_Empty ([]))) ?9)) ?10)) ?11)) ?12)) ?13))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_Sub ?7 (: (Q_Sub ?8 (: (Q_Sub ?9 ([])) ?10)) ?11)) ?12)) ?13)) ?14)) ?15))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_Sub ?7 (: (Q_Sub ?8 (: (Q_NewXY ?9 ?10 ?11) ?12)) ?13)) ?14)) ?15)) ?16)) ?17))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_Sub ?7 (: (Q_NewXY ?8 ?9 ?10) ?11)) ?12)) ?13)) ?14)) ?15))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_NewXY ?7 ?8 ?9) ?10)) ?11)) ?12)) ?13))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_NewXY ?4 ?5 ?6) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3))))) ?4)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3))))) ?4)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3))))) ?4)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3))))) ?4)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3))))) ?4)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3))))) ?4)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 ([])) ?4))))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty ([]))) ?4))))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty ([])))) ?4))))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?4))))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) ?5))))) ([]))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) ?5))))) (: Q_Empty ([])))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) ?5))))) (: Q_Empty (: Q_Empty ([]))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) ?5))))) (: Q_Empty (: (Q_Sub ?6 ([])) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) ?5))))) (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) ?4))))) (: (Q_Full ?5) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) ?4))))) (: (Q_Full ?5) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) ?5))))) (: (Q_Sub ?6 ([])) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) ?5))))) (: (Q_Sub ?6 (: Q_Empty ([]))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) ?5))))) (: (Q_Sub ?6 (: (Q_Sub ?7 ([])) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) ?5))))) (: (Q_Sub ?6 (: (Q_NewXY ?7 ?8 ?9) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) ?5))))) (: (Q_NewXY ?6 ?7 ?8) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4))))) ?5))))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4))))) ?5))))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 ([])) ?5))))) ?6))))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5))))) ?6))))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9))))) ?10))))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))))) ?8))))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4)))) ?5))))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4)))) ?5))))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4)))) ?5))))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 ([])) ?5)))) ?6))))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)))) ?6))))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5)))) ?6))))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9)))) ?10))))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6)))) ?7))))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7)))) ?8))))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)))) ?10))))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7)))) ?8))))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5))))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5))))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5))))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5))))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 ([])) ?5))) ?6))))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5))) ?6))))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5))) ?6))))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?5))) ?6))))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8)))) ?9))) ?10))))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6))) ?7))))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 ([])) ?6))) ?7))) ?8))))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9))) ?10))))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6))) ?7))))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6))) ?7))))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7))) ?8))))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty ([]))) ?6)) ?7))) ?8))))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)) ?11))) ?12))))) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9))) ?10))))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))) ?8))))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5))))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5))))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5))))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5))))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5))))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 ([])) ?5)) ?6))))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)) ?6))))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5)) ?6))))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?5)) ?6))))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) ([]))) ?6))))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty ([])))) ?6))))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 ([])) ?7))) ?8))))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_NewXY ?6 ?7 ?8) ?9))) ?10))))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))))) ?9)) ?10))))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Full ?4) ?5)))) ?6)) ?7))))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_Sub ?5 ([])) ?6)))) ?7)) ?8))))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8)))) ?9)) ?10))))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6)) ?7))))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6)) ?7))))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 ([])) ?6))) ?7)) ?8))))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: Q_Empty ([]))) ?6))) ?7)) ?8))))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10))) ?11)) ?12))))) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9)) ?10))))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6)) ?7))))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6)) ?7))))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6)) ?7))))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7)) ?8))))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty ([]))) ?6)) ?7)) ?8))))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty ([])))) ?6)) ?7)) ?8))))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9))) ?10)) ?11)) ?12))))) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Full ?5) ?6)) ?7)) ?8)) ?9))))) ?10)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8)) ?9)) ?10))))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)) ?11)) ?12))))) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)) ?10))))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8))))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6))))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3)))) ?4)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3)))) ?4)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3)))) ?4)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3)))) ?4)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 ([])) ?4)))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty ([]))) ?4)))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty ([])))) ?4)))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?4)))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) ([]))))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty ?5))))) ([]))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty ?5))))) (: Q_Empty ([])))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty ?5))))) (: Q_Empty (: Q_Empty ([]))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty ?5))))) (: Q_Empty (: (Q_Sub ?6 ([])) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty ?5))))) (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty ?4))))) (: (Q_Full ?5) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty ?4))))) (: (Q_Full ?5) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty ?5))))) (: (Q_Sub ?6 ([])) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty ?5))))) (: (Q_Sub ?6 (: Q_Empty ([]))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty ?5))))) (: (Q_Sub ?6 (: (Q_Sub ?7 ([])) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty ?5))))) (: (Q_Sub ?6 (: (Q_NewXY ?7 ?8 ?9) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty ?5))))) (: (Q_NewXY ?6 ?7 ?8) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Full ?4) ?5))))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Full ?4) ?5))))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Full ?4) ?5))))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 ([])) ?6))))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: Q_Empty ([]))) ?6))))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: Q_Empty (: Q_Empty ([])))) ?6))))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: Q_Empty (: (Q_Sub ?6 ([])) ?7))) ?8))))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9))) ?10))))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Full ?5) ?6)) ?7))))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Full ?5) ?6)) ?7))))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8))))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_Sub ?6 (: Q_Empty ([]))) ?7)) ?8))))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_Sub ?7 ([])) ?8)) ?9)) ?10))))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_NewXY ?7 ?8 ?9) ?10)) ?11)) ?12))))) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10))))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_NewXY ?5 ?6 ?7) ?8))))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4))))) ?5)))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4))))) ?5)))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4))))) ?5)))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 ([])) ?5))))) ?6)))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5))))) ?6)))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5))))) ?6)))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9))))) ?10)))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6))))) ?7)))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7))))) ?8)))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9))))) ?10)))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))))) ?8)))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4)))) ?5)))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4)))) ?5)))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 ([])) ?5)))) ?6)))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)))) ?6)))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5)))) ?6)))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?5)))) ?6)))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8)))) ?9)))) ?10)))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6)))) ?7)))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 ([])) ?6))) ?7)))) ?8)))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9)))) ?10)))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7)))) ?8)))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty ([]))) ?6)) ?7)))) ?8)))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)) ?11)))) ?12)))) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)))) ?10)))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7)))) ?8)))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5)))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5)))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5)))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5)))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5)))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 ([])) ?5))) ?6)))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5))) ?6)))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5))) ?6)))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?5))) ?6)))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) ([])))) ?6)))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty ([]))))) ?6)))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 ([])) ?7)))) ?8)))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_NewXY ?6 ?7 ?8) ?9)))) ?10)))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))))) ?9))) ?10)))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Full ?4) ?5)))) ?6))) ?7)))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_Sub ?5 ([])) ?6)))) ?7))) ?8)))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8)))) ?9))) ?10)))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6))) ?7)))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6))) ?7)))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 ([])) ?6))) ?7))) ?8)))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: Q_Empty ([]))) ?6))) ?7))) ?8)))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10))) ?11))) ?12)))) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9))) ?10)))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6))) ?7)))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6))) ?7)))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6))) ?7)))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7))) ?8)))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty ([]))) ?6)) ?7))) ?8)))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty ([])))) ?6)) ?7))) ?8)))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9))) ?10)) ?11))) ?12)))) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Full ?5) ?6)) ?7)) ?8))) ?9)))) ?10)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8)) ?9))) ?10)))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)) ?11))) ?12)))) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9))) ?10)))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))) ?8)))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5)))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5)))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5)))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5)))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 ([])) ?5)) ?6)))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)) ?6)))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5)) ?6)))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?5)) ?6)))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) ([]))) ?6)))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty ([])))) ?6)))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty (: Q_Empty ([]))))) ?6)))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty (: (Q_Sub ?6 ([])) ?7)))) ?8)))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9)))) ?10)))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Full ?5) ?6))) ?7)))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 ([])) ?7))) ?8)))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 (: Q_Empty ([]))) ?7))) ?8)))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 (: (Q_Sub ?7 ([])) ?8)) ?9))) ?10)))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 (: (Q_NewXY ?7 ?8 ?9) ?10)) ?11))) ?12)))) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_NewXY ?6 ?7 ?8) ?9))) ?10)))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?4) ?5))))) ?6)) ?7)))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?5 ([])) ?6))))) ?7)) ?8)))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))))) ?9)) ?10)))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_Sub ?5 ([])) ?6)))) ?7)) ?8)))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_Sub ?5 (: Q_Empty ([]))) ?6)))) ?7)) ?8)))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)))) ?11)) ?12)))) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8)))) ?9)) ?10)))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6)) ?7)))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6)) ?7)))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6)) ?7)))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 ([])) ?6))) ?7)) ?8)))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: Q_Empty ([]))) ?6))) ?7)) ?8)))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: Q_Empty (: Q_Empty ([])))) ?6))) ?7)) ?8)))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9))) ?10))) ?11)) ?12)))) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Full ?5) ?6)) ?7))) ?8)) ?9)))) ?10)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8))) ?9)) ?10)))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10))) ?11)) ?12)))) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9)) ?10)))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6)) ?7)))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6)) ?7)))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7)) ?8)))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty ([]))) ?6)) ?7)) ?8)))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty ([])))) ?6)) ?7)) ?8)))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?6)) ?7)) ?8)))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9)))) ?10)) ?11)) ?12)))) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Full ?5) ?6))) ?7)) ?8)) ?9)))) ?10)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: (Q_Sub ?6 ([])) ?7))) ?8)) ?9)) ?10)))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9))) ?10)) ?11)) ?12)))) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8)) ?9)) ?10)))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 (: Q_Empty ([]))) ?7)) ?8)) ?9)) ?10)))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_NewXY ?7 ?8 ?9) ?10)) ?11)) ?12)) ?13)) ?14)))) ?15)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)) ?11)) ?12)))) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)) ?10)))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8)))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6)))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Full (RGB -1.0 ?3 ?4)) ?5))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Prelude.chr: bad argument: (-1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 ([])) ?4))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty ([]))) ?4))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty ([])))) ?4))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?4))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) ([])))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty ([]))))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: Q_Empty ?5))))) ([]))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty ([])))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty (: Q_Empty ([]))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty (: (Q_Sub ?6 ([])) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: Q_Empty ?4))))) (: (Q_Full ?5) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: Q_Empty ?4))))) (: (Q_Full ?5) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 ([])) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 (: Q_Empty ([]))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 (: (Q_Sub ?7 ([])) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 (: (Q_NewXY ?7 ?8 ?9) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: Q_Empty ?5))))) (: (Q_NewXY ?6 ?7 ?8) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Full ?4) ?5))))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Full ?4) ?5))))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Full ?4) ?5))))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Full ?4) ?5))))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_Sub ?5 ([])) ?6))))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_Sub ?5 (: Q_Empty ([]))) ?6))))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_Sub ?5 (: Q_Empty (: Q_Empty ([])))) ?6))))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_Sub ?5 (: Q_Empty (: (Q_Sub ?6 ([])) ?7))) ?8))))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_Sub ?5 (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9))) ?10))))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: (Q_Full ?5) ?6)) ?7))))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: (Q_Full ?5) ?6)) ?7))))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8))))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_Sub ?5 (: (Q_Sub ?6 (: Q_Empty ([]))) ?7)) ?8))))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_Sub ?7 ([])) ?8)) ?9)) ?10))))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_NewXY ?7 ?8 ?9) ?10)) ?11)) ?12))))) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10))))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Full ?4) ?5)))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Full ?4) ?5)))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 ([])) ?6)))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: Q_Empty ([]))) ?6)))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: Q_Empty (: Q_Empty ([])))) ?6)))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?6)))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: (Q_Sub ?6 ([])) ?7)))) ?8)))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9)))) ?10)))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: (Q_Full ?5) ?6))) ?7)))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: (Q_Full ?5) ?6))) ?7)))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: Q_Empty (: (Q_Sub ?6 ([])) ?7))) ?8)))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: Q_Empty (: (Q_Sub ?6 (: Q_Empty ([]))) ?7))) ?8)))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: Q_Empty (: (Q_Sub ?6 (: (Q_Sub ?7 ([])) ?8)) ?9))) ?10)))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: Q_Empty (: (Q_Sub ?6 (: (Q_NewXY ?7 ?8 ?9) ?10)) ?11))) ?12)))) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9))) ?10)))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Full ?5) ?6)) ?7)))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Full ?5) ?6)) ?7)))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8)))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_Sub ?6 (: Q_Empty ([]))) ?7)) ?8)))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_Sub ?6 (: Q_Empty (: Q_Empty ([])))) ?7)) ?8)))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_Sub ?6 (: Q_Empty (: (Q_Sub ?7 ([])) ?8))) ?9)) ?10)))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_Sub ?6 (: Q_Empty (: (Q_NewXY ?7 ?8 ?9) ?10))) ?11)) ?12)))) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_Sub ?7 ([])) ?8)) ?9)) ?10)))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_Sub ?7 (: Q_Empty ([]))) ?8)) ?9)) ?10)))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_Sub ?7 (: (Q_Sub ?8 ([])) ?9)) ?10)) ?11)) ?12)))) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_Sub ?7 (: (Q_NewXY ?8 ?9 ?10) ?11)) ?12)) ?13)) ?14)))) ?15)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_NewXY ?7 ?8 ?9) ?10)) ?11)) ?12)))) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_NewXY ?5 ?6 ?7) ?8)))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4))))) ?5))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4))))) ?5))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4))))) ?5))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4))))) ?5))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 ([])) ?5))))) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5))))) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5))))) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?5))))) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8)))) ?9))))) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6))))) ?7))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 ([])) ?6))) ?7))))) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9))))) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6))))) ?7))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6))))) ?7))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7))))) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty ([]))) ?6)) ?7))))) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)) ?11))))) ?12))) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9))))) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))))) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4)))) ?5))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4)))) ?5))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4)))) ?5))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4)))) ?5))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4)))) ?5))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 ([])) ?5)))) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)))) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5)))) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?5)))) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) ([]))))) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty ?6))))) ([])))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 ([])) ?7))))) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_NewXY ?6 ?7 ?8) ?9))))) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))))) ?9)))) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Full ?4) ?5)))) ?6)))) ?7))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_Sub ?5 ([])) ?6)))) ?7)))) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8)))) ?9)))) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6)))) ?7))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6)))) ?7))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 ([])) ?6))) ?7)))) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: Q_Empty ([]))) ?6))) ?7)))) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10))) ?11)))) ?12))) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9)))) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6)))) ?7))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6)))) ?7))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6)))) ?7))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7)))) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty ([]))) ?6)) ?7)))) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty ([])))) ?6)) ?7)))) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9))) ?10)) ?11)))) ?12))) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Full ?5) ?6)) ?7)) ?8)))) ?9))) ?10)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8)) ?9)))) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)) ?11)))) ?12))) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)))) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7)))) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 ([])) ?5))) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5))) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5))) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?5))) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) ([])))) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty ([]))))) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty (: Q_Empty ?6))))) ([])))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty (: (Q_Sub ?6 ([])) ?7))))) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9))))) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Full ?5) ?6)))) ?7))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 ([])) ?7)))) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 (: Q_Empty ([]))) ?7)))) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 (: (Q_Sub ?7 ([])) ?8)) ?9)))) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 (: (Q_NewXY ?7 ?8 ?9) ?10)) ?11)))) ?12))) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_NewXY ?6 ?7 ?8) ?9)))) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?4) ?5))))) ?6))) ?7))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?5 ([])) ?6))))) ?7))) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))))) ?9))) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Full ?4) ?5)))) ?6))) ?7))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Full ?4) ?5)))) ?6))) ?7))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_Sub ?5 ([])) ?6)))) ?7))) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_Sub ?5 (: Q_Empty ([]))) ?6)))) ?7))) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)))) ?11))) ?12))) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8)))) ?9))) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6))) ?7))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6))) ?7))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 ([])) ?6))) ?7))) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: Q_Empty ([]))) ?6))) ?7))) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: Q_Empty (: Q_Empty ([])))) ?6))) ?7))) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9))) ?10))) ?11))) ?12))) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Full ?5) ?6)) ?7))) ?8))) ?9))) ?10)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8))) ?9))) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10))) ?11))) ?12))) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9))) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6))) ?7))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6))) ?7))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7))) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty ([]))) ?6)) ?7))) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty ([])))) ?6)) ?7))) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?6)) ?7))) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9)))) ?10)) ?11))) ?12))) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Full ?5) ?6))) ?7)) ?8))) ?9))) ?10)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: (Q_Sub ?6 ([])) ?7))) ?8)) ?9))) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9))) ?10)) ?11))) ?12))) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Full ?5) ?6)) ?7)) ?8))) ?9))) ?10)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Full ?5) ?6)) ?7)) ?8))) ?9))) ?10)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8)) ?9))) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 (: Q_Empty ([]))) ?7)) ?8)) ?9))) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_NewXY ?7 ?8 ?9) ?10)) ?11)) ?12)) ?13))) ?14))) ?15)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)) ?11))) ?12))) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9))) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 ([])) ?5)) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5)) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?5)) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) ([]))) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty ([])))) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty (: Q_Empty ([]))))) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty (: Q_Empty (: Q_Empty ?6))))) ([])))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty (: Q_Empty (: (Q_Sub ?6 ([])) ?7))))) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9))))) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_Full ?5) ?6)))) ?7))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_Full ?5) ?6)))) ?7))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty (: (Q_Sub ?6 ([])) ?7)))) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty (: (Q_Sub ?6 (: Q_Empty ([]))) ?7)))) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty (: (Q_Sub ?6 (: (Q_Sub ?7 ([])) ?8)) ?9)))) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty (: (Q_Sub ?6 (: (Q_NewXY ?7 ?8 ?9) ?10)) ?11)))) ?12))) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9)))) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Full ?5) ?6))) ?7))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Full ?5) ?6))) ?7))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 ([])) ?7))) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 (: Q_Empty ([]))) ?7))) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 (: Q_Empty (: Q_Empty ([])))) ?7))) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 (: Q_Empty (: (Q_Sub ?7 ([])) ?8))) ?9))) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 (: Q_Empty (: (Q_NewXY ?7 ?8 ?9) ?10))) ?11))) ?12))) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_Full ?6) ?7)) ?8))) ?9))) ?10)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_Full ?6) ?7)) ?8))) ?9))) ?10)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 (: (Q_Sub ?7 ([])) ?8)) ?9))) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 (: (Q_Sub ?7 (: Q_Empty ([]))) ?8)) ?9))) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 (: (Q_Sub ?7 (: (Q_Sub ?8 ([])) ?9)) ?10)) ?11))) ?12))) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 (: (Q_Sub ?7 (: (Q_NewXY ?8 ?9 ?10) ?11)) ?12)) ?13))) ?14))) ?15)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 (: (Q_NewXY ?7 ?8 ?9) ?10)) ?11))) ?12))) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_NewXY ?6 ?7 ?8) ?9))) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?4) ?5))))) ?6)) ?7))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?4) ?5))))) ?6)) ?7))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?5 ([])) ?6))))) ?7)) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?5 (: Q_Empty ([]))) ?6))))) ?7)) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10))))) ?11)) ?12))) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))))) ?9)) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Full ?4) ?5)))) ?6)) ?7))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Full ?4) ?5)))) ?6)) ?7))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Full ?4) ?5)))) ?6)) ?7))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_Sub ?5 ([])) ?6)))) ?7)) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_Sub ?5 (: Q_Empty ([]))) ?6)))) ?7)) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_Sub ?5 (: Q_Empty (: Q_Empty ([])))) ?6)))) ?7)) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_Sub ?5 (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9))) ?10)))) ?11)) ?12))) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_Full ?5) ?6)) ?7)))) ?8)) ?9))) ?10)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8)))) ?9)) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)))) ?11)) ?12))) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8)))) ?9)) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6)) ?7))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6)) ?7))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 ([])) ?6))) ?7)) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: Q_Empty ([]))) ?6))) ?7)) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: Q_Empty (: Q_Empty ([])))) ?6))) ?7)) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?6))) ?7)) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9)))) ?10))) ?11)) ?12))) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_Full ?5) ?6))) ?7))) ?8)) ?9))) ?10)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: Q_Empty (: (Q_Sub ?6 ([])) ?7))) ?8))) ?9)) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9))) ?10))) ?11)) ?12))) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Full ?5) ?6)) ?7))) ?8)) ?9))) ?10)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Full ?5) ?6)) ?7))) ?8)) ?9))) ?10)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8))) ?9)) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: (Q_Sub ?6 (: Q_Empty ([]))) ?7)) ?8))) ?9)) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_NewXY ?7 ?8 ?9) ?10)) ?11)) ?12))) ?13)) ?14))) ?15)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10))) ?11)) ?12))) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9)) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6)) ?7))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6)) ?7))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6)) ?7))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7)) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty ([]))) ?6)) ?7)) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty ([])))) ?6)) ?7)) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?6)) ?7)) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?6))))) ([]))) ?7)) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?6))))) (: Q_Empty ([])))) ?7)) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?6))))) (: Q_Empty (: Q_Empty ([]))))) ?7)) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?6))))) (: Q_Empty (: (Q_Sub ?7 ([])) ?8)))) ?9)) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?6))))) (: Q_Empty (: (Q_NewXY ?7 ?8 ?9) ?10)))) ?11)) ?12))) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?6))))) (: (Q_Sub ?7 ([])) ?8))) ?9)) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?6))))) (: (Q_Sub ?7 (: Q_Empty ([]))) ?8))) ?9)) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?6))))) (: (Q_Sub ?7 (: (Q_Sub ?8 ([])) ?9)) ?10))) ?11)) ?12))) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?6))))) (: (Q_Sub ?7 (: (Q_NewXY ?8 ?9 ?10) ?11)) ?12))) ?13)) ?14))) ?15)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?6))))) (: (Q_NewXY ?7 ?8 ?9) ?10))) ?11)) ?12))) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9))))) ?10)) ?11)) ?12))) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_Full ?5) ?6)))) ?7)) ?8)) ?9))) ?10)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: (Q_Sub ?6 ([])) ?7)))) ?8)) ?9)) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9)))) ?10)) ?11)) ?12))) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Full ?5) ?6))) ?7)) ?8)) ?9))) ?10)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Full ?5) ?6))) ?7)) ?8)) ?9))) ?10)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: (Q_Sub ?6 ([])) ?7))) ?8)) ?9)) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: (Q_Sub ?6 (: Q_Empty ([]))) ?7))) ?8)) ?9)) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: (Q_Sub ?6 (: (Q_NewXY ?7 ?8 ?9) ?10)) ?11))) ?12)) ?13)) ?14))) ?15)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9))) ?10)) ?11)) ?12))) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Full ?5) ?6)) ?7)) ?8)) ?9))) ?10)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Full ?5) ?6)) ?7)) ?8)) ?9))) ?10)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8)) ?9)) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 (: Q_Empty ([]))) ?7)) ?8)) ?9)) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 (: Q_Empty (: Q_Empty ([])))) ?7)) ?8)) ?9)) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 (: Q_Empty (: (Q_NewXY ?7 ?8 ?9) ?10))) ?11)) ?12)) ?13)) ?14))) ?15)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Full ?6) ?7)) ?8)) ?9)) ?10)) ?11))) ?12)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_Sub ?7 ([])) ?8)) ?9)) ?10)) ?11)) ?12))) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_NewXY ?7 ?8 ?9) ?10)) ?11)) ?12)) ?13)) ?14))) ?15)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)) ?11)) ?12))) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Full ?2) ?3)) ?4)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Full ?2) ?3)) ?4)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Full (RGB -1.0 ?3 ?4)) ?5)) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Prelude.chr: bad argument: (-1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 ([])) ?4)) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty ([]))) ?4)) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty ([])))) ?4)) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?4)) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) ([]))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty ([])))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: Q_Empty ([]))))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) ([]))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty ([])))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty (: Q_Empty ([]))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty (: (Q_Sub ?6 ([])) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Full ?5) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Full ?5) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 ([])) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 (: Q_Empty ([]))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 (: (Q_Sub ?7 ([])) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 (: (Q_NewXY ?7 ?8 ?9) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_NewXY ?6 ?7 ?8) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: Q_Empty (: (Q_Full ?4) ?5))))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: Q_Empty (: (Q_Full ?4) ?5))))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: Q_Empty (: (Q_Full ?4) ?5))))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: Q_Empty (: (Q_Full ?4) ?5))))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: Q_Empty (: (Q_Sub ?5 ([])) ?6))))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: Q_Empty (: (Q_Sub ?5 (: Q_Empty ([]))) ?6))))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: Q_Empty (: (Q_Sub ?5 (: Q_Empty (: Q_Empty ([])))) ?6))))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: Q_Empty (: (Q_Sub ?5 (: Q_Empty (: (Q_Sub ?6 ([])) ?7))) ?8))))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: Q_Empty (: (Q_Sub ?5 (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9))) ?10))))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_Full ?5) ?6)) ?7))))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_Full ?5) ?6)) ?7))))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: Q_Empty (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8))))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: Q_Empty (: (Q_Sub ?5 (: (Q_Sub ?6 (: Q_Empty ([]))) ?7)) ?8))))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: Q_Empty (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_Sub ?7 ([])) ?8)) ?9)) ?10))))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: Q_Empty (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_NewXY ?7 ?8 ?9) ?10)) ?11)) ?12))))) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: Q_Empty (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10))))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Full ?4) ?5)))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Full ?4) ?5)))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Full ?4) ?5)))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_Sub ?5 ([])) ?6)))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_Sub ?5 (: Q_Empty ([]))) ?6)))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_Sub ?5 (: Q_Empty (: Q_Empty ([])))) ?6)))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?6)))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: (Q_Sub ?6 ([])) ?7)))) ?8)))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9)))) ?10)))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_Full ?5) ?6))) ?7)))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_Full ?5) ?6))) ?7)))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_Sub ?5 (: Q_Empty (: (Q_Sub ?6 ([])) ?7))) ?8)))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_Sub ?5 (: Q_Empty (: (Q_Sub ?6 (: Q_Empty ([]))) ?7))) ?8)))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_Sub ?5 (: Q_Empty (: (Q_Sub ?6 (: (Q_Sub ?7 ([])) ?8)) ?9))) ?10)))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_Sub ?5 (: Q_Empty (: (Q_Sub ?6 (: (Q_NewXY ?7 ?8 ?9) ?10)) ?11))) ?12)))) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_Sub ?5 (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9))) ?10)))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: (Q_Full ?5) ?6)) ?7)))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: (Q_Full ?5) ?6)) ?7)))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8)))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_Sub ?5 (: (Q_Sub ?6 (: Q_Empty ([]))) ?7)) ?8)))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_Sub ?5 (: (Q_Sub ?6 (: Q_Empty (: Q_Empty ([])))) ?7)) ?8)))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_Sub ?5 (: (Q_Sub ?6 (: Q_Empty (: (Q_Sub ?7 ([])) ?8))) ?9)) ?10)))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_Sub ?5 (: (Q_Sub ?6 (: Q_Empty (: (Q_NewXY ?7 ?8 ?9) ?10))) ?11)) ?12)))) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_Sub ?7 ([])) ?8)) ?9)) ?10)))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_Sub ?7 (: Q_Empty ([]))) ?8)) ?9)) ?10)))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_Sub ?7 (: (Q_Sub ?8 ([])) ?9)) ?10)) ?11)) ?12)))) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_Sub ?7 (: (Q_NewXY ?8 ?9 ?10) ?11)) ?12)) ?13)) ?14)))) ?15)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_NewXY ?7 ?8 ?9) ?10)) ?11)) ?12)))) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8)))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Full ?4) ?5))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Full ?4) ?5))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Full ?4) ?5))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 ([])) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: Q_Empty ([]))) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: Q_Empty (: Q_Empty ([])))) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?6))))) ([])))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?6 ([])) ?7))))) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9))))) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_Full ?5) ?6)))) ?7))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_Full ?5) ?6)))) ?7))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: (Q_Sub ?6 ([])) ?7)))) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: (Q_Sub ?6 (: Q_Empty ([]))) ?7)))) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: (Q_Sub ?6 (: (Q_Sub ?7 ([])) ?8)) ?9)))) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: (Q_Sub ?6 (: (Q_NewXY ?7 ?8 ?9) ?10)) ?11)))) ?12))) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9)))) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: (Q_Full ?5) ?6))) ?7))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: (Q_Full ?5) ?6))) ?7))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: Q_Empty (: (Q_Sub ?6 ([])) ?7))) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: Q_Empty (: (Q_Sub ?6 (: Q_Empty ([]))) ?7))) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: Q_Empty (: (Q_Sub ?6 (: Q_Empty (: Q_Empty ([])))) ?7))) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: Q_Empty (: (Q_Sub ?6 (: Q_Empty (: (Q_Sub ?7 ([])) ?8))) ?9))) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: Q_Empty (: (Q_Sub ?6 (: Q_Empty (: (Q_NewXY ?7 ?8 ?9) ?10))) ?11))) ?12))) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: (Q_Full ?6) ?7)) ?8))) ?9))) ?10)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: (Q_Full ?6) ?7)) ?8))) ?9))) ?10)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: Q_Empty (: (Q_Sub ?6 (: (Q_Sub ?7 ([])) ?8)) ?9))) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: Q_Empty (: (Q_Sub ?6 (: (Q_Sub ?7 (: Q_Empty ([]))) ?8)) ?9))) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: Q_Empty (: (Q_Sub ?6 (: (Q_Sub ?7 (: (Q_Sub ?8 ([])) ?9)) ?10)) ?11))) ?12))) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: Q_Empty (: (Q_Sub ?6 (: (Q_Sub ?7 (: (Q_NewXY ?8 ?9 ?10) ?11)) ?12)) ?13))) ?14))) ?15)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: Q_Empty (: (Q_Sub ?6 (: (Q_NewXY ?7 ?8 ?9) ?10)) ?11))) ?12))) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9))) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Full ?5) ?6)) ?7))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Full ?5) ?6)) ?7))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Full ?5) ?6)) ?7))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_Sub ?6 (: Q_Empty ([]))) ?7)) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_Sub ?6 (: Q_Empty (: Q_Empty ([])))) ?7)) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_Sub ?6 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?7)) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_Sub ?6 (: Q_Empty (: Q_Empty (: (Q_Sub ?7 ([])) ?8)))) ?9)) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_Sub ?6 (: Q_Empty (: Q_Empty (: (Q_NewXY ?7 ?8 ?9) ?10)))) ?11)) ?12))) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: (Q_Full ?6) ?7))) ?8)) ?9))) ?10)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: (Q_Full ?6) ?7))) ?8)) ?9))) ?10)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_Sub ?6 (: Q_Empty (: (Q_Sub ?7 ([])) ?8))) ?9)) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_Sub ?6 (: Q_Empty (: (Q_Sub ?7 (: Q_Empty ([]))) ?8))) ?9)) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_Sub ?6 (: Q_Empty (: (Q_Sub ?7 (: (Q_Sub ?8 ([])) ?9)) ?10))) ?11)) ?12))) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_Sub ?6 (: Q_Empty (: (Q_Sub ?7 (: (Q_NewXY ?8 ?9 ?10) ?11)) ?12))) ?13)) ?14))) ?15)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_Sub ?6 (: Q_Empty (: (Q_NewXY ?7 ?8 ?9) ?10))) ?11)) ?12))) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Full ?6) ?7)) ?8)) ?9))) ?10)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Full ?6) ?7)) ?8)) ?9))) ?10)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_Sub ?7 ([])) ?8)) ?9)) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_Sub ?7 (: Q_Empty ([]))) ?8)) ?9)) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_Sub ?7 (: Q_Empty (: Q_Empty ([])))) ?8)) ?9)) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_Sub ?7 (: Q_Empty (: (Q_Sub ?8 ([])) ?9))) ?10)) ?11)) ?12))) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_Sub ?7 (: Q_Empty (: (Q_NewXY ?8 ?9 ?10) ?11))) ?12)) ?13)) ?14))) ?15)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_Full ?7) ?8)) ?9)) ?10)) ?11))) ?12)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_Full ?7) ?8)) ?9)) ?10)) ?11))) ?12)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_Sub ?7 (: (Q_Sub ?8 ([])) ?9)) ?10)) ?11)) ?12))) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_Sub ?7 (: (Q_Sub ?8 (: Q_Empty ([]))) ?9)) ?10)) ?11)) ?12))) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_Sub ?7 (: (Q_Sub ?8 (: (Q_Sub ?9 ([])) ?10)) ?11)) ?12)) ?13)) ?14))) ?15)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_Sub ?7 (: (Q_Sub ?8 (: (Q_NewXY ?9 ?10 ?11) ?12)) ?13)) ?14)) ?15)) ?16))) ?17)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_Sub ?7 (: (Q_NewXY ?8 ?9 ?10) ?11)) ?12)) ?13)) ?14))) ?15)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_NewXY ?7 ?8 ?9) ?10)) ?11)) ?12))) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4))))) ?5)) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4))))) ?5)) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4))))) ?5)) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4))))) ?5)) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4))))) ?5)) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 ([])) ?5))))) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5))))) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5))))) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?5))))) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) ?6))))) ([]))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) ?6))))) (: Q_Empty ([])))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) ?6))))) (: (Q_Sub ?7 ([])) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) ?6))))) (: (Q_NewXY ?7 ?8 ?9) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))))) ?9))))) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Full ?4) ?5)))) ?6))))) ?7)) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_Sub ?5 ([])) ?6)))) ?7))))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8)))) ?9))))) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6))))) ?7)) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6))))) ?7)) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 ([])) ?6))) ?7))))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: Q_Empty ([]))) ?6))) ?7))))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10))) ?11))))) ?12)) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9))))) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6))))) ?7)) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6))))) ?7)) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6))))) ?7)) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7))))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty ([]))) ?6)) ?7))))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty ([])))) ?6)) ?7))))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9))) ?10)) ?11))))) ?12)) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Full ?5) ?6)) ?7)) ?8))))) ?9)) ?10)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8)) ?9))))) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)) ?11))))) ?12)) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9))))) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4)))) ?5)) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4)))) ?5)) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4)))) ?5)) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4)))) ?5)) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 ([])) ?5)))) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)))) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5)))) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?5)))) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) ([]))))) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty ?6))))) ([]))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty ?6))))) (: Q_Empty ([])))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty ?6))))) (: (Q_Sub ?7 ([])) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty ?6))))) (: (Q_NewXY ?7 ?8 ?9) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Full ?5) ?6))))) ?7)) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 ([])) ?7))))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 (: Q_Empty ([]))) ?7))))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 (: (Q_Sub ?7 ([])) ?8)) ?9))))) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 (: (Q_NewXY ?7 ?8 ?9) ?10)) ?11))))) ?12)) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_NewXY ?6 ?7 ?8) ?9))))) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?4) ?5))))) ?6)))) ?7)) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?5 ([])) ?6))))) ?7)))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))))) ?9)))) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_Sub ?5 ([])) ?6)))) ?7)))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_Sub ?5 (: Q_Empty ([]))) ?6)))) ?7)))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)))) ?11)))) ?12)) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8)))) ?9)))) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6)))) ?7)) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6)))) ?7)) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6)))) ?7)) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 ([])) ?6))) ?7)))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: Q_Empty ([]))) ?6))) ?7)))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: Q_Empty (: Q_Empty ([])))) ?6))) ?7)))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9))) ?10))) ?11)))) ?12)) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Full ?5) ?6)) ?7))) ?8)))) ?9)) ?10)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8))) ?9)))) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10))) ?11)))) ?12)) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9)))) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6)))) ?7)) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6)))) ?7)) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7)))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty ([]))) ?6)) ?7)))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty ([])))) ?6)) ?7)))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?6)) ?7)))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9)))) ?10)) ?11)))) ?12)) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Full ?5) ?6))) ?7)) ?8)))) ?9)) ?10)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: (Q_Sub ?6 ([])) ?7))) ?8)) ?9)))) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9))) ?10)) ?11)))) ?12)) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8)) ?9)))) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 (: Q_Empty ([]))) ?7)) ?8)) ?9)))) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_NewXY ?7 ?8 ?9) ?10)) ?11)) ?12)) ?13)))) ?14)) ?15)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)) ?11)))) ?12)) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)))) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7)))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5)) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5)) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5)) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5)) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 ([])) ?5))) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5))) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5))) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?5))) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) ([])))) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty ([]))))) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty (: Q_Empty ?6))))) ([]))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty (: Q_Empty ?6))))) (: Q_Empty ([])))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty (: Q_Empty ?6))))) (: (Q_Sub ?7 ([])) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty (: Q_Empty ?6))))) (: (Q_NewXY ?7 ?8 ?9) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_Full ?5) ?6))))) ?7)) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_Full ?5) ?6))))) ?7)) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty (: (Q_Sub ?6 ([])) ?7))))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty (: (Q_Sub ?6 (: Q_Empty ([]))) ?7))))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty (: (Q_Sub ?6 (: (Q_Sub ?7 ([])) ?8)) ?9))))) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty (: (Q_Sub ?6 (: (Q_NewXY ?7 ?8 ?9) ?10)) ?11))))) ?12)) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9))))) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 ([])) ?7)))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 (: Q_Empty ([]))) ?7)))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 (: Q_Empty (: Q_Empty ([])))) ?7)))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 (: Q_Empty (: (Q_Sub ?7 ([])) ?8))) ?9)))) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 (: Q_Empty (: (Q_NewXY ?7 ?8 ?9) ?10))) ?11)))) ?12)) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 (: (Q_Sub ?7 ([])) ?8)) ?9)))) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 (: (Q_Sub ?7 (: Q_Empty ([]))) ?8)) ?9)))) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 (: (Q_Sub ?7 (: (Q_Sub ?8 ([])) ?9)) ?10)) ?11)))) ?12)) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 (: (Q_Sub ?7 (: (Q_NewXY ?8 ?9 ?10) ?11)) ?12)) ?13)))) ?14)) ?15)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 (: (Q_NewXY ?7 ?8 ?9) ?10)) ?11)))) ?12)) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_NewXY ?6 ?7 ?8) ?9)))) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?4) ?5))))) ?6))) ?7)) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?4) ?5))))) ?6))) ?7)) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?5 ([])) ?6))))) ?7))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?5 (: Q_Empty ([]))) ?6))))) ?7))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10))))) ?11))) ?12)) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))))) ?9))) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Full ?4) ?5)))) ?6))) ?7)) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Full ?4) ?5)))) ?6))) ?7)) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Full ?4) ?5)))) ?6))) ?7)) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_Sub ?5 ([])) ?6)))) ?7))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_Sub ?5 (: Q_Empty ([]))) ?6)))) ?7))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_Sub ?5 (: Q_Empty (: Q_Empty ([])))) ?6)))) ?7))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_Sub ?5 (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9))) ?10)))) ?11))) ?12)) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_Full ?5) ?6)) ?7)))) ?8))) ?9)) ?10)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8)))) ?9))) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)))) ?11))) ?12)) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8)))) ?9))) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6))) ?7)) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6))) ?7)) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 ([])) ?6))) ?7))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: Q_Empty ([]))) ?6))) ?7))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: Q_Empty (: Q_Empty ([])))) ?6))) ?7))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?6))) ?7))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9)))) ?10))) ?11))) ?12)) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_Full ?5) ?6))) ?7))) ?8))) ?9)) ?10)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: Q_Empty (: (Q_Sub ?6 ([])) ?7))) ?8))) ?9))) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9))) ?10))) ?11))) ?12)) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Full ?5) ?6)) ?7))) ?8))) ?9)) ?10)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Full ?5) ?6)) ?7))) ?8))) ?9)) ?10)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8))) ?9))) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: (Q_Sub ?6 (: Q_Empty ([]))) ?7)) ?8))) ?9))) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_NewXY ?7 ?8 ?9) ?10)) ?11)) ?12))) ?13))) ?14)) ?15)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10))) ?11))) ?12)) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9))) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6))) ?7)) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6))) ?7)) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6))) ?7)) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty ([]))) ?6)) ?7))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty ([])))) ?6)) ?7))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?6)) ?7))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?6))))) ([]))) ?7))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?6))))) (: Q_Empty ([])))) ?7))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?6))))) (: Q_Empty (: Q_Empty ([]))))) ?7))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?6))))) (: Q_Empty (: (Q_Sub ?7 ([])) ?8)))) ?9))) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?6))))) (: Q_Empty (: (Q_NewXY ?7 ?8 ?9) ?10)))) ?11))) ?12)) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?6))))) (: (Q_Sub ?7 ([])) ?8))) ?9))) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?6))))) (: (Q_Sub ?7 (: Q_Empty ([]))) ?8))) ?9))) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?6))))) (: (Q_Sub ?7 (: (Q_Sub ?8 ([])) ?9)) ?10))) ?11))) ?12)) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?6))))) (: (Q_Sub ?7 (: (Q_NewXY ?8 ?9 ?10) ?11)) ?12))) ?13))) ?14)) ?15)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?6))))) (: (Q_NewXY ?7 ?8 ?9) ?10))) ?11))) ?12)) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9))))) ?10)) ?11))) ?12)) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_Full ?5) ?6)))) ?7)) ?8))) ?9)) ?10)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: (Q_Sub ?6 ([])) ?7)))) ?8)) ?9))) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9)))) ?10)) ?11))) ?12)) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Full ?5) ?6))) ?7)) ?8))) ?9)) ?10)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Full ?5) ?6))) ?7)) ?8))) ?9)) ?10)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: (Q_Sub ?6 ([])) ?7))) ?8)) ?9))) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: (Q_Sub ?6 (: Q_Empty ([]))) ?7))) ?8)) ?9))) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: (Q_Sub ?6 (: (Q_NewXY ?7 ?8 ?9) ?10)) ?11))) ?12)) ?13))) ?14)) ?15)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9))) ?10)) ?11))) ?12)) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Full ?5) ?6)) ?7)) ?8))) ?9)) ?10)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Full ?5) ?6)) ?7)) ?8))) ?9)) ?10)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8)) ?9))) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 (: Q_Empty ([]))) ?7)) ?8)) ?9))) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 (: Q_Empty (: Q_Empty ([])))) ?7)) ?8)) ?9))) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 (: Q_Empty (: (Q_NewXY ?7 ?8 ?9) ?10))) ?11)) ?12)) ?13))) ?14)) ?15)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Full ?6) ?7)) ?8)) ?9)) ?10))) ?11)) ?12)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_Sub ?7 ([])) ?8)) ?9)) ?10)) ?11))) ?12)) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_NewXY ?7 ?8 ?9) ?10)) ?11)) ?12)) ?13))) ?14)) ?15)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)) ?11))) ?12)) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9))) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5)) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5)) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 ([])) ?5)) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5)) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?5)) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) ([]))) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty ([])))) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty (: Q_Empty ([]))))) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty (: Q_Empty (: Q_Empty ?6))))) ([]))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty (: Q_Empty (: Q_Empty ?6))))) (: Q_Empty ([])))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty (: Q_Empty (: Q_Empty ?6))))) (: (Q_Sub ?7 ([])) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty (: Q_Empty (: Q_Empty ?6))))) (: (Q_NewXY ?7 ?8 ?9) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: Q_Empty (: (Q_Full ?5) ?6))))) ?7)) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: Q_Empty (: (Q_Full ?5) ?6))))) ?7)) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty (: Q_Empty (: (Q_Sub ?6 ([])) ?7))))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty (: Q_Empty (: (Q_Sub ?6 (: Q_Empty ([]))) ?7))))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty (: Q_Empty (: (Q_Sub ?6 (: (Q_Sub ?7 ([])) ?8)) ?9))))) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty (: Q_Empty (: (Q_Sub ?6 (: (Q_NewXY ?7 ?8 ?9) ?10)) ?11))))) ?12)) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9))))) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_Full ?5) ?6)))) ?7)) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty (: (Q_Sub ?6 ([])) ?7)))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty (: (Q_Sub ?6 (: Q_Empty ([]))) ?7)))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty (: (Q_Sub ?6 (: Q_Empty (: Q_Empty ([])))) ?7)))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty (: (Q_Sub ?6 (: Q_Empty (: (Q_Sub ?7 ([])) ?8))) ?9)))) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty (: (Q_Sub ?6 (: Q_Empty (: (Q_NewXY ?7 ?8 ?9) ?10))) ?11)))) ?12)) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty (: (Q_Sub ?6 (: (Q_Sub ?7 ([])) ?8)) ?9)))) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty (: (Q_Sub ?6 (: (Q_Sub ?7 (: Q_Empty ([]))) ?8)) ?9)))) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty (: (Q_Sub ?6 (: (Q_Sub ?7 (: (Q_Sub ?8 ([])) ?9)) ?10)) ?11)))) ?12)) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty (: (Q_Sub ?6 (: (Q_Sub ?7 (: (Q_NewXY ?8 ?9 ?10) ?11)) ?12)) ?13)))) ?14)) ?15)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty (: (Q_Sub ?6 (: (Q_NewXY ?7 ?8 ?9) ?10)) ?11)))) ?12)) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9)))) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Full ?5) ?6))) ?7)) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Full ?5) ?6))) ?7)) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 ([])) ?7))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 (: Q_Empty ([]))) ?7))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 (: Q_Empty (: Q_Empty ([])))) ?7))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?7))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 (: Q_Empty (: Q_Empty (: (Q_Sub ?7 ([])) ?8)))) ?9))) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 (: Q_Empty (: Q_Empty (: (Q_NewXY ?7 ?8 ?9) ?10)))) ?11))) ?12)) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: Q_Empty (: (Q_Full ?6) ?7))) ?8))) ?9)) ?10)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: Q_Empty (: (Q_Full ?6) ?7))) ?8))) ?9)) ?10)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 (: Q_Empty (: (Q_Sub ?7 ([])) ?8))) ?9))) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 (: Q_Empty (: (Q_Sub ?7 (: Q_Empty ([]))) ?8))) ?9))) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 (: Q_Empty (: (Q_Sub ?7 (: (Q_Sub ?8 ([])) ?9)) ?10))) ?11))) ?12)) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 (: Q_Empty (: (Q_Sub ?7 (: (Q_NewXY ?8 ?9 ?10) ?11)) ?12))) ?13))) ?14)) ?15)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 (: Q_Empty (: (Q_NewXY ?7 ?8 ?9) ?10))) ?11))) ?12)) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_Full ?6) ?7)) ?8))) ?9)) ?10)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_Full ?6) ?7)) ?8))) ?9)) ?10)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 (: (Q_Sub ?7 ([])) ?8)) ?9))) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 (: (Q_Sub ?7 (: Q_Empty ([]))) ?8)) ?9))) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 (: (Q_Sub ?7 (: Q_Empty (: Q_Empty ([])))) ?8)) ?9))) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 (: (Q_Sub ?7 (: Q_Empty (: (Q_Sub ?8 ([])) ?9))) ?10)) ?11))) ?12)) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 (: (Q_Sub ?7 (: Q_Empty (: (Q_NewXY ?8 ?9 ?10) ?11))) ?12)) ?13))) ?14)) ?15)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_Full ?7) ?8)) ?9)) ?10))) ?11)) ?12)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_Full ?7) ?8)) ?9)) ?10))) ?11)) ?12)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 (: (Q_Sub ?7 (: (Q_Sub ?8 ([])) ?9)) ?10)) ?11))) ?12)) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 (: (Q_Sub ?7 (: (Q_Sub ?8 (: Q_Empty ([]))) ?9)) ?10)) ?11))) ?12)) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 (: (Q_Sub ?7 (: (Q_Sub ?8 (: (Q_Sub ?9 ([])) ?10)) ?11)) ?12)) ?13))) ?14)) ?15)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 (: (Q_Sub ?7 (: (Q_Sub ?8 (: (Q_NewXY ?9 ?10 ?11) ?12)) ?13)) ?14)) ?15))) ?16)) ?17)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 (: (Q_Sub ?7 (: (Q_NewXY ?8 ?9 ?10) ?11)) ?12)) ?13))) ?14)) ?15)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 (: (Q_NewXY ?7 ?8 ?9) ?10)) ?11))) ?12)) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_NewXY ?6 ?7 ?8) ?9))) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?4) ?5))))) ?6)) ?7)) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?4) ?5))))) ?6)) ?7)) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?4) ?5))))) ?6)) ?7)) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?5 ([])) ?6))))) ?7)) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?5 (: Q_Empty ([]))) ?6))))) ?7)) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?5 (: Q_Empty (: Q_Empty ([])))) ?6))))) ?7)) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?5 (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9))) ?10))))) ?11)) ?12)) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_Full ?5) ?6)) ?7))))) ?8)) ?9)) ?10)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8))))) ?9)) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10))))) ?11)) ?12)) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))))) ?9)) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Full ?4) ?5)))) ?6)) ?7)) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Full ?4) ?5)))) ?6)) ?7)) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_Sub ?5 ([])) ?6)))) ?7)) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_Sub ?5 (: Q_Empty ([]))) ?6)))) ?7)) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_Sub ?5 (: Q_Empty (: Q_Empty ([])))) ?6)))) ?7)) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?6)))) ?7)) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9)))) ?10)))) ?11)) ?12)) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_Full ?5) ?6))) ?7)))) ?8)) ?9)) ?10)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_Sub ?5 (: Q_Empty (: (Q_Sub ?6 ([])) ?7))) ?8)))) ?9)) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_Sub ?5 (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9))) ?10)))) ?11)) ?12)) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8)))) ?9)) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_Sub ?5 (: (Q_Sub ?6 (: Q_Empty ([]))) ?7)) ?8)))) ?9)) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_NewXY ?7 ?8 ?9) ?10)) ?11)) ?12)))) ?13)) ?14)) ?15)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)))) ?11)) ?12)) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8)))) ?9)) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6)) ?7)) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6)) ?7)) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6)) ?7)) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 ([])) ?6))) ?7)) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: Q_Empty ([]))) ?6))) ?7)) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: Q_Empty (: Q_Empty ([])))) ?6))) ?7)) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?6))) ?7)) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?6))))) ([])))) ?7)) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?6))))) (: Q_Empty ([]))))) ?7)) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?6))))) (: Q_Empty (: Q_Empty ?7))))) ([]))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?6))))) (: Q_Empty (: (Q_Sub ?7 ([])) ?8))))) ?9)) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?6))))) (: Q_Empty (: (Q_NewXY ?7 ?8 ?9) ?10))))) ?11)) ?12)) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?6))))) (: (Q_Sub ?7 ([])) ?8)))) ?9)) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?6))))) (: (Q_Sub ?7 (: Q_Empty ([]))) ?8)))) ?9)) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?6))))) (: (Q_Sub ?7 (: (Q_Sub ?8 ([])) ?9)) ?10)))) ?11)) ?12)) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?6))))) (: (Q_Sub ?7 (: (Q_NewXY ?8 ?9 ?10) ?11)) ?12)))) ?13)) ?14)) ?15)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?6))))) (: (Q_NewXY ?7 ?8 ?9) ?10)))) ?11)) ?12)) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9))))) ?10))) ?11)) ?12)) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_Full ?5) ?6)))) ?7))) ?8)) ?9)) ?10)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: (Q_Sub ?6 ([])) ?7)))) ?8))) ?9)) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9)))) ?10))) ?11)) ?12)) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_Full ?5) ?6))) ?7))) ?8)) ?9)) ?10)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_Full ?5) ?6))) ?7))) ?8)) ?9)) ?10)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: Q_Empty (: (Q_Sub ?6 ([])) ?7))) ?8))) ?9)) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: Q_Empty (: (Q_Sub ?6 (: Q_Empty ([]))) ?7))) ?8))) ?9)) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: Q_Empty (: (Q_Sub ?6 (: (Q_NewXY ?7 ?8 ?9) ?10)) ?11))) ?12))) ?13)) ?14)) ?15)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9))) ?10))) ?11)) ?12)) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Full ?5) ?6)) ?7))) ?8)) ?9)) ?10)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Full ?5) ?6)) ?7))) ?8)) ?9)) ?10)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8))) ?9)) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: (Q_Sub ?6 (: Q_Empty ([]))) ?7)) ?8))) ?9)) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: (Q_Sub ?6 (: Q_Empty (: Q_Empty ([])))) ?7)) ?8))) ?9)) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: (Q_Sub ?6 (: Q_Empty (: (Q_NewXY ?7 ?8 ?9) ?10))) ?11)) ?12))) ?13)) ?14)) ?15)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Full ?6) ?7)) ?8)) ?9))) ?10)) ?11)) ?12)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_Sub ?7 ([])) ?8)) ?9)) ?10))) ?11)) ?12)) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_NewXY ?7 ?8 ?9) ?10)) ?11)) ?12))) ?13)) ?14)) ?15)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10))) ?11)) ?12)) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9)) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6)) ?7)) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6)) ?7)) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7)) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty ([]))) ?6)) ?7)) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty ([])))) ?6)) ?7)) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?6)) ?7)) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?6))))) ([]))) ?7)) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?6))))) (: Q_Empty ([])))) ?7)) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?6))))) (: Q_Empty (: Q_Empty ([]))))) ?7)) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?6))))) (: Q_Empty (: Q_Empty (: Q_Empty ?7))))) ([]))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?6))))) (: Q_Empty (: Q_Empty (: (Q_Sub ?7 ([])) ?8))))) ?9)) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?6))))) (: Q_Empty (: Q_Empty (: (Q_NewXY ?7 ?8 ?9) ?10))))) ?11)) ?12)) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?6))))) (: Q_Empty (: (Q_Sub ?7 ([])) ?8)))) ?9)) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?6))))) (: Q_Empty (: (Q_Sub ?7 (: Q_Empty ([]))) ?8)))) ?9)) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?6))))) (: Q_Empty (: (Q_Sub ?7 (: (Q_Sub ?8 ([])) ?9)) ?10)))) ?11)) ?12)) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?6))))) (: Q_Empty (: (Q_Sub ?7 (: (Q_NewXY ?8 ?9 ?10) ?11)) ?12)))) ?13)) ?14)) ?15)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?6))))) (: Q_Empty (: (Q_NewXY ?7 ?8 ?9) ?10)))) ?11)) ?12)) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Full ?6) ?7))) ?8)) ?9)) ?10)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?6))))) (: (Q_Sub ?7 ([])) ?8))) ?9)) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?6))))) (: (Q_Sub ?7 (: Q_Empty ([]))) ?8))) ?9)) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?6))))) (: (Q_Sub ?7 (: Q_Empty (: Q_Empty ([])))) ?8))) ?9)) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?6))))) (: (Q_Sub ?7 (: Q_Empty (: (Q_Sub ?8 ([])) ?9))) ?10))) ?11)) ?12)) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?6))))) (: (Q_Sub ?7 (: Q_Empty (: (Q_NewXY ?8 ?9 ?10) ?11))) ?12))) ?13)) ?14)) ?15)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 (: (Q_Full ?7) ?8)) ?9))) ?10)) ?11)) ?12)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?6))))) (: (Q_Sub ?7 (: (Q_Sub ?8 ([])) ?9)) ?10))) ?11)) ?12)) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?6))))) (: (Q_Sub ?7 (: (Q_Sub ?8 (: Q_Empty ([]))) ?9)) ?10))) ?11)) ?12)) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?6))))) (: (Q_Sub ?7 (: (Q_Sub ?8 (: (Q_Sub ?9 ([])) ?10)) ?11)) ?12))) ?13)) ?14)) ?15)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?6))))) (: (Q_Sub ?7 (: (Q_Sub ?8 (: (Q_NewXY ?9 ?10 ?11) ?12)) ?13)) ?14))) ?15)) ?16)) ?17)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?6))))) (: (Q_Sub ?7 (: (Q_NewXY ?8 ?9 ?10) ?11)) ?12))) ?13)) ?14)) ?15)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?6))))) (: (Q_NewXY ?7 ?8 ?9) ?10))) ?11)) ?12)) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?5) ?6))))) ?7)) ?8)) ?9)) ?10)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?6 ([])) ?7))))) ?8)) ?9)) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9))))) ?10)) ?11)) ?12)) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: (Q_Sub ?6 ([])) ?7)))) ?8)) ?9)) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: (Q_Sub ?6 (: Q_Empty ([]))) ?7)))) ?8)) ?9)) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: (Q_Sub ?6 (: (Q_NewXY ?7 ?8 ?9) ?10)) ?11)))) ?12)) ?13)) ?14)) ?15)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9)))) ?10)) ?11)) ?12)) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Full ?5) ?6))) ?7)) ?8)) ?9)) ?10)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Full ?5) ?6))) ?7)) ?8)) ?9)) ?10)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: (Q_Sub ?6 ([])) ?7))) ?8)) ?9)) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: (Q_Sub ?6 (: Q_Empty ([]))) ?7))) ?8)) ?9)) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: (Q_Sub ?6 (: Q_Empty (: Q_Empty ([])))) ?7))) ?8)) ?9)) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: (Q_Sub ?6 (: Q_Empty (: (Q_NewXY ?7 ?8 ?9) ?10))) ?11))) ?12)) ?13)) ?14)) ?15)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: (Q_Full ?6) ?7)) ?8))) ?9)) ?10)) ?11)) ?12)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: (Q_Sub ?6 (: (Q_Sub ?7 ([])) ?8)) ?9))) ?10)) ?11)) ?12)) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: (Q_Sub ?6 (: (Q_NewXY ?7 ?8 ?9) ?10)) ?11))) ?12)) ?13)) ?14)) ?15)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9))) ?10)) ?11)) ?12)) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8)) ?9)) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 (: Q_Empty ([]))) ?7)) ?8)) ?9)) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 (: Q_Empty (: Q_Empty ([])))) ?7)) ?8)) ?9)) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?7)) ?8)) ?9)) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 (: Q_Empty (: Q_Empty (: (Q_NewXY ?7 ?8 ?9) ?10)))) ?11)) ?12)) ?13)) ?14)) ?15)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: (Q_Full ?6) ?7))) ?8)) ?9)) ?10)) ?11)) ?12)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 (: Q_Empty (: (Q_Sub ?7 ([])) ?8))) ?9)) ?10)) ?11)) ?12)) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 (: Q_Empty (: (Q_NewXY ?7 ?8 ?9) ?10))) ?11)) ?12)) ?13)) ?14)) ?15)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_Sub ?7 ([])) ?8)) ?9)) ?10)) ?11)) ?12)) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_Sub ?7 (: Q_Empty ([]))) ?8)) ?9)) ?10)) ?11)) ?12)) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_Sub ?7 (: (Q_NewXY ?8 ?9 ?10) ?11)) ?12)) ?13)) ?14)) ?15)) ?16)) ?17)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_NewXY ?7 ?8 ?9) ?10)) ?11)) ?12)) ?13)) ?14)) ?15)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)) ?11)) ?12)) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_NewXY ?3 ?4 ?5) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: (Q_NewXY ?2 ?3 ?4) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_NewXY ?1 ?2 ?3) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case draw -1 ? of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case draw -1 ? of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case draw -1 ? of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw -1 ? of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case case draw -1 (Q_Full ?) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case case case draw -1 (Q_Full ?) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case case case case draw -1 (Q_Full ?) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case case case case case draw -1 (Q_Full ?) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 ([])) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty ([]))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty ([])))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?1) ?2))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?1) ?2))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?1) ?2))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?1) ?2))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?1) ?2))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?1) ?2))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?1) ?2))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 ([])) ?3))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty ([]))) ?3))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty ([])))) ?3))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?3))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3))))) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3))))) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 ([])) ?4))))) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty ([]))) ?4))))) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8))))) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6))))) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3)))) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3)))) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3)))) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 ([])) ?4)))) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty ([]))) ?4)))) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty ([])))) ?4)))) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))) ?8)))) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5)))) ?6))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 ([])) ?5)) ?6)))) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8)))) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6)))) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 ([])) ?4))) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty ([]))) ?4))) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty ([])))) ?4))) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?4))) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7)))) ?8))) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5))) ?6))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 ([])) ?5))) ?6))) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))) ?8))) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5))) ?6))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5))) ?6))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 ([])) ?5)) ?6))) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)) ?6))) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)) ?10))) ?11))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8))) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6))) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Full ?2) ?3)) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Full ?2) ?3)) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Full ?2) ?3)) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Full ?2) ?3)) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Full ?2) ?3)) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 ([])) ?4)) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty ([]))) ?4)) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty ([])))) ?4)) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?4)) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) ([]))) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty ([])))) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 ([])) ?6))) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))))) ?8)) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4)))) ?5)) ?6))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 ([])) ?5)))) ?6)) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7)))) ?8)) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5)) ?6))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5)) ?6))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 ([])) ?5))) ?6)) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5))) ?6)) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9))) ?10)) ?11))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))) ?8)) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5)) ?6))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5)) ?6))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5)) ?6))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 ([])) ?5)) ?6)) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)) ?6)) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5)) ?6)) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9)) ?10)) ?11))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6)) ?7)) ?8))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7)) ?8)) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)) ?10)) ?11))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8)) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_NewXY ?3 ?4 ?5) ?6)) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?2 ?3 ?4) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Full ?1) ?2)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Full ?1) ?2)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Full ?1) ?2)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Full ?1) ?2)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Full ?1) ?2)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Full ?1) ?2)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 ([])) ?3)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty ([]))) ?3)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty ([])))) ?3)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?3)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) ([]))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Full ?3) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Full ?3) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Full ?3) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 ([])) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty ([]))) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 ([])) ?6))) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty ([]))) ?6)) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8)) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)) ?11))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_NewXY ?4 ?5 ?6) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3))))) ?4)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3))))) ?4)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3))))) ?4)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 ([])) ?4))))) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty ([]))) ?4))))) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty ([])))) ?4))))) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))) ?8))))) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5))))) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 ([])) ?5)) ?6))))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8))))) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6))))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3)))) ?4)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3)))) ?4)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 ([])) ?4)))) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty ([]))) ?4)))) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty ([])))) ?4)))) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?4)))) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7)))) ?8)))) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5)))) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 ([])) ?5))) ?6)))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))) ?8)))) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 ([])) ?5)) ?6)))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)) ?6)))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)) ?10)))) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8)))) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6)))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 ([])) ?4))) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty ([]))) ?4))) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty ([])))) ?4))) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?4))) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) ([])))) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty ([]))))) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 ([])) ?6)))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_NewXY ?5 ?6 ?7) ?8)))) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))))) ?8))) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4)))) ?5))) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 ([])) ?5)))) ?6))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7)))) ?8))) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5))) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5))) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 ([])) ?5))) ?6))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5))) ?6))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9))) ?10))) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))) ?8))) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5))) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5))) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5))) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 ([])) ?5)) ?6))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)) ?6))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5)) ?6))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9)) ?10))) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6)) ?7))) ?8)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7)) ?8))) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)) ?10))) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8))) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Full ?2) ?3)) ?4)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Full ?2) ?3)) ?4)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Full ?2) ?3)) ?4)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Full ?2) ?3)) ?4)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 ([])) ?4)) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty ([]))) ?4)) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty ([])))) ?4)) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?4)) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) ([]))) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty ([])))) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: Q_Empty ([]))))) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_Sub ?5 ([])) ?6)))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8)))) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Full ?4) ?5))) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 ([])) ?6))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: Q_Empty ([]))) ?6))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8))) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10))) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4))))) ?5)) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 ([])) ?5))))) ?6)) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))))) ?8)) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 ([])) ?5)))) ?6)) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)))) ?6)) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)))) ?10)) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7)))) ?8)) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5)) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5)) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5)) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 ([])) ?5))) ?6)) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5))) ?6)) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5))) ?6)) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9))) ?10)) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6))) ?7)) ?8)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7))) ?8)) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9))) ?10)) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))) ?8)) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5)) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5)) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 ([])) ?5)) ?6)) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)) ?6)) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5)) ?6)) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?5)) ?6)) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8)))) ?9)) ?10)) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6)) ?7)) ?8)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 ([])) ?6))) ?7)) ?8)) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9)) ?10)) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7)) ?8)) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty ([]))) ?6)) ?7)) ?8)) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)) ?11)) ?12)) ?13)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)) ?10)) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8)) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_NewXY ?3 ?4 ?5) ?6)) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_NewXY ?2 ?3 ?4) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Full ?1) ?2))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Full ?1) ?2))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Full ?1) ?2))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Full ?1) ?2))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Full ?1) ?2))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Full ?1) ?2))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 ([])) ?3))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty ([]))) ?3))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty ([])))) ?3))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?3))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) ([])))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty ([]))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: Q_Empty (: (Q_Full ?3) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: Q_Empty (: (Q_Full ?3) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: Q_Empty (: (Q_Full ?3) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: Q_Empty (: (Q_Full ?3) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 ([])) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 ([])) ?6))) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: Q_Empty (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: Q_Empty (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty ([]))) ?6)) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8)) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)) ?11))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Full ?3) ?4)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Full ?3) ?4)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 ([])) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_Sub ?5 ([])) ?6)))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8)))) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 ([])) ?6))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: Q_Empty ([]))) ?6))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8))) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10))) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty ([]))) ?6)) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty ([])))) ?6)) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: (Q_Sub ?6 ([])) ?7))) ?8)) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9))) ?10)) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8)) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 (: Q_Empty ([]))) ?7)) ?8)) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_Sub ?7 ([])) ?8)) ?9)) ?10)) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_NewXY ?7 ?8 ?9) ?10)) ?11)) ?12)) ?13)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_NewXY ?4 ?5 ?6) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3))))) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3))))) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3))))) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3))))) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 ([])) ?4))))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty ([]))) ?4))))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty ([])))) ?4))))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?4))))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7)))) ?8))))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5))))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 ([])) ?5))) ?6))))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))) ?8))))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5))))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5))))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 ([])) ?5)) ?6))))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)) ?6))))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)) ?10))))) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8))))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6))))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3)))) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3)))) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3)))) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3)))) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3)))) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 ([])) ?4)))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty ([]))) ?4)))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty ([])))) ?4)))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?4)))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) ([]))))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty ?5))))) ([])))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 ([])) ?6))))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_NewXY ?5 ?6 ?7) ?8))))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))))) ?8)))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4)))) ?5)))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 ([])) ?5)))) ?6)))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7)))) ?8)))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5)))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5)))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 ([])) ?5))) ?6)))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5))) ?6)))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9))) ?10)))) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))) ?8)))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5)))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5)))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5)))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 ([])) ?5)) ?6)))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)) ?6)))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5)) ?6)))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9)) ?10)))) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6)) ?7)))) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7)) ?8)))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)) ?10)))) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8)))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6)))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 ([])) ?4))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty ([]))) ?4))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty ([])))) ?4))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?4))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) ([])))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty ([]))))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: Q_Empty ?5))))) ([])))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_Sub ?5 ([])) ?6))))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Full ?4) ?5)))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 ([])) ?6)))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: Q_Empty ([]))) ?6)))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8)))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)))) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_NewXY ?5 ?6 ?7) ?8)))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4))))) ?5))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 ([])) ?5))))) ?6))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))))) ?8))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4)))) ?5))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4)))) ?5))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 ([])) ?5)))) ?6))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)))) ?6))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)))) ?10))) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7)))) ?8))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 ([])) ?5))) ?6))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5))) ?6))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5))) ?6))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9))) ?10))) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6))) ?7))) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7))) ?8))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9))) ?10))) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))) ?8))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 ([])) ?5)) ?6))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)) ?6))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5)) ?6))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?5)) ?6))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8)))) ?9)) ?10))) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6)) ?7))) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 ([])) ?6))) ?7)) ?8))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9)) ?10))) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6)) ?7))) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6)) ?7))) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7)) ?8))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty ([]))) ?6)) ?7)) ?8))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)) ?11)) ?12))) ?13))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)) ?10))) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Full ?2) ?3)) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Full ?2) ?3)) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Full ?2) ?3)) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Full ?2) ?3)) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Full ?2) ?3)) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 ([])) ?4)) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty ([]))) ?4)) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty ([])))) ?4)) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?4)) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) ([]))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty ([])))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: Q_Empty ([]))))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) ([])))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: Q_Empty (: (Q_Sub ?5 ([])) ?6))))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Full ?4) ?5)))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Full ?4) ?5)))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_Sub ?5 ([])) ?6)))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_Sub ?5 (: Q_Empty ([]))) ?6)))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8)))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)))) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8)))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Full ?4) ?5))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Full ?4) ?5))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 ([])) ?6))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: Q_Empty ([]))) ?6))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: Q_Empty (: Q_Empty ([])))) ?6))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: Q_Empty (: (Q_Sub ?6 ([])) ?7))) ?8))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9))) ?10))) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Full ?5) ?6)) ?7))) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Full ?5) ?6)) ?7))) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_Sub ?6 (: Q_Empty ([]))) ?7)) ?8))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_Sub ?7 ([])) ?8)) ?9)) ?10))) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_NewXY ?7 ?8 ?9) ?10)) ?11)) ?12))) ?13))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10))) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4))))) ?5)) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4))))) ?5)) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 ([])) ?5))))) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5))))) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9))))) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))))) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4)))) ?5)) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4)))) ?5)) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4)))) ?5)) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 ([])) ?5)))) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)))) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5)))) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9)))) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6)))) ?7)) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7)))) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)))) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7)))) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5)) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5)) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 ([])) ?5))) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5))) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5))) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?5))) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8)))) ?9))) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6))) ?7)) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 ([])) ?6))) ?7))) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9))) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6))) ?7)) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6))) ?7)) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7))) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty ([]))) ?6)) ?7))) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)) ?11))) ?12)) ?13))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9))) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5)) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5)) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5)) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 ([])) ?5)) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5)) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?5)) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) ([]))) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty ([])))) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty (: Q_Empty ([]))))) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty (: (Q_Sub ?6 ([])) ?7)))) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9)))) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 ([])) ?7))) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 (: Q_Empty ([]))) ?7))) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 (: (Q_Sub ?7 ([])) ?8)) ?9))) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 (: (Q_NewXY ?7 ?8 ?9) ?10)) ?11))) ?12)) ?13))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_NewXY ?6 ?7 ?8) ?9))) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))))) ?9)) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Full ?4) ?5)))) ?6)) ?7)) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_Sub ?5 ([])) ?6)))) ?7)) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8)))) ?9)) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6)) ?7)) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6)) ?7)) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 ([])) ?6))) ?7)) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: Q_Empty ([]))) ?6))) ?7)) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10))) ?11)) ?12)) ?13))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9)) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6)) ?7)) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6)) ?7)) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7)) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty ([]))) ?6)) ?7)) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty ([])))) ?6)) ?7)) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9))) ?10)) ?11)) ?12)) ?13))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: Q_Empty (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Full ?5) ?6)) ?7)) ?8)) ?9)) ?10))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8)) ?9)) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)) ?11)) ?12)) ?13))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_NewXY ?3 ?4 ?5) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: Q_Empty (: (Q_NewXY ?2 ?3 ?4) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case case case case case draw -1 (Q_Sub ? (: (Q_Full ?1) ?2)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case case case draw -1 (Q_Sub ? (: (Q_Full ?1) ?2)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case case case case draw -1 (Q_Sub ? (: (Q_Full ?1) ?2)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case case case case case draw -1 (Q_Sub ? (: (Q_Full ?1) ?2)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case case case case case case case draw ? (Q_Sub ?1 (: (Q_Full ?2) ([]))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 ([])) ?3)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty ([]))) ?3)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty ([])))) ?3)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?3)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) ([]))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty ([])))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: Q_Empty ([]))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: Q_Empty (: (Q_Sub ?4 ([])) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 ([])) ?6))) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty ([]))) ?6)) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8)) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)) ?11))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: Q_Empty (: (Q_Full ?3) ?4)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: Q_Empty (: (Q_Full ?3) ?4)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: Q_Empty (: (Q_Full ?3) ?4)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 ([])) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?5)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_Sub ?5 ([])) ?6)))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8)))) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 ([])) ?6))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: Q_Empty ([]))) ?6))) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8))) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10))) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: Q_Empty (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: Q_Empty (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty ([]))) ?6)) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty ([])))) ?6)) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: (Q_Sub ?6 ([])) ?7))) ?8)) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9))) ?10)) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8)) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 (: Q_Empty ([]))) ?7)) ?8)) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_Sub ?7 ([])) ?8)) ?9)) ?10)) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_NewXY ?7 ?8 ?9) ?10)) ?11)) ?12)) ?13)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)) ?11)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7)))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Full ?3) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Full ?3) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Full ?3) ?4))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 ([])) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty ([]))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?5))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) ([])))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?5 ([])) ?6))))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Full ?4) ?5)))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Full ?4) ?5)))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_Sub ?5 ([])) ?6)))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_Sub ?5 (: Q_Empty ([]))) ?6)))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8)))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)))) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8)))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 ([])) ?6))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: Q_Empty ([]))) ?6))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: Q_Empty (: Q_Empty ([])))) ?6))) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: Q_Empty (: (Q_Sub ?6 ([])) ?7))) ?8))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9))) ?10))) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Full ?5) ?6)) ?7))) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Full ?5) ?6)) ?7))) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: (Q_Sub ?6 (: Q_Empty ([]))) ?7)) ?8))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_Sub ?7 ([])) ?8)) ?9)) ?10))) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_NewXY ?7 ?8 ?9) ?10)) ?11)) ?12))) ?13))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10))) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty ([]))) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty ([])))) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?6)) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: (Q_Sub ?6 ([])) ?7)))) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9)))) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Full ?5) ?6))) ?7)) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Full ?5) ?6))) ?7)) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: (Q_Sub ?6 ([])) ?7))) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: (Q_Sub ?6 (: Q_Empty ([]))) ?7))) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: (Q_Sub ?6 (: (Q_Sub ?7 ([])) ?8)) ?9))) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: (Q_Sub ?6 (: (Q_NewXY ?7 ?8 ?9) ?10)) ?11))) ?12)) ?13))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9))) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Full ?5) ?6)) ?7)) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Full ?5) ?6)) ?7)) ?8))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 (: Q_Empty ([]))) ?7)) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 (: Q_Empty (: Q_Empty ([])))) ?7)) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 (: Q_Empty (: (Q_Sub ?7 ([])) ?8))) ?9)) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 (: Q_Empty (: (Q_NewXY ?7 ?8 ?9) ?10))) ?11)) ?12)) ?13))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Full ?6) ?7)) ?8)) ?9)) ?10))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?2))))) (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Full ?6) ?7)) ?8)) ?9)) ?10))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_Sub ?7 ([])) ?8)) ?9)) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_Sub ?7 (: Q_Empty ([]))) ?8)) ?9)) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_Sub ?7 (: (Q_Sub ?8 ([])) ?9)) ?10)) ?11)) ?12)) ?13))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_Sub ?7 (: (Q_NewXY ?8 ?9 ?10) ?11)) ?12)) ?13)) ?14)) ?15))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_NewXY ?7 ?8 ?9) ?10)) ?11)) ?12)) ?13))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)) ?11))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_NewXY ?4 ?5 ?6) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3))))) ?4)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3))))) ?4)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3))))) ?4)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3))))) ?4)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3))))) ?4)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 ([])) ?4))))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty ([]))) ?4))))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty ([])))) ?4))))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?4))))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) ?5))))) ([]))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) ?5))))) (: Q_Empty ([])))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) ?5))))) (: (Q_Sub ?6 ([])) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) ?5))))) (: (Q_NewXY ?6 ?7 ?8) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))))) ?8))))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4)))) ?5))))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 ([])) ?5)))) ?6))))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7)))) ?8))))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5))))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5))))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 ([])) ?5))) ?6))))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5))) ?6))))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9))) ?10))))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))) ?8))))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5))))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5))))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5))))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 ([])) ?5)) ?6))))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)) ?6))))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5)) ?6))))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9)) ?10))))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6)) ?7))))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7)) ?8))))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)) ?10))))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8))))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6))))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3)))) ?4)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3)))) ?4)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3)))) ?4)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3)))) ?4)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 ([])) ?4)))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty ([]))) ?4)))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty ([])))) ?4)))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?4)))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) ([]))))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty ?5))))) ([]))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty ?5))))) (: Q_Empty ([])))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty ?5))))) (: (Q_Sub ?6 ([])) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty ?5))))) (: (Q_NewXY ?6 ?7 ?8) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Full ?4) ?5))))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 ([])) ?6))))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: Q_Empty ([]))) ?6))))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8))))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10))))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_NewXY ?5 ?6 ?7) ?8))))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4))))) ?5)))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 ([])) ?5))))) ?6)))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))))) ?8)))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 ([])) ?5)))) ?6)))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)))) ?6)))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)))) ?10)))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7)))) ?8)))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5)))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5)))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5)))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 ([])) ?5))) ?6)))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5))) ?6)))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5))) ?6)))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9))) ?10)))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6))) ?7)))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7))) ?8)))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9))) ?10)))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))) ?8)))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5)))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5)))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 ([])) ?5)) ?6)))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)) ?6)))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5)) ?6)))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?5)) ?6)))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8)))) ?9)) ?10)))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6)) ?7)))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 ([])) ?6))) ?7)) ?8)))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9)) ?10)))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7)) ?8)))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty ([]))) ?6)) ?7)) ?8)))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)) ?11)) ?12)))) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)) ?10)))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8)))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6)))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 ([])) ?4))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty ([]))) ?4))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty ([])))) ?4))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?4))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) ([])))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty ([]))))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: Q_Empty ?5))))) ([]))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty ([])))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 ([])) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: Q_Empty ?5))))) (: (Q_NewXY ?6 ?7 ?8) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Full ?4) ?5))))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Full ?4) ?5))))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_Sub ?5 ([])) ?6))))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_Sub ?5 (: Q_Empty ([]))) ?6))))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8))))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10))))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 ([])) ?6)))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: Q_Empty ([]))) ?6)))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: Q_Empty (: Q_Empty ([])))) ?6)))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: Q_Empty (: (Q_Sub ?6 ([])) ?7))) ?8)))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9))) ?10)))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8)))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_Sub ?6 (: Q_Empty ([]))) ?7)) ?8)))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_Sub ?7 ([])) ?8)) ?9)) ?10)))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_NewXY ?7 ?8 ?9) ?10)) ?11)) ?12)))) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_NewXY ?5 ?6 ?7) ?8)))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4))))) ?5))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4))))) ?5))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 ([])) ?5))))) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5))))) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9))))) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))))) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4)))) ?5))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4)))) ?5))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4)))) ?5))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 ([])) ?5)))) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)))) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5)))) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9)))) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6)))) ?7))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7)))) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)))) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7)))) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 ([])) ?5))) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5))) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5))) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?5))) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8)))) ?9))) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6))) ?7))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 ([])) ?6))) ?7))) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9))) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6))) ?7))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6))) ?7))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7))) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty ([]))) ?6)) ?7))) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)) ?11))) ?12))) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9))) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 ([])) ?5)) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5)) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?5)) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) ([]))) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty ([])))) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty (: Q_Empty ([]))))) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty (: (Q_Sub ?6 ([])) ?7)))) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9)))) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 ([])) ?7))) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 (: Q_Empty ([]))) ?7))) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 (: (Q_Sub ?7 ([])) ?8)) ?9))) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 (: (Q_NewXY ?7 ?8 ?9) ?10)) ?11))) ?12))) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_NewXY ?6 ?7 ?8) ?9))) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))))) ?9)) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Full ?4) ?5)))) ?6)) ?7))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_Sub ?5 ([])) ?6)))) ?7)) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8)))) ?9)) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6)) ?7))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6)) ?7))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 ([])) ?6))) ?7)) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: Q_Empty ([]))) ?6))) ?7)) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10))) ?11)) ?12))) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9)) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6)) ?7))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6)) ?7))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7)) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty ([]))) ?6)) ?7)) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty ([])))) ?6)) ?7)) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9))) ?10)) ?11)) ?12))) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Full ?5) ?6)) ?7)) ?8)) ?9))) ?10)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8)) ?9)) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)) ?11)) ?12))) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Full ?2) ?3)) ?4)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Full ?2) ?3)) ?4)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Full ?2) ?3)) ?4)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Full ?2) ?3)) ?4)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 ([])) ?4)) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty ([]))) ?4)) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty ([])))) ?4)) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?4)) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) ([]))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty ([])))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: Q_Empty ([]))))) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) ([]))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty ([])))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 ([])) ?7))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_NewXY ?6 ?7 ?8) ?9))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: Q_Empty (: (Q_Full ?4) ?5))))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: Q_Empty (: (Q_Full ?4) ?5))))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: Q_Empty (: (Q_Sub ?5 ([])) ?6))))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: Q_Empty (: (Q_Sub ?5 (: Q_Empty ([]))) ?6))))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: Q_Empty (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8))))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: Q_Empty (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10))))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: Q_Empty (: (Q_Full ?4) ?5)))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_Sub ?5 ([])) ?6)))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_Sub ?5 (: Q_Empty ([]))) ?6)))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_Sub ?5 (: Q_Empty (: Q_Empty ([])))) ?6)))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_Sub ?5 (: Q_Empty (: (Q_Sub ?6 ([])) ?7))) ?8)))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_Sub ?5 (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9))) ?10)))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8)))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_Sub ?5 (: (Q_Sub ?6 (: Q_Empty ([]))) ?7)) ?8)))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_Sub ?7 ([])) ?8)) ?9)) ?10)))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_NewXY ?7 ?8 ?9) ?10)) ?11)) ?12)))) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8)))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Full ?4) ?5))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Full ?4) ?5))) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 ([])) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: Q_Empty ([]))) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: Q_Empty (: Q_Empty ([])))) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?6))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: (Q_Sub ?6 ([])) ?7)))) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9)))) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: (Q_Full ?5) ?6))) ?7))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: Q_Empty (: (Q_Full ?5) ?6))) ?7))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: Q_Empty (: (Q_Sub ?6 ([])) ?7))) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: Q_Empty (: (Q_Sub ?6 (: Q_Empty ([]))) ?7))) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: Q_Empty (: (Q_Sub ?6 (: (Q_Sub ?7 ([])) ?8)) ?9))) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: Q_Empty (: (Q_Sub ?6 (: (Q_NewXY ?7 ?8 ?9) ?10)) ?11))) ?12))) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9))) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Full ?5) ?6)) ?7))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Full ?5) ?6)) ?7))) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_Sub ?6 (: Q_Empty ([]))) ?7)) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_Sub ?6 (: Q_Empty (: Q_Empty ([])))) ?7)) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_Sub ?6 (: Q_Empty (: (Q_Sub ?7 ([])) ?8))) ?9)) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_Sub ?6 (: Q_Empty (: (Q_NewXY ?7 ?8 ?9) ?10))) ?11)) ?12))) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Full ?6) ?7)) ?8)) ?9))) ?10)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?3))))) (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Full ?6) ?7)) ?8)) ?9))) ?10)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_Sub ?7 ([])) ?8)) ?9)) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_Sub ?7 (: Q_Empty ([]))) ?8)) ?9)) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_Sub ?7 (: (Q_Sub ?8 ([])) ?9)) ?10)) ?11)) ?12))) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_Sub ?7 (: (Q_NewXY ?8 ?9 ?10) ?11)) ?12)) ?13)) ?14))) ?15)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_NewXY ?7 ?8 ?9) ?10)) ?11)) ?12))) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10))) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4))))) ?5)) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4))))) ?5)) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4))))) ?5)) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 ([])) ?5))))) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5))))) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5))))) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9))))) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6))))) ?7)) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7))))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9))))) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4)))) ?5)) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4)))) ?5)) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 ([])) ?5)))) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)))) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5)))) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?5)))) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8)))) ?9)))) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6)))) ?7)) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 ([])) ?6))) ?7)))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9)))) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7)))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty ([]))) ?6)) ?7)))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)) ?11)))) ?12)) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)))) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7)))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5)) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5)) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5)) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 ([])) ?5))) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5))) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5))) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?5))) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) ([])))) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty ([]))))) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty (: Q_Empty ?6))))) ([]))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty (: (Q_Sub ?6 ([])) ?7))))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9))))) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 ([])) ?7)))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 (: Q_Empty ([]))) ?7)))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 (: (Q_Sub ?7 ([])) ?8)) ?9)))) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 (: (Q_NewXY ?7 ?8 ?9) ?10)) ?11)))) ?12)) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_NewXY ?6 ?7 ?8) ?9)))) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))))) ?9))) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Full ?4) ?5)))) ?6))) ?7)) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_Sub ?5 ([])) ?6)))) ?7))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8)))) ?9))) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6))) ?7)) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6))) ?7)) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 ([])) ?6))) ?7))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: Q_Empty ([]))) ?6))) ?7))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10))) ?11))) ?12)) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9))) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6))) ?7)) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6))) ?7)) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty ([]))) ?6)) ?7))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty ([])))) ?6)) ?7))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9))) ?10)) ?11))) ?12)) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Full ?5) ?6)) ?7)) ?8))) ?9)) ?10)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8)) ?9))) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)) ?11))) ?12)) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9))) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5)) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5)) ?6)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 ([])) ?5)) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5)) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?5)) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) ([]))) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty ([])))) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty (: Q_Empty ([]))))) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty (: Q_Empty (: Q_Empty ?6))))) ([]))) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty (: Q_Empty (: (Q_Sub ?6 ([])) ?7))))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9))))) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty (: (Q_Sub ?6 ([])) ?7)))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty (: (Q_Sub ?6 (: Q_Empty ([]))) ?7)))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty (: (Q_Sub ?6 (: (Q_Sub ?7 ([])) ?8)) ?9)))) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty (: (Q_Sub ?6 (: (Q_NewXY ?7 ?8 ?9) ?10)) ?11)))) ?12)) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9)))) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Full ?5) ?6))) ?7)) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 ([])) ?7))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 (: Q_Empty ([]))) ?7))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 (: Q_Empty (: Q_Empty ([])))) ?7))) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 (: Q_Empty (: (Q_Sub ?7 ([])) ?8))) ?9))) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 (: Q_Empty (: (Q_NewXY ?7 ?8 ?9) ?10))) ?11))) ?12)) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_Sub ?5 (: (Q_Full ?6) ?7)) ?8))) ?9)) ?10)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 (: (Q_Sub ?7 ([])) ?8)) ?9))) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 (: (Q_Sub ?7 (: Q_Empty ([]))) ?8)) ?9))) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 (: (Q_Sub ?7 (: (Q_Sub ?8 ([])) ?9)) ?10)) ?11))) ?12)) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 (: (Q_Sub ?7 (: (Q_NewXY ?8 ?9 ?10) ?11)) ?12)) ?13))) ?14)) ?15)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_Sub ?6 (: (Q_NewXY ?7 ?8 ?9) ?10)) ?11))) ?12)) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?5))))) (: (Q_NewXY ?6 ?7 ?8) ?9))) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?4) ?5))))) ?6)) ?7)) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?5 ([])) ?6))))) ?7)) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))))) ?9)) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_Sub ?5 ([])) ?6)))) ?7)) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_Sub ?5 (: Q_Empty ([]))) ?6)))) ?7)) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)))) ?11)) ?12)) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8)))) ?9)) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6)) ?7)) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6)) ?7)) ?8)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 ([])) ?6))) ?7)) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: Q_Empty ([]))) ?6))) ?7)) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: Q_Empty (: Q_Empty ([])))) ?6))) ?7)) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9))) ?10))) ?11)) ?12)) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Full ?5) ?6)) ?7))) ?8)) ?9)) ?10)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8))) ?9)) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10))) ?11)) ?12)) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9)) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7)) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty ([]))) ?6)) ?7)) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty ([])))) ?6)) ?7)) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?6)) ?7)) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:93:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9)))) ?10)) ?11)) ?12)) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case case draw -1 (Q_Sub ? (: (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Full ?5) ?6))) ?7)) ?8)) ?9)) ?10)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: (Q_Sub ?6 ([])) ?7))) ?8)) ?9)) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty (: (Q_NewXY ?6 ?7 ?8) ?9))) ?10)) ?11)) ?12)) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 ([])) ?7)) ?8)) ?9)) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 (: Q_Empty ([]))) ?7)) ?8)) ?9)) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:92:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_Sub ?6 (: (Q_NewXY ?7 ?8 ?9) ?10)) ?11)) ?12)) ?13)) ?14)) ?15)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)) ?11)) ?12)) ?13)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)) ?10)) ?11)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8)) ?9)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_Sub ?2 (: (Q_NewXY ?3 ?4 ?5) ?6)) ?7)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_Sub ?1 (: (Q_NewXY ?2 ?3 ?4) ?5)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case case case case draw ? (Q_NewXY ?1 ?2 ?3) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(87,0)-(98,16): Non-exhaustive patterns in function out case case case cdraw -1 ? of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw -1 ? of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case cdraw -1 (Q_Full ?) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case cdraw -1 (Q_Full ?) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case case cdraw ? (Q_Full (RGB -1.0 ?1 ?2)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Prelude.chr: bad argument: (-1) case case case case case case case case case case case case case cdraw ? (Q_Full (RGB ?1 -1.0 ?2)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Prelude.chr: bad argument: (-1) case case case case case case case case case case case case case case case cdraw ? (Q_Full (RGB ?1 ?2 -1.0)) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Prelude.chr: bad argument: (-1) case case case case cdraw ? (Q_Sub ?1 ([])) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty ([]))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty ([])))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?1) ?2))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?1) ?2))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?1) ?2))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?1) ?2))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?1) ?2))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?1) ?2))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full (RGB -1.0 ?2 ?3)) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Prelude.chr: bad argument: (-1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 ([])) ?3))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty ([]))) ?3))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty ([])))) ?3))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?3))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3))))) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3))))) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3))))) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3))))) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3))))) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 ([])) ?4))))) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty ([]))) ?4))))) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty ([])))) ?4))))) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?4))))) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))))) ?8))))) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4)))) ?5))))) ?6))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 ([])) ?5)))) ?6))))) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7)))) ?8))))) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5))))) ?6))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5))))) ?6))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 ([])) ?5))) ?6))))) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5))) ?6))))) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9))) ?10))))) ?11))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))) ?8))))) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5))))) ?6))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5))))) ?6))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5))))) ?6))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 ([])) ?5)) ?6))))) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)) ?6))))) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5)) ?6))))) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9)) ?10))))) ?11))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6)) ?7))))) ?8))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7)) ?8))))) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)) ?10))))) ?11))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8))))) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6))))) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3)))) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3)))) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3)))) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3)))) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3)))) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Full ?2) ?3)))) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 ([])) ?4)))) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty ([]))) ?4)))) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty ([])))) ?4)))) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?4)))) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) ([]))))) ?5))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: Q_Empty ?4))))) (: (Q_NewXY ?5 ?6 ?7) ?8))))) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4))))) ?5)))) ?6))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?4 ([])) ?5))))) ?6)))) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))))) ?8)))) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4)))) ?5)))) ?6))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Full ?3) ?4)))) ?5)))) ?6))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 ([])) ?5)))) ?6)))) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)))) ?6)))) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)))) ?10)))) ?11))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7)))) ?8)))) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5)))) ?6))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5)))) ?6))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Full ?3) ?4))) ?5)))) ?6))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 ([])) ?5))) ?6)))) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty ([]))) ?5))) ?6)))) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5))) ?6)))) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9))) ?10)))) ?11))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6))) ?7)))) ?8))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7))) ?8)))) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9))) ?10)))) ?11))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: Q_Empty (: (Q_NewXY ?4 ?5 ?6) ?7))) ?8)))) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5)))) ?6))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5)))) ?6))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5)))) ?6))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Full ?3) ?4)) ?5)))) ?6))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 ([])) ?5)) ?6)))) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty ([]))) ?5)) ?6)))) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty ([])))) ?5)) ?6)))) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:4-17: Irrefutable pattern failed for pattern (l2 : ll3) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: Q_Empty ([]))))) ?5)) ?6)))) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:66:21-34: Irrefutable pattern failed for pattern (l3 : ll4) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8)))) ?9)) ?10)))) ?11))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: Q_Empty (: (Q_Full ?4) ?5))) ?6)) ?7)))) ?8))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_Sub ?5 ([])) ?6))) ?7)) ?8)))) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: Q_Empty (: (Q_NewXY ?5 ?6 ?7) ?8))) ?9)) ?10)))) ?11))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6)) ?7)))) ?8))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: (Q_Sub ?3 (: (Q_Full ?4) ?5)) ?6)) ?7)))) ?8))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 ([])) ?6)) ?7)) ?8)))) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:4-15: Irrefutable pattern failed for pattern (l0 : ll1) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: Q_Empty ([]))) ?6)) ?7)) ?8)))) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:65:21-34: Irrefutable pattern failed for pattern (l1 : ll2) case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_Sub ?5 (: (Q_NewXY ?6 ?7 ?8) ?9)) ?10)) ?11)) ?12)))) ?13))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_Sub ?4 (: (Q_NewXY ?5 ?6 ?7) ?8)) ?9)) ?10)))) ?11))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_Sub ?3 (: (Q_NewXY ?4 ?5 ?6) ?7)) ?8)))) ?9))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case cdraw ? (Q_Sub ?1 (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?2 (: Q_Empty (: Q_Empty (: (Q_NewXY ?3 ?4 ?5) ?6)))) ?7))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x ==> ! Raster.hs:(60,0)-(71,16): Non-exhaustive patterns in function cout case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent case case case case case case case cdraw -1 (Q_Sub ? (: Q_Empty (: Q_Empty (: Q_Empty (: (Q_Sub ?1 (: Q_Empty (: (Q_Full ?2) ?3))) ?4))))) of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Negative exponent Shapes: Results: Types: Results: case case case case case case case case case case case case case case case case case case case case case case case case case case case case case case case case case case case case case (case tuple of (,) x _ -> x) () of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of _ : x -> x of x : _ -> x ==> ! Vector: Results: case makevector ? (# ?1 ?2) ?3 ?4 of (,,) x _ _ -> x ==> ! Interval.hs:249:0-14: Non-exhaustive patterns in function unpt down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up case makevector ? ?1 (# ?2 ?3) ?4 of (,,) _ x _ -> x ==> ! Interval.hs:249:0-14: Non-exhaustive patterns in function unpt down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up case makevector ? ?1 ?2 (# ?3 ?4) of (,,) _ _ x -> x ==> ! Interval.hs:249:0-14: Non-exhaustive patterns in function unpt down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up case makevector ? (# ?1 ?2) ?3 ?4 of (,,) x _ _ -> x ==> ! Interval.hs:249:0-14: Non-exhaustive patterns in function unpt case makevector ? (bothalf ?1 (# ?2 ?3)) ?4 ?5 of (,,) x _ _ -> x ==> ! Interval.hs:249:0-14: Non-exhaustive patterns in function unpt bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 case makevector ? (topbit ?1 (# ?2 ?3)) ?4 ?5 of (,,) x _ _ -> x ==> ! Interval.hs:249:0-14: Non-exhaustive patterns in function unpt topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit case makevector ? (tophalf ?1 (# ?2 ?3)) ?4 ?5 of (,,) x _ _ -> x ==> ! Interval.hs:249:0-14: Non-exhaustive patterns in function unpt tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up case makevector ? ?1 (# ?2 ?3) ?4 of (,,) _ x _ -> x ==> ! Interval.hs:249:0-14: Non-exhaustive patterns in function unpt case makevector ? ?1 (bothalf ?2 (# ?3 ?4)) ?5 of (,,) _ x _ -> x ==> ! Interval.hs:249:0-14: Non-exhaustive patterns in function unpt bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 case makevector ? ?1 (topbit ?2 (# ?3 ?4)) ?5 of (,,) _ x _ -> x ==> ! Interval.hs:249:0-14: Non-exhaustive patterns in function unpt topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit case makevector ? ?1 (tophalf ?2 (# ?3 ?4)) ?5 of (,,) _ x _ -> x ==> ! Interval.hs:249:0-14: Non-exhaustive patterns in function unpt tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up case makevector ? ?1 ?2 (# ?3 ?4) of (,,) _ _ x -> x ==> ! Interval.hs:249:0-14: Non-exhaustive patterns in function unpt case makevector ? ?1 ?2 (bothalf ?3 (# ?4 ?5)) of (,,) _ _ x -> x ==> ! Interval.hs:249:0-14: Non-exhaustive patterns in function unpt bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 case makevector ? ?1 ?2 (topbit ?3 (# ?4 ?5)) of (,,) _ _ x -> x ==> ! Interval.hs:249:0-14: Non-exhaustive patterns in function unpt topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit case makevector ? ?1 ?2 (tophalf ?3 (# ?4 ?5)) of (,,) _ _ x -> x ==> ! Interval.hs:249:0-14: Non-exhaustive patterns in function unpt tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up case makevector ? (# ?1 ?2) ?3 ?4 of (,,) x _ _ -> x ==> ! Interval.hs:249:0-14: Non-exhaustive patterns in function unpt case makevector ? (bothalf ?1 (# ?2 ?3)) ?4 ?5 of (,,) x _ _ -> x ==> ! Interval.hs:249:0-14: Non-exhaustive patterns in function unpt case makevector ? (bothalf ?1 (bothalf ?2 (# ?3 ?4))) ?5 ?6 of (,,) x _ _ -> x ==> ! Interval.hs:249:0-14: Non-exhaustive patterns in function unpt bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up bothalf ? (down (# ?1 ?2)) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf bothalf ? (up (# ?1 ?2)) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up case makevector (# ? ?1) (down (# -1.0 ?2)) ?3 ?4 of (,,) x _ _ -> x ==> ! Interval.hs:249:0-14: Non-exhaustive patterns in function unpt case makevector (# ? ?1) (down (# 0.0 ?2)) ?3 ?4 of (,,) x _ _ -> x ==> ! Interval.hs:249:0-14: Non-exhaustive patterns in function unpt case makevector (# ? ?1) (down (# 0.5 ?2)) ?3 ?4 of (,,) x _ _ -> x ==> ! Interval.hs:249:0-14: Non-exhaustive patterns in function unpt case makevector (# ? ?1) (down (# 1.0 ?2)) ?3 ?4 of (,,) x _ _ -> x ==> ! Interval.hs:249:0-14: Non-exhaustive patterns in function unpt bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (down (# ? ?1)) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (down (# ? ?1)) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up down (mid1 ? (# ?1 ?2)) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 down (mid2 ? (# ?1 ?2)) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down down (sqr ? ?1 (pt ?2)) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf down (up (# ? ?1)) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf mid1 ? (down (# ?1 ?2)) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid1 ? (mid1 ?1 (# ?2 ?3)) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf mid1 ? (up (# ?1 ?2)) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf mid2 ? (down (# ?1 ?2)) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid2 ? (mid2 ?1 (# ?2 ?3)) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf mid2 ? (up (# ?1 ?2)) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up case makevector (# ? ?1) (pt -1.0) ?2 ?3 of (,,) x _ _ -> x ==> ! Interval.hs:249:0-14: Non-exhaustive patterns in function unpt bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up case makevector (# ? ?1) (pt 0.0) ?2 ?3 of (,,) x _ _ -> x ==> ! Interval.hs:249:0-14: Non-exhaustive patterns in function unpt bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up case makevector (# ? ?1) (pt 0.5) ?2 ?3 of (,,) x _ _ -> x ==> ! Interval.hs:249:0-14: Non-exhaustive patterns in function unpt bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up case makevector (# ? ?1) (pt 1.0) ?2 ?3 of (,,) x _ _ -> x ==> ! Interval.hs:249:0-14: Non-exhaustive patterns in function unpt bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up case makevector ? (topbit ?1 (# ?2 ?3)) ?4 ?5 of (,,) x _ _ -> x ==> ! Interval.hs:249:0-14: Non-exhaustive patterns in function unpt bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf topbit ? (down (# ?1 ?2)) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit case makevector ? (topbit ?1 (topbit ?2 (# ?3 ?4))) ?5 ?6 of (,,) x _ _ -> x ==> ! Interval.hs:249:0-14: Non-exhaustive patterns in function unpt down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf topbit ? (up (# ?1 ?2)) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up case makevector ? (tophalf ?1 (# ?2 ?3)) ?4 ?5 of (,,) x _ _ -> x ==> ! Interval.hs:249:0-14: Non-exhaustive patterns in function unpt bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf tophalf ? (down (# ?1 ?2)) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit case makevector ? (tophalf ?1 (tophalf ?2 (# ?3 ?4))) ?5 ?6 of (,,) x _ _ -> x ==> ! Interval.hs:249:0-14: Non-exhaustive patterns in function unpt down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up tophalf ? (up (# ?1 ?2)) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up case makevector (# ? ?1) (up (# ?2 -1.0)) ?3 ?4 of (,,) x _ _ -> x ==> ! Interval.hs:249:0-14: Non-exhaustive patterns in function unpt case makevector (# ? ?1) (up (# ?2 0.0)) ?3 ?4 of (,,) x _ _ -> x ==> ! Interval.hs:249:0-14: Non-exhaustive patterns in function unpt case makevector (# ? ?1) (up (# ?2 0.5)) ?3 ?4 of (,,) x _ _ -> x ==> ! Interval.hs:249:0-14: Non-exhaustive patterns in function unpt case makevector (# ? ?1) (up (# ?2 1.0)) ?3 ?4 of (,,) x _ _ -> x ==> ! Interval.hs:249:0-14: Non-exhaustive patterns in function unpt bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up up (down (# ? ?1)) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up up (mid1 ? (# ?1 ?2)) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up up (mid2 ? (# ?1 ?2)) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up up (sqr ? ?1 (pt ?2)) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up up (up (# ? ?1)) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf up (up (# ? ?1)) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up case makevector ? ?1 (# ?2 ?3) ?4 of (,,) _ x _ -> x ==> ! Interval.hs:249:0-14: Non-exhaustive patterns in function unpt case makevector ? ?1 (bothalf ?2 (# ?3 ?4)) ?5 of (,,) _ x _ -> x ==> ! Interval.hs:249:0-14: Non-exhaustive patterns in function unpt case makevector ? ?1 (bothalf ?2 (bothalf ?3 (# ?4 ?5))) ?6 of (,,) _ x _ -> x ==> ! Interval.hs:249:0-14: Non-exhaustive patterns in function unpt bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up bothalf ? (down (# ?1 ?2)) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf bothalf ? (up (# ?1 ?2)) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up case makevector (# ? ?1) ?2 (down (# -1.0 ?3)) ?4 of (,,) _ x _ -> x ==> ! Interval.hs:249:0-14: Non-exhaustive patterns in function unpt case makevector (# ? ?1) ?2 (down (# 0.0 ?3)) ?4 of (,,) _ x _ -> x ==> ! Interval.hs:249:0-14: Non-exhaustive patterns in function unpt case makevector (# ? ?1) ?2 (down (# 0.5 ?3)) ?4 of (,,) _ x _ -> x ==> ! Interval.hs:249:0-14: Non-exhaustive patterns in function unpt case makevector (# ? ?1) ?2 (down (# 1.0 ?3)) ?4 of (,,) _ x _ -> x ==> ! Interval.hs:249:0-14: Non-exhaustive patterns in function unpt bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (down (# ? ?1)) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (down (# ? ?1)) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up down (mid1 ? (# ?1 ?2)) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 down (mid2 ? (# ?1 ?2)) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down down (sqr ? ?1 (pt ?2)) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf down (up (# ? ?1)) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf mid1 ? (down (# ?1 ?2)) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid1 ? (mid1 ?1 (# ?2 ?3)) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf mid1 ? (up (# ?1 ?2)) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf mid2 ? (down (# ?1 ?2)) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid2 ? (mid2 ?1 (# ?2 ?3)) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf mid2 ? (up (# ?1 ?2)) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up case makevector (# ? ?1) ?2 (pt -1.0) ?3 of (,,) _ x _ -> x ==> ! Interval.hs:249:0-14: Non-exhaustive patterns in function unpt bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up case makevector (# ? ?1) ?2 (pt 0.0) ?3 of (,,) _ x _ -> x ==> ! Interval.hs:249:0-14: Non-exhaustive patterns in function unpt bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up case makevector (# ? ?1) ?2 (pt 0.5) ?3 of (,,) _ x _ -> x ==> ! Interval.hs:249:0-14: Non-exhaustive patterns in function unpt bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up case makevector (# ? ?1) ?2 (pt 1.0) ?3 of (,,) _ x _ -> x ==> ! Interval.hs:249:0-14: Non-exhaustive patterns in function unpt bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up case makevector ? ?1 (topbit ?2 (# ?3 ?4)) ?5 of (,,) _ x _ -> x ==> ! Interval.hs:249:0-14: Non-exhaustive patterns in function unpt bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf topbit ? (down (# ?1 ?2)) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit case makevector ? ?1 (topbit ?2 (topbit ?3 (# ?4 ?5))) ?6 of (,,) _ x _ -> x ==> ! Interval.hs:249:0-14: Non-exhaustive patterns in function unpt down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf topbit ? (up (# ?1 ?2)) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up case makevector ? ?1 (tophalf ?2 (# ?3 ?4)) ?5 of (,,) _ x _ -> x ==> ! Interval.hs:249:0-14: Non-exhaustive patterns in function unpt bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf tophalf ? (down (# ?1 ?2)) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit case makevector ? ?1 (tophalf ?2 (tophalf ?3 (# ?4 ?5))) ?6 of (,,) _ x _ -> x ==> ! Interval.hs:249:0-14: Non-exhaustive patterns in function unpt down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up tophalf ? (up (# ?1 ?2)) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up case makevector (# ? ?1) ?2 (up (# ?3 -1.0)) ?4 of (,,) _ x _ -> x ==> ! Interval.hs:249:0-14: Non-exhaustive patterns in function unpt case makevector (# ? ?1) ?2 (up (# ?3 0.0)) ?4 of (,,) _ x _ -> x ==> ! Interval.hs:249:0-14: Non-exhaustive patterns in function unpt case makevector (# ? ?1) ?2 (up (# ?3 0.5)) ?4 of (,,) _ x _ -> x ==> ! Interval.hs:249:0-14: Non-exhaustive patterns in function unpt case makevector (# ? ?1) ?2 (up (# ?3 1.0)) ?4 of (,,) _ x _ -> x ==> ! Interval.hs:249:0-14: Non-exhaustive patterns in function unpt bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up up (down (# ? ?1)) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up up (mid1 ? (# ?1 ?2)) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up up (mid2 ? (# ?1 ?2)) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up up (sqr ? ?1 (pt ?2)) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up up (up (# ? ?1)) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf up (up (# ? ?1)) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up case makevector ? ?1 ?2 (# ?3 ?4) of (,,) _ _ x -> x ==> ! Interval.hs:249:0-14: Non-exhaustive patterns in function unpt case makevector ? ?1 ?2 (bothalf ?3 (# ?4 ?5)) of (,,) _ _ x -> x ==> ! Interval.hs:249:0-14: Non-exhaustive patterns in function unpt case makevector ? ?1 ?2 (bothalf ?3 (bothalf ?4 (# ?5 ?6))) of (,,) _ _ x -> x ==> ! Interval.hs:249:0-14: Non-exhaustive patterns in function unpt bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up bothalf ? (down (# ?1 ?2)) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf bothalf ? (up (# ?1 ?2)) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up case makevector (# ? ?1) ?2 ?3 (down (# -1.0 ?4)) of (,,) _ _ x -> x ==> ! Interval.hs:249:0-14: Non-exhaustive patterns in function unpt case makevector (# ? ?1) ?2 ?3 (down (# 0.0 ?4)) of (,,) _ _ x -> x ==> ! Interval.hs:249:0-14: Non-exhaustive patterns in function unpt case makevector (# ? ?1) ?2 ?3 (down (# 0.5 ?4)) of (,,) _ _ x -> x ==> ! Interval.hs:249:0-14: Non-exhaustive patterns in function unpt case makevector (# ? ?1) ?2 ?3 (down (# 1.0 ?4)) of (,,) _ _ x -> x ==> ! Interval.hs:249:0-14: Non-exhaustive patterns in function unpt bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (down (# ? ?1)) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (down (# ? ?1)) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up down (mid1 ? (# ?1 ?2)) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 down (mid2 ? (# ?1 ?2)) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down down (sqr ? ?1 (pt ?2)) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf down (up (# ? ?1)) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf mid1 ? (down (# ?1 ?2)) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid1 ? (mid1 ?1 (# ?2 ?3)) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf mid1 ? (up (# ?1 ?2)) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf mid2 ? (down (# ?1 ?2)) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid2 ? (mid2 ?1 (# ?2 ?3)) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf mid2 ? (up (# ?1 ?2)) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up case makevector (# ? ?1) ?2 ?3 (pt -1.0) of (,,) _ _ x -> x ==> ! Interval.hs:249:0-14: Non-exhaustive patterns in function unpt bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up case makevector (# ? ?1) ?2 ?3 (pt 0.0) of (,,) _ _ x -> x ==> ! Interval.hs:249:0-14: Non-exhaustive patterns in function unpt bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up case makevector (# ? ?1) ?2 ?3 (pt 0.5) of (,,) _ _ x -> x ==> ! Interval.hs:249:0-14: Non-exhaustive patterns in function unpt bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up case makevector (# ? ?1) ?2 ?3 (pt 1.0) of (,,) _ _ x -> x ==> ! Interval.hs:249:0-14: Non-exhaustive patterns in function unpt bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up case makevector ? ?1 ?2 (topbit ?3 (# ?4 ?5)) of (,,) _ _ x -> x ==> ! Interval.hs:249:0-14: Non-exhaustive patterns in function unpt bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf topbit ? (down (# ?1 ?2)) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit case makevector ? ?1 ?2 (topbit ?3 (topbit ?4 (# ?5 ?6))) of (,,) _ _ x -> x ==> ! Interval.hs:249:0-14: Non-exhaustive patterns in function unpt down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf topbit ? (up (# ?1 ?2)) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up case makevector ? ?1 ?2 (tophalf ?3 (# ?4 ?5)) of (,,) _ _ x -> x ==> ! Interval.hs:249:0-14: Non-exhaustive patterns in function unpt bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf tophalf ? (down (# ?1 ?2)) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit case makevector ? ?1 ?2 (tophalf ?3 (tophalf ?4 (# ?5 ?6))) of (,,) _ _ x -> x ==> ! Interval.hs:249:0-14: Non-exhaustive patterns in function unpt down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up tophalf ? (up (# ?1 ?2)) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up case makevector (# ? ?1) ?2 ?3 (up (# ?4 -1.0)) of (,,) _ _ x -> x ==> ! Interval.hs:249:0-14: Non-exhaustive patterns in function unpt case makevector (# ? ?1) ?2 ?3 (up (# ?4 0.0)) of (,,) _ _ x -> x ==> ! Interval.hs:249:0-14: Non-exhaustive patterns in function unpt case makevector (# ? ?1) ?2 ?3 (up (# ?4 0.5)) of (,,) _ _ x -> x ==> ! Interval.hs:249:0-14: Non-exhaustive patterns in function unpt case makevector (# ? ?1) ?2 ?3 (up (# ?4 1.0)) of (,,) _ _ x -> x ==> ! Interval.hs:249:0-14: Non-exhaustive patterns in function unpt bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up up (down (# ? ?1)) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up up (mid1 ? (# ?1 ?2)) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up up (mid2 ? (# ?1 ?2)) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up up (sqr ? ?1 (pt ?2)) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up up (up (# ? ?1)) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf up (up (# ? ?1)) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up case makevector ? (# ?1 ?2) ?3 ?4 of (,,) x _ _ -> x ==> ! Interval.hs:249:0-14: Non-exhaustive patterns in function unpt case makevector ? (bothalf ?1 (# ?2 ?3)) ?4 ?5 of (,,) x _ _ -> x ==> ! Interval.hs:249:0-14: Non-exhaustive patterns in function unpt case makevector ? (bothalf ?1 (bothalf ?2 (# ?3 ?4))) ?5 ?6 of (,,) x _ _ -> x ==> ! Interval.hs:249:0-14: Non-exhaustive patterns in function unpt case makevector ? (bothalf ?1 (bothalf ?2 (bothalf ?3 (# ?4 ?5)))) ?6 ?7 of (,,) x _ _ -> x ==> ! Interval.hs:249:0-14: Non-exhaustive patterns in function unpt bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up bothalf ? (down (# ?1 ?2)) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up bothalf ? (mid1 ?1 (# ?2 ?3)) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 bothalf ? (mid2 ?1 (# ?2 ?3)) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf bothalf ? (sqr ?1 ?2 (pt ?3)) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf bothalf ? (up (# ?1 ?2)) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up bothalf ? (down (# ?1 ?2)) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf bothalf ? (down (bothalf ?1 (# ?2 ?3))) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up down (down (# ? ?1)) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf down (up (# ? ?1)) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up bothalf ? (mid1 ?1 (# ?2 ?3)) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid1 ? (mid1 ?1 (# ?2 ?3)) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up bothalf ? (mid2 ?1 (# ?2 ?3)) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid2 ? (mid2 ?1 (# ?2 ?3)) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down bothalf ? (sqr ?1 ?2 (pt ?3)) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up case makevector ? (bothalf ?1 (topbit ?2 (# ?3 ?4))) ?5 ?6 of (,,) x _ _ -> x ==> ! Interval.hs:249:0-14: Non-exhaustive patterns in function unpt bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up case makevector ? (bothalf ?1 (tophalf ?2 (# ?3 ?4))) ?5 ?6 of (,,) x _ _ -> x ==> ! Interval.hs:249:0-14: Non-exhaustive patterns in function unpt bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up bothalf ? (up (# ?1 ?2)) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf bothalf ? (up (bothalf ?1 (# ?2 ?3))) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up up (down (# ? ?1)) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf up (up (# ? ?1)) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up case makevector (# ? ?1) (down (# -1.0 ?2)) ?3 ?4 of (,,) x _ _ -> x ==> ! Interval.hs:249:0-14: Non-exhaustive patterns in function unpt down (down (# ? ?1)) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down case makevector (# ? ?1) (down (# 0.0 ?2)) ?3 ?4 of (,,) x _ _ -> x ==> ! Interval.hs:249:0-14: Non-exhaustive patterns in function unpt down (down (# ? ?1)) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down case makevector (# ? ?1) (down (# 0.5 ?2)) ?3 ?4 of (,,) x _ _ -> x ==> ! Interval.hs:249:0-14: Non-exhaustive patterns in function unpt down (down (# ? ?1)) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down case makevector (# ? ?1) (down (# 1.0 ?2)) ?3 ?4 of (,,) x _ _ -> x ==> ! Interval.hs:249:0-14: Non-exhaustive patterns in function unpt down (down (# ? ?1)) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up bothalf ? (down (# ?1 ?2)) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf bothalf ? (up (# ?1 ?2)) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up down (down (# ? ?1)) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down down (down (bothalf ? (# ?1 ?2))) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up down (down (# ? ?1)) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (down (# ? ?1)) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf down (up (# ? ?1)) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up down (mid1 ? (# ?1 ?2)) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up down (mid2 ? (# ?1 ?2)) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down down (sqr ? ?1 (pt ?2)) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down down (down (topbit ? (# ?1 ?2))) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up down (down (tophalf ? (# ?1 ?2))) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up down (up (# ? ?1)) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf up (down (# ? ?1)) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf up (up (# ? ?1)) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up down (mid1 ? (# ?1 ?2)) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf mid1 ? (down (# ?1 ?2)) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up mid1 ? (mid1 ?1 (# ?2 ?3)) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf mid1 ? (up (# ?1 ?2)) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up down (mid2 ? (# ?1 ?2)) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf mid2 ? (down (# ?1 ?2)) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid2 ? (mid2 ?1 (# ?2 ?3)) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf mid2 ? (up (# ?1 ?2)) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 down (sqr ? ?1 (pt ?2)) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down down (sqr ? ?1 (sqr ?2 ?3 (pt ?4))) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf topbit ? (down (# ?1 ?2)) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf topbit ? (up (# ?1 ?2)) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf tophalf ? (down (# ?1 ?2)) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up tophalf ? (up (# ?1 ?2)) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up down (up (# ? ?1)) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up up (down (# ? ?1)) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (down (# ? ?1)) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf down (up (# ? ?1)) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up up (mid1 ? (# ?1 ?2)) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up up (mid2 ? (# ?1 ?2)) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up up (sqr ? ?1 (pt ?2)) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up up (up (# ? ?1)) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf up (down (# ? ?1)) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf up (up (# ? ?1)) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down bothalf ? (mid1 ?1 (# ?2 ?3)) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up mid1 ? (down (# ?1 ?2)) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (down (# ? ?1)) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up down (mid1 ? (# ?1 ?2)) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf down (up (# ? ?1)) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up mid1 ? (mid1 ?1 (# ?2 ?3)) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf mid1 ? (down (# ?1 ?2)) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up mid1 ? (mid1 ?1 (# ?2 ?3)) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid1 ? (mid1 ?1 (# ?2 ?3)) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up mid1 ? (mid2 ?1 (# ?2 ?3)) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid1 ? (sqr ?1 ?2 (pt ?3)) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf mid1 ? (up (# ?1 ?2)) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up mid1 ? (mid2 ?1 (# ?2 ?3)) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid2 ? (mid1 ?1 (# ?2 ?3)) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid2 ? (mid2 ?1 (# ?2 ?3)) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid1 ? (sqr ?1 ?2 (pt ?3)) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down topbit ? (mid1 ?1 (# ?2 ?3)) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down tophalf ? (mid1 ?1 (# ?2 ?3)) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up mid1 ? (up (# ?1 ?2)) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf up (down (# ? ?1)) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up up (mid1 ? (# ?1 ?2)) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf up (up (# ? ?1)) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 bothalf ? (mid2 ?1 (# ?2 ?3)) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up mid2 ? (down (# ?1 ?2)) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (down (# ? ?1)) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 down (mid2 ? (# ?1 ?2)) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf down (up (# ? ?1)) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up mid2 ? (mid1 ?1 (# ?2 ?3)) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid1 ? (mid1 ?1 (# ?2 ?3)) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid1 ? (mid2 ?1 (# ?2 ?3)) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up mid2 ? (mid2 ?1 (# ?2 ?3)) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf mid2 ? (down (# ?1 ?2)) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up mid2 ? (mid1 ?1 (# ?2 ?3)) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid2 ? (mid2 ?1 (# ?2 ?3)) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 bothalf ? (pt ?1) ==> ! Interval.hs:240:0-32: Non-exhaustive patterns in function bothalf down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid1 ? (pt ?1) ==> ! Interval.hs:251:0-32: Non-exhaustive patterns in function mid1 mid2 ? (mid2 ?1 (# ?2 ?3)) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 mid2 ? (sqr ?1 ?2 (pt ?3)) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit topbit ? (pt ?1) ==> ! Interval.hs:241:0-38: Non-exhaustive patterns in function topbit mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf tophalf ? (pt ?1) ==> ! Interval.hs:239:0-32: Non-exhaustive patterns in function tophalf mid2 ? (up (# ?1 ?2)) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up up (pt ?) ==> ! Interval.hs:247:0-20: Non-exhaustive patterns in function up mid2 ? (pt ?1) ==> ! Interval.hs:252:0-32: Non-exhaustive patterns in function mid2 down (pt ?) ==> ! Interval.hs:246:0-20: Non-exhaustive patterns in function down Writing: Csg.hs.html Writing: Interval.hs.html Writing: Kolor.hs.html Writing: Matrix.hs.html Writing: Oct.hs.html Writing: Patchlevel.hs.html Writing: Quad.hs.html Writing: Raster.hs.html Writing: Shapes.hs.html Writing: Types.hs.html Writing: Vector.hs.html Writing: hpc_index.html Writing: hpc_index_fun.html Writing: hpc_index_alt.html Writing: hpc_index_exp.html ["Csg.hs","Interval.hs","Kolor.hs","Matrix.hs","Oct.hs","Patchlevel.hs","Quad.hs","Raster.hs","Shapes.hs","Types.hs","Vector.hs"]