let K be Field; :: thesis: for n being Element of NAT
for A being Matrix of n,K
for i, j being Nat st 1 <= i & i <= n & 1 <= j & j <= n & i <> j holds
(SwapDiagonal K,n,1) * i,j = 0. K
let n be Element of NAT ; :: thesis: for A being Matrix of n,K
for i, j being Nat st 1 <= i & i <= n & 1 <= j & j <= n & i <> j holds
(SwapDiagonal K,n,1) * i,j = 0. K
let A be Matrix of n,K; :: thesis: for i, j being Nat st 1 <= i & i <= n & 1 <= j & j <= n & i <> j holds
(SwapDiagonal K,n,1) * i,j = 0. K
set A = SwapDiagonal K,n,1;
let i, j be Nat; :: thesis: ( 1 <= i & i <= n & 1 <= j & j <= n & i <> j implies (SwapDiagonal K,n,1) * i,j = 0. K )
assume
( 1 <= i & i <= n & 1 <= j & j <= n )
; :: thesis: ( not i <> j or (SwapDiagonal K,n,1) * i,j = 0. K )
then B2:
[i,j] in Indices (SwapDiagonal K,n,1)
by MATRIX_1:38;
C2:
SwapDiagonal K,n,1 = 1. K,n
by FINSEQ_7:21;
thus
( not i <> j or (SwapDiagonal K,n,1) * i,j = 0. K )
by B2, C2, MATRIX_1:def 12; :: thesis: verum