我對視覺序言非常陌生,想知道如何整合我在link上找到的代碼。在Visual Prolog中的河內塔
當我在Visual Prolog的一個控制檯項目main.pro代碼:
/*****************************************************************************
Copyright (c) 2013 My Company
******************************************************************************/
implement main
open core
clauses
run():-
console::init(),
succeed(). % place your own code here
end implement main
goal
mainExe::run(main::run).
所以,我的問題是在哪裏插入漢諾塔的代碼對這個link?
爲了您的方便,下面的代碼:
/* Program ch16e05.pro */
DOMAINS
loc =right;middle;left
PREDICATES
hanoi(integer)
move(integer,loc,loc,loc)
inform(loc,loc)
CLAUSES
hanoi(N):-
move(N,left,middle,right).
move(1,A,_,C):-
inform(A,C),!.
move(N,A,B,C):-
N1=N-1, move(N1,A,C,B),
inform(A,C),move(N1,B,A,C).
inform(Loc1, Loc2):-nl,
write("Move a disk from ", Loc1, " to ", Loc2).
預先感謝任何幫助。