theorem
  (1.R_Quaternion)*' = 1.R_Quaternion
proof
  1.R_Quaternion = 1r by Def10;
  hence thesis by QUATERNI:47;
end;
