Towers of Hanoi: Difference between revisions
m
→{{header|J}}
(Undo revision 125368 by 206.75.102.162 (talk) last editor was confused) |
m (→{{header|J}}) |
||
Line 840:
<lang J>hanoi=: monad define
moves=.
disks=. $~` ((],[,]) $:@<:) @.* y
('move disk ';' from peg ';' to peg ');@,."1 ":&.>disks,.1+moves
|