reserve T for TopSpace;
reserve T for non empty TopSpace;
reserve F for Subset-Family of T;
reserve T for non empty TopSpace;
reserve T for non empty TopSpace;
reserve T for non empty TopSpace;

theorem Th97:
  for X being Subset of Closed_Domains_Lattice T ex a being
  Element of Closed_Domains_Lattice T st X is_less_than a & for b being Element
  of Closed_Domains_Lattice T st X is_less_than b holds a [= b
proof
  let X be Subset of Closed_Domains_Lattice T;
  X c= the carrier of Closed_Domains_Lattice T;
  then
A1: X c= Closed_Domains_of T by Th93;
  then reconsider F = X as Subset-Family of T by TOPS_2:2;
  set A = Cl(union F);
A2: F is closed-domains-family by A1,Th71;
  then A is closed_condensed by Th75;
  then A in {C where C is Subset of T : C is closed_condensed};
  then
A3: A in Closed_Domains_of T by TDLAT_1:def 5;
  then reconsider a = A as Element of Closed_Domains_Lattice T by Th93;
A4: for b being Element of Closed_Domains_Lattice T st X is_less_than b
  holds a [= b
  proof
    let b be Element of Closed_Domains_Lattice T;
    reconsider B = b as Element of Closed_Domains_of T by Th93;
    assume
A5: X is_less_than b;
A6: for C being Subset of T st C in F holds C c= B
    proof
      let C be Subset of T;
      reconsider C1 = C as Subset of T;
      assume
A7:   C in F;
      then C1 is closed_condensed by A2;
      then C in {P where P is Subset of T : P is closed_condensed};
      then
A8:   C in Closed_Domains_of T by TDLAT_1:def 5;
      then reconsider c = C as Element of Closed_Domains_Lattice T by Th93;
      c [= b by A5,A7;
      hence thesis by A8,Th96;
    end;
    B in Closed_Domains_of T;
    then B in {C where C is Subset of T : C is closed_condensed} by
TDLAT_1:def 5;
    then ex C being Subset of T st C = B & C is closed_condensed;
    then A c= B by A6,Th76;
    hence thesis by A3,Th96;
  end;
  take a;
  X is_less_than a
  proof
    let b be Element of Closed_Domains_Lattice T;
    reconsider B = b as Element of Closed_Domains_of T by Th93;
    assume b in X;
    then B c= A by Th76;
    hence thesis by A3,Th96;
  end;
  hence thesis by A4;
end;
