| Step | Hyp | Ref
| Expression |
| 1 | | mgmidcl.e |
. 2
⊢ (𝜑 → ∃𝑒 ∈ 𝐵 ∀𝑥 ∈ 𝐵 ((𝑒 + 𝑥) = 𝑥 ∧ (𝑥 + 𝑒) = 𝑥)) |
| 2 | | oveq1 7430 |
. . . . . 6
⊢ (𝑒 = 𝑖 → (𝑒 + 𝑥) = (𝑖 + 𝑥)) |
| 3 | 2 | eqeq1d 2768 |
. . . . 5
⊢ (𝑒 = 𝑖 → ((𝑒 + 𝑥) = 𝑥 ↔ (𝑖 + 𝑥) = 𝑥)) |
| 4 | 3 | ovanraleqv 7447 |
. . . 4
⊢ (𝑒 = 𝑖 → (∀𝑥 ∈ 𝐵 ((𝑒 + 𝑥) = 𝑥 ∧ (𝑥 + 𝑒) = 𝑥) ↔ ∀𝑥 ∈ 𝐵 ((𝑖 + 𝑥) = 𝑥 ∧ (𝑥 + 𝑖) = 𝑥))) |
| 5 | 4 | cbvrexvw 3247 |
. . 3
⊢
(∃𝑒 ∈
𝐵 ∀𝑥 ∈ 𝐵 ((𝑒 + 𝑥) = 𝑥 ∧ (𝑥 + 𝑒) = 𝑥) ↔ ∃𝑖 ∈ 𝐵 ∀𝑥 ∈ 𝐵 ((𝑖 + 𝑥) = 𝑥 ∧ (𝑥 + 𝑖) = 𝑥)) |
| 6 | | ismgmid.b |
. . . . . . 7
⊢ 𝐵 = (Base‘𝐺) |
| 7 | | ismgmid.o |
. . . . . . 7
⊢ 0 =
(0g‘𝐺) |
| 8 | | ismgmid.p |
. . . . . . 7
⊢ + =
(+g‘𝐺) |
| 9 | 6, 7, 8, 1 | ismgmid 18748 |
. . . . . 6
⊢ (𝜑 → ((𝑖 ∈ 𝐵 ∧ ∀𝑥 ∈ 𝐵 ((𝑖 + 𝑥) = 𝑥 ∧ (𝑥 + 𝑖) = 𝑥)) ↔ 0 = 𝑖)) |
| 10 | 9 | biimpa 482 |
. . . . 5
⊢ ((𝜑 ∧ (𝑖 ∈ 𝐵 ∧ ∀𝑥 ∈ 𝐵 ((𝑖 + 𝑥) = 𝑥 ∧ (𝑥 + 𝑖) = 𝑥))) → 0 = 𝑖) |
| 11 | | eleq1 2854 |
. . . . . . . . . 10
⊢ (𝑖 = 0 → (𝑖 ∈ 𝐵 ↔ 0 ∈ 𝐵)) |
| 12 | | oveq1 7430 |
. . . . . . . . . . . 12
⊢ (𝑖 = 0 → (𝑖 + 𝑥) = ( 0 + 𝑥)) |
| 13 | 12 | eqeq1d 2768 |
. . . . . . . . . . 11
⊢ (𝑖 = 0 → ((𝑖 + 𝑥) = 𝑥 ↔ ( 0 + 𝑥) = 𝑥)) |
| 14 | 13 | ovanraleqv 7447 |
. . . . . . . . . 10
⊢ (𝑖 = 0 → (∀𝑥 ∈ 𝐵 ((𝑖 + 𝑥) = 𝑥 ∧ (𝑥 + 𝑖) = 𝑥) ↔ ∀𝑥 ∈ 𝐵 (( 0 + 𝑥) = 𝑥 ∧ (𝑥 + 0 ) = 𝑥))) |
| 15 | 11, 14 | anbi12d 644 |
. . . . . . . . 9
⊢ (𝑖 = 0 → ((𝑖 ∈ 𝐵 ∧ ∀𝑥 ∈ 𝐵 ((𝑖 + 𝑥) = 𝑥 ∧ (𝑥 + 𝑖) = 𝑥)) ↔ ( 0 ∈ 𝐵 ∧ ∀𝑥 ∈ 𝐵 (( 0 + 𝑥) = 𝑥 ∧ (𝑥 + 0 ) = 𝑥)))) |
| 16 | 15 | eqcoms 2774 |
. . . . . . . 8
⊢ ( 0 = 𝑖 → ((𝑖 ∈ 𝐵 ∧ ∀𝑥 ∈ 𝐵 ((𝑖 + 𝑥) = 𝑥 ∧ (𝑥 + 𝑖) = 𝑥)) ↔ ( 0 ∈ 𝐵 ∧ ∀𝑥 ∈ 𝐵 (( 0 + 𝑥) = 𝑥 ∧ (𝑥 + 0 ) = 𝑥)))) |
| 17 | 16 | adantl 487 |
. . . . . . 7
⊢ ((𝜑 ∧ 0 = 𝑖) → ((𝑖 ∈ 𝐵 ∧ ∀𝑥 ∈ 𝐵 ((𝑖 + 𝑥) = 𝑥 ∧ (𝑥 + 𝑖) = 𝑥)) ↔ ( 0 ∈ 𝐵 ∧ ∀𝑥 ∈ 𝐵 (( 0 + 𝑥) = 𝑥 ∧ (𝑥 + 0 ) = 𝑥)))) |
| 18 | 17 | biimpd 232 |
. . . . . 6
⊢ ((𝜑 ∧ 0 = 𝑖) → ((𝑖 ∈ 𝐵 ∧ ∀𝑥 ∈ 𝐵 ((𝑖 + 𝑥) = 𝑥 ∧ (𝑥 + 𝑖) = 𝑥)) → ( 0 ∈ 𝐵 ∧ ∀𝑥 ∈ 𝐵 (( 0 + 𝑥) = 𝑥 ∧ (𝑥 + 0 ) = 𝑥)))) |
| 19 | 18 | impancom 457 |
. . . . 5
⊢ ((𝜑 ∧ (𝑖 ∈ 𝐵 ∧ ∀𝑥 ∈ 𝐵 ((𝑖 + 𝑥) = 𝑥 ∧ (𝑥 + 𝑖) = 𝑥))) → ( 0 = 𝑖 → ( 0 ∈ 𝐵 ∧ ∀𝑥 ∈ 𝐵 (( 0 + 𝑥) = 𝑥 ∧ (𝑥 + 0 ) = 𝑥)))) |
| 20 | 10, 19 | mpd 16 |
. . . 4
⊢ ((𝜑 ∧ (𝑖 ∈ 𝐵 ∧ ∀𝑥 ∈ 𝐵 ((𝑖 + 𝑥) = 𝑥 ∧ (𝑥 + 𝑖) = 𝑥))) → ( 0 ∈ 𝐵 ∧ ∀𝑥 ∈ 𝐵 (( 0 + 𝑥) = 𝑥 ∧ (𝑥 + 0 ) = 𝑥))) |
| 21 | 20 | rexlimdvaa 3170 |
. . 3
⊢ (𝜑 → (∃𝑖 ∈ 𝐵 ∀𝑥 ∈ 𝐵 ((𝑖 + 𝑥) = 𝑥 ∧ (𝑥 + 𝑖) = 𝑥) → ( 0 ∈ 𝐵 ∧ ∀𝑥 ∈ 𝐵 (( 0 + 𝑥) = 𝑥 ∧ (𝑥 + 0 ) = 𝑥)))) |
| 22 | 5, 21 | biimtrid 245 |
. 2
⊢ (𝜑 → (∃𝑒 ∈ 𝐵 ∀𝑥 ∈ 𝐵 ((𝑒 + 𝑥) = 𝑥 ∧ (𝑥 + 𝑒) = 𝑥) → ( 0 ∈ 𝐵 ∧ ∀𝑥 ∈ 𝐵 (( 0 + 𝑥) = 𝑥 ∧ (𝑥 + 0 ) = 𝑥)))) |
| 23 | 1, 22 | mpd 16 |
1
⊢ (𝜑 → ( 0 ∈ 𝐵 ∧ ∀𝑥 ∈ 𝐵 (( 0 + 𝑥) = 𝑥 ∧ (𝑥 + 0 ) = 𝑥))) |