theorem Th50:
  (- L).v = - L.v
proof
  thus (- L).v = L.v * (- 1_R) by Def10
    .= - L.v by VECTSP_2:28;
end;
