Theorem clmacl

Description: Closure of ring addition for a subcomplex module. (Contributed by Mario Carneiro, 16-Oct-2015)

	Ref	Expression
Hypotheses	clm0.f	|- F = ( Scalar ` W )
	clmsub.k	|- K = ( Base ` F )
Assertion	clmacl	|- ( ( W e. CMod /\ X e. K /\ Y e. K ) -> ( X + Y ) e. K )

Proof

Step	Hyp	Ref	Expression
1		clm0.f	|- F = ( Scalar ` W )
2		clmsub.k	|- K = ( Base ` F )
3	1 2	clmsubrg	|- ( W e. CMod -> K e. ( SubRing ` CCfld ) )
4		cnfldadd	|- + = ( +g ` CCfld )
5	4	subrgacl	|- ( ( K e. ( SubRing ` CCfld ) /\ X e. K /\ Y e. K ) -> ( X + Y ) e. K )
6	3 5	syl3an1	|- ( ( W e. CMod /\ X e. K /\ Y e. K ) -> ( X + Y ) e. K )