theorem Th31:
  for RS be RealLinearSpace,
      f be FinSequence of RS holds
    rng f c= Z_Lin(f)
proof
  let RS be RealLinearSpace, f be FinSequence of RS;
  let y be object;
    assume y in rng f; then
    consider x be object such that
A1: x in dom f & y=f.x by FUNCT_1:def 3;
A2: x in Seg len f by A1,FINSEQ_1:def 3;
    reconsider i=x as Nat by A1;
    y=f/.i by A1,PARTFUN1:def 6;
    hence y in Z_Lin(f) by A2,Th30;
end;
