reserve n for non zero Element of NAT;
reserve a,b,r,t for Real;

theorem Th14:
  for X be non empty closed_interval Subset of REAL,
  Y be RealNormSpace holds (X --> 0.Y)
  = 0.R_NormSpace_of_ContinuousFunctions(X,Y)
proof
  let X be non empty closed_interval Subset of REAL,
      Y be RealNormSpace;
  (X --> 0.Y) =0.R_VectorSpace_of_ContinuousFunctions(X,Y) by Th12
  .=0.R_NormSpace_of_ContinuousFunctions(X,Y);
  hence thesis;
end;
