diff options
Diffstat (limited to 'examples/abacus/reading.lali')
| -rwxr-xr-x | examples/abacus/reading.lali | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/examples/abacus/reading.lali b/examples/abacus/reading.lali index d4e510e..6663bb3 100755 --- a/examples/abacus/reading.lali +++ b/examples/abacus/reading.lali @@ -1,5 +1,5 @@ ;; variables -(set 'max-columns +4) +(set 'max-columns +12) ;; functions (defun random-number (cases) @@ -51,7 +51,7 @@ (progs f (set 'n-rand (random-number (random max-columns))) - (map (lambda (num) (princ (number-to-earth-rod num)) (newline)) n-rand) + (map (lambda (num) (princ (number-to-air-rod num)) (newline)) n-rand) (read) (print (map number-to-symbol n-rand)) ;; (print n-rand) |