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