\frac{x \cdot e^{\left(y \cdot \log z + \left(t - 1\right) \cdot \log a\right) - b}}{y}\begin{array}{l}
\mathbf{if}\;x \le -2.3318989978962595 \cdot 10^{68} \lor \neg \left(x \le 5.0432621636471798 \cdot 10^{-115}\right):\\
\;\;\;\;\frac{\frac{\frac{{\left(\frac{1}{a}\right)}^{1}}{e^{y \cdot \log \left(\frac{1}{z}\right) + \left(\log \left(\frac{1}{a}\right) \cdot t + b\right)}}}{y}}{\frac{1}{x}}\\
\mathbf{else}:\\
\;\;\;\;\frac{\frac{{\left(\frac{1}{a}\right)}^{1}}{e^{y \cdot \log \left(\frac{1}{z}\right) + \left(\log \left(\frac{1}{a}\right) \cdot t + b\right)}}}{\frac{y}{x}}\\
\end{array}double code(double x, double y, double z, double t, double a, double b) {
return ((double) (((double) (x * ((double) exp(((double) (((double) (((double) (y * ((double) log(z)))) + ((double) (((double) (t - 1.0)) * ((double) log(a)))))) - b)))))) / y));
}
double code(double x, double y, double z, double t, double a, double b) {
double VAR;
if (((x <= -2.3318989978962595e+68) || !(x <= 5.04326216364718e-115))) {
VAR = ((double) (((double) (((double) (((double) pow(((double) (1.0 / a)), 1.0)) / ((double) exp(((double) (((double) (y * ((double) log(((double) (1.0 / z)))))) + ((double) (((double) (((double) log(((double) (1.0 / a)))) * t)) + b)))))))) / y)) / ((double) (1.0 / x))));
} else {
VAR = ((double) (((double) (((double) pow(((double) (1.0 / a)), 1.0)) / ((double) exp(((double) (((double) (y * ((double) log(((double) (1.0 / z)))))) + ((double) (((double) (((double) log(((double) (1.0 / a)))) * t)) + b)))))))) / ((double) (y / x))));
}
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
Results
if x < -2.3318989978962595e+68 or 5.04326216364718e-115 < x Initial program 1.0
Taylor expanded around inf 1.0
Simplified12.2
rmApplied div-inv12.2
Applied associate-/r*0.4
if -2.3318989978962595e+68 < x < 5.04326216364718e-115Initial program 3.1
Taylor expanded around inf 3.1
Simplified0.3
Final simplification0.4
herbie shell --seed 2020130
(FPCore (x y z t a b)
:name "Numeric.SpecFunctions:incompleteBetaWorker from math-functions-0.1.5.2"
:precision binary64
(/ (* x (exp (- (+ (* y (log z)) (* (- t 1.0) (log a))) b))) y))