Hanoi in Prolog

Resume

Hanoi is a very popular game in acient years. Here’s an implentation of Hanoi with prolog.

---

Code

hanoi(N) :- move(N,left,center,right).move(0,_,_,_) :- !.move(N,A,B,C) :-    M is N-1,    move(M,A,C,B),    inform(A,B),    move(M,C,B,A).inform(X,Y) :- write('Move from '), write(X), write(' to '), write(Y), write('.'), nl.

---

Result

?- hanoi(3).Move from left to center.Move from left to right.Move from center to right.Move from left to center.Move from right to left.Move from right to center.Move from left to center.true.