4 #include "base/cl_sysdep.h"
7 #include "cln/rational.h"
12 #include "rational/cl_RA.h"
13 #include "cln/integer.h"
17 bool equal (const cl_RA& r, const cl_RA& s)
20 // r,s Integer -> klar
21 // r Integer, s Ratio: verschieden.
22 // r Ratio, s Integer: verschieden.
23 // r,s Ratios: r=a/b, s=c/d. Vergleiche a mit c und b mit d.
41 if (!equal(numerator(r),numerator(s)))
43 if (!equal(denominator(r),denominator(s)))