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 Th102:
  the carrier of Open_Domains_Lattice T = Open_Domains_of T
proof
  Open_Domains_Lattice T = LattStr(#Open_Domains_of T,OPD-Union T,OPD-Meet
    T#) by TDLAT_1:def 12;
  hence thesis;
end;
