Towers of Hanoi: Difference between revisions

→‎{{header|Clojure}}: formatted to use customary indentation
m (→‎{{header|REXX}}: removed some superflous blank lines. -- ~~~~)
(→‎{{header|Clojure}}: formatted to use customary indentation)
Line 303:
 
=={{header|Clojure}}==
 
<lang lisp>(defn towers-of-hanoi [n from to via]
<lang lisp>
(if (= n 1)
<lang lisp>(defn towers-of-hanoi [n from to via]
(println (format "Move from %s to %s" from to))
(if (= n (do1)
(println (format "Move from %s to (towers-of-hanoi (dec n)%s" from via to))
(do
(println (format "Move from %s to %s" from to))
(recurtowers-of-hanoi (dec n) from via to from))))</lang>
(println (format "Move from %s to %s" from to))
(recur (dec n) via to from))))
</lang>
 
=={{header|CoffeeScript}}==
Anonymous user