let n be Nat; :: thesis: for K being Field
for a, b being Element of K
for l being Nat
for pK, qK being FinSequence of K
for perm being Element of Permutations n st l in Seg n & len pK = n & len qK = n holds
for M being Matrix of n,K holds (Path_product (RLine M,l,((a * pK) + (b * qK)))) . perm = (a * ((Path_product (RLine M,l,pK)) . perm)) + (b * ((Path_product (RLine M,l,qK)) . perm))

let K be Field; :: thesis: for a, b being Element of K
for l being Nat
for pK, qK being FinSequence of K
for perm being Element of Permutations n st l in Seg n & len pK = n & len qK = n holds
for M being Matrix of n,K holds (Path_product (RLine M,l,((a * pK) + (b * qK)))) . perm = (a * ((Path_product (RLine M,l,pK)) . perm)) + (b * ((Path_product (RLine M,l,qK)) . perm))

let a, b be Element of K; :: thesis: for l being Nat
for pK, qK being FinSequence of K
for perm being Element of Permutations n st l in Seg n & len pK = n & len qK = n holds
for M being Matrix of n,K holds (Path_product (RLine M,l,((a * pK) + (b * qK)))) . perm = (a * ((Path_product (RLine M,l,pK)) . perm)) + (b * ((Path_product (RLine M,l,qK)) . perm))

let l be Nat; :: thesis: for pK, qK being FinSequence of K
for perm being Element of Permutations n st l in Seg n & len pK = n & len qK = n holds
for M being Matrix of n,K holds (Path_product (RLine M,l,((a * pK) + (b * qK)))) . perm = (a * ((Path_product (RLine M,l,pK)) . perm)) + (b * ((Path_product (RLine M,l,qK)) . perm))

let pK, qK be FinSequence of K; :: thesis: for perm being Element of Permutations n st l in Seg n & len pK = n & len qK = n holds
for M being Matrix of n,K holds (Path_product (RLine M,l,((a * pK) + (b * qK)))) . perm = (a * ((Path_product (RLine M,l,pK)) . perm)) + (b * ((Path_product (RLine M,l,qK)) . perm))

let perm be Element of Permutations n; :: thesis: ( l in Seg n & len pK = n & len qK = n implies for M being Matrix of n,K holds (Path_product (RLine M,l,((a * pK) + (b * qK)))) . perm = (a * ((Path_product (RLine M,l,pK)) . perm)) + (b * ((Path_product (RLine M,l,qK)) . perm)) )
assume A1: ( l in Seg n & len pK = n & len qK = n ) ; :: thesis: for M being Matrix of n,K holds (Path_product (RLine M,l,((a * pK) + (b * qK)))) . perm = (a * ((Path_product (RLine M,l,pK)) . perm)) + (b * ((Path_product (RLine M,l,qK)) . perm))
let M be Matrix of n,K; :: thesis: (Path_product (RLine M,l,((a * pK) + (b * qK)))) . perm = (a * ((Path_product (RLine M,l,pK)) . perm)) + (b * ((Path_product (RLine M,l,qK)) . perm))
set mm = the multF of K;
set Rpq = RLine M,l,((a * pK) + (b * qK));
set Rp = RLine M,l,pK;
set Rq = RLine M,l,qK;
set Ppq = Path_matrix perm,(RLine M,l,((a * pK) + (b * qK)));
set Pathpq = Path_product (RLine M,l,((a * pK) + (b * qK)));
set Pp = Path_matrix perm,(RLine M,l,pK);
set Pathp = Path_product (RLine M,l,pK);
set Pq = Path_matrix perm,(RLine M,l,qK);
set Pathq = Path_product (RLine M,l,qK);
now
per cases ( perm is even or not perm is even ) ;
case perm is even ; :: thesis: (Path_product (RLine M,l,((a * pK) + (b * qK)))) . perm = (a * ((Path_product (RLine M,l,pK)) . perm)) + (b * ((Path_product (RLine M,l,qK)) . perm))
then ( the multF of K $$ (Path_matrix perm,(RLine M,l,pK)) = - (the multF of K $$ (Path_matrix perm,(RLine M,l,pK))),perm & the multF of K $$ (Path_matrix perm,(RLine M,l,qK)) = - (the multF of K $$ (Path_matrix perm,(RLine M,l,qK))),perm & the multF of K $$ (Path_matrix perm,(RLine M,l,((a * pK) + (b * qK)))) = - (the multF of K $$ (Path_matrix perm,(RLine M,l,((a * pK) + (b * qK))))),perm ) by MATRIX_2:def 16;
then ( (Path_product (RLine M,l,pK)) . perm = the multF of K $$ (Path_matrix perm,(RLine M,l,pK)) & (Path_product (RLine M,l,qK)) . perm = the multF of K $$ (Path_matrix perm,(RLine M,l,qK)) & (Path_product (RLine M,l,((a * pK) + (b * qK)))) . perm = the multF of K $$ (Path_matrix perm,(RLine M,l,((a * pK) + (b * qK)))) ) by MATRIX_3:def 8;
hence (Path_product (RLine M,l,((a * pK) + (b * qK)))) . perm = (a * ((Path_product (RLine M,l,pK)) . perm)) + (b * ((Path_product (RLine M,l,qK)) . perm)) by A1, Th31; :: thesis: verum
end;
case not perm is even ; :: thesis: (Path_product (RLine M,l,((a * pK) + (b * qK)))) . perm = (a * ((Path_product (RLine M,l,pK)) . perm)) + (b * ((Path_product (RLine M,l,qK)) . perm))
then ( - (the multF of K $$ (Path_matrix perm,(RLine M,l,pK))) = - (the multF of K $$ (Path_matrix perm,(RLine M,l,pK))),perm & - (the multF of K $$ (Path_matrix perm,(RLine M,l,qK))) = - (the multF of K $$ (Path_matrix perm,(RLine M,l,qK))),perm & - (the multF of K $$ (Path_matrix perm,(RLine M,l,((a * pK) + (b * qK))))) = - (the multF of K $$ (Path_matrix perm,(RLine M,l,((a * pK) + (b * qK))))),perm ) by MATRIX_2:def 16;
then A2: ( (Path_product (RLine M,l,pK)) . perm = - (the multF of K $$ (Path_matrix perm,(RLine M,l,pK))) & (Path_product (RLine M,l,qK)) . perm = - (the multF of K $$ (Path_matrix perm,(RLine M,l,qK))) & (Path_product (RLine M,l,((a * pK) + (b * qK)))) . perm = - (the multF of K $$ (Path_matrix perm,(RLine M,l,((a * pK) + (b * qK))))) & the multF of K $$ (Path_matrix perm,(RLine M,l,((a * pK) + (b * qK)))) = (a * (the multF of K $$ (Path_matrix perm,(RLine M,l,pK)))) + (b * (the multF of K $$ (Path_matrix perm,(RLine M,l,qK)))) ) by A1, Th31, MATRIX_3:def 8;
( - (a * (the multF of K $$ (Path_matrix perm,(RLine M,l,pK)))) = a * (- (the multF of K $$ (Path_matrix perm,(RLine M,l,pK)))) & - (b * (the multF of K $$ (Path_matrix perm,(RLine M,l,qK)))) = b * (- (the multF of K $$ (Path_matrix perm,(RLine M,l,qK)))) & - ((a * (the multF of K $$ (Path_matrix perm,(RLine M,l,pK)))) + (b * (the multF of K $$ (Path_matrix perm,(RLine M,l,qK))))) = (- (a * (the multF of K $$ (Path_matrix perm,(RLine M,l,pK))))) - (b * (the multF of K $$ (Path_matrix perm,(RLine M,l,qK)))) ) by VECTSP_1:40, VECTSP_1:64;
hence (Path_product (RLine M,l,((a * pK) + (b * qK)))) . perm = (a * ((Path_product (RLine M,l,pK)) . perm)) + (b * ((Path_product (RLine M,l,qK)) . perm)) by A2; :: thesis: verum
end;
end;
end;
hence (Path_product (RLine M,l,((a * pK) + (b * qK)))) . perm = (a * ((Path_product (RLine M,l,pK)) . perm)) + (b * ((Path_product (RLine M,l,qK)) . perm)) ; :: thesis: verum