12 #include "cln/float.h"
17 const cos_sin_t cos_sin (const cl_R& x)
20 // x rational -> bei x=0 (1,0) als Ergebnis, sonst x in Float umwandeln.
21 // x Float -> bekannt.
25 if (zerop(x)) // x=0 -> (1,0) als Ergebnis
26 return cos_sin_t(1,0);
27 return cos_sin(cl_float(x)); // sonst in Float umwandeln