Metamath Proof Explorer


Theorem cycsubmcom

Description: The operation of a monoid is commutative over the set of nonnegative integer powers of an element A of the monoid. (Contributed by AV, 20-Jan-2024)

Ref Expression
Hypotheses cycsubmcom.b ⊢ B = Base G
cycsubmcom.t ⊢ · ˙ = ⋅ G
cycsubmcom.f ⊢ F = x ∈ ℕ 0 ⟼ x · ˙ A
cycsubmcom.c ⊢ C = ran ⁡ F
cycsubmcom.p ⊢ + ˙ = + G
Assertion cycsubmcom ⊢ G ∈ Mnd ∧ A ∈ B ∧ X ∈ C ∧ Y ∈ C → X + ˙ Y = Y + ˙ X

Proof

Step Hyp Ref Expression
1 cycsubmcom.b ⊢ B = Base G
2 cycsubmcom.t ⊢ · ˙ = ⋅ G
3 cycsubmcom.f ⊢ F = x ∈ ℕ 0 ⟼ x · ˙ A
4 cycsubmcom.c ⊢ C = ran ⁡ F
5 cycsubmcom.p ⊢ + ˙ = + G
6 1 2 3 4 cycsubmel ⊢ c ∈ C ↔ ∃ i ∈ ℕ 0 c = i · ˙ A
7 6 bilani ⊢ G ∈ Mnd ∧ A ∈ B ∧ X ∈ C ∧ Y ∈ C ∧ c ∈ C → ∃ i ∈ ℕ 0 c = i · ˙ A
8 7 ralrimiva ⊢ G ∈ Mnd ∧ A ∈ B ∧ X ∈ C ∧ Y ∈ C → ∀ c ∈ C ∃ i ∈ ℕ 0 c = i · ˙ A
9 simplll ⊢ G ∈ Mnd ∧ A ∈ B ∧ X ∈ C ∧ Y ∈ C ∧ m ∈ ℕ 0 ∧ n ∈ ℕ 0 → G ∈ Mnd
10 simprl ⊢ G ∈ Mnd ∧ A ∈ B ∧ X ∈ C ∧ Y ∈ C ∧ m ∈ ℕ 0 ∧ n ∈ ℕ 0 → m ∈ ℕ 0
11 simprr ⊢ G ∈ Mnd ∧ A ∈ B ∧ X ∈ C ∧ Y ∈ C ∧ m ∈ ℕ 0 ∧ n ∈ ℕ 0 → n ∈ ℕ 0
12 simpllr ⊢ G ∈ Mnd ∧ A ∈ B ∧ X ∈ C ∧ Y ∈ C ∧ m ∈ ℕ 0 ∧ n ∈ ℕ 0 → A ∈ B
13 1 2 5 mulgnn0dir ⊢ G ∈ Mnd ∧ m ∈ ℕ 0 ∧ n ∈ ℕ 0 ∧ A ∈ B → m + n · ˙ A = m · ˙ A + ˙ n · ˙ A
14 9 10 11 12 13 syl13anc ⊢ G ∈ Mnd ∧ A ∈ B ∧ X ∈ C ∧ Y ∈ C ∧ m ∈ ℕ 0 ∧ n ∈ ℕ 0 → m + n · ˙ A = m · ˙ A + ˙ n · ˙ A
15 14 ralrimivva ⊢ G ∈ Mnd ∧ A ∈ B ∧ X ∈ C ∧ Y ∈ C → ∀ m ∈ ℕ 0 ∀ n ∈ ℕ 0 m + n · ˙ A = m · ˙ A + ˙ n · ˙ A
16 simprl ⊢ G ∈ Mnd ∧ A ∈ B ∧ X ∈ C ∧ Y ∈ C → X ∈ C
17 simprr ⊢ G ∈ Mnd ∧ A ∈ B ∧ X ∈ C ∧ Y ∈ C → Y ∈ C
18 nn0sscn ⊢ ℕ 0 ⊆ ℂ
19 18 a1i ⊢ G ∈ Mnd ∧ A ∈ B ∧ X ∈ C ∧ Y ∈ C → ℕ 0 ⊆ ℂ
20 8 15 16 17 19 cyccom ⊢ G ∈ Mnd ∧ A ∈ B ∧ X ∈ C ∧ Y ∈ C → X + ˙ Y = Y + ˙ X