\frac{x}{1 + \sqrt{x + 1}}\begin{array}{l}
\mathbf{if}\;\frac{x}{1 + \sqrt{x + 1}} \leq 1.6456154992817314 \cdot 10^{-08}:\\
\;\;\;\;\frac{x}{{1}^{3} + {\left(\sqrt{x + 1}\right)}^{3}} \cdot \left(1 \cdot 1 + \left(\sqrt{x + 1} \cdot \sqrt{x + 1} - 1 \cdot \sqrt{x + 1}\right)\right)\\
\mathbf{else}:\\
\;\;\;\;\sqrt{x} \cdot \frac{\sqrt{x}}{1 + \sqrt{x + 1}}\\
\end{array}double code(double x) {
return (x / ((double) (1.0 + ((double) sqrt(((double) (x + 1.0)))))));
}
double code(double x) {
double VAR;
if (((x / ((double) (1.0 + ((double) sqrt(((double) (x + 1.0))))))) <= 1.6456154992817314e-08)) {
VAR = ((double) ((x / ((double) (((double) pow(1.0, 3.0)) + ((double) pow(((double) sqrt(((double) (x + 1.0)))), 3.0))))) * ((double) (((double) (1.0 * 1.0)) + ((double) (((double) (((double) sqrt(((double) (x + 1.0)))) * ((double) sqrt(((double) (x + 1.0)))))) - ((double) (1.0 * ((double) sqrt(((double) (x + 1.0))))))))))));
} else {
VAR = ((double) (((double) sqrt(x)) * (((double) sqrt(x)) / ((double) (1.0 + ((double) sqrt(((double) (x + 1.0)))))))));
}
return VAR;
}



Bits error versus x
Results
if (/ x (+ 1.0 (sqrt (+ x 1.0)))) < 1.64561549928173145e-8Initial program 0.0
rmApplied flip3-+0.0
Applied associate-/r/0.0
if 1.64561549928173145e-8 < (/ x (+ 1.0 (sqrt (+ x 1.0)))) Initial program 0.5
rmApplied *-un-lft-identity0.5
Applied add-sqr-sqrt0.1
Applied times-frac0.0
Simplified0.0
Final simplification0.0
herbie shell --seed 2020199
(FPCore (x)
:name "Numeric.Log:$clog1p from log-domain-0.10.2.1, B"
:precision binary64
(/ x (+ 1.0 (sqrt (+ x 1.0)))))