reserve z1,z2,z3,z4,z for Quaternion;

theorem
  |.z*'* z*'.| = |.z.| ^2
proof
  |.z*'* z*'.| = |.z*z.| by Th32;
  hence thesis by QUATERNI:87;
end;
