Commit the start of the work on modular X before I worry about From.

2020-01-08 15:19:34 -10:00
parent 3e82008189
commit 8c5f18cb7c
5 changed files with 99 additions and 1 deletions
--- a/generation/src/Division.hs
+++ b/generation/src/Division.hs
@@ -207,6 +207,6 @@ generateDivisionTests size g = go g numTestCases
                                ("z", showX (x `div` y)),
                                ("r", showX (x `mod` y))]
    in if y == 0
-         then go g0 i
+         then go g2 i
         else tcase : go g2 (i - 1)