do not create attributed variables for ground tuples
This commit is contained in:
@@ -4369,9 +4369,11 @@ tuple_domain([T|Ts], Relation0) -->
|
|||||||
tuple_domain(Ts, Relation1).
|
tuple_domain(Ts, Relation1).
|
||||||
|
|
||||||
tuple_freeze(Tuple, Relation) :-
|
tuple_freeze(Tuple, Relation) :-
|
||||||
put_attr(R, clpz_relation, Relation),
|
( ground(Tuple) -> true
|
||||||
make_propagator(rel_tuple(R, Tuple), Prop),
|
; put_attr(R, clpz_relation, Relation),
|
||||||
tuple_freeze_(Tuple, Prop).
|
make_propagator(rel_tuple(R, Tuple), Prop),
|
||||||
|
tuple_freeze_(Tuple, Prop)
|
||||||
|
).
|
||||||
|
|
||||||
tuple_freeze_([], _).
|
tuple_freeze_([], _).
|
||||||
tuple_freeze_([T|Ts], Prop) :-
|
tuple_freeze_([T|Ts], Prop) :-
|
||||||
|
|||||||
Reference in New Issue
Block a user