\sqrt{\left(\left(2 \cdot n\right) \cdot U\right) \cdot \left(\left(t - 2 \cdot \frac{\ell \cdot \ell}{Om}\right) - \left(n \cdot {\left(\frac{\ell}{Om}\right)}^{2}\right) \cdot \left(U - U*\right)\right)}\begin{array}{l}
\mathbf{if}\;n \le -2.18388205644201065 \cdot 10^{70} \lor \neg \left(n \le 3.9557028396458285 \cdot 10^{-275}\right):\\
\;\;\;\;\sqrt{\left(\left(2 \cdot n\right) \cdot U\right) \cdot \left(\left(t - 2 \cdot \frac{\ell}{\frac{Om}{\ell}}\right) - \left(n \cdot {\left(\frac{\ell}{Om}\right)}^{\left(\frac{2}{2}\right)}\right) \cdot \left({\left(\frac{\ell}{Om}\right)}^{\left(\frac{2}{2}\right)} \cdot \left(U - U*\right)\right)\right)}\\
\mathbf{else}:\\
\;\;\;\;\sqrt{\sqrt{\left(\left(t - \left(\left({\left(\frac{\ell}{Om}\right)}^{\left(2 \cdot \frac{2}{2}\right)} \cdot n\right) \cdot \left(U - U*\right) + 2 \cdot \frac{\ell}{\frac{Om}{\ell}}\right)\right) \cdot \left(2 \cdot n\right)\right) \cdot U} \cdot \sqrt{\left(\left(t - \left(\left({\left(\frac{\ell}{Om}\right)}^{\left(2 \cdot \frac{2}{2}\right)} \cdot n\right) \cdot \left(U - U*\right) + 2 \cdot \frac{\ell}{\frac{Om}{\ell}}\right)\right) \cdot \left(2 \cdot n\right)\right) \cdot U}}\\
\end{array}double code(double n, double U, double t, double l, double Om, double U_42_) {
return ((double) sqrt(((double) (((double) (((double) (2.0 * n)) * U)) * ((double) (((double) (t - ((double) (2.0 * (((double) (l * l)) / Om))))) - ((double) (((double) (n * ((double) pow((l / Om), 2.0)))) * ((double) (U - U_42_))))))))));
}
double code(double n, double U, double t, double l, double Om, double U_42_) {
double VAR;
if (((n <= -2.1838820564420106e+70) || !(n <= 3.9557028396458285e-275))) {
VAR = ((double) sqrt(((double) (((double) (((double) (2.0 * n)) * U)) * ((double) (((double) (t - ((double) (2.0 * (l / (Om / l)))))) - ((double) (((double) (n * ((double) pow((l / Om), (2.0 / 2.0))))) * ((double) (((double) pow((l / Om), (2.0 / 2.0))) * ((double) (U - U_42_))))))))))));
} else {
VAR = ((double) sqrt(((double) (((double) sqrt(((double) (((double) (((double) (t - ((double) (((double) (((double) (((double) pow((l / Om), ((double) (2.0 * (2.0 / 2.0))))) * n)) * ((double) (U - U_42_)))) + ((double) (2.0 * (l / (Om / l)))))))) * ((double) (2.0 * n)))) * U)))) * ((double) sqrt(((double) (((double) (((double) (t - ((double) (((double) (((double) (((double) pow((l / Om), ((double) (2.0 * (2.0 / 2.0))))) * n)) * ((double) (U - U_42_)))) + ((double) (2.0 * (l / (Om / l)))))))) * ((double) (2.0 * n)))) * U))))))));
}
return VAR;
}



Bits error versus n



Bits error versus U



Bits error versus t



Bits error versus l



Bits error versus Om



Bits error versus U*
Results
if n < -2.18388205644201065e70 or 3.9557028396458285e-275 < n Initial program 34.4
rmApplied associate-/l*31.8
rmApplied sqr-pow31.8
Applied associate-*r*30.8
rmApplied associate-*l*30.4
if -2.18388205644201065e70 < n < 3.9557028396458285e-275Initial program 34.9
rmApplied associate-/l*31.6
rmApplied sqr-pow31.6
Applied associate-*r*30.9
rmApplied add-sqr-sqrt30.9
Simplified34.3
Simplified29.6
Final simplification30.1
herbie shell --seed 2020182
(FPCore (n U t l Om U*)
:name "Toniolo and Linder, Equation (13)"
:precision binary64
(sqrt (* (* (* 2.0 n) U) (- (- t (* 2.0 (/ (* l l) Om))) (* (* n (pow (/ l Om) 2.0)) (- U U*))))))