diff options
Diffstat (limited to 'assignment-13/uFPL.icl')
| -rw-r--r-- | assignment-13/uFPL.icl | 6 |
1 files changed, 1 insertions, 5 deletions
diff --git a/assignment-13/uFPL.icl b/assignment-13/uFPL.icl index ffe21b3..881a11f 100644 --- a/assignment-13/uFPL.icl +++ b/assignment-13/uFPL.icl @@ -270,11 +270,7 @@ instance run NamedRule where run (_ :=: r) = run r -Start w = simulate example_countdown w -Start _ = printToString (genp example_score) -where - genp :: (a -> CProg) | gen a CProg - genp = gen +Start w = simulate example_score w example_score :: [NamedRule] example_score = |