"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. 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 Kolor: Results: Matrix: Results: Oct: Results: Patchlevel: Results: 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) 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) Shapes: Results: Types: Results: 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 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"]