consider p being FinSequence of F1() such that
A4:
( dom p = Seg F2() & ( for k being Nat st k in Seg F2() holds
P1[k,p . k] ) )
from FINSEQ_1:sch 5(A1);
consider q being FinSequence of F1() such that
A5:
( dom q = Seg F2() & ( for k being Nat st k in Seg F2() holds
P2[k,q . k] ) )
from FINSEQ_1:sch 5(A2);
consider r being FinSequence of F1() such that
A6:
( dom r = Seg F2() & ( for k being Nat st k in Seg F2() holds
P3[k,r . k] ) )
from FINSEQ_1:sch 5(A3);
take
p
; ex q, r being FinSequence of F1() st
( dom p = Seg F2() & dom q = Seg F2() & dom r = Seg F2() & ( for k being Nat st k in Seg F2() holds
( P1[k,p . k] & ( for k being Nat st k in Seg F2() holds
( P2[k,q . k] & ( for k being Nat st k in Seg F2() holds
P3[k,r . k] ) ) ) ) ) )
take
q
; ex r being FinSequence of F1() st
( dom p = Seg F2() & dom q = Seg F2() & dom r = Seg F2() & ( for k being Nat st k in Seg F2() holds
( P1[k,p . k] & ( for k being Nat st k in Seg F2() holds
( P2[k,q . k] & ( for k being Nat st k in Seg F2() holds
P3[k,r . k] ) ) ) ) ) )
take
r
; ( dom p = Seg F2() & dom q = Seg F2() & dom r = Seg F2() & ( for k being Nat st k in Seg F2() holds
( P1[k,p . k] & ( for k being Nat st k in Seg F2() holds
( P2[k,q . k] & ( for k being Nat st k in Seg F2() holds
P3[k,r . k] ) ) ) ) ) )
thus
( dom p = Seg F2() & dom q = Seg F2() & dom r = Seg F2() & ( for k being Nat st k in Seg F2() holds
( P1[k,p . k] & ( for k being Nat st k in Seg F2() holds
( P2[k,q . k] & ( for k being Nat st k in Seg F2() holds
P3[k,r . k] ) ) ) ) ) )
by A4, A5, A6; verum