Js *_*Lim 1 input prolog rule fact prolog-assert
我想接受用户的输入,即[garfield, hates, blacky].
hates/2当前不存在。
在我的数据库中,
process:-
read(Input_List),
add_rule(Input_List).
add_rule([X, Predicate, Y]):-
assertz(Predicate(X, Y)).
Run Code Online (Sandbox Code Playgroud)
但这不起作用。是否可以使用变量作为谓词和事实?或者有没有其他方法可以实现这一目标?
您可以使用(=..)/2名为univ operator 的运算符:
add_rule(X, Predicate, Y) :-
Fact =.. [Predicate, X, Y],
assertz(Fact).
Run Code Online (Sandbox Code Playgroud)
用法 :
?- add_rule(garfield, hates, blacky).
true.
?- hates(garfield, blacky).
true.
Run Code Online (Sandbox Code Playgroud)