Step
*
1
2
1
1
2
2
1
2
1
of Lemma
det-kI+J
.....assertion..... 
1. r : CRng
2. n : ℤ
3. 0 < n
4. a : |r|
5. ¬(n = 1 ∈ ℤ)
6. |matrix(if x=y then if x=n - 1 then 1 else a else 0)|
= |matrix(if x=n - 1 then 1 else if x=n - 1 then if y=n - 1 then a else 0 else a*I + J[x,y])|
∈ |r|
⊢ |matrix(if x=y then if x=n - 1 then 1 else a else 0)| = (a ↑r (n - 1)) ∈ |r|
BY
{ (Fold `diagonal-matrix` 0 THEN (RWO "det-diagonal" 0 THENA Auto)) }
1
1. r : CRng
2. n : ℤ
3. 0 < n
4. a : |r|
5. ¬(n = 1 ∈ ℤ)
6. |matrix(if x=y then if x=n - 1 then 1 else a else 0)|
= |matrix(if x=n - 1 then 1 else if x=n - 1 then if y=n - 1 then a else 0 else a*I + J[x,y])|
∈ |r|
⊢ (Π(r) 0 ≤ x < n. if x=n - 1 then 1 else a) = (a ↑r (n - 1)) ∈ |r|
Latex:
Latex:
.....assertion..... 
1.  r  :  CRng
2.  n  :  \mBbbZ{}
3.  0  <  n
4.  a  :  |r|
5.  \mneg{}(n  =  1)
6.  |matrix(if  x=y  then  if  x=n  -  1  then  1  else  a  else  0)|
=  |matrix(if  x=n  -  1  then  1  else  if  x=n  -  1  then  if  y=n  -  1  then  a  else  0  else  a*I  +  J[x,y])|
\mvdash{}  |matrix(if  x=y  then  if  x=n  -  1  then  1  else  a  else  0)|  =  (a  \muparrow{}r  (n  -  1))
By
Latex:
(Fold  `diagonal-matrix`  0  THEN  (RWO  "det-diagonal"  0  THENA  Auto))
Home
Index