\log \left(N + 1\right) - \log N
\begin{array}{l}
\mathbf{if}\;N \leq 8131.4453676694275:\\
\;\;\;\;\log \left(\frac{N + 1}{N}\right)\\
\mathbf{else}:\\
\;\;\;\;\left(\frac{0.3333333333333333}{{N}^{3}} + \frac{1}{N}\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 8131.4453676694275) (log (/ (+ N 1.0) N)) (- (+ (/ 0.3333333333333333 (pow N 3.0)) (/ 1.0 N)) (/ 0.5 (* N N)))))
double code(double N) {
return ((double) (((double) log(((double) (N + 1.0)))) - ((double) log(N))));
}
double code(double N) {
double tmp;
if ((N <= 8131.4453676694275)) {
tmp = ((double) log((((double) (N + 1.0)) / N)));
} else {
tmp = ((double) (((double) ((0.3333333333333333 / ((double) pow(N, 3.0))) + (1.0 / N))) - (0.5 / ((double) (N * N)))));
}
return tmp;
}



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