reserve a,b,c,d for Real;
reserve z,z1,z2 for Complex;

theorem
  Im (a*<i>) = a
proof
  thus Im (a*<i>) = Re a * Im (<i>) + Im a * Re (<i>) by Th9
  .= a by Def1,Th7;
end;
