 reserve A, B, C, A1, B1, C1, A2, B2, C2, C3 for Point of TOP-REAL 2,
  lambda, mu, nu, alpha, beta, gamma for Real,
  X, Y, Z for Subset of TOP-REAL 2;

theorem
  ((- lambda) * A) `1 = - lambda * A `1 &
  ((- lambda) * A) `2 = - lambda * A `2
proof
  ((- lambda) * A) `1 = (- (lambda * A)) `1 by RLVECT_1:79
  .= - (lambda * A) `1 by Th3;
  hence ((- lambda) * A) `1 = - lambda * A `1 by Th2;
  ((- lambda) * A) `2 = (- (lambda * A)) `2 by RLVECT_1:79
  .= - (lambda * A) `2 by Th3;
  hence thesis by Th2;
end;
