let V be RealUnitarySpace; :: thesis: for W1, W2 being Subspace of V holds
( W1 + W2 = UNITSTR(# the carrier of V,the ZeroF of V,the U7 of V,the Mult of V,the scalar of V #) iff for v being VECTOR of V ex v1, v2 being VECTOR of V st
( v1 in W1 & v2 in W2 & v = v1 + v2 ) )
let W1, W2 be Subspace of V; :: thesis: ( W1 + W2 = UNITSTR(# the carrier of V,the ZeroF of V,the U7 of V,the Mult of V,the scalar of V #) iff for v being VECTOR of V ex v1, v2 being VECTOR of V st
( v1 in W1 & v2 in W2 & v = v1 + v2 ) )
thus ( W1 + W2 = UNITSTR(# the carrier of V,the ZeroF of V,the U7 of V,the Mult of V,the scalar of V #) implies for v being VECTOR of V ex v1, v2 being VECTOR of V st
( v1 in W1 & v2 in W2 & v = v1 + v2 ) ) :: thesis: ( ( for v being VECTOR of V ex v1, v2 being VECTOR of V st
( v1 in W1 & v2 in W2 & v = v1 + v2 ) ) implies W1 + W2 = UNITSTR(# the carrier of V,the ZeroF of V,the U7 of V,the Mult of V,the scalar of V #) )

proof

assume A1: W1 + W2 = UNITSTR(# the carrier of V,the ZeroF of V,the U7 of V,the Mult of V,the scalar of V #) ; :: thesis: for v being VECTOR of V ex v1, v2 being VECTOR of V st
( v1 in W1 & v2 in W2 & v = v1 + v2 )
let v be VECTOR of V; :: thesis: ex v1, v2 being VECTOR of V st
( v1 in W1 & v2 in W2 & v = v1 + v2 )
v in UNITSTR(# the carrier of V,the ZeroF of V,the U7 of V,the Mult of V,the scalar of V #) by RLVECT_1:3;
hence ex v1, v2 being VECTOR of V st
( v1 in W1 & v2 in W2 & v = v1 + v2 ) by A1, Th1; :: thesis: verum

end;

assume A2: for v being VECTOR of V ex v1, v2 being VECTOR of V st
( v1 in W1 & v2 in W2 & v = v1 + v2 ) ; :: thesis: W1 + W2 = UNITSTR(# the carrier of V,the ZeroF of V,the U7 of V,the Mult of V,the scalar of V #)

now

let u be VECTOR of V; :: thesis: u in W1 + W2
ex v1, v2 being VECTOR of V st
( v1 in W1 & v2 in W2 & u = v1 + v2 ) by A2;
hence u in W1 + W2 by Th1; :: thesis: verum

end;

hence W1 + W2 = UNITSTR(# the carrier of V,the ZeroF of V,the U7 of V,the Mult of V,the scalar of V #) by Lm12; :: thesis: verum