c0 \cdot \sqrt{\frac{A}{V \cdot \ell}}\begin{array}{l}
\mathbf{if}\;\ell \le -6.3313648548077 \cdot 10^{-311}:\\
\;\;\;\;\frac{\sqrt{\frac{\sqrt[3]{A} \cdot \sqrt[3]{A}}{\sqrt[3]{\ell}} \cdot \frac{\sqrt[3]{A}}{V}}}{\left|\sqrt[3]{\ell}\right|} \cdot c0\\
\mathbf{else}:\\
\;\;\;\;c0 \cdot \frac{\sqrt{\frac{\sqrt[3]{A} \cdot \sqrt[3]{A}}{\sqrt[3]{\ell}}} \cdot \sqrt{\frac{\sqrt[3]{A}}{V}}}{\left|\sqrt[3]{\ell}\right|}\\
\end{array}double f(double c0, double A, double V, double l) {
double r4181338 = c0;
double r4181339 = A;
double r4181340 = V;
double r4181341 = l;
double r4181342 = r4181340 * r4181341;
double r4181343 = r4181339 / r4181342;
double r4181344 = sqrt(r4181343);
double r4181345 = r4181338 * r4181344;
return r4181345;
}
double f(double c0, double A, double V, double l) {
double r4181346 = l;
double r4181347 = -6.3313648548077e-311;
bool r4181348 = r4181346 <= r4181347;
double r4181349 = A;
double r4181350 = cbrt(r4181349);
double r4181351 = r4181350 * r4181350;
double r4181352 = cbrt(r4181346);
double r4181353 = r4181351 / r4181352;
double r4181354 = V;
double r4181355 = r4181350 / r4181354;
double r4181356 = r4181353 * r4181355;
double r4181357 = sqrt(r4181356);
double r4181358 = fabs(r4181352);
double r4181359 = r4181357 / r4181358;
double r4181360 = c0;
double r4181361 = r4181359 * r4181360;
double r4181362 = sqrt(r4181353);
double r4181363 = sqrt(r4181355);
double r4181364 = r4181362 * r4181363;
double r4181365 = r4181364 / r4181358;
double r4181366 = r4181360 * r4181365;
double r4181367 = r4181348 ? r4181361 : r4181366;
return r4181367;
}



Bits error versus c0



Bits error versus A



Bits error versus V



Bits error versus l
Results
if l < -6.3313648548077e-311Initial program 19.1
rmApplied *-un-lft-identity19.1
Applied times-frac18.8
rmApplied add-cube-cbrt19.1
Applied add-cube-cbrt19.2
Applied times-frac19.2
Applied associate-*r*15.4
Simplified14.9
rmApplied associate-*r/15.7
Applied frac-times17.7
Applied sqrt-div12.4
Simplified13.4
Simplified13.4
rmApplied add-cube-cbrt13.5
Applied times-frac12.2
if -6.3313648548077e-311 < l Initial program 18.8
rmApplied *-un-lft-identity18.8
Applied times-frac18.9
rmApplied add-cube-cbrt19.2
Applied add-cube-cbrt19.3
Applied times-frac19.3
Applied associate-*r*15.6
Simplified14.9
rmApplied associate-*r/15.5
Applied frac-times17.5
Applied sqrt-div12.7
Simplified13.7
Simplified13.7
rmApplied add-cube-cbrt13.9
Applied times-frac12.3
Applied sqrt-prod5.0
Final simplification8.6
herbie shell --seed 2019132
(FPCore (c0 A V l)
:name "Henrywood and Agarwal, Equation (3)"
(* c0 (sqrt (/ A (* V l)))))