reserve x, y for set;

theorem Th16:
  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-CONT_category iff L is strict
  complete continuous
proof
  let W be with_non-empty_element set, L be LATTICE such that
A1: the carrier of L in W;
  hereby
    assume L is Object of W-CONT_category;
    then reconsider a = L as Object of W-CONT_category;
    L = latt a & a is Object of W-UPS_category by ALTCAT_2:29;
    hence L is strict complete continuous by A1,Def11,Th14;
  end;
  assume
A2: L is strict complete continuous;
  then reconsider a = L as Object of W-UPS_category by A1,Th14;
  latt a = L;
  hence thesis by A2,Def11;
end;
