double code(double c0, double w, double h, double D, double d, double M) {
return ((double) (((double) (c0 / ((double) (2.0 * w)))) * ((double) (((double) (((double) (c0 * ((double) (d * d)))) / ((double) (((double) (w * h)) * ((double) (D * D)))))) + ((double) sqrt(((double) (((double) (((double) (((double) (c0 * ((double) (d * d)))) / ((double) (((double) (w * h)) * ((double) (D * D)))))) * ((double) (((double) (c0 * ((double) (d * d)))) / ((double) (((double) (w * h)) * ((double) (D * D)))))))) - ((double) (M * M))))))))));
}
double code(double c0, double w, double h, double D, double d, double M) {
double VAR;
if ((d <= -5.0948708970042e-209)) {
VAR = 0.0;
} else {
double VAR_1;
if ((d <= 1.5861563218221685e-202)) {
VAR_1 = ((double) (((double) (c0 / ((double) (2.0 * w)))) * ((double) (((double) (((double) (c0 / ((double) (w * h)))) * ((double) (((double) (d / D)) * ((double) (d / D)))))) * 2.0))));
} else {
VAR_1 = 0.0;
}
VAR = VAR_1;
}
return VAR;
}



Bits error versus c0



Bits error versus w



Bits error versus h



Bits error versus D



Bits error versus d



Bits error versus M
Results
if d < -5.09487089700420031e-209 or 1.5861563218221685e-202 < d Initial program 59.6
Taylor expanded around inf 34.7
rmApplied mul0-rgt30.6
if -5.09487089700420031e-209 < d < 1.5861563218221685e-202Initial program 63.1
rmApplied flip-+64.0
Simplified64.0
Simplified63.9
Taylor expanded around 0 63.6
Simplified47.1
Final simplification31.5
herbie shell --seed 2020191
(FPCore (c0 w h D d M)
:name "Henrywood and Agarwal, Equation (13)"
:precision binary64
(* (/ c0 (* 2.0 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))))