... spy-point, type the nospy goal | ?- nospy p. To remove p, q, and r as spy-points type the goal | ?- nospy [p, q, r]. To remove all spy-points type the goal | ?- nospyall. 120 Prolog Experiments ... string. moore(In, Out) :- start(I), execute(I, In, Out). execute(S, [ ], [ ]) :- t(S, [ ], Y, Z). execute(S, [ ], [X]) :- t(S, X, Y, Z). execute(S, [H|T], Y) :- t(S, [ ], H, N), execute(N, ... accept(S) :- start(I), path(I, S, [e]). path(K, [ ], Stack) :- final(K). path(K, [A|B], [H|T]) :- t(K, A, H, O, N), oper([H|T], O, NewStack), path(N, B, NewStack). path(K, S, [H|T]) :- t(K,...