\frac{x}{x + y \cdot e^{2 \cdot \left(\frac{z \cdot \sqrt{t + a}}{t} - \left(b - c\right) \cdot \left(\left(a + \frac{5}{6}\right) - \frac{2}{t \cdot 3}\right)\right)}}\begin{array}{l}
\mathbf{if}\;t \le 3.92873909809889365 \cdot 10^{-219}:\\
\;\;\;\;\frac{x}{x + y \cdot e^{2 \cdot \left(\mathsf{fma}\left(a + \left(\frac{5}{6} - \frac{2}{t \cdot 3}\right), -\left(b - c\right), \frac{z \cdot \sqrt{t + a}}{t}\right) + \left(a + \left(\frac{5}{6} - \frac{2}{t \cdot 3}\right)\right) \cdot \left(\left(-\left(b - c\right)\right) + \left(b - c\right)\right)\right)}}\\
\mathbf{else}:\\
\;\;\;\;\frac{x}{x + y \cdot e^{2 \cdot \mathsf{fma}\left(\frac{z}{\sqrt{t}}, \frac{\sqrt{t + a}}{\sqrt{t}}, -\left(b - c\right) \cdot \left(\left(a + \frac{5}{6}\right) - \frac{2}{t \cdot 3}\right)\right)}}\\
\end{array}double code(double x, double y, double z, double t, double a, double b, double c) {
return ((double) (x / ((double) (x + ((double) (y * ((double) exp(((double) (2.0 * ((double) (((double) (((double) (z * ((double) sqrt(((double) (t + a)))))) / t)) - ((double) (((double) (b - c)) * ((double) (((double) (a + ((double) (5.0 / 6.0)))) - ((double) (2.0 / ((double) (t * 3.0))))))))))))))))))));
}
double code(double x, double y, double z, double t, double a, double b, double c) {
double VAR;
if ((t <= 3.9287390980988937e-219)) {
VAR = ((double) (x / ((double) (x + ((double) (y * ((double) exp(((double) (2.0 * ((double) (((double) fma(((double) (a + ((double) (((double) (5.0 / 6.0)) - ((double) (2.0 / ((double) (t * 3.0)))))))), ((double) -(((double) (b - c)))), ((double) (((double) (z * ((double) sqrt(((double) (t + a)))))) / t)))) + ((double) (((double) (a + ((double) (((double) (5.0 / 6.0)) - ((double) (2.0 / ((double) (t * 3.0)))))))) * ((double) (((double) -(((double) (b - c)))) + ((double) (b - c))))))))))))))))));
} else {
VAR = ((double) (x / ((double) (x + ((double) (y * ((double) exp(((double) (2.0 * ((double) fma(((double) (z / ((double) sqrt(t)))), ((double) (((double) sqrt(((double) (t + a)))) / ((double) sqrt(t)))), ((double) -(((double) (((double) (b - c)) * ((double) (((double) (a + ((double) (5.0 / 6.0)))) - ((double) (2.0 / ((double) (t * 3.0))))))))))))))))))))));
}
return VAR;
}



Bits error versus x



Bits error versus y



Bits error versus z



Bits error versus t



Bits error versus a



Bits error versus b



Bits error versus c
Results
if t < 3.9287390980988937e-219Initial program 6.8
rmApplied log1p-expm1-u12.9
rmApplied add-sqr-sqrt36.8
Applied prod-diff61.1
Simplified58.5
Simplified4.1
if 3.9287390980988937e-219 < t Initial program 2.4
rmApplied add-sqr-sqrt2.4
Applied times-frac1.0
Applied fma-neg0.6
Final simplification1.7
herbie shell --seed 2020120 +o rules:numerics
(FPCore (x y z t a b c)
:name "Numeric.SpecFunctions:invIncompleteBetaWorker from math-functions-0.1.5.2"
:precision binary64
(/ x (+ x (* y (exp (* 2 (- (/ (* z (sqrt (+ t a))) t) (* (- b c) (- (+ a (/ 5 6)) (/ 2 (* t 3)))))))))))