reserve X for non empty TopSpace;
reserve Y for non empty TopStruct;
reserve x for Point of Y;
reserve Y for non empty TopStruct;

theorem
  for Y being non empty TopSpace,
      x being Point of Y holds
    MaxADSet(x) c= meet {G where G is Subset of Y : G is open & x in G}
proof
  let Y be non empty TopSpace;
  let x be Point of Y;
  set F = {G where G is Subset of Y : G is open & x in G};
  [#]Y in F; then
A1:  F <> {};
  F c= bool the carrier of Y
  proof
    let C be object;
    assume C in F;
    then ex P being Subset of Y st C = P & P is open & x in P;
    hence thesis;
  end;
  then reconsider F as Subset-Family of Y;
  now
    let C be set;
    assume C in F;
    then ex G being Subset of Y st G = C & G is open & x in G;
    hence MaxADSet(x) c= C by Th24;
  end;
  hence thesis by SETFAM_1:5,A1;
end;
