7 #include "cln/rational.h"
13 #include "cln/integer.h"
17 const cl_I truncate1 (const cl_RA& x)
20 // x Integer -> q := x
21 // x Ratio a/b -> (truncate a b)
27 var const cl_I& a = numerator(x);
28 var const cl_I& b = denominator(x);
29 return truncate1(a,b);