NAME
        IEEEDPCos -- compute the cosine of a floating point number

   SYNOPSIS
          x   = IEEEDPCos(  y  );
        d0/d1              d0/d1

        double  x,y;

   FUNCTION
        Compute cosine of y in IEEE double precision

   INPUTS
        y - IEEE double precision floating point value

   RESULT
        x - IEEE double precision floating point value

   BUGS

   SEE ALSO
        ieeedpacos(), ieeedpsin(), ieeedptan()