theorem Th51: :: WAYBEL23:51
for L being non empty reflexive transitive RelStr
for S being non empty full SubRelStr of L holds
( dom (supMap S) = Ids S & rng (supMap S) is Subset of L )