x + \frac{y \cdot \left(\left(\left(\left(z \cdot 3.13060547623 + 11.1667541262\right) \cdot z + t\right) \cdot z + a\right) \cdot z + b\right)}{\left(\left(\left(z + 15.234687407\right) \cdot z + 31.4690115749\right) \cdot z + 11.9400905721\right) \cdot z + 0.607771387771}
\begin{array}{l}
t_1 := \frac{y \cdot \left(z \cdot \left(z \cdot \left(z \cdot \left(z \cdot 3.13060547623 + 11.1667541262\right) + t\right) + a\right) + b\right)}{z \cdot \left(z \cdot \left(z \cdot \left(z + 15.234687407\right) + 31.4690115749\right) + 11.9400905721\right) + 0.607771387771}\\
\mathbf{if}\;t_1 \leq -\infty:\\
\;\;\;\;\left(\left(\frac{y}{z \cdot z} \cdot \left(457.9610022158428 + \frac{a}{z}\right) + \mathsf{fma}\left(3.13060547623, y, x\right)\right) + \frac{y}{z} \cdot \left(\frac{t}{z} - \frac{5864.8025282699045}{z \cdot z}\right)\right) - \mathsf{fma}\left(36.52704169880642, \frac{y}{z}, 15.234687407 \cdot \left(y \cdot \frac{t}{{z}^{3}}\right)\right)\\
\mathbf{elif}\;t_1 \leq 3.082891315815863 \cdot 10^{+303}:\\
\;\;\;\;\mathsf{fma}\left(y, \mathsf{fma}\left(z, \mathsf{fma}\left(z, \mathsf{fma}\left(z, \mathsf{fma}\left(z, 3.13060547623, 11.1667541262\right), t\right), a\right), b\right) \cdot \frac{1}{\mathsf{fma}\left(z, \mathsf{fma}\left(z, \mathsf{fma}\left(z, z + 15.234687407, 31.4690115749\right), 11.9400905721\right), 0.607771387771\right)}, x\right)\\
\mathbf{else}:\\
\;\;\;\;\mathsf{fma}\left(y, \left(3.13060547623 + \left(\frac{t}{z \cdot z} + \left(\frac{457.9610022158428}{z \cdot z} + \frac{a}{{z}^{3}}\right)\right)\right) - \frac{36.52704169880642}{z}, x\right)\\
\end{array}
(FPCore (x y z t a b)
:precision binary64
(+
x
(/
(*
y
(+ (* (+ (* (+ (* (+ (* z 3.13060547623) 11.1667541262) z) t) z) a) z) b))
(+
(* (+ (* (+ (* (+ z 15.234687407) z) 31.4690115749) z) 11.9400905721) z)
0.607771387771))))(FPCore (x y z t a b)
:precision binary64
(let* ((t_1
(/
(*
y
(+
(* z (+ (* z (+ (* z (+ (* z 3.13060547623) 11.1667541262)) t)) a))
b))
(+
(*
z
(+ (* z (+ (* z (+ z 15.234687407)) 31.4690115749)) 11.9400905721))
0.607771387771))))
(if (<= t_1 (- INFINITY))
(-
(+
(+
(* (/ y (* z z)) (+ 457.9610022158428 (/ a z)))
(fma 3.13060547623 y x))
(* (/ y z) (- (/ t z) (/ 5864.8025282699045 (* z z)))))
(fma 36.52704169880642 (/ y z) (* 15.234687407 (* y (/ t (pow z 3.0))))))
(if (<= t_1 3.082891315815863e+303)
(fma
y
(*
(fma z (fma z (fma z (fma z 3.13060547623 11.1667541262) t) a) b)
(/
1.0
(fma
z
(fma z (fma z (+ z 15.234687407) 31.4690115749) 11.9400905721)
0.607771387771)))
x)
(fma
y
(-
(+
3.13060547623
(+
(/ t (* z z))
(+ (/ 457.9610022158428 (* z z)) (/ a (pow z 3.0)))))
(/ 36.52704169880642 z))
x)))))double code(double x, double y, double z, double t, double a, double b) {
return x + ((y * ((((((((z * 3.13060547623) + 11.1667541262) * z) + t) * z) + a) * z) + b)) / (((((((z + 15.234687407) * z) + 31.4690115749) * z) + 11.9400905721) * z) + 0.607771387771));
}
double code(double x, double y, double z, double t, double a, double b) {
double t_1 = (y * ((z * ((z * ((z * ((z * 3.13060547623) + 11.1667541262)) + t)) + a)) + b)) / ((z * ((z * ((z * (z + 15.234687407)) + 31.4690115749)) + 11.9400905721)) + 0.607771387771);
double tmp;
if (t_1 <= -((double) INFINITY)) {
tmp = ((((y / (z * z)) * (457.9610022158428 + (a / z))) + fma(3.13060547623, y, x)) + ((y / z) * ((t / z) - (5864.8025282699045 / (z * z))))) - fma(36.52704169880642, (y / z), (15.234687407 * (y * (t / pow(z, 3.0)))));
} else if (t_1 <= 3.082891315815863e+303) {
tmp = fma(y, (fma(z, fma(z, fma(z, fma(z, 3.13060547623, 11.1667541262), t), a), b) * (1.0 / fma(z, fma(z, fma(z, (z + 15.234687407), 31.4690115749), 11.9400905721), 0.607771387771))), x);
} else {
tmp = fma(y, ((3.13060547623 + ((t / (z * z)) + ((457.9610022158428 / (z * z)) + (a / pow(z, 3.0))))) - (36.52704169880642 / z)), x);
}
return tmp;
}




Bits error versus x




Bits error versus y




Bits error versus z




Bits error versus t




Bits error versus a




Bits error versus b
| Original | 29.4 |
|---|---|
| Target | 1.0 |
| Herbie | 0.4 |
if (/.f64 (*.f64 y (+.f64 (*.f64 (+.f64 (*.f64 (+.f64 (*.f64 (+.f64 (*.f64 z 313060547623/100000000000) 55833770631/5000000000) z) t) z) a) z) b)) (+.f64 (*.f64 (+.f64 (*.f64 (+.f64 (*.f64 (+.f64 z 15234687407/1000000000) z) 314690115749/10000000000) z) 119400905721/10000000000) z) 607771387771/1000000000000)) < -inf.0Initial program 64.0
Simplified27.2
Taylor expanded in z around inf 20.3
Simplified4.9
if -inf.0 < (/.f64 (*.f64 y (+.f64 (*.f64 (+.f64 (*.f64 (+.f64 (*.f64 (+.f64 (*.f64 z 313060547623/100000000000) 55833770631/5000000000) z) t) z) a) z) b)) (+.f64 (*.f64 (+.f64 (*.f64 (+.f64 (*.f64 (+.f64 z 15234687407/1000000000) z) 314690115749/10000000000) z) 119400905721/10000000000) z) 607771387771/1000000000000)) < 3.0828913158158631e303Initial program 0.2
Simplified0.2
Applied egg-rr0.2
if 3.0828913158158631e303 < (/.f64 (*.f64 y (+.f64 (*.f64 (+.f64 (*.f64 (+.f64 (*.f64 (+.f64 (*.f64 z 313060547623/100000000000) 55833770631/5000000000) z) t) z) a) z) b)) (+.f64 (*.f64 (+.f64 (*.f64 (+.f64 (*.f64 (+.f64 z 15234687407/1000000000) z) 314690115749/10000000000) z) 119400905721/10000000000) z) 607771387771/1000000000000)) Initial program 63.9
Simplified61.7
Taylor expanded in z around inf 0.5
Simplified0.5
Taylor expanded in z around inf 0.5
Final simplification0.4
herbie shell --seed 2022130
(FPCore (x y z t a b)
:name "Numeric.SpecFunctions:logGamma from math-functions-0.1.5.2, D"
:precision binary64
:herbie-target
(if (< z -6.499344996252632e+53) (+ x (* (+ (- 3.13060547623 (/ 36.527041698806414 z)) (/ t (* z z))) (/ y 1.0))) (if (< z 7.066965436914287e+59) (+ x (/ y (/ (+ (* (+ (* (+ (* (+ z 15.234687407) z) 31.4690115749) z) 11.9400905721) z) 0.607771387771) (+ (* (+ (* (+ (* (+ (* z 3.13060547623) 11.1667541262) z) t) z) a) z) b)))) (+ x (* (+ (- 3.13060547623 (/ 36.527041698806414 z)) (/ t (* z z))) (/ y 1.0)))))
(+ x (/ (* y (+ (* (+ (* (+ (* (+ (* z 3.13060547623) 11.1667541262) z) t) z) a) z) b)) (+ (* (+ (* (+ (* (+ z 15.234687407) z) 31.4690115749) z) 11.9400905721) z) 0.607771387771))))