let GF be non empty right_complementable associative well-unital distributive Abelian add-associative right_zeroed doubleLoopStr ; :: thesis: for V being non empty right_complementable VectSp-like Abelian add-associative right_zeroed VectSpStr of GF
for v, u being Element of V
for W being Subspace of V
for w1, w2 being Element of W st w1 = v & w2 = u holds
w1 + w2 = v + u
let V be non empty right_complementable VectSp-like Abelian add-associative right_zeroed VectSpStr of GF; :: thesis: for v, u being Element of V
for W being Subspace of V
for w1, w2 being Element of W st w1 = v & w2 = u holds
w1 + w2 = v + u
let v, u be Element of V; :: thesis: for W being Subspace of V
for w1, w2 being Element of W st w1 = v & w2 = u holds
w1 + w2 = v + u
let W be Subspace of V; :: thesis: for w1, w2 being Element of W st w1 = v & w2 = u holds
w1 + w2 = v + u
let w1, w2 be Element of W; :: thesis: ( w1 = v & w2 = u implies w1 + w2 = v + u )
assume A1:
( v = w1 & u = w2 )
; :: thesis: w1 + w2 = v + u
w1 + w2 = (the addF of V || the carrier of W) . [w1,w2]
by Def2;
hence
w1 + w2 = v + u
by A1, FUNCT_1:72; :: thesis: verum