theorem
  L is upper-bounded & Top L in I implies I = (.L.> & I = the carrier of L
proof
  (.I.> = I by Th37;
  hence thesis by Th41;
end;
