13 #include "cl_R_div_t.h"
15 const cl_R_fdiv_t ffloor2 (const cl_R& x, const cl_R& y)
18 // x,y beide rational: floor(x,y), Quotienten in Float umwandeln.
19 // Sonst: ffloor(x/y) -> q,r. Liefere die Werte q und x-y*q = y*r.
22 // beides rationale Zahlen
25 var cl_R_div_t q_r = floor2(x,y);
26 var cl_I& q = q_r.quotient;
27 var cl_R& r = q_r.remainder;
28 return cl_R_fdiv_t(cl_float(q),r);
30 var cl_R_fdiv_t q_r = ffloor2(x/y);
31 var cl_F& q = q_r.quotient;
32 var cl_R& r = q_r.remainder;
33 return cl_R_fdiv_t(q,y*r);