Add Intersect predicate

This commit is contained in:
Folkert Kevelam 2025-09-12 17:19:21 +02:00
parent c6df4d3b6a
commit c495c3384c
2 changed files with 10 additions and 1 deletions

View File

@ -1,4 +1,5 @@
type Set type Set
predicate SubSet(Set s1, Set s2) predicate SubSet(Set s1, Set s2)
predicate Disjoint(Set s1, Set s2) symmetric predicate Disjoint(Set s1, Set s2)
symmetric predicate Intersect(Set s1, Set s2)

View File

@ -21,6 +21,14 @@ where SubSet(x, y) {
layer x.icon above y.icon layer x.icon above y.icon
} }
forall Set x; Set y
where Intersect(x,y) {
ensure disjoint(x.text, y.icon, 5.0)
ensure disjoint(y.text, x.icon, 5.0)
ensure overlapping(x.icon, y.icon, 5.0)
layer x.icon above y.icon
}
forall Set x; Set y forall Set x; Set y
where Disjoint(x, y) { where Disjoint(x, y) {
ensure disjoint(x.icon, y.icon) ensure disjoint(x.icon, y.icon)