visual-prolog - 序言中的错误“此位置的非法变量类型”

Question

我尝试搜索具有此属性的动物，但出现错误“此位置的变量类型非法”。如何解决？

domains
type=symbol
object=symbol
property=symbol
value=symbol
parent=symbol
predicates
nondeterm is_a(type, parent) 
nondeterm has_prop(object, property, value) 
nondeterm has_property(object, property, value) 
clauses
is_a(dog,wolf).
is_a(dingo,wolf).
is_a(wolf,volki).
is_a(coyote,volki).
is_a(jackal,volki).
is_a(volki,dogs).
is_a(fox,dogs).
is_a(arctic_fox,dogs).

has_prop(dogs, travel, walk). 
has_prop(dogs, food_for_child, milk).  
has_prop(volki, size, medium). 
has_prop(volki, color, brown). 
has_prop(arctic_fox, color, white). 
has_prop(arctic_fox, size, small). 
has_prop(fox, color, orange). 
has_prop(fox, size, small). 
has_prop(wolf, color, grey). 
has_prop(wolf, size, large). 
has_prop(dog, color, brown). 
has_prop(dog, size, small). 
has_prop(dingo, color, orange). 
has_prop(dingo, size, medium). 



has_property(Object, Property, Value):-
has_prop(Object, Property, Value). 
has_property(Object, Property, Value):-
is_a(Object,Parent), 
has_property(Parent, Property, Value).

goal
has_property(X,size,medium).

我在这一行有一个错误“这个位置的非法变量类型”：

is_a(Object,Parent), 

Answer 1

抱歉，我没有可用于测试的 Visual Prolog，所以我不太确定解决方案，但我认为问题在于您应该明确指出domains元素predicates是基​​本术语。所以我建议要么将它们设为小写，要么用连字符括起来，否则它们是变量：

domains
 type=symbol
 object=symbol
...

predicates
 is_a(type, parent) 
...

或者

domains
 'Type'=symbol
 'Object'=symbol
...

predicates
 is_a('Type', 'Parent') 
...

编辑

如果您有 SWI-Prolog 可用，只需从文件开头注释掉以domains包含。或在 SWISH 上查看此笔记本。

Answer 2

问题出在类型和变量上。我删除域并使用简单类型。

正确代码：

predicates
nondeterm is_a(symbol, symbol) 
nondeterm has_prop(symbol, symbol, symbol) 
nondeterm has_property(symbol, symbol, symbol) 
clauses
is_a(dog,wolf).
is_a(dingo,wolf).
is_a(wolf,volki).
is_a(coyote,volki).
is_a(jackal,volki).
is_a(volki,dogs).
is_a(fox,dogs).
is_a(arctic_fox,dogs).

has_prop(dogs, travel, walk). 
has_prop(dogs, food_for_child, milk).  
has_prop(volki, size, medium). 
has_prop(volki, color, brown). 
has_prop(arctic_fox, color, white). 
has_prop(arctic_fox, size, small). 
has_prop(fox, color, orange). 
has_prop(fox, size, small). 
has_prop(wolf, color, grey). 
has_prop(wolf, size, large). 
has_prop(dog, color, brown). 
has_prop(dog, size, small). 
has_prop(dingo, color, orange). 
has_prop(dingo, size, medium). 


has_property(O, Property, Value):-
has_prop(O, Property, Value). 
has_property(O, Property, Value):-
is_a(O,Parent), 
has_property(Parent, Property, Value).

goal
has_property(X,size,medium).