Задача о ханойских башнях. Вывод результата. (Prolog)

[LadyFly]

Здравствуйте. Есть всем известная задача о ханойских башнях. Я ее решила, но вот в чем беда: не могу понять как добавить функцию вывода результатов перестановок в список, который я смогу потом прочесть

add(E, [], [E]).
add(E, [H|Tail], [H|Tail1]):-add(E,Tail,Tail1).
answer(X,List, Result) :- add( X, List, Result).

move(X, Y) :- write('Верхний диск со стержня  '), write(X), write(' на стержень '), write(Y), nl.
transfer(1, Start, Target, _) :- move (Start, Target, L), !.
transfer(N, Start, Target, Helper):- M is N-1, 
                                                transfer(M, Start, Helper, Target), 
                                                move(Start, Target), 
                                                transfer(M, Helper, Target, Start).

hanoi(N):- write('Всего  '), write(N), write(' диска'), nl, transfer(N, a,b,c).

я даже написала предикат добавления, но вот использовать его правильно не получается