utilities on conj
This commit is contained in:
parent
242844d12f
commit
9b18f6aee4
@ -76,3 +76,8 @@ lists:delete([Head|List], Elem, [Head|Residue]) :-
|
||||
|
||||
:- '$set_yap_flags'(11,0). % disable source.
|
||||
|
||||
conjunctions:conj_member(X, (C1,C2)) :-
|
||||
conjunctions:conj_member(X, C1).
|
||||
conjunctions:conj_member(X, (C1,C2)) :-
|
||||
conjunctions:conj_member(X2, C1).
|
||||
conjunctions:conj_member(X, X).
|
||||
|
Reference in New Issue
Block a user