\frac{e^{x \cdot \log \left(\frac{x}{x + y}\right)}}{x}\begin{array}{l}
\mathbf{if}\;x \leq -1.755158979227715 \cdot 10^{+16} \lor \neg \left(x \leq 3.9786591048773174\right):\\
\;\;\;\;\frac{e^{-y}}{x}\\
\mathbf{else}:\\
\;\;\;\;\frac{e^{x \cdot \left(2 \cdot \log \left(\frac{\sqrt[3]{x}}{\sqrt[3]{x + y}}\right)\right)} \cdot {\left(\frac{\sqrt[3]{x}}{\sqrt[3]{x + y}}\right)}^{x}}{x}\\
\end{array}(FPCore (x y) :precision binary64 (/ (exp (* x (log (/ x (+ x y))))) x))
(FPCore (x y)
:precision binary64
(if (or (<= x -1.755158979227715e+16) (not (<= x 3.9786591048773174)))
(/ (exp (- y)) x)
(/
(*
(exp (* x (* 2.0 (log (/ (cbrt x) (cbrt (+ x y)))))))
(pow (/ (cbrt x) (cbrt (+ x y))) x))
x)))double code(double x, double y) {
return exp(x * log(x / (x + y))) / x;
}
double code(double x, double y) {
double tmp;
if ((x <= -1.755158979227715e+16) || !(x <= 3.9786591048773174)) {
tmp = exp(-y) / x;
} else {
tmp = (exp(x * (2.0 * log(cbrt(x) / cbrt(x + y)))) * pow((cbrt(x) / cbrt(x + y)), x)) / x;
}
return tmp;
}




Bits error versus x




Bits error versus y
Results
| Original | 11.0 |
|---|---|
| Target | 8.1 |
| Herbie | 0.0 |
if x < -17551589792277150 or 3.97865910487731744 < x Initial program 10.7
Simplified10.7
Taylor expanded around inf 0.0
if -17551589792277150 < x < 3.97865910487731744Initial program 11.3
Simplified11.2
rmApplied add-cube-cbrt_binary6411.6
Applied add-cube-cbrt_binary6411.2
Applied times-frac_binary6411.2
Applied unpow-prod-down_binary642.6
rmApplied pow-to-exp_binary642.6
Simplified0.0
Final simplification0.0
herbie shell --seed 2020233
(FPCore (x y)
:name "Numeric.SpecFunctions:invIncompleteBetaWorker from math-functions-0.1.5.2, F"
:precision binary64
:herbie-target
(if (< y -3.7311844206647956e+94) (/ (exp (/ -1.0 y)) x) (if (< y 2.817959242728288e+37) (/ (pow (/ x (+ y x)) x) x) (if (< y 2.347387415166998e+178) (log (exp (/ (pow (/ x (+ y x)) x) x))) (/ (exp (/ -1.0 y)) x))))
(/ (exp (* x (log (/ x (+ x y))))) x))