c0 \cdot \sqrt{\frac{A}{V \cdot \ell}}
\begin{array}{l}
t_0 := c0 \cdot \frac{\sqrt{\frac{A}{V}}}{\sqrt{\ell}}\\
\mathbf{if}\;V \cdot \ell \leq -5.956236208390198 \cdot 10^{+176}:\\
\;\;\;\;t_0\\
\mathbf{elif}\;V \cdot \ell \leq -1.2216663093192363 \cdot 10^{-165}:\\
\;\;\;\;c0 \cdot \sqrt{\frac{A}{V \cdot \ell}}\\
\mathbf{elif}\;V \cdot \ell \leq 0:\\
\;\;\;\;t_0\\
\mathbf{elif}\;V \cdot \ell \leq 1.6189194423470151 \cdot 10^{+298}:\\
\;\;\;\;c0 \cdot \frac{\sqrt{A}}{\sqrt{V \cdot \ell}}\\
\mathbf{else}:\\
\;\;\;\;c0 \cdot \sqrt{\frac{1}{V} \cdot \frac{A}{\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 V)) (sqrt l)))))
(if (<= (* V l) -5.956236208390198e+176)
t_0
(if (<= (* V l) -1.2216663093192363e-165)
(* c0 (sqrt (/ A (* V l))))
(if (<= (* V l) 0.0)
t_0
(if (<= (* V l) 1.6189194423470151e+298)
(* c0 (/ (sqrt A) (sqrt (* V l))))
(* c0 (sqrt (* (/ 1.0 V) (/ A 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 / V) / sqrt(l));
double tmp;
if ((V * l) <= -5.956236208390198e+176) {
tmp = t_0;
} else if ((V * l) <= -1.2216663093192363e-165) {
tmp = c0 * sqrt(A / (V * l));
} else if ((V * l) <= 0.0) {
tmp = t_0;
} else if ((V * l) <= 1.6189194423470151e+298) {
tmp = c0 * (sqrt(A) / sqrt(V * l));
} else {
tmp = c0 * sqrt((1.0 / V) * (A / l));
}
return tmp;
}



Bits error versus c0



Bits error versus A



Bits error versus V



Bits error versus l
Results
if (*.f64 V l) < -5.9562362083901976e176 or -1.2216663093192363e-165 < (*.f64 V l) < -0.0Initial program 36.7
Applied add-cube-cbrt_binary6436.9
Applied times-frac_binary6425.4
Applied associate-*r/_binary6425.8
Applied sqrt-div_binary6416.1
Simplified15.8
if -5.9562362083901976e176 < (*.f64 V l) < -1.2216663093192363e-165Initial program 6.0
Applied add-cube-cbrt_binary646.5
Applied times-frac_binary6412.1
Applied pow1_binary6412.1
Applied pow1_binary6412.1
Applied pow-prod-down_binary6412.1
Simplified6.0
if -0.0 < (*.f64 V l) < 1.61891944234701512e298Initial program 11.8
Applied sqrt-div_binary640.8
if 1.61891944234701512e298 < (*.f64 V l) Initial program 39.8
Applied *-un-lft-identity_binary6439.8
Applied times-frac_binary6421.3
Final simplification8.0
herbie shell --seed 2022121
(FPCore (c0 A V l)
:name "Henrywood and Agarwal, Equation (3)"
:precision binary64
(* c0 (sqrt (/ A (* V l)))))