\[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 r8210 = w0;
        double r8211 = 1.0;
        double r8212 = M;
        double r8213 = D;
        double r8214 = r8212 * r8213;
        double r8215 = 2.0;
        double r8216 = d;
        double r8217 = r8215 * r8216;
        double r8218 = r8214 / r8217;
        double r8219 = pow(r8218, r8215);
        double r8220 = h;
        double r8221 = l;
        double r8222 = r8220 / r8221;
        double r8223 = r8219 * r8222;
        double r8224 = r8211 - r8223;
        double r8225 = sqrt(r8224);
        double r8226 = r8210 * r8225;
        return r8226;
}

Reproduce

Please include this information when filing a bug report:

herbie shell --seed 2019179 
(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

result arity mismatch; expected number of values not received expected: 2 received: 1 in: local-binding form values...: 0LC
loop/data/pavpan/nightlies/herbie/various-cleanup/src/core/extraction.rkt252
(unnamed)/data/pavpan/nightlies/herbie/various-cleanup/src/core/simplify.rkt260
simplify!/data/pavpan/nightlies/herbie/various-cleanup/src/mainloop.rkt2170
run-improve43/data/pavpan/nightlies/herbie/various-cleanup/src/mainloop.rkt3390
(unnamed)/opt/racket-7.0/collects/racket/private/more-scheme.rkt26128
run/opt/racket-7.0/share/pkgs/profile-lib/main.rkt392
profile-thunk16/opt/racket-7.0/share/pkgs/profile-lib/main.rkt90
(unnamed)/opt/racket-7.0/collects/racket/private/more-scheme.rkt26128