theorem
  x, y are_orthogonal implies -x, -y are_orthogonal by Th20;
