x \cdot \left(\frac{y}{z} - \frac{t}{1 - z}\right)\begin{array}{l}
\mathbf{if}\;\frac{y}{z} - \frac{t}{1 - z} \le -9.165678624045873 \cdot 10^{188}:\\
\;\;\;\;y \cdot \frac{x}{z} + \left(-x \cdot \frac{t}{1 - z}\right)\\
\mathbf{elif}\;\frac{y}{z} - \frac{t}{1 - z} \le -4.16417746735656389 \cdot 10^{-222}:\\
\;\;\;\;\frac{y}{z} \cdot x + \left(-x \cdot \frac{t}{1 - z}\right)\\
\mathbf{elif}\;\frac{y}{z} - \frac{t}{1 - z} \le 0.0:\\
\;\;\;\;\frac{x \cdot y}{z} + \mathsf{fma}\left(1, \frac{t \cdot x}{{z}^{2}}, \frac{t \cdot x}{z}\right)\\
\mathbf{elif}\;\frac{y}{z} - \frac{t}{1 - z} \le 2.3008111811729553 \cdot 10^{222}:\\
\;\;\;\;\frac{y}{z} \cdot x + \left(-x \cdot \frac{t}{1 - z}\right)\\
\mathbf{else}:\\
\;\;\;\;y \cdot \frac{x}{z} + \left(-x \cdot \frac{t}{1 - z}\right)\\
\end{array}double f(double x, double y, double z, double t) {
double r385897 = x;
double r385898 = y;
double r385899 = z;
double r385900 = r385898 / r385899;
double r385901 = t;
double r385902 = 1.0;
double r385903 = r385902 - r385899;
double r385904 = r385901 / r385903;
double r385905 = r385900 - r385904;
double r385906 = r385897 * r385905;
return r385906;
}
double f(double x, double y, double z, double t) {
double r385907 = y;
double r385908 = z;
double r385909 = r385907 / r385908;
double r385910 = t;
double r385911 = 1.0;
double r385912 = r385911 - r385908;
double r385913 = r385910 / r385912;
double r385914 = r385909 - r385913;
double r385915 = -9.165678624045873e+188;
bool r385916 = r385914 <= r385915;
double r385917 = x;
double r385918 = r385917 / r385908;
double r385919 = r385907 * r385918;
double r385920 = r385917 * r385913;
double r385921 = -r385920;
double r385922 = r385919 + r385921;
double r385923 = -4.164177467356564e-222;
bool r385924 = r385914 <= r385923;
double r385925 = r385909 * r385917;
double r385926 = r385925 + r385921;
double r385927 = 0.0;
bool r385928 = r385914 <= r385927;
double r385929 = r385917 * r385907;
double r385930 = r385929 / r385908;
double r385931 = r385910 * r385917;
double r385932 = 2.0;
double r385933 = pow(r385908, r385932);
double r385934 = r385931 / r385933;
double r385935 = r385931 / r385908;
double r385936 = fma(r385911, r385934, r385935);
double r385937 = r385930 + r385936;
double r385938 = 2.3008111811729553e+222;
bool r385939 = r385914 <= r385938;
double r385940 = r385939 ? r385926 : r385922;
double r385941 = r385928 ? r385937 : r385940;
double r385942 = r385924 ? r385926 : r385941;
double r385943 = r385916 ? r385922 : r385942;
return r385943;
}




Bits error versus x




Bits error versus y




Bits error versus z




Bits error versus t
| Original | 4.7 |
|---|---|
| Target | 4.3 |
| Herbie | 0.4 |
if (- (/ y z) (/ t (- 1.0 z))) < -9.165678624045873e+188 or 2.3008111811729553e+222 < (- (/ y z) (/ t (- 1.0 z))) Initial program 20.2
rmApplied clear-num20.2
rmApplied sub-neg20.2
Applied distribute-lft-in20.2
Simplified20.2
Simplified20.2
rmApplied div-inv20.2
Applied associate-*l*1.0
Simplified0.9
if -9.165678624045873e+188 < (- (/ y z) (/ t (- 1.0 z))) < -4.164177467356564e-222 or 0.0 < (- (/ y z) (/ t (- 1.0 z))) < 2.3008111811729553e+222Initial program 0.3
rmApplied clear-num0.4
rmApplied sub-neg0.4
Applied distribute-lft-in0.4
Simplified0.4
Simplified0.3
if -4.164177467356564e-222 < (- (/ y z) (/ t (- 1.0 z))) < 0.0Initial program 12.6
rmApplied clear-num12.8
Taylor expanded around inf 0.7
Simplified0.7
Final simplification0.4
herbie shell --seed 2020045 +o rules:numerics
(FPCore (x y z t)
:name "Numeric.SpecFunctions:invIncompleteBetaWorker from math-functions-0.1.5.2, C"
:precision binary64
:herbie-target
(if (< (* x (- (/ y z) (/ t (- 1 z)))) -7.623226303312042e-196) (* x (- (/ y z) (* t (/ 1 (- 1 z))))) (if (< (* x (- (/ y z) (/ t (- 1 z)))) 1.4133944927702302e-211) (+ (/ (* y x) z) (- (/ (* t x) (- 1 z)))) (* x (- (/ y z) (* t (/ 1 (- 1 z)))))))
(* x (- (/ y z) (/ t (- 1 z)))))