reserve z,z1,z2 for Complex;
reserve r,x1,x2 for Real;
reserve p0,p,p1,p2,p3,q for Point of TOP-REAL 2;

theorem Th16:
  cpx2euc(0c)= 0.TOP-REAL 2 by COMPLEX1:4,EUCLID:54;
