Anonymous user
Towers of Hanoi: Difference between revisions
Added a Clojure implementation.
(→{{header|Fortran}}: +langtag) |
(Added a Clojure implementation.) |
||
Line 118:
}
}
=={{header|Clojure}}==
(defn towers-of-hanoi [n from to via]
(if (= n 1)
(println (format "Move from %s to %s" from to))
(do
(towers-of-hanoi (- n 1) from via to)
(println (format "Move from %s to %s" from to))
(recur (- n 1) via to from))))
=={{header|Common Lisp}}==
| |||