Towers of Hanoi: Difference between revisions

added Ursala
(added Ursala)
Line 757:
move $1 $2 $3 $4
</lang>
 
=={{header|Ursala}}==
<lang Ursala>
#import nat
 
move = ~&al^& ^rlPlrrPCT/~&arlrlPX ^|W/~& ^|G/predecessor ^/~&htxPC ~&zyxPC
 
#show+
 
main = ^|T(~&,' -> '--)* move/4 <'start','end','middle'>
</lang>
output:
<pre>start -> middle
start -> end
middle -> end
start -> middle
end -> start
end -> middle
start -> middle
start -> end
middle -> end
middle -> start
end -> start
middle -> end
start -> middle
start -> end
middle -> end</pre>
 
=={{header|Vedit macro language}}==
Anonymous user