w0 \cdot \sqrt{1 - {\left(\frac{M \cdot D}{2 \cdot d}\right)}^{2} \cdot \frac{h}{\ell}}w0 \cdot \sqrt{1 - \left(h \cdot {\left(M \cdot \frac{D}{2 \cdot d}\right)}^{\left(2 \cdot \frac{1}{2}\right)}\right) \cdot \frac{{\left(M \cdot \frac{D}{2 \cdot d}\right)}^{\left(2 \cdot \frac{1}{2}\right)}}{\ell}}double code(double w0, double M, double D, double h, double l, double d) {
return ((double) (w0 * ((double) sqrt(((double) (1.0 - ((double) (((double) pow(((double) (((double) (M * D)) / ((double) (2.0 * d)))), 2.0)) * ((double) (h / l))))))))));
}
double code(double w0, double M, double D, double h, double l, double d) {
return ((double) (w0 * ((double) sqrt(((double) (1.0 - ((double) (((double) (h * ((double) pow(((double) (M * ((double) (D / ((double) (2.0 * d)))))), ((double) (2.0 * 0.5)))))) * ((double) (((double) pow(((double) (M * ((double) (D / ((double) (2.0 * d)))))), ((double) (2.0 * 0.5)))) / l))))))))));
}



Bits error versus w0



Bits error versus M



Bits error versus D



Bits error versus h



Bits error versus l



Bits error versus d
Results
Initial program 14.2
rmApplied associate-*r/11.0
Simplified11.1
rmApplied sqr-pow11.1
Applied associate-*r*9.6
Simplified9.6
rmApplied *-un-lft-identity9.6
Applied times-frac9.0
Simplified9.0
Simplified9.0
Final simplification9.0
herbie shell --seed 2020184
(FPCore (w0 M D h l d)
:name "Henrywood and Agarwal, Equation (9a)"
:precision binary64
(* w0 (sqrt (- 1.0 (* (pow (/ (* M D) (* 2.0 d)) 2.0) (/ h l))))))