\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}\;t \le -7.7186020624409743 \cdot 10^{211}:\\
\;\;\;\;\sqrt{\left(\left(2 \cdot n\right) \cdot U\right) \cdot \left(\left(t - 2 \cdot \left(\ell \cdot \frac{\ell}{Om}\right)\right) - 0 \cdot \left(U - U*\right)\right)}\\
\mathbf{elif}\;t \le -4.4828637577847008 \cdot 10^{49}:\\
\;\;\;\;\sqrt{\left(2 \cdot n\right) \cdot \left(U \cdot \left(\left(t - 2 \cdot \left(\ell \cdot \frac{\ell}{Om}\right)\right) - \left(n \cdot {\left(\frac{\ell}{Om}\right)}^{2}\right) \cdot \left(U - U*\right)\right)\right)}\\
\mathbf{elif}\;t \le 2.85659231871301485 \cdot 10^{41}:\\
\;\;\;\;\sqrt{\left(\left(2 \cdot n\right) \cdot U\right) \cdot \left(\left(t - 2 \cdot \left(\ell \cdot \frac{\ell}{Om}\right)\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{\left(2 \cdot n\right) \cdot U} \cdot \sqrt{\left(t - 2 \cdot \left(\ell \cdot \frac{\ell}{Om}\right)\right) - \left(n \cdot {\left(\frac{\ell}{Om}\right)}^{2}\right) \cdot \left(U - U*\right)}\\
\end{array}double f(double n, double U, double t, double l, double Om, double U_) {
double r170620 = 2.0;
double r170621 = n;
double r170622 = r170620 * r170621;
double r170623 = U;
double r170624 = r170622 * r170623;
double r170625 = t;
double r170626 = l;
double r170627 = r170626 * r170626;
double r170628 = Om;
double r170629 = r170627 / r170628;
double r170630 = r170620 * r170629;
double r170631 = r170625 - r170630;
double r170632 = r170626 / r170628;
double r170633 = pow(r170632, r170620);
double r170634 = r170621 * r170633;
double r170635 = U_;
double r170636 = r170623 - r170635;
double r170637 = r170634 * r170636;
double r170638 = r170631 - r170637;
double r170639 = r170624 * r170638;
double r170640 = sqrt(r170639);
return r170640;
}
double f(double n, double U, double t, double l, double Om, double U_) {
double r170641 = t;
double r170642 = -7.718602062440974e+211;
bool r170643 = r170641 <= r170642;
double r170644 = 2.0;
double r170645 = n;
double r170646 = r170644 * r170645;
double r170647 = U;
double r170648 = r170646 * r170647;
double r170649 = l;
double r170650 = Om;
double r170651 = r170649 / r170650;
double r170652 = r170649 * r170651;
double r170653 = r170644 * r170652;
double r170654 = r170641 - r170653;
double r170655 = 0.0;
double r170656 = U_;
double r170657 = r170647 - r170656;
double r170658 = r170655 * r170657;
double r170659 = r170654 - r170658;
double r170660 = r170648 * r170659;
double r170661 = sqrt(r170660);
double r170662 = -4.482863757784701e+49;
bool r170663 = r170641 <= r170662;
double r170664 = pow(r170651, r170644);
double r170665 = r170645 * r170664;
double r170666 = r170665 * r170657;
double r170667 = r170654 - r170666;
double r170668 = r170647 * r170667;
double r170669 = r170646 * r170668;
double r170670 = sqrt(r170669);
double r170671 = 2.856592318713015e+41;
bool r170672 = r170641 <= r170671;
double r170673 = 2.0;
double r170674 = r170644 / r170673;
double r170675 = pow(r170651, r170674);
double r170676 = r170645 * r170675;
double r170677 = r170675 * r170657;
double r170678 = r170676 * r170677;
double r170679 = r170654 - r170678;
double r170680 = r170648 * r170679;
double r170681 = sqrt(r170680);
double r170682 = sqrt(r170648);
double r170683 = sqrt(r170667);
double r170684 = r170682 * r170683;
double r170685 = r170672 ? r170681 : r170684;
double r170686 = r170663 ? r170670 : r170685;
double r170687 = r170643 ? r170661 : r170686;
return r170687;
}



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 t < -7.718602062440974e+211Initial program 40.3
rmApplied *-un-lft-identity40.3
Applied times-frac37.1
Simplified37.1
Taylor expanded around 0 36.3
if -7.718602062440974e+211 < t < -4.482863757784701e+49Initial program 33.8
rmApplied *-un-lft-identity33.8
Applied times-frac30.7
Simplified30.7
rmApplied pow130.7
Applied pow130.7
Applied pow130.7
Applied pow130.7
Applied pow-prod-down30.7
Applied pow-prod-down30.7
Applied pow-prod-down30.7
Simplified31.0
if -4.482863757784701e+49 < t < 2.856592318713015e+41Initial program 33.4
rmApplied *-un-lft-identity33.4
Applied times-frac30.7
Simplified30.7
rmApplied sqr-pow30.7
Applied associate-*r*29.4
rmApplied associate-*l*29.1
if 2.856592318713015e+41 < t Initial program 35.2
rmApplied *-un-lft-identity35.2
Applied times-frac32.3
Simplified32.3
rmApplied sqrt-prod24.6
Final simplification28.9
herbie shell --seed 2020046
(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*))))))