theorem Th2:
  cpx2euc(euc2cpx(p))=p
proof
  Re (p`1+p`2*<i>) = p`1 & Im(p`1+p`2*<i>) = p`2 by COMPLEX1:12;
  hence thesis by EUCLID:53;
end;
