Theorem lmodplusg

Description: The additive operation of a constructed left vector space. (Contributed by Mario Carneiro, 2-Oct-2013) (Revised by Mario Carneiro, 29-Aug-2015)

	Ref	Expression
Hypothesis	lmodstr.w	$$⊢W=\left\{⟨{\mathrm{Base}}_{\mathrm{ndx}},B⟩,⟨{+}_{\mathrm{ndx}},\underset{\dot{}}{+}⟩,⟨\mathrm{Scalar}\left(\mathrm{ndx}\right),F⟩\right\}\cup \left\{⟨{\cdot }_{\mathrm{ndx}},\underset{\dot{}}{·}⟩\right\}$$
Assertion	lmodplusg	$$⊢\underset{\dot{}}{+}\in X\to \underset{\dot{}}{+}={+}_W$$

Proof

Step	Hyp	Ref	Expression
1		lmodstr.w	$$⊢W=\left\{⟨{\mathrm{Base}}_{\mathrm{ndx}},B⟩,⟨{+}_{\mathrm{ndx}},\underset{\dot{}}{+}⟩,⟨\mathrm{Scalar}\left(\mathrm{ndx}\right),F⟩\right\}\cup \left\{⟨{\cdot }_{\mathrm{ndx}},\underset{\dot{}}{·}⟩\right\}$$
2	1	lmodstr	$$⊢W\mathrm{Struct}⟨1,6⟩$$
3		plusgid	$$⊢{+}_{𝑔}=\mathrm{Slot}{+}_{\mathrm{ndx}}$$
4		snsstp2	$$⊢\left\{⟨{+}_{\mathrm{ndx}},\underset{\dot{}}{+}⟩\right\}\subseteq \left\{⟨{\mathrm{Base}}_{\mathrm{ndx}},B⟩,⟨{+}_{\mathrm{ndx}},\underset{\dot{}}{+}⟩,⟨\mathrm{Scalar}\left(\mathrm{ndx}\right),F⟩\right\}$$
5		ssun1	$$⊢\left\{⟨{\mathrm{Base}}_{\mathrm{ndx}},B⟩,⟨{+}_{\mathrm{ndx}},\underset{\dot{}}{+}⟩,⟨\mathrm{Scalar}\left(\mathrm{ndx}\right),F⟩\right\}\subseteq \left\{⟨{\mathrm{Base}}_{\mathrm{ndx}},B⟩,⟨{+}_{\mathrm{ndx}},\underset{\dot{}}{+}⟩,⟨\mathrm{Scalar}\left(\mathrm{ndx}\right),F⟩\right\}\cup \left\{⟨{\cdot }_{\mathrm{ndx}},\underset{\dot{}}{·}⟩\right\}$$
6	5 1	sseqtrri	$$⊢\left\{⟨{\mathrm{Base}}_{\mathrm{ndx}},B⟩,⟨{+}_{\mathrm{ndx}},\underset{\dot{}}{+}⟩,⟨\mathrm{Scalar}\left(\mathrm{ndx}\right),F⟩\right\}\subseteq W$$
7	4 6	sstri	$$⊢\left\{⟨{+}_{\mathrm{ndx}},\underset{\dot{}}{+}⟩\right\}\subseteq W$$
8	2 3 7	strfv	$$⊢\underset{\dot{}}{+}\in X\to \underset{\dot{}}{+}={+}_W$$