reserve
  r,s,r0,s0,t for Real;

theorem Th13:
  for S being closed Subset of TOP-REAL 2 st S is bounded holds
  proj2.:S is closed
proof
  let S be closed Subset of TOP-REAL 2;
  assume S is bounded;
  then Cl(proj2.:S) = proj2.:Cl S by TOPREAL6:84
    .= proj2.:S by PRE_TOPC:22;
  hence thesis;
end;
