4 #include "base/cl_sysdep.h"
12 #include "real/cl_R.h"
16 const cl_F ftruncate (const cl_R& x, const cl_R& y)
19 // x,y beide rational: truncate(x,y), Quotienten in Float umwandeln.
20 // Sonst: ftruncate(x/y).
23 // beides rationale Zahlen
26 return cl_float(truncate1(x,y));
28 return ftruncate(x/y);