
theorem Th12:
for m be non zero Nat, X be non-empty m-element FinSequence holds
 CarProd X is bijective
proof
    let m be non zero Nat, X be non-empty m-element FinSequence;
A1: len X = m by FINSEQ_3:153;
    SubFin(X,m) = X|m by MEASUR13:def 5; then
    SubFin(X,m) = X by A1,FINSEQ_1:58;
    hence thesis by Th11;
end;
