食人魔过河问题深度优先搜索-prolog源码

river-cross - DFS.pl为广度搜索的prolog程序 打开默认程序后在?-后输入 solution(((0,0),(3,3),1),((3,3),(0,0),0),[((0,0),(3,3),1)],S);true. 或 solution(S,((3,3),(0,0),0),((0,0),(3,3),1));true. 由于结果默认不完全显示，因此L结果出来后通过按w（即write）后才完全显示。