\log \left(N + 1\right) - \log N
\begin{array}{l}
\mathbf{if}\;N \leq 10344.974774104036:\\
\;\;\;\;\log \left(\frac{N + 1}{N}\right)\\
\mathbf{else}:\\
\;\;\;\;\left(\frac{1}{N} + \frac{0.3333333333333333}{{N}^{3}}\right) - \frac{0.5}{N \cdot N}\\
\end{array}(FPCore (N) :precision binary64 (- (log (+ N 1.0)) (log N)))
(FPCore (N) :precision binary64 (if (<= N 10344.974774104036) (log (/ (+ N 1.0) N)) (- (+ (/ 1.0 N) (/ 0.3333333333333333 (pow N 3.0))) (/ 0.5 (* N N)))))
double code(double N) {
return log(N + 1.0) - log(N);
}
double code(double N) {
double tmp;
if (N <= 10344.974774104036) {
tmp = log((N + 1.0) / N);
} else {
tmp = ((1.0 / N) + (0.3333333333333333 / pow(N, 3.0))) - (0.5 / (N * N));
}
return tmp;
}



Bits error versus N
Results
if N < 10344.9747741040355Initial program 0.1
rmApplied diff-log_binary640.1
if 10344.9747741040355 < N Initial program 59.6
Taylor expanded around inf 0.0
Simplified0.0
Final simplification0.0
herbie shell --seed 2020224
(FPCore (N)
:name "2log (problem 3.3.6)"
:precision binary64
(- (log (+ N 1.0)) (log N)))