\left(\left(\left(x - 0.5\right) \cdot \log x - x\right) + 0.9189385332046700050057097541866824030876\right) + \frac{\left(\left(y + 7.936500793651000149400709382518925849581 \cdot 10^{-4}\right) \cdot z - 0.002777777777777800001512975569539776188321\right) \cdot z + 0.08333333333333299564049667651488562114537}{x}\begin{array}{l}
\mathbf{if}\;x \le 7633786980962179:\\
\;\;\;\;\sqrt{\left(\left(x - 0.5\right) \cdot \log x - x\right) + 0.9189385332046700050057097541866824030876} \cdot \sqrt{\left(\left(x - 0.5\right) \cdot \log x - x\right) + 0.9189385332046700050057097541866824030876} + \frac{\left(\left(y + 7.936500793651000149400709382518925849581 \cdot 10^{-4}\right) \cdot z - 0.002777777777777800001512975569539776188321\right) \cdot z + 0.08333333333333299564049667651488562114537}{x}\\
\mathbf{else}:\\
\;\;\;\;\mathsf{fma}\left(\frac{{z}^{2}}{x}, y, 7.936500793651000149400709382518925849581 \cdot 10^{-4} \cdot \frac{{z}^{2}}{x} - \mathsf{fma}\left(\log \left(\frac{1}{x}\right), x, x\right)\right)\\
\end{array}double f(double x, double y, double z) {
double r466740 = x;
double r466741 = 0.5;
double r466742 = r466740 - r466741;
double r466743 = log(r466740);
double r466744 = r466742 * r466743;
double r466745 = r466744 - r466740;
double r466746 = 0.91893853320467;
double r466747 = r466745 + r466746;
double r466748 = y;
double r466749 = 0.0007936500793651;
double r466750 = r466748 + r466749;
double r466751 = z;
double r466752 = r466750 * r466751;
double r466753 = 0.0027777777777778;
double r466754 = r466752 - r466753;
double r466755 = r466754 * r466751;
double r466756 = 0.083333333333333;
double r466757 = r466755 + r466756;
double r466758 = r466757 / r466740;
double r466759 = r466747 + r466758;
return r466759;
}
double f(double x, double y, double z) {
double r466760 = x;
double r466761 = 7633786980962179.0;
bool r466762 = r466760 <= r466761;
double r466763 = 0.5;
double r466764 = r466760 - r466763;
double r466765 = log(r466760);
double r466766 = r466764 * r466765;
double r466767 = r466766 - r466760;
double r466768 = 0.91893853320467;
double r466769 = r466767 + r466768;
double r466770 = sqrt(r466769);
double r466771 = r466770 * r466770;
double r466772 = y;
double r466773 = 0.0007936500793651;
double r466774 = r466772 + r466773;
double r466775 = z;
double r466776 = r466774 * r466775;
double r466777 = 0.0027777777777778;
double r466778 = r466776 - r466777;
double r466779 = r466778 * r466775;
double r466780 = 0.083333333333333;
double r466781 = r466779 + r466780;
double r466782 = r466781 / r466760;
double r466783 = r466771 + r466782;
double r466784 = 2.0;
double r466785 = pow(r466775, r466784);
double r466786 = r466785 / r466760;
double r466787 = r466773 * r466786;
double r466788 = 1.0;
double r466789 = r466788 / r466760;
double r466790 = log(r466789);
double r466791 = fma(r466790, r466760, r466760);
double r466792 = r466787 - r466791;
double r466793 = fma(r466786, r466772, r466792);
double r466794 = r466762 ? r466783 : r466793;
return r466794;
}




Bits error versus x




Bits error versus y




Bits error versus z
| Original | 5.9 |
|---|---|
| Target | 1.2 |
| Herbie | 4.0 |
if x < 7633786980962179.0Initial program 0.2
rmApplied add-sqr-sqrt0.2
if 7633786980962179.0 < x Initial program 10.4
Simplified10.3
Taylor expanded around inf 10.6
Simplified7.1
Final simplification4.0
herbie shell --seed 2019353 +o rules:numerics
(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)))