reserve k,n,m,l,p for Nat;
reserve n0,m0 for non zero Nat;
reserve f for FinSequence;
reserve x,X,Y for set;
reserve f1,f2,f3 for FinSequence of REAL;

theorem Th13:
  for f being FinSequence of NAT holds f is FinSequence of REAL
proof
  let f be FinSequence of NAT;
  for n being Nat st n in dom f holds f.n in REAL by XREAL_0:def 1;
  hence thesis by FINSEQ_2:12;
end;
