4 #include "base/cl_sysdep.h"
12 #include "float/cl_F.h"
13 #include "cln/sfloat.h"
14 #include "cln/ffloat.h"
15 #include "cln/dfloat.h"
16 #include "cln/lfloat.h"
17 #include "float/lfloat/cl_LF.h"
21 const cl_F_fdiv_t ffloor2 (const cl_F& x)
23 #if 0 // 3 type dispatches
24 var cl_F q = ffloor(x);
25 return cl_F_fdiv_t(q,x-q);
26 #else // 1 type dispatch
28 , var cl_SF q = ffloor(x); return cl_F_fdiv_t(q,x-q);
29 , var cl_FF q = ffloor(x); return cl_F_fdiv_t(q,x-q);
30 , var cl_DF q = ffloor(x); return cl_F_fdiv_t(q,x-q);
31 , var cl_LF q = ffloor(x); return cl_F_fdiv_t(q,LF_LF_minus_LF(x,q));