Metamath Proof Explorer


Theorem degenmgmopdm

Description: The domain of the operation of a degenerate magma. (Contributed by AV, 18-Aug-2026)

Ref Expression
Hypothesis degenmgm.m ⊢ M = Base ndx ∅ 1 𝑜 + ndx 1 𝑜 1 𝑜 1 𝑜 1 𝑜 2 𝑜 1 𝑜 1 𝑜 ∅ 1 𝑜
Assertion degenmgmopdm ⊢ dom ⁡ + M = 1 𝑜 × ∅ 1 𝑜 2 𝑜

Proof

Step Hyp Ref Expression
1 degenmgm.m ⊢ M = Base ndx ∅ 1 𝑜 + ndx 1 𝑜 1 𝑜 1 𝑜 1 𝑜 2 𝑜 1 𝑜 1 𝑜 ∅ 1 𝑜
2 1oex ⊢ 1 𝑜 ∈ V
3 2 2 2 dmtpop ⊢ dom ⁡ 1 𝑜 1 𝑜 1 𝑜 1 𝑜 2 𝑜 1 𝑜 1 𝑜 ∅ 1 𝑜 = 1 𝑜 1 𝑜 1 𝑜 2 𝑜 1 𝑜 ∅
4 tpex ⊢ 1 𝑜 1 𝑜 1 𝑜 1 𝑜 2 𝑜 1 𝑜 1 𝑜 ∅ 1 𝑜 ∈ V
5 1 grpplusg ⊢ 1 𝑜 1 𝑜 1 𝑜 1 𝑜 2 𝑜 1 𝑜 1 𝑜 ∅ 1 𝑜 ∈ V → 1 𝑜 1 𝑜 1 𝑜 1 𝑜 2 𝑜 1 𝑜 1 𝑜 ∅ 1 𝑜 = + M
6 4 5 ax-mp ⊢ 1 𝑜 1 𝑜 1 𝑜 1 𝑜 2 𝑜 1 𝑜 1 𝑜 ∅ 1 𝑜 = + M
7 6 eqcomi ⊢ + M = 1 𝑜 1 𝑜 1 𝑜 1 𝑜 2 𝑜 1 𝑜 1 𝑜 ∅ 1 𝑜
8 7 dmeqi ⊢ dom ⁡ + M = dom ⁡ 1 𝑜 1 𝑜 1 𝑜 1 𝑜 2 𝑜 1 𝑜 1 𝑜 ∅ 1 𝑜
9 0ex ⊢ ∅ ∈ V
10 2oex ⊢ 2 𝑜 ∈ V
11 xpsntpg ⊢ 1 𝑜 ∈ V ∧ ∅ ∈ V ∧ 1 𝑜 ∈ V ∧ 2 𝑜 ∈ V → 1 𝑜 × ∅ 1 𝑜 2 𝑜 = 1 𝑜 ∅ 1 𝑜 1 𝑜 1 𝑜 2 𝑜
12 2 9 2 10 11 mp4an ⊢ 1 𝑜 × ∅ 1 𝑜 2 𝑜 = 1 𝑜 ∅ 1 𝑜 1 𝑜 1 𝑜 2 𝑜
13 tprot ⊢ 1 𝑜 ∅ 1 𝑜 1 𝑜 1 𝑜 2 𝑜 = 1 𝑜 1 𝑜 1 𝑜 2 𝑜 1 𝑜 ∅
14 12 13 eqtri ⊢ 1 𝑜 × ∅ 1 𝑜 2 𝑜 = 1 𝑜 1 𝑜 1 𝑜 2 𝑜 1 𝑜 ∅
15 3 8 14 3eqtr4i ⊢ dom ⁡ + M = 1 𝑜 × ∅ 1 𝑜 2 𝑜