c0 \cdot \sqrt{\frac{A}{V \cdot \ell}}\begin{array}{l}
\mathbf{if}\;V \cdot \ell = -inf.0:\\
\;\;\;\;c0 \cdot \sqrt{\frac{1}{V} \cdot \frac{A}{\ell}}\\
\mathbf{elif}\;V \cdot \ell \le -3.60527352229 \cdot 10^{-314}:\\
\;\;\;\;\left(c0 \cdot \sqrt{\sqrt{\frac{A}{V \cdot \ell}}}\right) \cdot \sqrt{\sqrt{\frac{A}{V \cdot \ell}}}\\
\mathbf{elif}\;V \cdot \ell \le -0.0:\\
\;\;\;\;\frac{c0 \cdot \sqrt{\frac{1}{V} \cdot A}}{\sqrt{\ell}}\\
\mathbf{elif}\;V \cdot \ell \le 1.7569390886628989 \cdot 10^{185}:\\
\;\;\;\;c0 \cdot \frac{\sqrt{A}}{\sqrt{V \cdot \ell}}\\
\mathbf{else}:\\
\;\;\;\;c0 \cdot \sqrt{\frac{1}{V} \cdot \frac{A}{\ell}}\\
\end{array}double code(double c0, double A, double V, double l) {
return ((double) (c0 * ((double) sqrt(((double) (A / ((double) (V * l))))))));
}
double code(double c0, double A, double V, double l) {
double VAR;
if ((((double) (V * l)) <= -inf.0)) {
VAR = ((double) (c0 * ((double) sqrt(((double) (((double) (1.0 / V)) * ((double) (A / l))))))));
} else {
double VAR_1;
if ((((double) (V * l)) <= -3.6052735222866e-314)) {
VAR_1 = ((double) (((double) (c0 * ((double) sqrt(((double) sqrt(((double) (A / ((double) (V * l)))))))))) * ((double) sqrt(((double) sqrt(((double) (A / ((double) (V * l))))))))));
} else {
double VAR_2;
if ((((double) (V * l)) <= -0.0)) {
VAR_2 = ((double) (((double) (c0 * ((double) sqrt(((double) (((double) (1.0 / V)) * A)))))) / ((double) sqrt(l))));
} else {
double VAR_3;
if ((((double) (V * l)) <= 1.756939088662899e+185)) {
VAR_3 = ((double) (c0 * ((double) (((double) sqrt(A)) / ((double) sqrt(((double) (V * l))))))));
} else {
VAR_3 = ((double) (c0 * ((double) sqrt(((double) (((double) (1.0 / V)) * ((double) (A / l))))))));
}
VAR_2 = VAR_3;
}
VAR_1 = VAR_2;
}
VAR = VAR_1;
}
return VAR;
}



Bits error versus c0



Bits error versus A



Bits error versus V



Bits error versus l
Results
if (* V l) < -inf.0 or 1.756939088662899e+185 < (* V l) Initial program 31.8
rmApplied *-un-lft-identity31.8
Applied times-frac20.6
if -inf.0 < (* V l) < -3.6052735222866e-314Initial program 10.1
rmApplied add-sqr-sqrt10.1
Applied sqrt-prod10.4
Applied associate-*r*10.4
if -3.6052735222866e-314 < (* V l) < -0.0Initial program 63.3
rmApplied *-un-lft-identity63.3
Applied times-frac39.3
rmApplied associate-*r/39.2
Applied sqrt-div39.9
Applied associate-*r/40.1
if -0.0 < (* V l) < 1.756939088662899e+185Initial program 9.9
rmApplied sqrt-div0.8
Final simplification11.8
herbie shell --seed 2020126
(FPCore (c0 A V l)
:name "Henrywood and Agarwal, Equation (3)"
:precision binary64
(* c0 (sqrt (/ A (* V l)))))