\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 -8.75494794756250326 \cdot 10^{-237}:\\
\;\;\;\;\sqrt{\left(2 \cdot n\right) \cdot \left(U \cdot \left(\left(t - 2 \cdot \frac{\ell}{\frac{Om}{\ell}}\right) - \left(\left(n \cdot {\left(\sqrt[3]{\frac{\ell}{Om}} \cdot \sqrt[3]{\frac{\ell}{Om}}\right)}^{2}\right) \cdot {\left(\sqrt[3]{\frac{\ell}{Om}}\right)}^{2}\right) \cdot \left(U - U*\right)\right)\right)}\\
\mathbf{elif}\;n \le -1.2331961769158278 \cdot 10^{-298}:\\
\;\;\;\;\sqrt{\left(\left(2 \cdot n\right) \cdot U\right) \cdot \left(\left(t - 2 \cdot \frac{\ell}{\frac{Om}{\ell}}\right) - 0\right)}\\
\mathbf{elif}\;n \le 1.69785278517202 \cdot 10^{-310}:\\
\;\;\;\;\sqrt{\left(2 \cdot n\right) \cdot \left(U \cdot \left(\left(t - 2 \cdot \frac{\ell}{\frac{Om}{\ell}}\right) - \left(\left(n \cdot {\left(\sqrt[3]{\frac{\ell}{Om}} \cdot \sqrt[3]{\frac{\ell}{Om}}\right)}^{2}\right) \cdot {\left(\sqrt[3]{\frac{\ell}{Om}}\right)}^{2}\right) \cdot \left(U - U*\right)\right)\right)}\\
\mathbf{else}:\\
\;\;\;\;\sqrt{2 \cdot n} \cdot \sqrt{U \cdot \left(\left(t - 2 \cdot \frac{\ell}{\frac{Om}{\ell}}\right) - \left(\left(n \cdot {\left(\sqrt[3]{\frac{\ell}{Om}} \cdot \sqrt[3]{\frac{\ell}{Om}}\right)}^{2}\right) \cdot {\left(\sqrt[3]{\frac{\ell}{Om}}\right)}^{2}\right) \cdot \left(U - U*\right)\right)}\\
\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) (((double) (l * l)) / Om)))))) - ((double) (((double) (n * ((double) pow(((double) (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 <= -8.754947947562503e-237)) {
VAR = ((double) sqrt(((double) (((double) (2.0 * n)) * ((double) (U * ((double) (((double) (t - ((double) (2.0 * ((double) (l / ((double) (Om / l)))))))) - ((double) (((double) (((double) (n * ((double) pow(((double) (((double) cbrt(((double) (l / Om)))) * ((double) cbrt(((double) (l / Om)))))), 2.0)))) * ((double) pow(((double) cbrt(((double) (l / Om)))), 2.0)))) * ((double) (U - U_42_))))))))))));
} else {
double VAR_1;
if ((n <= -1.2331961769158278e-298)) {
VAR_1 = ((double) sqrt(((double) (((double) (((double) (2.0 * n)) * U)) * ((double) (((double) (t - ((double) (2.0 * ((double) (l / ((double) (Om / l)))))))) - 0.0))))));
} else {
double VAR_2;
if ((n <= 1.697852785172e-310)) {
VAR_2 = ((double) sqrt(((double) (((double) (2.0 * n)) * ((double) (U * ((double) (((double) (t - ((double) (2.0 * ((double) (l / ((double) (Om / l)))))))) - ((double) (((double) (((double) (n * ((double) pow(((double) (((double) cbrt(((double) (l / Om)))) * ((double) cbrt(((double) (l / Om)))))), 2.0)))) * ((double) pow(((double) cbrt(((double) (l / Om)))), 2.0)))) * ((double) (U - U_42_))))))))))));
} else {
VAR_2 = ((double) (((double) sqrt(((double) (2.0 * n)))) * ((double) sqrt(((double) (U * ((double) (((double) (t - ((double) (2.0 * ((double) (l / ((double) (Om / l)))))))) - ((double) (((double) (((double) (n * ((double) pow(((double) (((double) cbrt(((double) (l / Om)))) * ((double) cbrt(((double) (l / Om)))))), 2.0)))) * ((double) pow(((double) cbrt(((double) (l / Om)))), 2.0)))) * ((double) (U - U_42_))))))))))));
}
VAR_1 = VAR_2;
}
VAR = VAR_1;
}
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 < -8.75494794756250326e-237 or -1.2331961769158278e-298 < n < 1.69785278517202e-310Initial program 33.6
rmApplied associate-/l*30.5
rmApplied associate-*l*30.5
rmApplied add-cube-cbrt30.6
Applied unpow-prod-down30.6
Applied associate-*r*30.0
if -8.75494794756250326e-237 < n < -1.2331961769158278e-298Initial program 38.6
rmApplied associate-/l*36.4
Taylor expanded around 0 36.7
if 1.69785278517202e-310 < n Initial program 35.3
rmApplied associate-/l*32.4
rmApplied associate-*l*32.6
rmApplied add-cube-cbrt32.7
Applied unpow-prod-down32.7
Applied associate-*r*31.7
rmApplied sqrt-prod25.0
Final simplification27.9
herbie shell --seed 2020169
(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*))))))