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(\frac{M \cdot D}{2 \cdot d}\right)}^{\left(\frac{2}{2}\right)}\right) \cdot \frac{{\left(\frac{M \cdot D}{2 \cdot d}\right)}^{\left(\frac{2}{2}\right)}}{\ell}}(FPCore (w0 M D h l d) :precision binary64 (* w0 (sqrt (- 1.0 (* (pow (/ (* M D) (* 2.0 d)) 2.0) (/ h l))))))
(FPCore (w0 M D h l d)
:precision binary64
(*
w0
(sqrt
(-
1.0
(*
(* h (pow (/ (* M D) (* 2.0 d)) (/ 2.0 2.0)))
(/ (pow (/ (* M D) (* 2.0 d)) (/ 2.0 2.0)) 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) pow((((double) (M * D)) / ((double) (2.0 * d))), 2.0)) * (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 * D)) / ((double) (2.0 * d))), (2.0 / 2.0))))) * (((double) pow((((double) (M * D)) / ((double) (2.0 * d))), (2.0 / 2.0))) / 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 13.5
rmApplied div-inv_binary6413.5
Applied associate-*r*_binary6410.4
Simplified10.4
rmApplied sqr-pow_binary6410.4
Applied associate-*r*_binary649.0
rmApplied associate-*l*_binary648.4
Simplified8.4
Final simplification8.4
herbie shell --seed 2020205
(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))))))