:: deftheorem Def8 defines the_rank_of CLASSES1:def 8 :
for x being object
for b2 being Ordinal holds
( b2 = the_rank_of x iff ( x in Rank (succ b2) & ( for B being Ordinal st x in Rank (succ B) holds
b2 c= B ) ) );