Proof of Theorem symgmatr01
Step | Hyp | Ref
| Expression |
1 | | symgmatr01.p |
. . . . 5
⊢ 𝑃 =
(Base‘(SymGrp‘𝑁)) |
2 | 1 | symgmatr01lem 20459 |
. . . 4
⊢ ((𝐾 ∈ 𝑁 ∧ 𝐿 ∈ 𝑁) → (𝑄 ∈ (𝑃 ∖ {𝑞 ∈ 𝑃 ∣ (𝑞‘𝐾) = 𝐿}) → ∃𝑘 ∈ 𝑁 if(𝑘 = 𝐾, if((𝑄‘𝑘) = 𝐿, 1 , 0 ), (𝑘𝑀(𝑄‘𝑘))) = 0 )) |
3 | 2 | imp 445 |
. . 3
⊢ (((𝐾 ∈ 𝑁 ∧ 𝐿 ∈ 𝑁) ∧ 𝑄 ∈ (𝑃 ∖ {𝑞 ∈ 𝑃 ∣ (𝑞‘𝐾) = 𝐿})) → ∃𝑘 ∈ 𝑁 if(𝑘 = 𝐾, if((𝑄‘𝑘) = 𝐿, 1 , 0 ), (𝑘𝑀(𝑄‘𝑘))) = 0 ) |
4 | | eqidd 2623 |
. . . . . 6
⊢ ((((𝐾 ∈ 𝑁 ∧ 𝐿 ∈ 𝑁) ∧ 𝑄 ∈ (𝑃 ∖ {𝑞 ∈ 𝑃 ∣ (𝑞‘𝐾) = 𝐿})) ∧ 𝑘 ∈ 𝑁) → (𝑖 ∈ 𝑁, 𝑗 ∈ 𝑁 ↦ if(𝑖 = 𝐾, if(𝑗 = 𝐿, 1 , 0 ), (𝑖𝑀𝑗))) = (𝑖 ∈ 𝑁, 𝑗 ∈ 𝑁 ↦ if(𝑖 = 𝐾, if(𝑗 = 𝐿, 1 , 0 ), (𝑖𝑀𝑗)))) |
5 | | eqeq1 2626 |
. . . . . . . . 9
⊢ (𝑖 = 𝑘 → (𝑖 = 𝐾 ↔ 𝑘 = 𝐾)) |
6 | 5 | adantr 481 |
. . . . . . . 8
⊢ ((𝑖 = 𝑘 ∧ 𝑗 = (𝑄‘𝑘)) → (𝑖 = 𝐾 ↔ 𝑘 = 𝐾)) |
7 | | eqeq1 2626 |
. . . . . . . . . 10
⊢ (𝑗 = (𝑄‘𝑘) → (𝑗 = 𝐿 ↔ (𝑄‘𝑘) = 𝐿)) |
8 | 7 | adantl 482 |
. . . . . . . . 9
⊢ ((𝑖 = 𝑘 ∧ 𝑗 = (𝑄‘𝑘)) → (𝑗 = 𝐿 ↔ (𝑄‘𝑘) = 𝐿)) |
9 | 8 | ifbid 4108 |
. . . . . . . 8
⊢ ((𝑖 = 𝑘 ∧ 𝑗 = (𝑄‘𝑘)) → if(𝑗 = 𝐿, 1 , 0 ) = if((𝑄‘𝑘) = 𝐿, 1 , 0 )) |
10 | | oveq12 6659 |
. . . . . . . 8
⊢ ((𝑖 = 𝑘 ∧ 𝑗 = (𝑄‘𝑘)) → (𝑖𝑀𝑗) = (𝑘𝑀(𝑄‘𝑘))) |
11 | 6, 9, 10 | ifbieq12d 4113 |
. . . . . . 7
⊢ ((𝑖 = 𝑘 ∧ 𝑗 = (𝑄‘𝑘)) → if(𝑖 = 𝐾, if(𝑗 = 𝐿, 1 , 0 ), (𝑖𝑀𝑗)) = if(𝑘 = 𝐾, if((𝑄‘𝑘) = 𝐿, 1 , 0 ), (𝑘𝑀(𝑄‘𝑘)))) |
12 | 11 | adantl 482 |
. . . . . 6
⊢
(((((𝐾 ∈ 𝑁 ∧ 𝐿 ∈ 𝑁) ∧ 𝑄 ∈ (𝑃 ∖ {𝑞 ∈ 𝑃 ∣ (𝑞‘𝐾) = 𝐿})) ∧ 𝑘 ∈ 𝑁) ∧ (𝑖 = 𝑘 ∧ 𝑗 = (𝑄‘𝑘))) → if(𝑖 = 𝐾, if(𝑗 = 𝐿, 1 , 0 ), (𝑖𝑀𝑗)) = if(𝑘 = 𝐾, if((𝑄‘𝑘) = 𝐿, 1 , 0 ), (𝑘𝑀(𝑄‘𝑘)))) |
13 | | simpr 477 |
. . . . . 6
⊢ ((((𝐾 ∈ 𝑁 ∧ 𝐿 ∈ 𝑁) ∧ 𝑄 ∈ (𝑃 ∖ {𝑞 ∈ 𝑃 ∣ (𝑞‘𝐾) = 𝐿})) ∧ 𝑘 ∈ 𝑁) → 𝑘 ∈ 𝑁) |
14 | | eldifi 3732 |
. . . . . . . . 9
⊢ (𝑄 ∈ (𝑃 ∖ {𝑞 ∈ 𝑃 ∣ (𝑞‘𝐾) = 𝐿}) → 𝑄 ∈ 𝑃) |
15 | | eqid 2622 |
. . . . . . . . . . 11
⊢
(SymGrp‘𝑁) =
(SymGrp‘𝑁) |
16 | 15, 1 | symgfv 17807 |
. . . . . . . . . 10
⊢ ((𝑄 ∈ 𝑃 ∧ 𝑘 ∈ 𝑁) → (𝑄‘𝑘) ∈ 𝑁) |
17 | 16 | ex 450 |
. . . . . . . . 9
⊢ (𝑄 ∈ 𝑃 → (𝑘 ∈ 𝑁 → (𝑄‘𝑘) ∈ 𝑁)) |
18 | 14, 17 | syl 17 |
. . . . . . . 8
⊢ (𝑄 ∈ (𝑃 ∖ {𝑞 ∈ 𝑃 ∣ (𝑞‘𝐾) = 𝐿}) → (𝑘 ∈ 𝑁 → (𝑄‘𝑘) ∈ 𝑁)) |
19 | 18 | adantl 482 |
. . . . . . 7
⊢ (((𝐾 ∈ 𝑁 ∧ 𝐿 ∈ 𝑁) ∧ 𝑄 ∈ (𝑃 ∖ {𝑞 ∈ 𝑃 ∣ (𝑞‘𝐾) = 𝐿})) → (𝑘 ∈ 𝑁 → (𝑄‘𝑘) ∈ 𝑁)) |
20 | 19 | imp 445 |
. . . . . 6
⊢ ((((𝐾 ∈ 𝑁 ∧ 𝐿 ∈ 𝑁) ∧ 𝑄 ∈ (𝑃 ∖ {𝑞 ∈ 𝑃 ∣ (𝑞‘𝐾) = 𝐿})) ∧ 𝑘 ∈ 𝑁) → (𝑄‘𝑘) ∈ 𝑁) |
21 | | symgmatr01.1 |
. . . . . . . . . 10
⊢ 1 =
(1r‘𝑅) |
22 | | fvex 6201 |
. . . . . . . . . 10
⊢
(1r‘𝑅) ∈ V |
23 | 21, 22 | eqeltri 2697 |
. . . . . . . . 9
⊢ 1 ∈
V |
24 | | symgmatr01.0 |
. . . . . . . . . 10
⊢ 0 =
(0g‘𝑅) |
25 | | fvex 6201 |
. . . . . . . . . 10
⊢
(0g‘𝑅) ∈ V |
26 | 24, 25 | eqeltri 2697 |
. . . . . . . . 9
⊢ 0 ∈
V |
27 | 23, 26 | ifex 4156 |
. . . . . . . 8
⊢ if((𝑄‘𝑘) = 𝐿, 1 , 0 ) ∈
V |
28 | | ovex 6678 |
. . . . . . . 8
⊢ (𝑘𝑀(𝑄‘𝑘)) ∈ V |
29 | 27, 28 | ifex 4156 |
. . . . . . 7
⊢ if(𝑘 = 𝐾, if((𝑄‘𝑘) = 𝐿, 1 , 0 ), (𝑘𝑀(𝑄‘𝑘))) ∈ V |
30 | 29 | a1i 11 |
. . . . . 6
⊢ ((((𝐾 ∈ 𝑁 ∧ 𝐿 ∈ 𝑁) ∧ 𝑄 ∈ (𝑃 ∖ {𝑞 ∈ 𝑃 ∣ (𝑞‘𝐾) = 𝐿})) ∧ 𝑘 ∈ 𝑁) → if(𝑘 = 𝐾, if((𝑄‘𝑘) = 𝐿, 1 , 0 ), (𝑘𝑀(𝑄‘𝑘))) ∈ V) |
31 | 4, 12, 13, 20, 30 | ovmpt2d 6788 |
. . . . 5
⊢ ((((𝐾 ∈ 𝑁 ∧ 𝐿 ∈ 𝑁) ∧ 𝑄 ∈ (𝑃 ∖ {𝑞 ∈ 𝑃 ∣ (𝑞‘𝐾) = 𝐿})) ∧ 𝑘 ∈ 𝑁) → (𝑘(𝑖 ∈ 𝑁, 𝑗 ∈ 𝑁 ↦ if(𝑖 = 𝐾, if(𝑗 = 𝐿, 1 , 0 ), (𝑖𝑀𝑗)))(𝑄‘𝑘)) = if(𝑘 = 𝐾, if((𝑄‘𝑘) = 𝐿, 1 , 0 ), (𝑘𝑀(𝑄‘𝑘)))) |
32 | 31 | eqeq1d 2624 |
. . . 4
⊢ ((((𝐾 ∈ 𝑁 ∧ 𝐿 ∈ 𝑁) ∧ 𝑄 ∈ (𝑃 ∖ {𝑞 ∈ 𝑃 ∣ (𝑞‘𝐾) = 𝐿})) ∧ 𝑘 ∈ 𝑁) → ((𝑘(𝑖 ∈ 𝑁, 𝑗 ∈ 𝑁 ↦ if(𝑖 = 𝐾, if(𝑗 = 𝐿, 1 , 0 ), (𝑖𝑀𝑗)))(𝑄‘𝑘)) = 0 ↔ if(𝑘 = 𝐾, if((𝑄‘𝑘) = 𝐿, 1 , 0 ), (𝑘𝑀(𝑄‘𝑘))) = 0 )) |
33 | 32 | rexbidva 3049 |
. . 3
⊢ (((𝐾 ∈ 𝑁 ∧ 𝐿 ∈ 𝑁) ∧ 𝑄 ∈ (𝑃 ∖ {𝑞 ∈ 𝑃 ∣ (𝑞‘𝐾) = 𝐿})) → (∃𝑘 ∈ 𝑁 (𝑘(𝑖 ∈ 𝑁, 𝑗 ∈ 𝑁 ↦ if(𝑖 = 𝐾, if(𝑗 = 𝐿, 1 , 0 ), (𝑖𝑀𝑗)))(𝑄‘𝑘)) = 0 ↔ ∃𝑘 ∈ 𝑁 if(𝑘 = 𝐾, if((𝑄‘𝑘) = 𝐿, 1 , 0 ), (𝑘𝑀(𝑄‘𝑘))) = 0 )) |
34 | 3, 33 | mpbird 247 |
. 2
⊢ (((𝐾 ∈ 𝑁 ∧ 𝐿 ∈ 𝑁) ∧ 𝑄 ∈ (𝑃 ∖ {𝑞 ∈ 𝑃 ∣ (𝑞‘𝐾) = 𝐿})) → ∃𝑘 ∈ 𝑁 (𝑘(𝑖 ∈ 𝑁, 𝑗 ∈ 𝑁 ↦ if(𝑖 = 𝐾, if(𝑗 = 𝐿, 1 , 0 ), (𝑖𝑀𝑗)))(𝑄‘𝑘)) = 0 ) |
35 | 34 | ex 450 |
1
⊢ ((𝐾 ∈ 𝑁 ∧ 𝐿 ∈ 𝑁) → (𝑄 ∈ (𝑃 ∖ {𝑞 ∈ 𝑃 ∣ (𝑞‘𝐾) = 𝐿}) → ∃𝑘 ∈ 𝑁 (𝑘(𝑖 ∈ 𝑁, 𝑗 ∈ 𝑁 ↦ if(𝑖 = 𝐾, if(𝑗 = 𝐿, 1 , 0 ), (𝑖𝑀𝑗)))(𝑄‘𝑘)) = 0 )) |