\log \left(N + 1\right) - \log N
\begin{array}{l}
\mathbf{if}\;N \le 7979.840027627455:\\
\;\;\;\;\log \left(\sqrt{\frac{1 + N}{N}}\right) + \log \left(\sqrt{\frac{1 + N}{N}}\right)\\
\mathbf{else}:\\
\;\;\;\;\left(\frac{\frac{-1}{2}}{N \cdot N} + \frac{1}{N}\right) + \frac{\frac{\frac{1}{3}}{N \cdot N}}{N}\\
\end{array}double f(double N) {
double r2428244 = N;
double r2428245 = 1.0;
double r2428246 = r2428244 + r2428245;
double r2428247 = log(r2428246);
double r2428248 = log(r2428244);
double r2428249 = r2428247 - r2428248;
return r2428249;
}
double f(double N) {
double r2428250 = N;
double r2428251 = 7979.840027627455;
bool r2428252 = r2428250 <= r2428251;
double r2428253 = 1.0;
double r2428254 = r2428253 + r2428250;
double r2428255 = r2428254 / r2428250;
double r2428256 = sqrt(r2428255);
double r2428257 = log(r2428256);
double r2428258 = r2428257 + r2428257;
double r2428259 = -0.5;
double r2428260 = r2428250 * r2428250;
double r2428261 = r2428259 / r2428260;
double r2428262 = r2428253 / r2428250;
double r2428263 = r2428261 + r2428262;
double r2428264 = 0.3333333333333333;
double r2428265 = r2428264 / r2428260;
double r2428266 = r2428265 / r2428250;
double r2428267 = r2428263 + r2428266;
double r2428268 = r2428252 ? r2428258 : r2428267;
return r2428268;
}



Bits error versus N
Results
if N < 7979.840027627455Initial program 0.1
rmApplied diff-log0.1
rmApplied add-sqr-sqrt0.1
Applied log-prod0.1
if 7979.840027627455 < N Initial program 59.6
rmApplied add-exp-log59.6
Taylor expanded around -inf 0.0
Simplified0.0
Final simplification0.1
herbie shell --seed 2019104
(FPCore (N)
:name "2log (problem 3.3.6)"
(- (log (+ N 1)) (log N)))