c0 \cdot \sqrt{\frac{A}{V \cdot \ell}}\begin{array}{l}
\mathbf{if}\;V \cdot \ell = -\infty:\\
\;\;\;\;\left(c0 \cdot \sqrt{\sqrt{\frac{\sqrt[3]{1} \cdot \sqrt[3]{1}}{\sqrt[3]{V} \cdot \sqrt[3]{V}} \cdot \frac{\frac{A}{\ell}}{\sqrt[3]{V}}}}\right) \cdot \sqrt{\sqrt{\frac{1}{V} \cdot \frac{A}{\ell}}}\\
\mathbf{elif}\;V \cdot \ell \le -3.8298761382279537 \cdot 10^{-292}:\\
\;\;\;\;c0 \cdot \sqrt{\frac{1}{\frac{V \cdot \ell}{A}}}\\
\mathbf{elif}\;V \cdot \ell \le 1.56552358 \cdot 10^{-317}:\\
\;\;\;\;\frac{c0 \cdot \sqrt{\frac{1}{V} \cdot A}}{\sqrt{\ell}}\\
\mathbf{else}:\\
\;\;\;\;c0 \cdot \left(\sqrt{A} \cdot \sqrt{\frac{1}{V \cdot \ell}}\right)\\
\end{array}double code(double c0, double A, double V, double l) {
return (c0 * sqrt((A / (V * l))));
}
double code(double c0, double A, double V, double l) {
double VAR;
if (((V * l) <= -inf.0)) {
VAR = ((c0 * sqrt(sqrt((((cbrt(1.0) * cbrt(1.0)) / (cbrt(V) * cbrt(V))) * ((A / l) / cbrt(V)))))) * sqrt(sqrt(((1.0 / V) * (A / l)))));
} else {
double VAR_1;
if (((V * l) <= -3.8298761382279537e-292)) {
VAR_1 = (c0 * sqrt((1.0 / ((V * l) / A))));
} else {
double VAR_2;
if (((V * l) <= 1.5655235790231e-317)) {
VAR_2 = ((c0 * sqrt(((1.0 / V) * A))) / sqrt(l));
} else {
VAR_2 = (c0 * (sqrt(A) * sqrt((1.0 / (V * l)))));
}
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.0Initial program 40.5
rmApplied *-un-lft-identity40.5
Applied times-frac23.3
rmApplied add-sqr-sqrt23.4
Applied associate-*r*23.4
rmApplied add-cube-cbrt23.4
Applied add-cube-cbrt23.4
Applied times-frac23.4
Applied associate-*l*23.4
Simplified23.4
if -inf.0 < (* V l) < -3.8298761382279537e-292Initial program 9.4
rmApplied clear-num9.9
if -3.8298761382279537e-292 < (* V l) < 1.5655235790231e-317Initial program 59.9
rmApplied *-un-lft-identity59.9
Applied times-frac38.0
rmApplied associate-*r/38.0
Applied sqrt-div40.4
Applied associate-*r/41.0
if 1.5655235790231e-317 < (* V l) Initial program 15.1
rmApplied div-inv15.3
Applied sqrt-prod7.0
Final simplification12.5
herbie shell --seed 2020078 +o rules:numerics
(FPCore (c0 A V l)
:name "Henrywood and Agarwal, Equation (3)"
:precision binary64
(* c0 (sqrt (/ A (* V l)))))