ismgmd - Metamath Proof Explorer

	Metamath Proof Explorer		< Previous Next > Nearby theorems
Mirrors > Home > MPE Home > Th. List > ismgmd		Structured version Visualization version GIF version

Theorem ismgmd 18745

Description: Deduce a magma from its properties. (Contributed by AV, 25-Feb-2020.)

**Hypotheses**
Ref	Expression
ismgmd.b	⊢ (𝜑 → 𝐵 = (Base‘𝐺))
ismgmd.0	⊢ (𝜑 → 𝐺 ∈ 𝑉)
ismgmd.p	⊢ (𝜑 → + = (+_g‘𝐺))
ismgmd.c	⊢ ((𝜑 ∧ 𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐵) → (𝑥 + 𝑦) ∈ 𝐵)

**Assertion**
Ref	Expression
ismgmd	⊢ (𝜑 → 𝐺 ∈ Mgm)

Distinct variable groups: 𝑥,𝑦,𝐵 𝑥,𝐺,𝑦 𝜑,𝑥,𝑦 Allowed substitution hints: + (𝑥, 𝑦) 𝑉(𝑥, 𝑦)

**Proof of Theorem ismgmd**
Step	Hyp	Ref	Expression
1		ismgmd.c	. . . . 5 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐵) → (𝑥 + 𝑦) ∈ 𝐵)
2	1	3expb 1138	. . . 4 ⊢ ((𝜑 ∧ (𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐵)) → (𝑥 + 𝑦) ∈ 𝐵)
3	2	ralrimivva 3205	. . 3 ⊢ (𝜑 → ∀𝑥 ∈ 𝐵 ∀𝑦 ∈ 𝐵 (𝑥 + 𝑦) ∈ 𝐵)
4		ismgmd.b	. . . 4 ⊢ (𝜑 → 𝐵 = (Base‘𝐺))
5		ismgmd.p	. . . . . . 7 ⊢ (𝜑 → + = (+_g‘𝐺))
6	5	oveqd 7431	. . . . . 6 ⊢ (𝜑 → (𝑥 + 𝑦) = (𝑥(+_g‘𝐺)𝑦))
7	6, 4	eleq12d 2854	. . . . 5 ⊢ (𝜑 → ((𝑥 + 𝑦) ∈ 𝐵 ↔ (𝑥(+_g‘𝐺)𝑦) ∈ (Base‘𝐺)))
8	4, 7	raleqbidv 3334	. . . 4 ⊢ (𝜑 → (∀𝑦 ∈ 𝐵 (𝑥 + 𝑦) ∈ 𝐵 ↔ ∀𝑦 ∈ (Base‘𝐺)(𝑥(+_g‘𝐺)𝑦) ∈ (Base‘𝐺)))
9	4, 8	raleqbidv 3334	. . 3 ⊢ (𝜑 → (∀𝑥 ∈ 𝐵 ∀𝑦 ∈ 𝐵 (𝑥 + 𝑦) ∈ 𝐵 ↔ ∀𝑥 ∈ (Base‘𝐺)∀𝑦 ∈ (Base‘𝐺)(𝑥(+_g‘𝐺)𝑦) ∈ (Base‘𝐺)))
10	3, 9	mpbid 235	. 2 ⊢ (𝜑 → ∀𝑥 ∈ (Base‘𝐺)∀𝑦 ∈ (Base‘𝐺)(𝑥(+_g‘𝐺)𝑦) ∈ (Base‘𝐺))
11		ismgmd.0	. . 3 ⊢ (𝜑 → 𝐺 ∈ 𝑉)
12		eqid 2760	. . . 4 ⊢ (Base‘𝐺) = (Base‘𝐺)
13		eqid 2760	. . . 4 ⊢ (+_g‘𝐺) = (+_g‘𝐺)
14	12, 13	ismgm 18732	. . 3 ⊢ (𝐺 ∈ 𝑉 → (𝐺 ∈ Mgm ↔ ∀𝑥 ∈ (Base‘𝐺)∀𝑦 ∈ (Base‘𝐺)(𝑥(+_g‘𝐺)𝑦) ∈ (Base‘𝐺)))
15	11, 14	syl 18	. 2 ⊢ (𝜑 → (𝐺 ∈ Mgm ↔ ∀𝑥 ∈ (Base‘𝐺)∀𝑦 ∈ (Base‘𝐺)(𝑥(+_g‘𝐺)𝑦) ∈ (Base‘𝐺)))
16	10, 15	mpbird 260	1 ⊢ (𝜑 → 𝐺 ∈ Mgm)

Colors of variables: wff setvar class

This proof depends on syntax axioms: → wi 4 ↔ wb 209 ∧ w3a 1103 = wceq 1570 ∈ wcel 2145 ∀wral 3076 ‘cfv 6533 (class class class)co 7414 Basecbs 17302 +_gcplusg 17343 Mgmcmgm 18729

This proof depends on axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1828 ax-4 1842 ax-5 1943 ax-6 2000 ax-7 2041 ax-8 2147 ax-9 2155 ax-ext 2732 ax-nul 5263

This proof depends on definitions: df-bi 210 df-an 402 df-or 862 df-3an 1105 df-tru 1573 df-fal 1583 df-ex 1813 df-sb 2100 df-clab 2739 df-cleq 2752 df-clel 2835 df-ne 2956 df-ral 3077 df-rab 3413 df-v 3452 df-sbc 3740 df-dif 3902 df-un 3904 df-ss 3916 df-nul 4280 df-if 4483 df-sn 4585 df-pr 4587 df-op 4591 df-uni 4868 df-br 5104 df-iota 6489 df-fv 6541 df-ov 7417 df-mgm 18731

This theorem is used by: imasmgm2 18777 issubmgm2 18806

W3C validator