enrich
tord
with
functions
min : Tord × Tord → Tord;
max : Tord × Tord → Tord;
variables
a : Tord;
b : Tord;
axioms
min-def: min(a, b) = (a < b ⊃ a;b);
used for: ls;
max-def: max(a, b) = (b < a ⊃ a;b);
used for: ls;
end enrich