1predicate fzn_disjunctive(array[int] of var int: s, 2 array[int] of var int: d) = 3 forall (i in index_set(d)) (d[i] >= 0) /\ 4 forall (i,j in index_set(d) where i<j) ( 5 d[i]=0 \/ d[j]=0 \/ s[i]+d[i] <= s[j] \/ s[j]+d[j] <= s[i] 6 );