HOL/equalities: added some identities from ZF/equalities
HOL/equalities/constant_UN: renamed UN1_constant
HOL/equalities/Union_Un_distrib: deleted duplicate!
HOL/equalities/Union_Int_subset: new
Ord = HOL +
classes
ord < term
consts
"<", "<=" :: "['a::ord, 'a] => bool" (infixl 50)
mono :: "['a::ord => 'b::ord] => bool" (*monotonicity*)
min,max :: "['a::ord,'a] => 'a"
rules
mono_def "mono(f) == (!A B. A <= B --> f(A) <= f(B))"
min_def "min(a,b) == if(a <= b, a, b)"
max_def "max(a,b) == if(a <= b, b, a)"
end