// expt_pos().
// General includes.
-#include "cl_sysdep.h"
+#include "base/cl_sysdep.h"
// Specification.
-#include "cl_rational.h"
+#include "cln/rational.h"
// Implementation.
-#include "cl_RA.h"
-#include "cl_integer.h"
+#include "rational/cl_RA.h"
+#include "cln/integer.h"
+
+namespace cln {
const cl_RA expt_pos (const cl_RA& x, uintL y)
{
// Methode:
// x Integer -> klar
- // x Ratio a/b -> x^y = (a^y)/(b^y), gekürzt, mit b^y>=b>1.
+ // x Ratio a/b -> x^y = (a^y)/(b^y), gekürzt, mit b^y>=b>1.
if (integerp(x)) {
DeclareType(cl_I,x);
return expt_pos(x,y);
return I_I_to_RT(expt_pos(a,y),expt_pos(b,y));
}
}
+
+} // namespace cln