ordinal: DEFINITION of < and le to replace : and <= on ordinals! Many
changes
epsilon,arith: many changes
ordinal/succ_mem_succI/E: deleted; use succ_leI/E
nat/nat_0_in_succ: deleted; use nat_0_le
univ/Vset_rankI: deleted; use VsetI
FOLP = IFOLP +
consts
cla :: "[p=>p]=>p"
rules
classical "(!!x.x:~P ==> f(x):P) ==> cla(f):P"
end