theorem
  A` is Fo_open implies A is Fo_closed
proof
  assume A` is Fo_open;
  then
A1: (A`) = (A`)^Foi;
  (((A`)^Foi)`)` = (A^Fob)` by Th38;
  hence thesis by A1;
end;
