reconsider S = Seg (F1() + 1) as non empty set by FINSEQ_1:4;
consider z being FinSequence of F2() such that
A1: len z = F1() + 1 and
A2: for j being Nat st j in dom z holds
z . j = F3(j) from FINSEQ_2:sch 1();
take z ; :: thesis: ( len z = F1() + 1 & ( for j being Nat of F1() holds z . j = F3(j) ) )
A3: dom z = Seg (F1() + 1) by A1, FINSEQ_1:def 3;
for j being Nat of F1() holds z . j = F3(j)
proof
let j be Nat of F1(); :: thesis: z . j = F3(j)
j in S by Th8;
hence z . j = F3(j) by A2, A3; :: thesis: verum
end;
hence ( len z = F1() + 1 & ( for j being Nat of F1() holds z . j = F3(j) ) ) by A1; :: thesis: verum