theorem
  - (- L) = L
proof
  let v;
  thus (- (- L)).v = ((- 1) * (- 1) * L).v by Th47
    .= 1 * L.v by Def11
    .= L.v;
end;
