序言-为什么我应该使用'dif'而不是'= \ ='

debugcn 发表于 Dev

戈尔什科夫

我正在学习“ Prolog by Example”一书中的一个示例（Helder Coelho和Jose C Cotta合着）。

Write a program for designing an architectural unit
obeying the following specifications:

+ Two rectangular rooms
+ Each room has a window and interior door
+ Rooms are connected by interior door
+ One room also has an exterior door
+ A wall can have only one door or window
+ No window can face north
+ Windows cannot be on opposite sides of the unit

有一个解决方案，但它在SWI-Prolog中不起作用，甚至无法编译。

我不得不从书中更改解决方案：使用'dif（X，Y）'而不是'X = \ = Y'。

有人可以解释：为什么原始解决方案不起作用？

这是一个代码：

plan(FD,D1,W1,D2,W2) :-
  frontroom(FD,D1,W1),
  opposite(D1,D2),
  room(D2,W2),
  notopposite(W1,W2).

frontroom(FD,D,W) :-
  room(D,W),
  direction(FD),
  dif(FD,D),     % FD =\= D,   % <- original was commented
  dif(FD,W).     % FD =\= W.   % <- original was commented

room(D,W) :-
  direction(D),
  direction(W),
  dif(D,W),      % D =\= W,     % <- original was commented
  dif(W,north).  % W =\= north. % <- original was commented

direction(north).
direction(south).
direction(east).
direction(west).

opposite(north,south).
opposite(south,north).
opposite(east,west).
opposite(west,east).

notopposite(D1,D2) :-
  opposite(D1,D3),
  dif(D2,D3).  % D2 =\= D3. % <- original was commented

我可以查询并得到答案：

?- plan(west,D1,W1,D2,W2).
D1 = east,
W1 = south,
D2 = west,
W2 = south

我正在尝试跟踪原始解决方案（使用D2 = \ = D3而不是dif（D2，D3））并得到以下信息：

[trace]  ?- plan(west,D1,W1,D2,W2).
   Call: (8) plan(west, _9632, _9634, _9636, _9638) ? creep
   Call: (9) frontroom(west, _9632, _9634) ? creep
   Call: (10) room(_9632, _9634) ? creep
   Call: (11) direction(_9632) ? creep
   Exit: (11) direction(north) ? creep
   Call: (11) direction(_9634) ? creep
   Exit: (11) direction(north) ? creep
   Call: (11) north=\=north ? creep
ERROR: Arithmetic: `north/0' is not a function

为什么我不能使用'= \ ='？

假

应该是\==错误的而不是错误的=\=。我没有意识到，=\=除算术不等式外，它还没有其他含义。

1982年第3版是在网上，并=\=在其记录非常相同的文件中为DECsystem 10序言的一部分，1978年如此的矛盾，即使在此之前所提到的书的版本存在。

至此为止的文字。但是，你是绝对正确的dif/2是最好(\==)/2。见这更多。

本文收集自互联网，转载请注明来源。

如有侵权，请联系[email protected] 删除。