let V be RealLinearSpace; :: thesis: for v being VECTOR of V
for W being Subspace of V holds
( - v in v + W iff v in W )
let v be VECTOR of V; :: thesis: for W being Subspace of V holds
( - v in v + W iff v in W )
let W be Subspace of V; :: thesis: ( - v in v + W iff v in W )
( ( v in W implies (- 1) * v in v + W ) & (- 1) * v = - v & ( - 1 <> 1 & (- 1) * v in v + W implies v in W ) ) by Th74, Th75, RLVECT_1:29;
hence ( - v in v + W iff v in W ) ; :: thesis: verum