git.ucc.asn.au
/
ipdf
/
code.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Merge branch 'master' of git.ucc.asn.au:ipdf/code
[ipdf/code.git]
/
src
/
rational.h
diff --git
a/src/rational.h
b/src/rational.h
index
bbd4c30
..
b019505
100644
(file)
--- a/
src/rational.h
+++ b/
src/rational.h
@@
-10,6
+10,8
@@
#include <cassert>
#include "arbint.h"
#include "gmpint.h"
#include <cassert>
#include "arbint.h"
#include "gmpint.h"
+#include <climits>
+#include <values.h>
namespace IPDF
{
namespace IPDF
{
@@
-171,7
+173,13
@@
struct Rational
double ToDouble() const
{
double ToDouble() const
{
- return (double)P/(double)Q;
+ T num = P, denom = Q;
+ while (Tabs(num) > T(DBL_MAX))
+ {
+ num /= T(16);
+ denom /= T(16);
+ }
+ return ((double)(num))/((double)(denom));
}
bool CheckAccuracy(double d, const char * msg, double threshold = 1e-3) const
{
}
bool CheckAccuracy(double d, const char * msg, double threshold = 1e-3) const
{
UCC
git Repository :: git.ucc.asn.au