\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}:\\
\;\;\;\;\frac{0.3333333333333333}{{N}^{3}} + \left(\frac{1}{N} - \frac{0.5}{N \cdot N}\right)\\
\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) ((0.3333333333333333 / ((double) pow(N, 3.0))) + ((double) ((1.0 / N) - (0.5 / ((double) (N * N)))))));
}
return tmp;
}



Bits error versus N
Results
if N < 8131.44536766942747Initial program Error: 0.1 bits
rmApplied diff-logError: 0.1 bits
if 8131.44536766942747 < N Initial program Error: 59.4 bits
Taylor expanded around inf Error: 0.0 bits
SimplifiedError: 0.0 bits
Final simplificationError: 0.1 bits
herbie shell --seed 2020204
(FPCore (N)
:name "2log (problem 3.3.6)"
:precision binary64
(- (log (+ N 1.0)) (log N)))