reserve E,F,G for RealNormSpace;
reserve f for Function of E,F;
reserve g for Function of F,G;
reserve a,b,c for Point of E;
reserve t for Real;

theorem Th6:
  for r being Element of REAL holds lim (NAT --> r) = r
  proof
    let r be Element of REAL;
    thus lim (NAT --> r) = (NAT --> r).0 by SEQ_4:26
    .= r;
  end;
