theorem Th2:
  - v = (- 1.R) * v by VECTSP_1:14;
