Metamath Proof Explorer


Theorem cmn12

Description: Commutative/associative law for commutative monoids. (Contributed by Stefan O'Rear, 5-Sep-2015) (Revised by Mario Carneiro, 21-Apr-2016)

Ref Expression
Hypotheses ablcom.b ⊢ B = Base G
ablcom.p ⊢ + ˙ = + G
Assertion cmn12 ⊢ G ∈ CMnd ∧ X ∈ B ∧ Y ∈ B ∧ Z ∈ B → X + ˙ Y + ˙ Z = Y + ˙ X + ˙ Z

Proof

Step Hyp Ref Expression
1 ablcom.b ⊢ B = Base G
2 ablcom.p ⊢ + ˙ = + G
3 cmnmnd ⊢ G ∈ CMnd → G ∈ Mnd
4 3 adantr ⊢ G ∈ CMnd ∧ X ∈ B ∧ Y ∈ B ∧ Z ∈ B → G ∈ Mnd
5 simpr1 ⊢ G ∈ CMnd ∧ X ∈ B ∧ Y ∈ B ∧ Z ∈ B → X ∈ B
6 simpr2 ⊢ G ∈ CMnd ∧ X ∈ B ∧ Y ∈ B ∧ Z ∈ B → Y ∈ B
7 simpr3 ⊢ G ∈ CMnd ∧ X ∈ B ∧ Y ∈ B ∧ Z ∈ B → Z ∈ B
8 1 2 cmncom ⊢ G ∈ CMnd ∧ X ∈ B ∧ Y ∈ B → X + ˙ Y = Y + ˙ X
9 8 3adant3r3 ⊢ G ∈ CMnd ∧ X ∈ B ∧ Y ∈ B ∧ Z ∈ B → X + ˙ Y = Y + ˙ X
10 1 2 4 5 6 7 9 mnd12g ⊢ G ∈ CMnd ∧ X ∈ B ∧ Y ∈ B ∧ Z ∈ B → X + ˙ Y + ˙ Z = Y + ˙ X + ˙ Z