theorem
  -<e2> = |[ 0,-1,0 ]|
proof
  -<e2> = |[ (-1)*<e2>.1, (-1)*<e2>.2, (-1)*<e2>.3 ]| by Lm1
      .= |[ 0,-1,0 ]|;
  hence thesis;
end;
