let GF be non empty right_complementable associative well-unital distributive Abelian add-associative right_zeroed doubleLoopStr ; :: thesis: for M being non empty right_complementable VectSp-like Abelian add-associative right_zeroed VectSpStr of GF
for W1 being Subspace of M
for W2, W3 being strict Subspace of M st W1 is Subspace of W2 holds
W1 + W3 is Subspace of W2 + W3

let M be non empty right_complementable VectSp-like Abelian add-associative right_zeroed VectSpStr of GF; :: thesis: for W1 being Subspace of M
for W2, W3 being strict Subspace of M st W1 is Subspace of W2 holds
W1 + W3 is Subspace of W2 + W3

let W1 be Subspace of M; :: thesis: for W2, W3 being strict Subspace of M st W1 is Subspace of W2 holds
W1 + W3 is Subspace of W2 + W3

let W2, W3 be strict Subspace of M; :: thesis: ( W1 is Subspace of W2 implies W1 + W3 is Subspace of W2 + W3 )
assume A1: W1 is Subspace of W2 ; :: thesis: W1 + W3 is Subspace of W2 + W3
(W1 + W3) + (W2 + W3) = (W1 + W3) + (W3 + W2) by Lm1
.= ((W1 + W3) + W3) + W2 by Th10
.= (W1 + (W3 + W3)) + W2 by Th10
.= (W1 + W3) + W2 by Lm3
.= W1 + (W3 + W2) by Th10
.= W1 + (W2 + W3) by Lm1
.= (W1 + W2) + W3 by Th10
.= W2 + W3 by A1, Th12 ;
hence W1 + W3 is Subspace of W2 + W3 by Th12; :: thesis: verum