\left(\left(\left(x - 0.5\right) \cdot \log x - x\right) + 0.91893853320467\right) + \frac{\left(\left(y + 0.0007936500793651\right) \cdot z - 0.0027777777777778\right) \cdot z + 0.083333333333333}{x}\begin{array}{l}
\mathbf{if}\;x \leq 2.608303081397401 \cdot 10^{+23}:\\
\;\;\;\;\left(\left(\left(x - 0.5\right) \cdot \log \left(\sqrt[3]{x} \cdot \sqrt[3]{x}\right) + \left(\left(x - 0.5\right) \cdot \log \left(\sqrt[3]{\sqrt{x}} \cdot \sqrt[3]{\sqrt{x}}\right) - x\right)\right) + 0.91893853320467\right) + \frac{z \cdot \left(\left(y + 0.0007936500793651\right) \cdot z - 0.0027777777777778\right) + 0.083333333333333}{x}\\
\mathbf{else}:\\
\;\;\;\;\left(0.91893853320467 + \left(\left(x - 0.5\right) \cdot \log x - x\right)\right) + \left(\left(y + 0.0007936500793651\right) \cdot \frac{z}{\frac{x}{z}} - 0.0027777777777778 \cdot \frac{z}{x}\right)\\
\end{array}(FPCore (x y z)
:precision binary64
(+
(+ (- (* (- x 0.5) (log x)) x) 0.91893853320467)
(/
(+
(* (- (* (+ y 0.0007936500793651) z) 0.0027777777777778) z)
0.083333333333333)
x)))(FPCore (x y z)
:precision binary64
(if (<= x 2.608303081397401e+23)
(+
(+
(+
(* (- x 0.5) (log (* (cbrt x) (cbrt x))))
(- (* (- x 0.5) (log (* (cbrt (sqrt x)) (cbrt (sqrt x))))) x))
0.91893853320467)
(/
(+
(* z (- (* (+ y 0.0007936500793651) z) 0.0027777777777778))
0.083333333333333)
x))
(+
(+ 0.91893853320467 (- (* (- x 0.5) (log x)) x))
(-
(* (+ y 0.0007936500793651) (/ z (/ x z)))
(* 0.0027777777777778 (/ z x))))))double code(double x, double y, double z) {
return ((double) (((double) (((double) (((double) (((double) (x - 0.5)) * ((double) log(x)))) - x)) + 0.91893853320467)) + (((double) (((double) (((double) (((double) (((double) (y + 0.0007936500793651)) * z)) - 0.0027777777777778)) * z)) + 0.083333333333333)) / x)));
}
double code(double x, double y, double z) {
double tmp;
if ((x <= 2.608303081397401e+23)) {
tmp = ((double) (((double) (((double) (((double) (((double) (x - 0.5)) * ((double) log(((double) (((double) cbrt(x)) * ((double) cbrt(x)))))))) + ((double) (((double) (((double) (x - 0.5)) * ((double) log(((double) (((double) cbrt(((double) sqrt(x)))) * ((double) cbrt(((double) sqrt(x)))))))))) - x)))) + 0.91893853320467)) + (((double) (((double) (z * ((double) (((double) (((double) (y + 0.0007936500793651)) * z)) - 0.0027777777777778)))) + 0.083333333333333)) / x)));
} else {
tmp = ((double) (((double) (0.91893853320467 + ((double) (((double) (((double) (x - 0.5)) * ((double) log(x)))) - x)))) + ((double) (((double) (((double) (y + 0.0007936500793651)) * (z / (x / z)))) - ((double) (0.0027777777777778 * (z / x)))))));
}
return tmp;
}




Bits error versus x




Bits error versus y




Bits error versus z
Results
| Original | 6.0 |
|---|---|
| Target | 1.1 |
| Herbie | 0.3 |
if x < 2.60830308139740091e23Initial program Error: 0.2 bits
rmApplied add-cube-cbrtError: 0.2 bits
Applied log-prodError: 0.2 bits
Applied distribute-lft-inError: 0.2 bits
Applied associate--l+Error: 0.2 bits
rmApplied add-sqr-sqrtError: 0.2 bits
Applied cbrt-prodError: 0.2 bits
if 2.60830308139740091e23 < x Initial program Error: 10.8 bits
Taylor expanded around inf Error: 10.9 bits
SimplifiedError: 0.4 bits
Final simplificationError: 0.3 bits
herbie shell --seed 2020204
(FPCore (x y z)
:name "Numeric.SpecFunctions:$slogFactorial from math-functions-0.1.5.2, B"
:precision binary64
:herbie-target
(+ (+ (+ (* (- x 0.5) (log x)) (- 0.91893853320467 x)) (/ 0.083333333333333 x)) (* (/ z x) (- (* z (+ y 0.0007936500793651)) 0.0027777777777778)))
(+ (+ (- (* (- x 0.5) (log x)) x) 0.91893853320467) (/ (+ (* (- (* (+ y 0.0007936500793651) z) 0.0027777777777778) z) 0.083333333333333) x)))