reserve x for Real;

theorem
  Arg <i> = PI/2
proof
  <i> = (0+1*<i>);
  hence thesis by Th37;
end;
