x \cdot e^{y \cdot \left(\log z - t\right) + a \cdot \left(\log \left(1 - z\right) - b\right)}x \cdot e^{y \cdot \left(\log z - t\right) + a \cdot \left(\left(\log 1 - \left(z \cdot 1 + 0.5 \cdot \frac{z \cdot z}{1 \cdot 1}\right)\right) - b\right)}(FPCore (x y z t a b) :precision binary64 (* x (exp (+ (* y (- (log z) t)) (* a (- (log (- 1.0 z)) b))))))
(FPCore (x y z t a b)
:precision binary64
(*
x
(exp
(+
(* y (- (log z) t))
(* a (- (- (log 1.0) (+ (* z 1.0) (* 0.5 (/ (* z z) (* 1.0 1.0))))) b))))))double code(double x, double y, double z, double t, double a, double b) {
return ((double) (x * ((double) exp(((double) (((double) (y * ((double) (((double) log(z)) - t)))) + ((double) (a * ((double) (((double) log(((double) (1.0 - z)))) - b))))))))));
}
double code(double x, double y, double z, double t, double a, double b) {
return ((double) (x * ((double) exp(((double) (((double) (y * ((double) (((double) log(z)) - t)))) + ((double) (a * ((double) (((double) (((double) log(1.0)) - ((double) (((double) (z * 1.0)) + ((double) (0.5 * (((double) (z * z)) / ((double) (1.0 * 1.0))))))))) - b))))))))));
}



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
Initial program 2.0
Taylor expanded around 0 0.6
Simplified0.6
Final simplification0.6
herbie shell --seed 2020205
(FPCore (x y z t a b)
:name "Numeric.SpecFunctions:incompleteBetaApprox from math-functions-0.1.5.2, B"
:precision binary64
(* x (exp (+ (* y (- (log z) t)) (* a (- (log (- 1.0 z)) b))))))