\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 -9.70466398046478901 \cdot 10^{-48}:\\
\;\;\;\;\sqrt{\left(2 \cdot n\right) \cdot \left(U \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)\right)}\\
\mathbf{elif}\;n \le 1.75326784145555145 \cdot 10^{31}:\\
\;\;\;\;\sqrt{{\left(\left(\left(2 \cdot n\right) \cdot \left(t - \left(2 \cdot \frac{\ell}{\frac{Om}{\ell}} - \left(-n \cdot {\left(\frac{\ell}{Om}\right)}^{\left(2 \cdot \frac{2}{2}\right)}\right) \cdot \left(U - U*\right)\right)\right)\right) \cdot U\right)}^{1}}\\
\mathbf{else}:\\
\;\;\;\;\sqrt{2 \cdot n} \cdot \sqrt{U \cdot \left(\left(t - 2 \cdot \frac{\ell}{\frac{Om}{\ell}}\right) - \left(n \cdot {\left(\frac{\ell}{Om}\right)}^{2}\right) \cdot \left(U - U*\right)\right)}\\
\end{array}double f(double n, double U, double t, double l, double Om, double U_) {
double r205434 = 2.0;
double r205435 = n;
double r205436 = r205434 * r205435;
double r205437 = U;
double r205438 = r205436 * r205437;
double r205439 = t;
double r205440 = l;
double r205441 = r205440 * r205440;
double r205442 = Om;
double r205443 = r205441 / r205442;
double r205444 = r205434 * r205443;
double r205445 = r205439 - r205444;
double r205446 = r205440 / r205442;
double r205447 = pow(r205446, r205434);
double r205448 = r205435 * r205447;
double r205449 = U_;
double r205450 = r205437 - r205449;
double r205451 = r205448 * r205450;
double r205452 = r205445 - r205451;
double r205453 = r205438 * r205452;
double r205454 = sqrt(r205453);
return r205454;
}
double f(double n, double U, double t, double l, double Om, double U_) {
double r205455 = n;
double r205456 = -9.704663980464789e-48;
bool r205457 = r205455 <= r205456;
double r205458 = 2.0;
double r205459 = r205458 * r205455;
double r205460 = U;
double r205461 = t;
double r205462 = l;
double r205463 = Om;
double r205464 = r205463 / r205462;
double r205465 = r205462 / r205464;
double r205466 = r205458 * r205465;
double r205467 = r205461 - r205466;
double r205468 = r205462 / r205463;
double r205469 = 2.0;
double r205470 = r205458 / r205469;
double r205471 = pow(r205468, r205470);
double r205472 = r205455 * r205471;
double r205473 = U_;
double r205474 = r205460 - r205473;
double r205475 = r205471 * r205474;
double r205476 = r205472 * r205475;
double r205477 = r205467 - r205476;
double r205478 = r205460 * r205477;
double r205479 = r205459 * r205478;
double r205480 = sqrt(r205479);
double r205481 = 1.7532678414555514e+31;
bool r205482 = r205455 <= r205481;
double r205483 = r205469 * r205470;
double r205484 = pow(r205468, r205483);
double r205485 = r205455 * r205484;
double r205486 = -r205485;
double r205487 = r205486 * r205474;
double r205488 = r205466 - r205487;
double r205489 = r205461 - r205488;
double r205490 = r205459 * r205489;
double r205491 = r205490 * r205460;
double r205492 = 1.0;
double r205493 = pow(r205491, r205492);
double r205494 = sqrt(r205493);
double r205495 = sqrt(r205459);
double r205496 = pow(r205468, r205458);
double r205497 = r205455 * r205496;
double r205498 = r205497 * r205474;
double r205499 = r205467 - r205498;
double r205500 = r205460 * r205499;
double r205501 = sqrt(r205500);
double r205502 = r205495 * r205501;
double r205503 = r205482 ? r205494 : r205502;
double r205504 = r205457 ? r205480 : r205503;
return r205504;
}



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 < -9.704663980464789e-48Initial program 31.9
rmApplied associate-/l*29.6
rmApplied associate-*l*30.1
rmApplied sqr-pow30.1
Applied associate-*r*28.9
rmApplied associate-*l*27.8
if -9.704663980464789e-48 < n < 1.7532678414555514e+31Initial program 34.5
rmApplied associate-/l*31.6
rmApplied associate-*l*31.9
rmApplied sqr-pow31.9
Applied associate-*r*30.9
rmApplied pow130.9
Applied pow130.9
Applied pow-prod-down30.9
Applied pow130.9
Applied pow130.9
Applied pow-prod-down30.9
Applied pow-prod-down30.9
Simplified28.1
if 1.7532678414555514e+31 < n Initial program 33.9
rmApplied associate-/l*32.1
rmApplied associate-*l*33.3
rmApplied sqrt-prod24.4
Final simplification27.4
herbie shell --seed 2020039
(FPCore (n U t l Om U*)
:name "Toniolo and Linder, Equation (13)"
:precision binary64
(sqrt (* (* (* 2 n) U) (- (- t (* 2 (/ (* l l) Om))) (* (* n (pow (/ l Om) 2)) (- U U*))))))