theorem
  y = f.x implies
  (f is_continuous_at x iff
  (for V being Element of U_FMT y ex W being Element of U_FMT x st f.:W c= V))
    by Lm11,Lm25;
