enrich
set-union
with
functions
. to . : nat × nat → set(nat) prio 7 right;
variables
m : nat;
n : nat;
ns : set(nat);
axioms
range-def: n0 ∈ m to n ↔ m ≤ n0 ∧ n0 < n;
used for: s, ls;
end enrich