From Newsgroup: sci.physics.relativity

Mild Shock wrote:

The idea here is to do first some off Dogelog experiments and then
create a library that provides npu_exec/2 for pi-WAM code, the analogue
to gpu_exec/2. A name suggestion would be:

- edge/ironpaw.p

hanoi(N) :-
move(N, left, center, right).

move(1, Source, Target, _) :-
format("Move disk from ~w to ~w~n", [Source, Target]).

move(N, Source, Target, Auxiliary) :-
N > 1,
M is N - 1,
move(M, Source, Auxiliary, Target),
move(1, Source, Target, _),
move(M, Auxiliary, Target, Source).
--- Synchronet 3.22a-Linux NewsLink 1.2