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 := 3.13060547623 - \frac{36.527041698806414}{z}\\
\mathbf{if}\;z \leq -494793505743926.2:\\
\;\;\;\;\mathsf{fma}\left(y, \frac{1}{z \cdot z} \cdot \left(t + 457.96100221584277\right) + t_1, x\right)\\
\mathbf{elif}\;z \leq 4.670877542172956 \cdot 10^{+62}:\\
\;\;\;\;\begin{array}{l}
t_2 := \sqrt{\mathsf{fma}\left(z, \mathsf{fma}\left(z, \mathsf{fma}\left(z, z + 15.234687407, 31.4690115749\right), 11.9400905721\right), 0.607771387771\right)}\\
\mathsf{fma}\left(y, \frac{1}{t_2} \cdot \frac{\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)}{t_2}, x\right)
\end{array}\\
\mathbf{else}:\\
\;\;\;\;\mathsf{fma}\left(y, t_1 + \left(\frac{457.96100221584277}{z \cdot z} + \frac{t}{z \cdot z}\right), 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 (- 3.13060547623 (/ 36.527041698806414 z))))
(if (<= z -494793505743926.2)
(fma y (+ (* (/ 1.0 (* z z)) (+ t 457.96100221584277)) t_1) x)
(if (<= z 4.670877542172956e+62)
(let* ((t_2
(sqrt
(fma
z
(fma z (fma z (+ z 15.234687407) 31.4690115749) 11.9400905721)
0.607771387771))))
(fma
y
(*
(/ 1.0 t_2)
(/
(fma z (fma z (fma z (fma z 3.13060547623 11.1667541262) t) a) b)
t_2))
x))
(fma y (+ t_1 (+ (/ 457.96100221584277 (* z z)) (/ t (* z 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 = 3.13060547623 - (36.527041698806414 / z);
double tmp;
if (z <= -494793505743926.2) {
tmp = fma(y, (((1.0 / (z * z)) * (t + 457.96100221584277)) + t_1), x);
} else if (z <= 4.670877542172956e+62) {
double t_2 = sqrt(fma(z, fma(z, fma(z, (z + 15.234687407), 31.4690115749), 11.9400905721), 0.607771387771));
tmp = fma(y, ((1.0 / t_2) * (fma(z, fma(z, fma(z, fma(z, 3.13060547623, 11.1667541262), t), a), b) / t_2)), x);
} else {
tmp = fma(y, (t_1 + ((457.96100221584277 / (z * z)) + (t / (z * 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.5 |
|---|---|
| Target | 0.9 |
| Herbie | 1.3 |
if z < -494793505743926.188Initial program 57.3
Simplified54.1
Taylor expanded in z around inf 2.2
Simplified2.2
Applied div-inv_binary642.2
Applied div-inv_binary642.2
Applied distribute-rgt-out_binary642.2
Simplified2.2
if -494793505743926.188 < z < 4.67087754217295609e62Initial program 2.0
Simplified0.8
Applied add-sqr-sqrt_binary641.3
Applied *-un-lft-identity_binary641.3
Applied times-frac_binary641.1
if 4.67087754217295609e62 < z Initial program 63.0
Simplified61.6
Taylor expanded in z around inf 0.6
Simplified0.6
Final simplification1.3
herbie shell --seed 2021215
(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))))