NAME
	IEEEDPSincos -- compute the arc tangent of a floating point number

   SYNOPSIS
	  x   = IEEEDPSincos( z ,  y  );
	d0/d1		     a0  d0/d1

	double	x,y,*z;

   FUNCTION
	Compute sin and cosine of y in IEEE double precision.
	Store the cosine in *z. Return the sine of y.

   INPUTS
	y - IEEE double precision floating point value
	z - pointer to IEEE double precision floating point number

   RESULT
	x - IEEE double precision floating point value

   BUGS

   SEE ALSO
	IEEEDPSin(), IEEEDPCos()