let K be Field; :: thesis: for a, b being Element of K
for p, q being FinSequence of K st p is first-line-of-circulant & q is first-line-of-circulant & len p = len q holds
(a * (LCirc p)) + (b * (LCirc q)) = LCirc ((a * p) + (b * q))
let a, b be Element of K; :: thesis: for p, q being FinSequence of K st p is first-line-of-circulant & q is first-line-of-circulant & len p = len q holds
(a * (LCirc p)) + (b * (LCirc q)) = LCirc ((a * p) + (b * q))
let p, q be FinSequence of K; :: thesis: ( p is first-line-of-circulant & q is first-line-of-circulant & len p = len q implies (a * (LCirc p)) + (b * (LCirc q)) = LCirc ((a * p) + (b * q)) )
set n = len p;
assume that
A1: p is first-line-of-circulant and
A2: q is first-line-of-circulant and
A3: len p = len q ; :: thesis: (a * (LCirc p)) + (b * (LCirc q)) = LCirc ((a * p) + (b * q))
A4: ( a * p is first-line-of-circulant & b * q is first-line-of-circulant ) by A1, A2, Th41;
A5: len (b * q) = len p by A3, MATRIXR1:16;
(a * (LCirc p)) + (b * (LCirc q)) = (LCirc (a * p)) + (b * (LCirc q)) by A1, Th42
.= (LCirc (a * p)) + (LCirc (b * q)) by A2, Th42
.= LCirc ((a * p) + (b * q)) by A4, A5, Th34, MATRIXR1:16 ;
hence (a * (LCirc p)) + (b * (LCirc q)) = LCirc ((a * p) + (b * q)) ; :: thesis: verum