#define REAL_SINGLE 0
#define REAL_DOUBLE 1
#define REAL_LONG_DOUBLE 2
-#define REAL_SINGLE_FAST2SUM 3 //TODO: Remove, is FITH
+#define REAL_VFPU 3
#define REAL_RATIONAL 4
+#define REAL_RATIONAL_ARBINT 5
#ifndef REAL
#error "REAL was not defined!"
#endif
-#if REAL >= REAL_SINGLE_FAST2SUM
- #include "real_fast2sum.h"
-#endif //REAL
+#if REAL == REAL_VFPU
+ #include "vfpu.h"
+#endif
#if REAL == REAL_RATIONAL
#include "rational.h"
#endif //REAL
+#if REAL == REAL_RATIONAL_ARBINT
+ #include "rational.h"
+ #include "arbint.h"
+ #include "gmpint.h"
+#endif //REAL
+
namespace IPDF
{
extern const char * g_real_name[];
typedef double Real;
#elif REAL == REAL_LONG_DOUBLE
typedef long double Real;
-#elif REAL == REAL_SINGLE_FAST2SUM
- typedef RealF2S<float> Real;
+#elif REAL == REAL_VFPU
+ typedef VFPU::VFloat Real;
inline float Float(const Real & r) {return r.m_value;}
inline double Double(const Real & r) {return r.m_value;}
#elif REAL == REAL_RATIONAL
-
typedef Rational<int64_t> Real;
inline float Float(const Real & r) {return (float)r.ToDouble();}
inline double Double(const Real & r) {return r.ToDouble();}
+#elif REAL == REAL_RATIONAL_ARBINT
+ #define ARBINT Gmpint // Set to Gmpint or Arbint here
+
+ typedef Rational<ARBINT> Real;
+ inline float Float(const Real & r) {return (float)r.ToDouble();}
+ inline double Double(const Real & r) {return r.ToDouble();}
+
#else
#error "Type of Real unspecified."
#endif //REAL
inline double Double(float f) {return (double)f;}
inline double Double(double f) {return (double)f;}
inline double Double(long double f) {return (double)(f);}
+
+ inline Real Power(const Real & a, int n)
+ {
+ if (n < 0)
+ {
+ return Power(Real(1)/a, -n);
+ }
+ Real r(1);
+ for (int i = 0; i < n; ++i)
+ r *= a;
+ return r;
+ }
+
}
#endif //_REAL_H