Proof of Theorem gsummatr01lem3
Step | Hyp | Ref
| Expression |
1 | | eqid 2610 |
. 2
⊢
(Base‘𝐺) =
(Base‘𝐺) |
2 | | eqid 2610 |
. 2
⊢
(+g‘𝐺) = (+g‘𝐺) |
3 | | simpl 472 |
. . 3
⊢ ((𝐺 ∈ CMnd ∧ 𝑁 ∈ Fin) → 𝐺 ∈ CMnd) |
4 | 3 | 3ad2ant1 1075 |
. 2
⊢ (((𝐺 ∈ CMnd ∧ 𝑁 ∈ Fin) ∧
(∀𝑖 ∈ 𝑁 ∀𝑗 ∈ 𝑁 (𝑖𝐴𝑗) ∈ 𝑆 ∧ 𝐵 ∈ 𝑆) ∧ (𝐾 ∈ 𝑁 ∧ 𝐿 ∈ 𝑁 ∧ 𝑄 ∈ 𝑅)) → 𝐺 ∈ CMnd) |
5 | | diffi 8077 |
. . . 4
⊢ (𝑁 ∈ Fin → (𝑁 ∖ {𝐾}) ∈ Fin) |
6 | 5 | adantl 481 |
. . 3
⊢ ((𝐺 ∈ CMnd ∧ 𝑁 ∈ Fin) → (𝑁 ∖ {𝐾}) ∈ Fin) |
7 | 6 | 3ad2ant1 1075 |
. 2
⊢ (((𝐺 ∈ CMnd ∧ 𝑁 ∈ Fin) ∧
(∀𝑖 ∈ 𝑁 ∀𝑗 ∈ 𝑁 (𝑖𝐴𝑗) ∈ 𝑆 ∧ 𝐵 ∈ 𝑆) ∧ (𝐾 ∈ 𝑁 ∧ 𝐿 ∈ 𝑁 ∧ 𝑄 ∈ 𝑅)) → (𝑁 ∖ {𝐾}) ∈ Fin) |
8 | | eqidd 2611 |
. . . . 5
⊢ (((𝐾 ∈ 𝑁 ∧ 𝐿 ∈ 𝑁 ∧ 𝑄 ∈ 𝑅) ∧ 𝑛 ∈ (𝑁 ∖ {𝐾})) → (𝑖 ∈ 𝑁, 𝑗 ∈ 𝑁 ↦ if(𝑖 = 𝐾, if(𝑗 = 𝐿, 0 , 𝐵), (𝑖𝐴𝑗))) = (𝑖 ∈ 𝑁, 𝑗 ∈ 𝑁 ↦ if(𝑖 = 𝐾, if(𝑗 = 𝐿, 0 , 𝐵), (𝑖𝐴𝑗)))) |
9 | | eqeq1 2614 |
. . . . . . . 8
⊢ (𝑖 = 𝑛 → (𝑖 = 𝐾 ↔ 𝑛 = 𝐾)) |
10 | 9 | adantr 480 |
. . . . . . 7
⊢ ((𝑖 = 𝑛 ∧ 𝑗 = (𝑄‘𝑛)) → (𝑖 = 𝐾 ↔ 𝑛 = 𝐾)) |
11 | | eqeq1 2614 |
. . . . . . . . 9
⊢ (𝑗 = (𝑄‘𝑛) → (𝑗 = 𝐿 ↔ (𝑄‘𝑛) = 𝐿)) |
12 | 11 | ifbid 4058 |
. . . . . . . 8
⊢ (𝑗 = (𝑄‘𝑛) → if(𝑗 = 𝐿, 0 , 𝐵) = if((𝑄‘𝑛) = 𝐿, 0 , 𝐵)) |
13 | 12 | adantl 481 |
. . . . . . 7
⊢ ((𝑖 = 𝑛 ∧ 𝑗 = (𝑄‘𝑛)) → if(𝑗 = 𝐿, 0 , 𝐵) = if((𝑄‘𝑛) = 𝐿, 0 , 𝐵)) |
14 | | oveq12 6558 |
. . . . . . 7
⊢ ((𝑖 = 𝑛 ∧ 𝑗 = (𝑄‘𝑛)) → (𝑖𝐴𝑗) = (𝑛𝐴(𝑄‘𝑛))) |
15 | 10, 13, 14 | ifbieq12d 4063 |
. . . . . 6
⊢ ((𝑖 = 𝑛 ∧ 𝑗 = (𝑄‘𝑛)) → if(𝑖 = 𝐾, if(𝑗 = 𝐿, 0 , 𝐵), (𝑖𝐴𝑗)) = if(𝑛 = 𝐾, if((𝑄‘𝑛) = 𝐿, 0 , 𝐵), (𝑛𝐴(𝑄‘𝑛)))) |
16 | | eldifsni 4261 |
. . . . . . . . 9
⊢ (𝑛 ∈ (𝑁 ∖ {𝐾}) → 𝑛 ≠ 𝐾) |
17 | 16 | neneqd 2787 |
. . . . . . . 8
⊢ (𝑛 ∈ (𝑁 ∖ {𝐾}) → ¬ 𝑛 = 𝐾) |
18 | 17 | iffalsed 4047 |
. . . . . . 7
⊢ (𝑛 ∈ (𝑁 ∖ {𝐾}) → if(𝑛 = 𝐾, if((𝑄‘𝑛) = 𝐿, 0 , 𝐵), (𝑛𝐴(𝑄‘𝑛))) = (𝑛𝐴(𝑄‘𝑛))) |
19 | 18 | adantl 481 |
. . . . . 6
⊢ (((𝐾 ∈ 𝑁 ∧ 𝐿 ∈ 𝑁 ∧ 𝑄 ∈ 𝑅) ∧ 𝑛 ∈ (𝑁 ∖ {𝐾})) → if(𝑛 = 𝐾, if((𝑄‘𝑛) = 𝐿, 0 , 𝐵), (𝑛𝐴(𝑄‘𝑛))) = (𝑛𝐴(𝑄‘𝑛))) |
20 | 15, 19 | sylan9eqr 2666 |
. . . . 5
⊢ ((((𝐾 ∈ 𝑁 ∧ 𝐿 ∈ 𝑁 ∧ 𝑄 ∈ 𝑅) ∧ 𝑛 ∈ (𝑁 ∖ {𝐾})) ∧ (𝑖 = 𝑛 ∧ 𝑗 = (𝑄‘𝑛))) → if(𝑖 = 𝐾, if(𝑗 = 𝐿, 0 , 𝐵), (𝑖𝐴𝑗)) = (𝑛𝐴(𝑄‘𝑛))) |
21 | | eldifi 3694 |
. . . . . 6
⊢ (𝑛 ∈ (𝑁 ∖ {𝐾}) → 𝑛 ∈ 𝑁) |
22 | 21 | adantl 481 |
. . . . 5
⊢ (((𝐾 ∈ 𝑁 ∧ 𝐿 ∈ 𝑁 ∧ 𝑄 ∈ 𝑅) ∧ 𝑛 ∈ (𝑁 ∖ {𝐾})) → 𝑛 ∈ 𝑁) |
23 | | gsummatr01.p |
. . . . . . . . . . 11
⊢ 𝑃 =
(Base‘(SymGrp‘𝑁)) |
24 | | gsummatr01.r |
. . . . . . . . . . 11
⊢ 𝑅 = {𝑟 ∈ 𝑃 ∣ (𝑟‘𝐾) = 𝐿} |
25 | 23, 24 | gsummatr01lem1 20280 |
. . . . . . . . . 10
⊢ ((𝑄 ∈ 𝑅 ∧ 𝑛 ∈ 𝑁) → (𝑄‘𝑛) ∈ 𝑁) |
26 | 25 | expcom 450 |
. . . . . . . . 9
⊢ (𝑛 ∈ 𝑁 → (𝑄 ∈ 𝑅 → (𝑄‘𝑛) ∈ 𝑁)) |
27 | 21, 26 | syl 17 |
. . . . . . . 8
⊢ (𝑛 ∈ (𝑁 ∖ {𝐾}) → (𝑄 ∈ 𝑅 → (𝑄‘𝑛) ∈ 𝑁)) |
28 | 27 | com12 32 |
. . . . . . 7
⊢ (𝑄 ∈ 𝑅 → (𝑛 ∈ (𝑁 ∖ {𝐾}) → (𝑄‘𝑛) ∈ 𝑁)) |
29 | 28 | 3ad2ant3 1077 |
. . . . . 6
⊢ ((𝐾 ∈ 𝑁 ∧ 𝐿 ∈ 𝑁 ∧ 𝑄 ∈ 𝑅) → (𝑛 ∈ (𝑁 ∖ {𝐾}) → (𝑄‘𝑛) ∈ 𝑁)) |
30 | 29 | imp 444 |
. . . . 5
⊢ (((𝐾 ∈ 𝑁 ∧ 𝐿 ∈ 𝑁 ∧ 𝑄 ∈ 𝑅) ∧ 𝑛 ∈ (𝑁 ∖ {𝐾})) → (𝑄‘𝑛) ∈ 𝑁) |
31 | | ovex 6577 |
. . . . . 6
⊢ (𝑛𝐴(𝑄‘𝑛)) ∈ V |
32 | 31 | a1i 11 |
. . . . 5
⊢ (((𝐾 ∈ 𝑁 ∧ 𝐿 ∈ 𝑁 ∧ 𝑄 ∈ 𝑅) ∧ 𝑛 ∈ (𝑁 ∖ {𝐾})) → (𝑛𝐴(𝑄‘𝑛)) ∈ V) |
33 | 8, 20, 22, 30, 32 | ovmpt2d 6686 |
. . . 4
⊢ (((𝐾 ∈ 𝑁 ∧ 𝐿 ∈ 𝑁 ∧ 𝑄 ∈ 𝑅) ∧ 𝑛 ∈ (𝑁 ∖ {𝐾})) → (𝑛(𝑖 ∈ 𝑁, 𝑗 ∈ 𝑁 ↦ if(𝑖 = 𝐾, if(𝑗 = 𝐿, 0 , 𝐵), (𝑖𝐴𝑗)))(𝑄‘𝑛)) = (𝑛𝐴(𝑄‘𝑛))) |
34 | 33 | 3ad2antl3 1218 |
. . 3
⊢ ((((𝐺 ∈ CMnd ∧ 𝑁 ∈ Fin) ∧
(∀𝑖 ∈ 𝑁 ∀𝑗 ∈ 𝑁 (𝑖𝐴𝑗) ∈ 𝑆 ∧ 𝐵 ∈ 𝑆) ∧ (𝐾 ∈ 𝑁 ∧ 𝐿 ∈ 𝑁 ∧ 𝑄 ∈ 𝑅)) ∧ 𝑛 ∈ (𝑁 ∖ {𝐾})) → (𝑛(𝑖 ∈ 𝑁, 𝑗 ∈ 𝑁 ↦ if(𝑖 = 𝐾, if(𝑗 = 𝐿, 0 , 𝐵), (𝑖𝐴𝑗)))(𝑄‘𝑛)) = (𝑛𝐴(𝑄‘𝑛))) |
35 | | gsummatr01.s |
. . . . . . . . 9
⊢ 𝑆 = (Base‘𝐺) |
36 | 35 | eleq2i 2680 |
. . . . . . . 8
⊢ ((𝑖𝐴𝑗) ∈ 𝑆 ↔ (𝑖𝐴𝑗) ∈ (Base‘𝐺)) |
37 | 36 | 2ralbii 2964 |
. . . . . . 7
⊢
(∀𝑖 ∈
𝑁 ∀𝑗 ∈ 𝑁 (𝑖𝐴𝑗) ∈ 𝑆 ↔ ∀𝑖 ∈ 𝑁 ∀𝑗 ∈ 𝑁 (𝑖𝐴𝑗) ∈ (Base‘𝐺)) |
38 | 23, 24 | gsummatr01lem2 20281 |
. . . . . . . . . . 11
⊢ ((𝑄 ∈ 𝑅 ∧ 𝑛 ∈ 𝑁) → (∀𝑖 ∈ 𝑁 ∀𝑗 ∈ 𝑁 (𝑖𝐴𝑗) ∈ (Base‘𝐺) → (𝑛𝐴(𝑄‘𝑛)) ∈ (Base‘𝐺))) |
39 | 21, 38 | sylan2 490 |
. . . . . . . . . 10
⊢ ((𝑄 ∈ 𝑅 ∧ 𝑛 ∈ (𝑁 ∖ {𝐾})) → (∀𝑖 ∈ 𝑁 ∀𝑗 ∈ 𝑁 (𝑖𝐴𝑗) ∈ (Base‘𝐺) → (𝑛𝐴(𝑄‘𝑛)) ∈ (Base‘𝐺))) |
40 | 39 | ex 449 |
. . . . . . . . 9
⊢ (𝑄 ∈ 𝑅 → (𝑛 ∈ (𝑁 ∖ {𝐾}) → (∀𝑖 ∈ 𝑁 ∀𝑗 ∈ 𝑁 (𝑖𝐴𝑗) ∈ (Base‘𝐺) → (𝑛𝐴(𝑄‘𝑛)) ∈ (Base‘𝐺)))) |
41 | 40 | 3ad2ant3 1077 |
. . . . . . . 8
⊢ ((𝐾 ∈ 𝑁 ∧ 𝐿 ∈ 𝑁 ∧ 𝑄 ∈ 𝑅) → (𝑛 ∈ (𝑁 ∖ {𝐾}) → (∀𝑖 ∈ 𝑁 ∀𝑗 ∈ 𝑁 (𝑖𝐴𝑗) ∈ (Base‘𝐺) → (𝑛𝐴(𝑄‘𝑛)) ∈ (Base‘𝐺)))) |
42 | 41 | com3r 85 |
. . . . . . 7
⊢
(∀𝑖 ∈
𝑁 ∀𝑗 ∈ 𝑁 (𝑖𝐴𝑗) ∈ (Base‘𝐺) → ((𝐾 ∈ 𝑁 ∧ 𝐿 ∈ 𝑁 ∧ 𝑄 ∈ 𝑅) → (𝑛 ∈ (𝑁 ∖ {𝐾}) → (𝑛𝐴(𝑄‘𝑛)) ∈ (Base‘𝐺)))) |
43 | 37, 42 | sylbi 206 |
. . . . . 6
⊢
(∀𝑖 ∈
𝑁 ∀𝑗 ∈ 𝑁 (𝑖𝐴𝑗) ∈ 𝑆 → ((𝐾 ∈ 𝑁 ∧ 𝐿 ∈ 𝑁 ∧ 𝑄 ∈ 𝑅) → (𝑛 ∈ (𝑁 ∖ {𝐾}) → (𝑛𝐴(𝑄‘𝑛)) ∈ (Base‘𝐺)))) |
44 | 43 | adantr 480 |
. . . . 5
⊢
((∀𝑖 ∈
𝑁 ∀𝑗 ∈ 𝑁 (𝑖𝐴𝑗) ∈ 𝑆 ∧ 𝐵 ∈ 𝑆) → ((𝐾 ∈ 𝑁 ∧ 𝐿 ∈ 𝑁 ∧ 𝑄 ∈ 𝑅) → (𝑛 ∈ (𝑁 ∖ {𝐾}) → (𝑛𝐴(𝑄‘𝑛)) ∈ (Base‘𝐺)))) |
45 | 44 | imp31 447 |
. . . 4
⊢
((((∀𝑖 ∈
𝑁 ∀𝑗 ∈ 𝑁 (𝑖𝐴𝑗) ∈ 𝑆 ∧ 𝐵 ∈ 𝑆) ∧ (𝐾 ∈ 𝑁 ∧ 𝐿 ∈ 𝑁 ∧ 𝑄 ∈ 𝑅)) ∧ 𝑛 ∈ (𝑁 ∖ {𝐾})) → (𝑛𝐴(𝑄‘𝑛)) ∈ (Base‘𝐺)) |
46 | 45 | 3adantl1 1210 |
. . 3
⊢ ((((𝐺 ∈ CMnd ∧ 𝑁 ∈ Fin) ∧
(∀𝑖 ∈ 𝑁 ∀𝑗 ∈ 𝑁 (𝑖𝐴𝑗) ∈ 𝑆 ∧ 𝐵 ∈ 𝑆) ∧ (𝐾 ∈ 𝑁 ∧ 𝐿 ∈ 𝑁 ∧ 𝑄 ∈ 𝑅)) ∧ 𝑛 ∈ (𝑁 ∖ {𝐾})) → (𝑛𝐴(𝑄‘𝑛)) ∈ (Base‘𝐺)) |
47 | 34, 46 | eqeltrd 2688 |
. 2
⊢ ((((𝐺 ∈ CMnd ∧ 𝑁 ∈ Fin) ∧
(∀𝑖 ∈ 𝑁 ∀𝑗 ∈ 𝑁 (𝑖𝐴𝑗) ∈ 𝑆 ∧ 𝐵 ∈ 𝑆) ∧ (𝐾 ∈ 𝑁 ∧ 𝐿 ∈ 𝑁 ∧ 𝑄 ∈ 𝑅)) ∧ 𝑛 ∈ (𝑁 ∖ {𝐾})) → (𝑛(𝑖 ∈ 𝑁, 𝑗 ∈ 𝑁 ↦ if(𝑖 = 𝐾, if(𝑗 = 𝐿, 0 , 𝐵), (𝑖𝐴𝑗)))(𝑄‘𝑛)) ∈ (Base‘𝐺)) |
48 | | simp31 1090 |
. 2
⊢ (((𝐺 ∈ CMnd ∧ 𝑁 ∈ Fin) ∧
(∀𝑖 ∈ 𝑁 ∀𝑗 ∈ 𝑁 (𝑖𝐴𝑗) ∈ 𝑆 ∧ 𝐵 ∈ 𝑆) ∧ (𝐾 ∈ 𝑁 ∧ 𝐿 ∈ 𝑁 ∧ 𝑄 ∈ 𝑅)) → 𝐾 ∈ 𝑁) |
49 | | neldifsnd 4263 |
. 2
⊢ (((𝐺 ∈ CMnd ∧ 𝑁 ∈ Fin) ∧
(∀𝑖 ∈ 𝑁 ∀𝑗 ∈ 𝑁 (𝑖𝐴𝑗) ∈ 𝑆 ∧ 𝐵 ∈ 𝑆) ∧ (𝐾 ∈ 𝑁 ∧ 𝐿 ∈ 𝑁 ∧ 𝑄 ∈ 𝑅)) → ¬ 𝐾 ∈ (𝑁 ∖ {𝐾})) |
50 | | eqidd 2611 |
. . . . . 6
⊢ ((𝐵 ∈ 𝑆 ∧ (𝐾 ∈ 𝑁 ∧ 𝐿 ∈ 𝑁 ∧ 𝑄 ∈ 𝑅)) → (𝑖 ∈ 𝑁, 𝑗 ∈ 𝑁 ↦ if(𝑖 = 𝐾, if(𝑗 = 𝐿, 0 , 𝐵), (𝑖𝐴𝑗))) = (𝑖 ∈ 𝑁, 𝑗 ∈ 𝑁 ↦ if(𝑖 = 𝐾, if(𝑗 = 𝐿, 0 , 𝐵), (𝑖𝐴𝑗)))) |
51 | | iftrue 4042 |
. . . . . . . 8
⊢ (𝑖 = 𝐾 → if(𝑖 = 𝐾, if(𝑗 = 𝐿, 0 , 𝐵), (𝑖𝐴𝑗)) = if(𝑗 = 𝐿, 0 , 𝐵)) |
52 | | eqeq1 2614 |
. . . . . . . . 9
⊢ (𝑗 = (𝑄‘𝐾) → (𝑗 = 𝐿 ↔ (𝑄‘𝐾) = 𝐿)) |
53 | 52 | ifbid 4058 |
. . . . . . . 8
⊢ (𝑗 = (𝑄‘𝐾) → if(𝑗 = 𝐿, 0 , 𝐵) = if((𝑄‘𝐾) = 𝐿, 0 , 𝐵)) |
54 | 51, 53 | sylan9eq 2664 |
. . . . . . 7
⊢ ((𝑖 = 𝐾 ∧ 𝑗 = (𝑄‘𝐾)) → if(𝑖 = 𝐾, if(𝑗 = 𝐿, 0 , 𝐵), (𝑖𝐴𝑗)) = if((𝑄‘𝐾) = 𝐿, 0 , 𝐵)) |
55 | 54 | adantl 481 |
. . . . . 6
⊢ (((𝐵 ∈ 𝑆 ∧ (𝐾 ∈ 𝑁 ∧ 𝐿 ∈ 𝑁 ∧ 𝑄 ∈ 𝑅)) ∧ (𝑖 = 𝐾 ∧ 𝑗 = (𝑄‘𝐾))) → if(𝑖 = 𝐾, if(𝑗 = 𝐿, 0 , 𝐵), (𝑖𝐴𝑗)) = if((𝑄‘𝐾) = 𝐿, 0 , 𝐵)) |
56 | | simpr1 1060 |
. . . . . 6
⊢ ((𝐵 ∈ 𝑆 ∧ (𝐾 ∈ 𝑁 ∧ 𝐿 ∈ 𝑁 ∧ 𝑄 ∈ 𝑅)) → 𝐾 ∈ 𝑁) |
57 | 23, 24 | gsummatr01lem1 20280 |
. . . . . . . . 9
⊢ ((𝑄 ∈ 𝑅 ∧ 𝐾 ∈ 𝑁) → (𝑄‘𝐾) ∈ 𝑁) |
58 | 57 | ancoms 468 |
. . . . . . . 8
⊢ ((𝐾 ∈ 𝑁 ∧ 𝑄 ∈ 𝑅) → (𝑄‘𝐾) ∈ 𝑁) |
59 | 58 | 3adant2 1073 |
. . . . . . 7
⊢ ((𝐾 ∈ 𝑁 ∧ 𝐿 ∈ 𝑁 ∧ 𝑄 ∈ 𝑅) → (𝑄‘𝐾) ∈ 𝑁) |
60 | 59 | adantl 481 |
. . . . . 6
⊢ ((𝐵 ∈ 𝑆 ∧ (𝐾 ∈ 𝑁 ∧ 𝐿 ∈ 𝑁 ∧ 𝑄 ∈ 𝑅)) → (𝑄‘𝐾) ∈ 𝑁) |
61 | | gsummatr01.0 |
. . . . . . . 8
⊢ 0 =
(0g‘𝐺) |
62 | | fvex 6113 |
. . . . . . . 8
⊢
(0g‘𝐺) ∈ V |
63 | 61, 62 | eqeltri 2684 |
. . . . . . 7
⊢ 0 ∈
V |
64 | | simpl 472 |
. . . . . . 7
⊢ ((𝐵 ∈ 𝑆 ∧ (𝐾 ∈ 𝑁 ∧ 𝐿 ∈ 𝑁 ∧ 𝑄 ∈ 𝑅)) → 𝐵 ∈ 𝑆) |
65 | | ifexg 4107 |
. . . . . . 7
⊢ (( 0 ∈ V
∧ 𝐵 ∈ 𝑆) → if((𝑄‘𝐾) = 𝐿, 0 , 𝐵) ∈ V) |
66 | 63, 64, 65 | sylancr 694 |
. . . . . 6
⊢ ((𝐵 ∈ 𝑆 ∧ (𝐾 ∈ 𝑁 ∧ 𝐿 ∈ 𝑁 ∧ 𝑄 ∈ 𝑅)) → if((𝑄‘𝐾) = 𝐿, 0 , 𝐵) ∈ V) |
67 | 50, 55, 56, 60, 66 | ovmpt2d 6686 |
. . . . 5
⊢ ((𝐵 ∈ 𝑆 ∧ (𝐾 ∈ 𝑁 ∧ 𝐿 ∈ 𝑁 ∧ 𝑄 ∈ 𝑅)) → (𝐾(𝑖 ∈ 𝑁, 𝑗 ∈ 𝑁 ↦ if(𝑖 = 𝐾, if(𝑗 = 𝐿, 0 , 𝐵), (𝑖𝐴𝑗)))(𝑄‘𝐾)) = if((𝑄‘𝐾) = 𝐿, 0 , 𝐵)) |
68 | 67 | adantll 746 |
. . . 4
⊢
(((∀𝑖 ∈
𝑁 ∀𝑗 ∈ 𝑁 (𝑖𝐴𝑗) ∈ 𝑆 ∧ 𝐵 ∈ 𝑆) ∧ (𝐾 ∈ 𝑁 ∧ 𝐿 ∈ 𝑁 ∧ 𝑄 ∈ 𝑅)) → (𝐾(𝑖 ∈ 𝑁, 𝑗 ∈ 𝑁 ↦ if(𝑖 = 𝐾, if(𝑗 = 𝐿, 0 , 𝐵), (𝑖𝐴𝑗)))(𝑄‘𝐾)) = if((𝑄‘𝐾) = 𝐿, 0 , 𝐵)) |
69 | 68 | 3adant1 1072 |
. . 3
⊢ (((𝐺 ∈ CMnd ∧ 𝑁 ∈ Fin) ∧
(∀𝑖 ∈ 𝑁 ∀𝑗 ∈ 𝑁 (𝑖𝐴𝑗) ∈ 𝑆 ∧ 𝐵 ∈ 𝑆) ∧ (𝐾 ∈ 𝑁 ∧ 𝐿 ∈ 𝑁 ∧ 𝑄 ∈ 𝑅)) → (𝐾(𝑖 ∈ 𝑁, 𝑗 ∈ 𝑁 ↦ if(𝑖 = 𝐾, if(𝑗 = 𝐿, 0 , 𝐵), (𝑖𝐴𝑗)))(𝑄‘𝐾)) = if((𝑄‘𝐾) = 𝐿, 0 , 𝐵)) |
70 | | cmnmnd 18031 |
. . . . . . 7
⊢ (𝐺 ∈ CMnd → 𝐺 ∈ Mnd) |
71 | 1, 61 | mndidcl 17131 |
. . . . . . 7
⊢ (𝐺 ∈ Mnd → 0 ∈
(Base‘𝐺)) |
72 | 70, 71 | syl 17 |
. . . . . 6
⊢ (𝐺 ∈ CMnd → 0 ∈
(Base‘𝐺)) |
73 | 72 | adantr 480 |
. . . . 5
⊢ ((𝐺 ∈ CMnd ∧ 𝑁 ∈ Fin) → 0 ∈
(Base‘𝐺)) |
74 | 73 | 3ad2ant1 1075 |
. . . 4
⊢ (((𝐺 ∈ CMnd ∧ 𝑁 ∈ Fin) ∧
(∀𝑖 ∈ 𝑁 ∀𝑗 ∈ 𝑁 (𝑖𝐴𝑗) ∈ 𝑆 ∧ 𝐵 ∈ 𝑆) ∧ (𝐾 ∈ 𝑁 ∧ 𝐿 ∈ 𝑁 ∧ 𝑄 ∈ 𝑅)) → 0 ∈ (Base‘𝐺)) |
75 | 35 | eleq2i 2680 |
. . . . . . 7
⊢ (𝐵 ∈ 𝑆 ↔ 𝐵 ∈ (Base‘𝐺)) |
76 | 75 | biimpi 205 |
. . . . . 6
⊢ (𝐵 ∈ 𝑆 → 𝐵 ∈ (Base‘𝐺)) |
77 | 76 | adantl 481 |
. . . . 5
⊢
((∀𝑖 ∈
𝑁 ∀𝑗 ∈ 𝑁 (𝑖𝐴𝑗) ∈ 𝑆 ∧ 𝐵 ∈ 𝑆) → 𝐵 ∈ (Base‘𝐺)) |
78 | 77 | 3ad2ant2 1076 |
. . . 4
⊢ (((𝐺 ∈ CMnd ∧ 𝑁 ∈ Fin) ∧
(∀𝑖 ∈ 𝑁 ∀𝑗 ∈ 𝑁 (𝑖𝐴𝑗) ∈ 𝑆 ∧ 𝐵 ∈ 𝑆) ∧ (𝐾 ∈ 𝑁 ∧ 𝐿 ∈ 𝑁 ∧ 𝑄 ∈ 𝑅)) → 𝐵 ∈ (Base‘𝐺)) |
79 | 74, 78 | ifcld 4081 |
. . 3
⊢ (((𝐺 ∈ CMnd ∧ 𝑁 ∈ Fin) ∧
(∀𝑖 ∈ 𝑁 ∀𝑗 ∈ 𝑁 (𝑖𝐴𝑗) ∈ 𝑆 ∧ 𝐵 ∈ 𝑆) ∧ (𝐾 ∈ 𝑁 ∧ 𝐿 ∈ 𝑁 ∧ 𝑄 ∈ 𝑅)) → if((𝑄‘𝐾) = 𝐿, 0 , 𝐵) ∈ (Base‘𝐺)) |
80 | 69, 79 | eqeltrd 2688 |
. 2
⊢ (((𝐺 ∈ CMnd ∧ 𝑁 ∈ Fin) ∧
(∀𝑖 ∈ 𝑁 ∀𝑗 ∈ 𝑁 (𝑖𝐴𝑗) ∈ 𝑆 ∧ 𝐵 ∈ 𝑆) ∧ (𝐾 ∈ 𝑁 ∧ 𝐿 ∈ 𝑁 ∧ 𝑄 ∈ 𝑅)) → (𝐾(𝑖 ∈ 𝑁, 𝑗 ∈ 𝑁 ↦ if(𝑖 = 𝐾, if(𝑗 = 𝐿, 0 , 𝐵), (𝑖𝐴𝑗)))(𝑄‘𝐾)) ∈ (Base‘𝐺)) |
81 | | id 22 |
. . 3
⊢ (𝑛 = 𝐾 → 𝑛 = 𝐾) |
82 | | fveq2 6103 |
. . 3
⊢ (𝑛 = 𝐾 → (𝑄‘𝑛) = (𝑄‘𝐾)) |
83 | 81, 82 | oveq12d 6567 |
. 2
⊢ (𝑛 = 𝐾 → (𝑛(𝑖 ∈ 𝑁, 𝑗 ∈ 𝑁 ↦ if(𝑖 = 𝐾, if(𝑗 = 𝐿, 0 , 𝐵), (𝑖𝐴𝑗)))(𝑄‘𝑛)) = (𝐾(𝑖 ∈ 𝑁, 𝑗 ∈ 𝑁 ↦ if(𝑖 = 𝐾, if(𝑗 = 𝐿, 0 , 𝐵), (𝑖𝐴𝑗)))(𝑄‘𝐾))) |
84 | 1, 2, 4, 7, 47, 48, 49, 80, 83 | gsumunsn 18182 |
1
⊢ (((𝐺 ∈ CMnd ∧ 𝑁 ∈ Fin) ∧
(∀𝑖 ∈ 𝑁 ∀𝑗 ∈ 𝑁 (𝑖𝐴𝑗) ∈ 𝑆 ∧ 𝐵 ∈ 𝑆) ∧ (𝐾 ∈ 𝑁 ∧ 𝐿 ∈ 𝑁 ∧ 𝑄 ∈ 𝑅)) → (𝐺 Σg (𝑛 ∈ ((𝑁 ∖ {𝐾}) ∪ {𝐾}) ↦ (𝑛(𝑖 ∈ 𝑁, 𝑗 ∈ 𝑁 ↦ if(𝑖 = 𝐾, if(𝑗 = 𝐿, 0 , 𝐵), (𝑖𝐴𝑗)))(𝑄‘𝑛)))) = ((𝐺 Σg (𝑛 ∈ (𝑁 ∖ {𝐾}) ↦ (𝑛(𝑖 ∈ 𝑁, 𝑗 ∈ 𝑁 ↦ if(𝑖 = 𝐾, if(𝑗 = 𝐿, 0 , 𝐵), (𝑖𝐴𝑗)))(𝑄‘𝑛))))(+g‘𝐺)(𝐾(𝑖 ∈ 𝑁, 𝑗 ∈ 𝑁 ↦ if(𝑖 = 𝐾, if(𝑗 = 𝐿, 0 , 𝐵), (𝑖𝐴𝑗)))(𝑄‘𝐾)))) |