let n be Nat; :: thesis: for K being Field
for i being Nat
for M being Matrix of n,K st i in Seg n holds
Det M = Sum (LaplaceExpL M,i)
let K be Field; :: thesis: for i being Nat
for M being Matrix of n,K st i in Seg n holds
Det M = Sum (LaplaceExpL M,i)
let i be Nat; :: thesis: for M being Matrix of n,K st i in Seg n holds
Det M = Sum (LaplaceExpL M,i)
let M be Matrix of n,K; :: thesis: ( i in Seg n implies Det M = Sum (LaplaceExpL M,i) )
assume A1:
i in Seg n
; :: thesis: Det M = Sum (LaplaceExpL M,i)
reconsider N = n as Element of NAT by ORDINAL1:def 13;
reconsider X = finSeg N as non empty set by A1;
set P = Permutations n;
set Path = Path_product M;
set KK = the carrier of K;
set aa = the addF of K;
deffunc H1( Element of Fin (Permutations n)) -> Element of the carrier of K = the addF of K $$ $1,(Path_product M);
consider g being Function of (Fin (Permutations n)),the carrier of K such that
A2:
for x being Element of Fin (Permutations n) holds g . x = H1(x)
from FUNCT_2:sch 4();
deffunc H2( set ) -> set = { p where p is Element of Permutations n : p . i = $1 } ;
consider f being Function such that
A3:
( dom f = X & ( for x being set st x in X holds
f . x = H2(x) ) )
from FUNCT_1:sch 3();
rng f c= Fin (Permutations n)
then reconsider f = f as Function of X,(Fin (Permutations n)) by A3, FUNCT_2:4;
set gf = g * f;
reconsider X' = X as Element of Fin X by FINSUB_1:def 5;
A9:
for A, B being Element of Fin (Permutations n) st A misses B holds
the addF of K . (g . A),(g . B) = g . (A \/ B)
A11:
union (f .: X) c= Permutations n
Permutations n c= union (f .: X)
then A15:
Permutations n = union (f .: X)
by A11, XBOOLE_0:def 10;
set L = LaplaceExpL M,i;
set Laa = [#] (LaplaceExpL M,i),(the_unity_wrt the addF of K);
len (LaplaceExpL M,i) = n
by Def7;
then A16:
( dom (LaplaceExpL M,i) = Seg n & dom (g * f) = X )
by FINSEQ_1:def 3, FUNCT_2:def 1;
then A17:
( dom (id X) = dom (LaplaceExpL M,i) & rng (id X) = X' & ([#] (LaplaceExpL M,i),(the_unity_wrt the addF of K)) | (dom (LaplaceExpL M,i)) = LaplaceExpL M,i & (g * f) * (id X) = g * f )
by RELAT_1:71, RELAT_1:78, SETWOP_2:23;
now let x be
set ;
:: thesis: ( x in dom (g * f) implies (LaplaceExpL M,i) . x = (g * f) . x )assume A18:
x in dom (g * f)
;
:: thesis: (LaplaceExpL M,i) . x = (g * f) . xconsider k being
Element of
NAT such that A19:
(
k = x & 1
<= k &
k <= n )
by A16, A18;
(
f . k in rng f &
rng f c= Fin (Permutations n) )
by A3, A18, A19, FUNCT_1:def 5, RELAT_1:def 19;
then reconsider Fk =
H2(
k) as
Element of
Fin (Permutations n) by A3, A18, A19;
(
(g * f) . k = g . (f . k) &
f . k = Fk )
by A3, A18, A19, FUNCT_1:23;
then
(
(g * f) . k = H1(
Fk) &
H1(
Fk)
= (M * i,k) * (Cofactor M,i,k) )
by A1, A2, A18, A19, Th23;
hence
(LaplaceExpL M,i) . x = (g * f) . x
by A16, A18, A19, Def7;
:: thesis: verum end;
then A20:
LaplaceExpL M,i = g * f
by A16, FUNCT_1:9;
A21:
( the addF of K is having_a_unity & g . ({}. (Fin (Permutations n))) = the addF of K $$ ({}. (Permutations n)),(Path_product M) & Permutations n is finite )
by A2, FVSUM_1:10, MATRIX_2:30;
then
( g . {} = the_unity_wrt the addF of K & the addF of K is having_a_unity & FinOmega (Permutations n) = Permutations n )
by MATRIX_2:def 17, SETWISEO:40;
then
( the addF of K $$ X',(g * f) = the addF of K $$ (f .: X'),g & FinOmega X = X & the addF of K $$ (f .: X'),g = g . (FinOmega (Permutations n)) & g . (FinOmega (Permutations n)) = Det M )
by A2, A6, A9, A15, Th12, MATRIX_2:def 17;
hence Det M =
the addF of K $$ (findom (LaplaceExpL M,i)),([#] (LaplaceExpL M,i),(the_unity_wrt the addF of K))
by A17, A20, SETWOP_2:7
.=
Sum (LaplaceExpL M,i)
by A21, SETWOP_2:def 2
;
:: thesis: verum