Metamath Proof Explorer


Theorem gsumws2

Description: Valuation of a pair in a monoid. (Contributed by Stefan O'Rear, 23-Aug-2015) (Revised by Mario Carneiro, 27-Feb-2016)

Ref Expression
Hypotheses gsumccat.b B = Base G
gsumccat.p + ˙ = + G
Assertion gsumws2 G Mnd S B T B G ⟨“ ST ”⟩ = S + ˙ T

Proof

Step Hyp Ref Expression
1 gsumccat.b B = Base G
2 gsumccat.p + ˙ = + G
3 df-s2 ⟨“ ST ”⟩ = ⟨“ S ”⟩ ++ ⟨“ T ”⟩
4 3 a1i G Mnd S B T B ⟨“ ST ”⟩ = ⟨“ S ”⟩ ++ ⟨“ T ”⟩
5 4 oveq2d G Mnd S B T B G ⟨“ ST ”⟩ = G ⟨“ S ”⟩ ++ ⟨“ T ”⟩
6 id G Mnd G Mnd
7 s1cl S B ⟨“ S ”⟩ Word B
8 s1cl T B ⟨“ T ”⟩ Word B
9 1 2 gsumccat G Mnd ⟨“ S ”⟩ Word B ⟨“ T ”⟩ Word B G ⟨“ S ”⟩ ++ ⟨“ T ”⟩ = G ⟨“ S ”⟩ + ˙ G ⟨“ T ”⟩
10 6 7 8 9 syl3an G Mnd S B T B G ⟨“ S ”⟩ ++ ⟨“ T ”⟩ = G ⟨“ S ”⟩ + ˙ G ⟨“ T ”⟩
11 1 gsumws1 S B G ⟨“ S ”⟩ = S
12 1 gsumws1 T B G ⟨“ T ”⟩ = T
13 11 12 oveqan12d S B T B G ⟨“ S ”⟩ + ˙ G ⟨“ T ”⟩ = S + ˙ T
14 13 3adant1 G Mnd S B T B G ⟨“ S ”⟩ + ˙ G ⟨“ T ”⟩ = S + ˙ T
15 5 10 14 3eqtrd G Mnd S B T B G ⟨“ ST ”⟩ = S + ˙ T