void cpolz(float[][2],long,float[][2],float*,long*);