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