:: deftheorem Def4 defines max LEXBFS:def 5 :
for n being Ordinal
for T being connected TermOrder of n
for B being non empty finite Subset of (Bags n)
for b4 being bag of n holds
( b4 = max (B,T) iff ( b4 in B & ( for x being bag of n st x in B holds
x <= b4,T ) ) );