rishi/scryer-prolog
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

remove unification from dif/2

Browse Source
This commit is contained in:
Mark Thom
2019-03-03 18:14:05 -07:00
parent f35008cbd6
commit f458d12676
1 changed files with 1 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

3
src/prolog/lib/dif.pl
View File

@@ -37,8 +37,7 @@ verify_attributes(Var, Value, Goals) :-
% suggestions for improvement. % suggestions for improvement.
dif(X, Y) :- X \== Y, dif(X, Y) :- X \== Y,
( X \= Y -> true ( term_variables(X, XVars), term_variables(Y, YVars),
; term_variables(X, XVars), term_variables(Y, YVars),
dif_set_variables(XVars, X, Y), dif_set_variables(XVars, X, Y),
dif_set_variables(YVars, X, Y) dif_set_variables(YVars, X, Y)
). ).