reserve n   for Nat,
        r,s for Real,
        x,y for Element of REAL n,
        p,q for Point of TOP-REAL n,
        e   for Point of Euclid n;

theorem Th6:
  for X being non empty set,f being Function st f = Seg n --> X holds
  f is non-empty n-element FinSequence
  proof
    let X be non empty set, f be Function;
    assume
A1: f = Seg n --> X;
    card f = card dom f by CARD_1:62;
    then card f = card Seg n by A1,FUNCOP_1:13;
    then card f = card n by FINSEQ_1:55;
    hence f is non-empty n-element FinSequence by A1,CARD_1:def 7;
  end;
