4 #include "base/cl_sysdep.h"
12 #include "real/cl_R.h"
13 #include "cln/integer.h"
17 const cl_R rem (const cl_R& x, const cl_R& y)
20 // Beides Integers -> rem(x,y).
21 // Sonst: truncate2(x/y) -> (q,r). Liefere x-y*q=y*r.
28 return y * truncate2(x/y).remainder;