complex*16 x,y,z,u z=(12.2,175.1) x=cdcos(z) u=(2.2,175.4) y=cdcos(u) print *,x,y end