reserve T for non empty TopSpace,
  A, B for Subset of T,
  F, G for Subset-Family of T,
  x for set;

theorem
  for A being Subset of R^1 st A = IRRAT holds A` = RAT by Lm2,TOPMETR:17;
