theorem
  |. <e2> .| = 1
proof
  |(<e2>,<e2>)| = 0^2 + 1^2 + 0^2 by Lm12  .= 1;
  hence thesis;
end;
