reserve T for 1-sorted;
reserve T for TopSpace;

theorem Th4:
  for A being Subset of T holds Int A c= Int Cl Int A
proof
  let A be Subset of T;
  Int Int A c= Int Cl Int A by PRE_TOPC:18,TOPS_1:19;
  hence thesis;
end;
