Towers of Hanoi: Difference between revisions

Content added Content deleted

Inline

@@ Line 2,207: / Line 2,207: @@
 =={{header|Oforth}}==
-<lang Oforth>func: move(n, from, to, via)
+<lang Oforth>: move(n, from, to, via)
-{
    n 0 > ifTrue: [
-      move(n 1 -, from, via, to)
+      move(n 1-, from, via, to)
       System.Out "Move disk from " << from << " to " << to << cr
-      move(n 1 -, via, to, from)
+      move(n 1-, via, to, from)
-      ]
+      ] ;
-}
-move(5, $left, $middle, $right)</lang>
+$left $middle $right) move </lang>
 =={{header|Oz}}==