\[w0 \cdot \sqrt{1 - {\left(\frac{M \cdot D}{2 \cdot d}\right)}^{2} \cdot \frac{h}{\ell}}\]

w0 \cdot \sqrt{1 - {\left(\frac{M \cdot D}{2 \cdot d}\right)}^{2} \cdot \frac{h}{\ell}}

double f(double w0, double M, double D, double h, double l, double d) {
        double r9511917 = w0;
        double r9511918 = 1.0;
        double r9511919 = M;
        double r9511920 = D;
        double r9511921 = r9511919 * r9511920;
        double r9511922 = 2.0;
        double r9511923 = d;
        double r9511924 = r9511922 * r9511923;
        double r9511925 = r9511921 / r9511924;
        double r9511926 = pow(r9511925, r9511922);
        double r9511927 = h;
        double r9511928 = l;
        double r9511929 = r9511927 / r9511928;
        double r9511930 = r9511926 * r9511929;
        double r9511931 = r9511918 - r9511930;
        double r9511932 = sqrt(r9511931);
        double r9511933 = r9511917 * r9511932;
        return r9511933;
}

Reproduce

Please include this information when filing a bug report:

herbie shell --seed 2019173 
(FPCore (w0 M D h l d)
  :name "Henrywood and Agarwal, Equation (9a)"
  (* w0 (sqrt (- 1.0 (* (pow (/ (* M D) (* 2.0 d)) 2.0) (/ h l))))))

Backtrace

hash-ref: no value found for key key: #<enode 595(595)>		L	C
for-loop	/data/pavpan/nightlies/herbie/various-cleanup/src/core/simplify.rkt	197	2
extractor-extract	/data/pavpan/nightlies/herbie/various-cleanup/src/core/simplify.rkt	196	0
for-loop	/data/pavpan/nightlies/herbie/various-cleanup/src/core/simplify.rkt	35	2
(unnamed)	/data/pavpan/nightlies/herbie/various-cleanup/src/core/simplify.rkt	26	0
simplify!	/data/pavpan/nightlies/herbie/various-cleanup/src/mainloop.rkt	217	0
run-iter!	/data/pavpan/nightlies/herbie/various-cleanup/src/mainloop.rkt	320	0
for-loop	/data/pavpan/nightlies/herbie/various-cleanup/src/mainloop.rkt	354	4
run-improve43	/data/pavpan/nightlies/herbie/various-cleanup/src/mainloop.rkt	339	0
(unnamed)	/opt/racket-7.0/collects/racket/private/more-scheme.rkt	261	28
run	/opt/racket-7.0/share/pkgs/profile-lib/main.rkt	39	2
profile-thunk16	/opt/racket-7.0/share/pkgs/profile-lib/main.rkt	9	0
(unnamed)	/opt/racket-7.0/collects/racket/private/more-scheme.rkt	261	28