diff options
| author | Daniel Cerqueira <dan.git@lispclub.com> | 2025-09-05 17:24:56 +0100 |
|---|---|---|
| committer | Daniel Cerqueira <dan.git@lispclub.com> | 2025-09-05 17:24:56 +0100 |
| commit | 7146c35f9eced450333520ce9962cee074161726 (patch) | |
| tree | 7deaad4c46cb35cf445610eb1e115a37537fb8fe /examples/hanoi.lali | |
| parent | 2421bd86e7fb1fc54a097cd75bc4a15de788c755 (diff) | |
hopefully fixed all errors in examples/
Diffstat (limited to 'examples/hanoi.lali')
| -rw-r--r-- | examples/hanoi.lali | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/examples/hanoi.lali b/examples/hanoi.lali index cf82382..59e3d10 100644 --- a/examples/hanoi.lali +++ b/examples/hanoi.lali @@ -7,15 +7,15 @@ (newline)) (defun hanoi-move (num from to via) - (fill ((! num 1) + (fill ((dif num +1) (hanoi-print num from to)) (f (prog - (hanoi-move (- num 1) from via to) + (hanoi-move (- num +1) from via to) (hanoi-print num from to) - (hanoi-move (- num 1) via to from))))) + (hanoi-move (- num +1) via to from))))) (defun hanoi (num) (hanoi-move num 'L 'M 'R)) -(hanoi 3) +(hanoi +3) |