remove unification from dif/2

2019-03-03 18:14:05 -07:00
parent f35008cbd6
commit f458d12676
1 changed files with 1 additions and 2 deletions
--- a/src/prolog/lib/dif.pl
+++ b/src/prolog/lib/dif.pl
@@ -37,8 +37,7 @@ verify_attributes(Var, Value, Goals) :-
 % suggestions for improvement.

 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(YVars, X, Y)
 	     ).