let n be Nat; for K being commutative Ring
for P being FinSequence of (Group_of_Perm (n + 2))
for p2 being Element of Permutations (n + 2) st p2 = Product P & ( for i being Nat st i in dom P holds
ex trans being Element of Permutations (n + 2) st
( P . i = trans & trans is being_transposition ) ) holds
( ( (len P) mod 2 = 0 implies sgn (p2,K) = 1_ K ) & ( (len P) mod 2 = 1 implies sgn (p2,K) = - (1_ K) ) )
let K be commutative Ring; for P being FinSequence of (Group_of_Perm (n + 2))
for p2 being Element of Permutations (n + 2) st p2 = Product P & ( for i being Nat st i in dom P holds
ex trans being Element of Permutations (n + 2) st
( P . i = trans & trans is being_transposition ) ) holds
( ( (len P) mod 2 = 0 implies sgn (p2,K) = 1_ K ) & ( (len P) mod 2 = 1 implies sgn (p2,K) = - (1_ K) ) )
set n2 = n + 2;
set G = Group_of_Perm (n + 2);
defpred S1[ Nat] means for P being FinSequence of (Group_of_Perm (n + 2))
for p2 being Element of Permutations (n + 2) st p2 = Product P & len P = $1 & ( for i being Nat st i in dom P holds
ex trans being Element of Permutations (n + 2) st
( P . i = trans & trans is being_transposition ) ) holds
( ( (len P) mod 2 = 0 implies sgn (p2,K) = 1_ K ) & ( (len P) mod 2 = 1 implies sgn (p2,K) = - (1_ K) ) );
A1:
for k being Nat st S1[k] holds
S1[k + 1]
proof
let k be
Nat;
( S1[k] implies S1[k + 1] )
assume A2:
S1[
k]
;
S1[k + 1]
set k1 =
k + 1;
let P be
FinSequence of
(Group_of_Perm (n + 2));
for p2 being Element of Permutations (n + 2) st p2 = Product P & len P = k + 1 & ( for i being Nat st i in dom P holds
ex trans being Element of Permutations (n + 2) st
( P . i = trans & trans is being_transposition ) ) holds
( ( (len P) mod 2 = 0 implies sgn (p2,K) = 1_ K ) & ( (len P) mod 2 = 1 implies sgn (p2,K) = - (1_ K) ) )let p2 be
Element of
Permutations (n + 2);
( p2 = Product P & len P = k + 1 & ( for i being Nat st i in dom P holds
ex trans being Element of Permutations (n + 2) st
( P . i = trans & trans is being_transposition ) ) implies ( ( (len P) mod 2 = 0 implies sgn (p2,K) = 1_ K ) & ( (len P) mod 2 = 1 implies sgn (p2,K) = - (1_ K) ) ) )
assume that A3:
p2 = Product P
and A4:
len P = k + 1
and A5:
for
i being
Nat st
i in dom P holds
ex
trans being
Element of
Permutations (n + 2) st
(
P . i = trans &
trans is
being_transposition )
;
( ( (len P) mod 2 = 0 implies sgn (p2,K) = 1_ K ) & ( (len P) mod 2 = 1 implies sgn (p2,K) = - (1_ K) ) )
consider x being
object ,
Q being
FinSequence such that A6:
P = <*x*> ^ Q
and A7:
len P = (len Q) + 1
by A4, RELAT_1:38, REWRITE1:5;
reconsider X =
<*x*>,
Q =
Q as
FinSequence of
(Group_of_Perm (n + 2)) by A6, FINSEQ_1:36;
A8:
for
i being
Nat st
i in dom Q holds
ex
trans being
Element of
Permutations (n + 2) st
(
Q . i = trans &
trans is
being_transposition )
1
+ 0 <= k + 1
by XREAL_1:7;
then
1
in Seg (k + 1)
;
then A10:
1
in dom P
by A4, FINSEQ_1:def 3;
P . 1
= x
by A6, FINSEQ_1:41;
then consider tr being
Element of
Permutations (n + 2) such that A11:
x = tr
and A12:
tr is
being_transposition
by A5, A10;
reconsider PQ =
Product Q as
Element of
Permutations (n + 2) by MATRIX_1:def 13;
reconsider Tr =
tr as
Element of
(Group_of_Perm (n + 2)) by MATRIX_1:def 13;
A13:
p2 =
Tr * (Product Q)
by A3, A6, A11, GROUP_4:7
.=
PQ * tr
by MATRIX_1:def 13
;
then A14:
sgn (
p2,
K)
= - (sgn (PQ,K))
by A12, Th13;
now ( ( (len P) mod 2 = 0 implies sgn (p2,K) = 1_ K ) & ( (len P) mod 2 = 1 implies sgn (p2,K) = - (1_ K) ) )per cases
( (len Q) mod 2 = 0 or (len Q) mod 2 = 1 )
by NAT_D:12;
suppose A15:
(len Q) mod 2
= 0
;
( ( (len P) mod 2 = 0 implies sgn (p2,K) = 1_ K ) & ( (len P) mod 2 = 1 implies sgn (p2,K) = - (1_ K) ) )
0 < 2
- 1
;
then A16:
(len P) mod 2
= 0 + 1
by A7, A15, NAT_D:70;
sgn (
PQ,
K)
= 1_ K
by A2, A4, A7, A8, A15;
hence
( (
(len P) mod 2
= 0 implies
sgn (
p2,
K)
= 1_ K ) & (
(len P) mod 2
= 1 implies
sgn (
p2,
K)
= - (1_ K) ) )
by A12, A13, A16, Th13;
verum end; suppose A17:
(len Q) mod 2
= 1
;
( ( (len P) mod 2 = 0 implies sgn (p2,K) = 1_ K ) & ( (len P) mod 2 = 1 implies sgn (p2,K) = - (1_ K) ) )A18:
2
- 1
= 1
;
sgn (
PQ,
K)
= - (1_ K)
by A2, A4, A7, A8, A17;
hence
( (
(len P) mod 2
= 0 implies
sgn (
p2,
K)
= 1_ K ) & (
(len P) mod 2
= 1 implies
sgn (
p2,
K)
= - (1_ K) ) )
by A7, A14, A17, A18, NAT_D:69, RLVECT_1:17;
verum end; end; end;
hence
( (
(len P) mod 2
= 0 implies
sgn (
p2,
K)
= 1_ K ) & (
(len P) mod 2
= 1 implies
sgn (
p2,
K)
= - (1_ K) ) )
;
verum
end;
A19:
S1[ 0 ]
proof
let P be
FinSequence of
(Group_of_Perm (n + 2));
for p2 being Element of Permutations (n + 2) st p2 = Product P & len P = 0 & ( for i being Nat st i in dom P holds
ex trans being Element of Permutations (n + 2) st
( P . i = trans & trans is being_transposition ) ) holds
( ( (len P) mod 2 = 0 implies sgn (p2,K) = 1_ K ) & ( (len P) mod 2 = 1 implies sgn (p2,K) = - (1_ K) ) )let p2 be
Element of
Permutations (n + 2);
( p2 = Product P & len P = 0 & ( for i being Nat st i in dom P holds
ex trans being Element of Permutations (n + 2) st
( P . i = trans & trans is being_transposition ) ) implies ( ( (len P) mod 2 = 0 implies sgn (p2,K) = 1_ K ) & ( (len P) mod 2 = 1 implies sgn (p2,K) = - (1_ K) ) ) )
assume that A20:
p2 = Product P
and A21:
len P = 0
and
for
i being
Nat st
i in dom P holds
ex
trans being
Element of
Permutations (n + 2) st
(
P . i = trans &
trans is
being_transposition )
;
( ( (len P) mod 2 = 0 implies sgn (p2,K) = 1_ K ) & ( (len P) mod 2 = 1 implies sgn (p2,K) = - (1_ K) ) )
P = <*> the
carrier of
(Group_of_Perm (n + 2))
by A21;
then
Product P = 1_ (Group_of_Perm (n + 2))
by GROUP_4:8;
then
Product P = idseq (n + 2)
by MATRIX_1:15;
hence
( (
(len P) mod 2
= 0 implies
sgn (
p2,
K)
= 1_ K ) & (
(len P) mod 2
= 1 implies
sgn (
p2,
K)
= - (1_ K) ) )
by A20, A21, Th12, NAT_D:26;
verum
end;
for k being Nat holds S1[k]
from NAT_1:sch 2(A19, A1);
hence
for P being FinSequence of (Group_of_Perm (n + 2))
for p2 being Element of Permutations (n + 2) st p2 = Product P & ( for i being Nat st i in dom P holds
ex trans being Element of Permutations (n + 2) st
( P . i = trans & trans is being_transposition ) ) holds
( ( (len P) mod 2 = 0 implies sgn (p2,K) = 1_ K ) & ( (len P) mod 2 = 1 implies sgn (p2,K) = - (1_ K) ) )
; verum