Metamath Proof Explorer


Theorem degenmgmnfn

Description: The operation of a degenerate magma is not a function on its base set. (Contributed by AV, 21-Aug-2026)

Ref Expression
Hypotheses degenmgm.m ⊢ M = Base ndx ∅ 1 𝑜 + ndx 1 𝑜 1 𝑜 1 𝑜 1 𝑜 2 𝑜 1 𝑜 1 𝑜 ∅ 1 𝑜
degenmgmbas.b ⊢ B = Base M
Assertion degenmgmnfn ⊢ ¬ + M Fn B × B

Proof

Step Hyp Ref Expression
1 degenmgm.m ⊢ M = Base ndx ∅ 1 𝑜 + ndx 1 𝑜 1 𝑜 1 𝑜 1 𝑜 2 𝑜 1 𝑜 1 𝑜 ∅ 1 𝑜
2 degenmgmbas.b ⊢ B = Base M
3 0ex ⊢ ∅ ∈ V
4 1oex ⊢ 1 𝑜 ∈ V
5 1n0 ⊢ 1 𝑜 ≠ ∅
6 5 necomi ⊢ ∅ ≠ 1 𝑜
7 prnesn ⊢ ∅ ∈ V ∧ 1 𝑜 ∈ V ∧ ∅ ≠ 1 𝑜 → ∅ 1 𝑜 ≠ 1 𝑜
8 3 4 6 7 mp3an ⊢ ∅ 1 𝑜 ≠ 1 𝑜
9 8 nesymi ⊢ ¬ 1 𝑜 = ∅ 1 𝑜
10 9 intnanr ⊢ ¬ 1 𝑜 = ∅ 1 𝑜 ∧ ∅ 1 𝑜 2 𝑜 = ∅ 1 𝑜
11 4 snnz ⊢ 1 𝑜 ≠ ∅
12 3 tpnz ⊢ ∅ 1 𝑜 2 𝑜 ≠ ∅
13 xp11 ⊢ 1 𝑜 ≠ ∅ ∧ ∅ 1 𝑜 2 𝑜 ≠ ∅ → 1 𝑜 × ∅ 1 𝑜 2 𝑜 = ∅ 1 𝑜 × ∅ 1 𝑜 ↔ 1 𝑜 = ∅ 1 𝑜 ∧ ∅ 1 𝑜 2 𝑜 = ∅ 1 𝑜
14 11 12 13 mp2an ⊢ 1 𝑜 × ∅ 1 𝑜 2 𝑜 = ∅ 1 𝑜 × ∅ 1 𝑜 ↔ 1 𝑜 = ∅ 1 𝑜 ∧ ∅ 1 𝑜 2 𝑜 = ∅ 1 𝑜
15 10 14 mtbir ⊢ ¬ 1 𝑜 × ∅ 1 𝑜 2 𝑜 = ∅ 1 𝑜 × ∅ 1 𝑜
16 1 degenmgmopdm ⊢ dom ⁡ + M = 1 𝑜 × ∅ 1 𝑜 2 𝑜
17 1 2 degenmgmbas ⊢ B = ∅ 1 𝑜
18 17 17 xpeq12i ⊢ B × B = ∅ 1 𝑜 × ∅ 1 𝑜
19 16 18 eqeq12i ⊢ dom ⁡ + M = B × B ↔ 1 𝑜 × ∅ 1 𝑜 2 𝑜 = ∅ 1 𝑜 × ∅ 1 𝑜
20 15 19 mtbir ⊢ ¬ dom ⁡ + M = B × B
21 20 intnan ⊢ ¬ Fun ⁡ + M ∧ dom ⁡ + M = B × B
22 df-fn ⊢ + M Fn B × B ↔ Fun ⁡ + M ∧ dom ⁡ + M = B × B
23 21 22 mtbir ⊢ ¬ + M Fn B × B