Proof of Theorem lsm4
| Step | Hyp | Ref
| Expression |
| 1 | | simp1 1136 |
. . . . . 6
⊢ ((𝐺 ∈ Abel ∧ (𝑄 ∈ (SubGrp‘𝐺) ∧ 𝑅 ∈ (SubGrp‘𝐺)) ∧ (𝑇 ∈ (SubGrp‘𝐺) ∧ 𝑈 ∈ (SubGrp‘𝐺))) → 𝐺 ∈ Abel) |
| 2 | | simp2r 1201 |
. . . . . 6
⊢ ((𝐺 ∈ Abel ∧ (𝑄 ∈ (SubGrp‘𝐺) ∧ 𝑅 ∈ (SubGrp‘𝐺)) ∧ (𝑇 ∈ (SubGrp‘𝐺) ∧ 𝑈 ∈ (SubGrp‘𝐺))) → 𝑅 ∈ (SubGrp‘𝐺)) |
| 3 | | simp3l 1202 |
. . . . . 6
⊢ ((𝐺 ∈ Abel ∧ (𝑄 ∈ (SubGrp‘𝐺) ∧ 𝑅 ∈ (SubGrp‘𝐺)) ∧ (𝑇 ∈ (SubGrp‘𝐺) ∧ 𝑈 ∈ (SubGrp‘𝐺))) → 𝑇 ∈ (SubGrp‘𝐺)) |
| 4 | | lsmcom.s |
. . . . . . 7
⊢ ⊕ =
(LSSum‘𝐺) |
| 5 | 4 | lsmcom 19839 |
. . . . . 6
⊢ ((𝐺 ∈ Abel ∧ 𝑅 ∈ (SubGrp‘𝐺) ∧ 𝑇 ∈ (SubGrp‘𝐺)) → (𝑅 ⊕ 𝑇) = (𝑇 ⊕ 𝑅)) |
| 6 | 1, 2, 3, 5 | syl3anc 1373 |
. . . . 5
⊢ ((𝐺 ∈ Abel ∧ (𝑄 ∈ (SubGrp‘𝐺) ∧ 𝑅 ∈ (SubGrp‘𝐺)) ∧ (𝑇 ∈ (SubGrp‘𝐺) ∧ 𝑈 ∈ (SubGrp‘𝐺))) → (𝑅 ⊕ 𝑇) = (𝑇 ⊕ 𝑅)) |
| 7 | 6 | oveq2d 7421 |
. . . 4
⊢ ((𝐺 ∈ Abel ∧ (𝑄 ∈ (SubGrp‘𝐺) ∧ 𝑅 ∈ (SubGrp‘𝐺)) ∧ (𝑇 ∈ (SubGrp‘𝐺) ∧ 𝑈 ∈ (SubGrp‘𝐺))) → (𝑄 ⊕ (𝑅 ⊕ 𝑇)) = (𝑄 ⊕ (𝑇 ⊕ 𝑅))) |
| 8 | | simp2l 1200 |
. . . . 5
⊢ ((𝐺 ∈ Abel ∧ (𝑄 ∈ (SubGrp‘𝐺) ∧ 𝑅 ∈ (SubGrp‘𝐺)) ∧ (𝑇 ∈ (SubGrp‘𝐺) ∧ 𝑈 ∈ (SubGrp‘𝐺))) → 𝑄 ∈ (SubGrp‘𝐺)) |
| 9 | 4 | lsmass 19650 |
. . . . 5
⊢ ((𝑄 ∈ (SubGrp‘𝐺) ∧ 𝑅 ∈ (SubGrp‘𝐺) ∧ 𝑇 ∈ (SubGrp‘𝐺)) → ((𝑄 ⊕ 𝑅) ⊕ 𝑇) = (𝑄 ⊕ (𝑅 ⊕ 𝑇))) |
| 10 | 8, 2, 3, 9 | syl3anc 1373 |
. . . 4
⊢ ((𝐺 ∈ Abel ∧ (𝑄 ∈ (SubGrp‘𝐺) ∧ 𝑅 ∈ (SubGrp‘𝐺)) ∧ (𝑇 ∈ (SubGrp‘𝐺) ∧ 𝑈 ∈ (SubGrp‘𝐺))) → ((𝑄 ⊕ 𝑅) ⊕ 𝑇) = (𝑄 ⊕ (𝑅 ⊕ 𝑇))) |
| 11 | 4 | lsmass 19650 |
. . . . 5
⊢ ((𝑄 ∈ (SubGrp‘𝐺) ∧ 𝑇 ∈ (SubGrp‘𝐺) ∧ 𝑅 ∈ (SubGrp‘𝐺)) → ((𝑄 ⊕ 𝑇) ⊕ 𝑅) = (𝑄 ⊕ (𝑇 ⊕ 𝑅))) |
| 12 | 8, 3, 2, 11 | syl3anc 1373 |
. . . 4
⊢ ((𝐺 ∈ Abel ∧ (𝑄 ∈ (SubGrp‘𝐺) ∧ 𝑅 ∈ (SubGrp‘𝐺)) ∧ (𝑇 ∈ (SubGrp‘𝐺) ∧ 𝑈 ∈ (SubGrp‘𝐺))) → ((𝑄 ⊕ 𝑇) ⊕ 𝑅) = (𝑄 ⊕ (𝑇 ⊕ 𝑅))) |
| 13 | 7, 10, 12 | 3eqtr4d 2780 |
. . 3
⊢ ((𝐺 ∈ Abel ∧ (𝑄 ∈ (SubGrp‘𝐺) ∧ 𝑅 ∈ (SubGrp‘𝐺)) ∧ (𝑇 ∈ (SubGrp‘𝐺) ∧ 𝑈 ∈ (SubGrp‘𝐺))) → ((𝑄 ⊕ 𝑅) ⊕ 𝑇) = ((𝑄 ⊕ 𝑇) ⊕ 𝑅)) |
| 14 | 13 | oveq1d 7420 |
. 2
⊢ ((𝐺 ∈ Abel ∧ (𝑄 ∈ (SubGrp‘𝐺) ∧ 𝑅 ∈ (SubGrp‘𝐺)) ∧ (𝑇 ∈ (SubGrp‘𝐺) ∧ 𝑈 ∈ (SubGrp‘𝐺))) → (((𝑄 ⊕ 𝑅) ⊕ 𝑇) ⊕ 𝑈) = (((𝑄 ⊕ 𝑇) ⊕ 𝑅) ⊕ 𝑈)) |
| 15 | 4 | lsmsubg2 19840 |
. . . 4
⊢ ((𝐺 ∈ Abel ∧ 𝑄 ∈ (SubGrp‘𝐺) ∧ 𝑅 ∈ (SubGrp‘𝐺)) → (𝑄 ⊕ 𝑅) ∈ (SubGrp‘𝐺)) |
| 16 | 1, 8, 2, 15 | syl3anc 1373 |
. . 3
⊢ ((𝐺 ∈ Abel ∧ (𝑄 ∈ (SubGrp‘𝐺) ∧ 𝑅 ∈ (SubGrp‘𝐺)) ∧ (𝑇 ∈ (SubGrp‘𝐺) ∧ 𝑈 ∈ (SubGrp‘𝐺))) → (𝑄 ⊕ 𝑅) ∈ (SubGrp‘𝐺)) |
| 17 | | simp3r 1203 |
. . 3
⊢ ((𝐺 ∈ Abel ∧ (𝑄 ∈ (SubGrp‘𝐺) ∧ 𝑅 ∈ (SubGrp‘𝐺)) ∧ (𝑇 ∈ (SubGrp‘𝐺) ∧ 𝑈 ∈ (SubGrp‘𝐺))) → 𝑈 ∈ (SubGrp‘𝐺)) |
| 18 | 4 | lsmass 19650 |
. . 3
⊢ (((𝑄 ⊕ 𝑅) ∈ (SubGrp‘𝐺) ∧ 𝑇 ∈ (SubGrp‘𝐺) ∧ 𝑈 ∈ (SubGrp‘𝐺)) → (((𝑄 ⊕ 𝑅) ⊕ 𝑇) ⊕ 𝑈) = ((𝑄 ⊕ 𝑅) ⊕ (𝑇 ⊕ 𝑈))) |
| 19 | 16, 3, 17, 18 | syl3anc 1373 |
. 2
⊢ ((𝐺 ∈ Abel ∧ (𝑄 ∈ (SubGrp‘𝐺) ∧ 𝑅 ∈ (SubGrp‘𝐺)) ∧ (𝑇 ∈ (SubGrp‘𝐺) ∧ 𝑈 ∈ (SubGrp‘𝐺))) → (((𝑄 ⊕ 𝑅) ⊕ 𝑇) ⊕ 𝑈) = ((𝑄 ⊕ 𝑅) ⊕ (𝑇 ⊕ 𝑈))) |
| 20 | 4 | lsmsubg2 19840 |
. . . 4
⊢ ((𝐺 ∈ Abel ∧ 𝑄 ∈ (SubGrp‘𝐺) ∧ 𝑇 ∈ (SubGrp‘𝐺)) → (𝑄 ⊕ 𝑇) ∈ (SubGrp‘𝐺)) |
| 21 | 1, 8, 3, 20 | syl3anc 1373 |
. . 3
⊢ ((𝐺 ∈ Abel ∧ (𝑄 ∈ (SubGrp‘𝐺) ∧ 𝑅 ∈ (SubGrp‘𝐺)) ∧ (𝑇 ∈ (SubGrp‘𝐺) ∧ 𝑈 ∈ (SubGrp‘𝐺))) → (𝑄 ⊕ 𝑇) ∈ (SubGrp‘𝐺)) |
| 22 | 4 | lsmass 19650 |
. . 3
⊢ (((𝑄 ⊕ 𝑇) ∈ (SubGrp‘𝐺) ∧ 𝑅 ∈ (SubGrp‘𝐺) ∧ 𝑈 ∈ (SubGrp‘𝐺)) → (((𝑄 ⊕ 𝑇) ⊕ 𝑅) ⊕ 𝑈) = ((𝑄 ⊕ 𝑇) ⊕ (𝑅 ⊕ 𝑈))) |
| 23 | 21, 2, 17, 22 | syl3anc 1373 |
. 2
⊢ ((𝐺 ∈ Abel ∧ (𝑄 ∈ (SubGrp‘𝐺) ∧ 𝑅 ∈ (SubGrp‘𝐺)) ∧ (𝑇 ∈ (SubGrp‘𝐺) ∧ 𝑈 ∈ (SubGrp‘𝐺))) → (((𝑄 ⊕ 𝑇) ⊕ 𝑅) ⊕ 𝑈) = ((𝑄 ⊕ 𝑇) ⊕ (𝑅 ⊕ 𝑈))) |
| 24 | 14, 19, 23 | 3eqtr3d 2778 |
1
⊢ ((𝐺 ∈ Abel ∧ (𝑄 ∈ (SubGrp‘𝐺) ∧ 𝑅 ∈ (SubGrp‘𝐺)) ∧ (𝑇 ∈ (SubGrp‘𝐺) ∧ 𝑈 ∈ (SubGrp‘𝐺))) → ((𝑄 ⊕ 𝑅) ⊕ (𝑇 ⊕ 𝑈)) = ((𝑄 ⊕ 𝑇) ⊕ (𝑅 ⊕ 𝑈))) |