:: deftheorem Def3 defines ClosureSystems WAYBEL10:def 3 :
for L being non empty RelStr
for b2 being non empty strict full SubRelStr of Sub L holds
( b2 = ClosureSystems L iff for R being strict SubRelStr of L holds
( R is Element of b2 iff ( R is infs-inheriting & R is full ) ) );