Towers of Hanoi: Difference between revisions

Content added Content deleted

Inline

@@ Line 176: / Line 176: @@
           (println (format "Move from %s to %s" from to))
           (do
-            (towers-of-hanoi (- n 1) from via to)
+            (towers-of-hanoi (dec n) from via to)
             (println (format "Move from %s to %s" from to))
-            (recur (- n 1) via to from))))
+            (recur (dec n) via to from))))
 =={{header|Common Lisp}}==