holonomically
searching Neon…
- 1.▲
- 2.▲
- 3.▲
- 4.▲
- 5.▲
- 6.▲
39 ms·
- 1.▲
- 2.▲
- 3.▲
- 4.▲
- 5.▲
- 6.▲
- 7.▲
- 8.▲
- 9.▲
- 10.▲
- 11.▲
- 12.▲
- 13.▲
- 14.▲
- 15.▲
- 16.▲
- 17.▲
- 18.▲
- 19.▲
- 20.▲
- 21.▲
- 22.▲
- 23.▲
- 24.▲
Presented without comment. Input:
move(1,X,Y,_) :-
write('Move top disk from '),
write(X),
write(' to '),
write(Y),
nl.
move(N,X,Y,Z) :-
N>1,
M is N-1,
move(M,X,Z,Y),
mov - 25.▲
- 26.▲
- 27.▲
- 28.▲
- 29.▲
- 30.▲
More ›