theorem Th14: :: YELLOW21:14
for W being with_non-empty_element set
for L being LATTICE st the carrier of L in W holds
( L is Object of (W -UPS_category) iff ( L is strict & L is complete ) )