double f(double c0, double A, double V, double l) {
double r9192182 = c0;
double r9192183 = A;
double r9192184 = V;
double r9192185 = l;
double r9192186 = r9192184 * r9192185;
double r9192187 = r9192183 / r9192186;
double r9192188 = sqrt(r9192187);
double r9192189 = r9192182 * r9192188;
return r9192189;
}
double f(double c0, double A, double V, double l) {
double r9192190 = V;
double r9192191 = l;
double r9192192 = r9192190 * r9192191;
double r9192193 = -inf.0;
bool r9192194 = r9192192 <= r9192193;
double r9192195 = c0;
double r9192196 = A;
double r9192197 = cbrt(r9192196);
double r9192198 = r9192197 / r9192191;
double r9192199 = sqrt(r9192198);
double r9192200 = r9192197 * r9192197;
double r9192201 = r9192200 / r9192190;
double r9192202 = sqrt(r9192201);
double r9192203 = r9192199 * r9192202;
double r9192204 = r9192195 * r9192203;
double r9192205 = -4.6924056322212644e-245;
bool r9192206 = r9192192 <= r9192205;
double r9192207 = r9192196 / r9192192;
double r9192208 = sqrt(r9192207);
double r9192209 = sqrt(r9192208);
double r9192210 = cbrt(r9192192);
double r9192211 = r9192197 / r9192210;
double r9192212 = sqrt(r9192211);
double r9192213 = cbrt(r9192207);
double r9192214 = r9192213 * r9192213;
double r9192215 = sqrt(r9192214);
double r9192216 = r9192212 * r9192215;
double r9192217 = sqrt(r9192216);
double r9192218 = r9192195 * r9192217;
double r9192219 = r9192209 * r9192218;
double r9192220 = 5.41520176388353e-310;
bool r9192221 = r9192192 <= r9192220;
double r9192222 = r9192196 / r9192190;
double r9192223 = r9192222 / r9192191;
double r9192224 = sqrt(r9192223);
double r9192225 = r9192224 * r9192195;
double r9192226 = sqrt(r9192196);
double r9192227 = sqrt(r9192192);
double r9192228 = r9192226 / r9192227;
double r9192229 = r9192195 * r9192228;
double r9192230 = r9192221 ? r9192225 : r9192229;
double r9192231 = r9192206 ? r9192219 : r9192230;
double r9192232 = r9192194 ? r9192204 : r9192231;
return r9192232;
}
c0 \cdot \sqrt{\frac{A}{V \cdot \ell}}\begin{array}{l}
\mathbf{if}\;V \cdot \ell = -\infty:\\
\;\;\;\;c0 \cdot \left(\sqrt{\frac{\sqrt[3]{A}}{\ell}} \cdot \sqrt{\frac{\sqrt[3]{A} \cdot \sqrt[3]{A}}{V}}\right)\\
\mathbf{elif}\;V \cdot \ell \le -4.6924056322212644 \cdot 10^{-245}:\\
\;\;\;\;\sqrt{\sqrt{\frac{A}{V \cdot \ell}}} \cdot \left(c0 \cdot \sqrt{\sqrt{\frac{\sqrt[3]{A}}{\sqrt[3]{V \cdot \ell}}} \cdot \sqrt{\sqrt[3]{\frac{A}{V \cdot \ell}} \cdot \sqrt[3]{\frac{A}{V \cdot \ell}}}}\right)\\
\mathbf{elif}\;V \cdot \ell \le 5.41520176388353 \cdot 10^{-310}:\\
\;\;\;\;\sqrt{\frac{\frac{A}{V}}{\ell}} \cdot c0\\
\mathbf{else}:\\
\;\;\;\;c0 \cdot \frac{\sqrt{A}}{\sqrt{V \cdot \ell}}\\
\end{array}


Bits error versus c0



Bits error versus A



Bits error versus V



Bits error versus l
if (* V l) < -inf.0Initial program 39.2
rmApplied add-cube-cbrt39.2
Applied times-frac22.1
Applied sqrt-prod34.0
if -inf.0 < (* V l) < -4.6924056322212644e-245Initial program 8.6
rmApplied add-sqr-sqrt8.6
Applied sqrt-prod8.9
Applied associate-*r*8.8
rmApplied add-cube-cbrt8.9
Applied sqrt-prod8.9
rmApplied cbrt-div8.9
if -4.6924056322212644e-245 < (* V l) < 5.41520176388353e-310Initial program 51.2
rmApplied associate-/r*33.0
if 5.41520176388353e-310 < (* V l) Initial program 14.7
rmApplied sqrt-div6.5
Final simplification12.5
herbie shell --seed 2019102
(FPCore (c0 A V l)
:name "Henrywood and Agarwal, Equation (3)"
(* c0 (sqrt (/ A (* V l)))))