theorem Th3:
  - (a * v) = (- a) * v
proof
  thus - (a * v) = a * (- v) by RLVECT_1:25
    .= (- a) * v by RLVECT_1:24;
end;
