c0 \cdot \sqrt{\frac{A}{V \cdot \ell}}
\begin{array}{l}
t_0 := c0 \cdot \sqrt{\frac{\frac{A}{\ell}}{V}}\\
\mathbf{if}\;V \cdot \ell \leq -7.412885324817908 \cdot 10^{+253}:\\
\;\;\;\;t_0\\
\mathbf{elif}\;V \cdot \ell \leq -1.3754201150893268 \cdot 10^{-288}:\\
\;\;\;\;c0 \cdot \frac{\left|\sqrt[3]{A}\right|}{\sqrt{\left(V \cdot \ell\right) \cdot \sqrt[3]{\frac{1}{A}}}}\\
\mathbf{elif}\;V \cdot \ell \leq 1.7736509609331736 \cdot 10^{-308} \lor \neg \left(V \cdot \ell \leq 6.1070541913147315 \cdot 10^{+259}\right):\\
\;\;\;\;t_0\\
\mathbf{else}:\\
\;\;\;\;c0 \cdot \frac{\sqrt{A}}{\sqrt{V \cdot \ell}}\\
\end{array}
(FPCore (c0 A V l) :precision binary64 (* c0 (sqrt (/ A (* V l)))))
(FPCore (c0 A V l)
:precision binary64
(let* ((t_0 (* c0 (sqrt (/ (/ A l) V)))))
(if (<= (* V l) -7.412885324817908e+253)
t_0
(if (<= (* V l) -1.3754201150893268e-288)
(* c0 (/ (fabs (cbrt A)) (sqrt (* (* V l) (cbrt (/ 1.0 A))))))
(if (or (<= (* V l) 1.7736509609331736e-308)
(not (<= (* V l) 6.1070541913147315e+259)))
t_0
(* c0 (/ (sqrt A) (sqrt (* V l)))))))))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 t_0 = c0 * sqrt((A / l) / V);
double tmp;
if ((V * l) <= -7.412885324817908e+253) {
tmp = t_0;
} else if ((V * l) <= -1.3754201150893268e-288) {
tmp = c0 * (fabs(cbrt(A)) / sqrt((V * l) * cbrt(1.0 / A)));
} else if (((V * l) <= 1.7736509609331736e-308) || !((V * l) <= 6.1070541913147315e+259)) {
tmp = t_0;
} else {
tmp = c0 * (sqrt(A) / sqrt(V * l));
}
return tmp;
}



Bits error versus c0



Bits error versus A



Bits error versus V



Bits error versus l
Results
if (*.f64 V l) < -7.41288532481790781e253 or -1.37542011508932678e-288 < (*.f64 V l) < 1.7736509609331736e-308 or 6.1070541913147315e259 < (*.f64 V l) Initial program 44.0
rmApplied add-cube-cbrt_binary6444.0
Applied times-frac_binary6427.0
Applied associate-*l/_binary6427.0
Simplified26.8
if -7.41288532481790781e253 < (*.f64 V l) < -1.37542011508932678e-288Initial program 8.4
rmApplied add-cube-cbrt_binary648.8
Applied associate-/l*_binary648.8
Simplified10.5
rmApplied sqrt-div_binary644.4
Simplified4.4
Taylor expanded around 0 64.0
Simplified1.7
if 1.7736509609331736e-308 < (*.f64 V l) < 6.1070541913147315e259Initial program 9.7
rmApplied sqrt-div_binary640.4
Final simplification8.4
herbie shell --seed 2021211
(FPCore (c0 A V l)
:name "Henrywood and Agarwal, Equation (3)"
:precision binary64
(* c0 (sqrt (/ A (* V l)))))