\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 6.40743567097731682 \cdot 10^{-273}:\\
\;\;\;\;\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{elif}\;t \le 6.91051826790831174 \cdot 10^{-202}:\\
\;\;\;\;\sqrt{\left(2 \cdot n\right) \cdot U} \cdot \sqrt{\left(t - 2 \cdot \left(\ell \cdot \frac{\ell}{Om}\right)\right) - \left(\left(n \cdot {\left(\frac{\ell}{Om}\right)}^{\left(\frac{2}{2}\right)}\right) \cdot {\left(\frac{\ell}{Om}\right)}^{\left(\frac{2}{2}\right)}\right) \cdot \left(U - U*\right)}\\
\mathbf{elif}\;t \le 8.6860665847203579 \cdot 10^{76}:\\
\;\;\;\;\sqrt{\left(\sqrt[3]{\left(\left(2 \cdot n\right) \cdot U\right) \cdot \left(\left(t - 2 \cdot \left(\ell \cdot \frac{\ell}{Om}\right)\right) - \left(\left(n \cdot {\left(\frac{\ell}{Om}\right)}^{\left(\frac{2}{2}\right)}\right) \cdot {\left(\frac{\ell}{Om}\right)}^{\left(\frac{2}{2}\right)}\right) \cdot \left(U - U*\right)\right)} \cdot \sqrt[3]{\left(\left(2 \cdot n\right) \cdot U\right) \cdot \left(\left(t - 2 \cdot \left(\ell \cdot \frac{\ell}{Om}\right)\right) - \left(\left(n \cdot {\left(\frac{\ell}{Om}\right)}^{\left(\frac{2}{2}\right)}\right) \cdot {\left(\frac{\ell}{Om}\right)}^{\left(\frac{2}{2}\right)}\right) \cdot \left(U - U*\right)\right)}\right) \cdot \sqrt[3]{\left(\left(2 \cdot n\right) \cdot U\right) \cdot \left(\left(t - 2 \cdot \left(\ell \cdot \frac{\ell}{Om}\right)\right) - \left(\left(n \cdot {\left(\frac{\ell}{Om}\right)}^{\left(\frac{2}{2}\right)}\right) \cdot {\left(\frac{\ell}{Om}\right)}^{\left(\frac{2}{2}\right)}\right) \cdot \left(U - U*\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(\left(n \cdot {\left(\frac{\ell}{Om}\right)}^{\left(\frac{2}{2}\right)}\right) \cdot {\left(\frac{\ell}{Om}\right)}^{\left(\frac{2}{2}\right)}\right) \cdot \left(U - U*\right)}\\
\end{array}double f(double n, double U, double t, double l, double Om, double U_) {
double r208561 = 2.0;
double r208562 = n;
double r208563 = r208561 * r208562;
double r208564 = U;
double r208565 = r208563 * r208564;
double r208566 = t;
double r208567 = l;
double r208568 = r208567 * r208567;
double r208569 = Om;
double r208570 = r208568 / r208569;
double r208571 = r208561 * r208570;
double r208572 = r208566 - r208571;
double r208573 = r208567 / r208569;
double r208574 = pow(r208573, r208561);
double r208575 = r208562 * r208574;
double r208576 = U_;
double r208577 = r208564 - r208576;
double r208578 = r208575 * r208577;
double r208579 = r208572 - r208578;
double r208580 = r208565 * r208579;
double r208581 = sqrt(r208580);
return r208581;
}
double f(double n, double U, double t, double l, double Om, double U_) {
double r208582 = t;
double r208583 = 6.407435670977317e-273;
bool r208584 = r208582 <= r208583;
double r208585 = 2.0;
double r208586 = n;
double r208587 = r208585 * r208586;
double r208588 = U;
double r208589 = r208587 * r208588;
double r208590 = l;
double r208591 = Om;
double r208592 = r208590 / r208591;
double r208593 = r208590 * r208592;
double r208594 = r208585 * r208593;
double r208595 = r208582 - r208594;
double r208596 = 2.0;
double r208597 = r208585 / r208596;
double r208598 = pow(r208592, r208597);
double r208599 = r208586 * r208598;
double r208600 = U_;
double r208601 = r208588 - r208600;
double r208602 = r208598 * r208601;
double r208603 = r208599 * r208602;
double r208604 = r208595 - r208603;
double r208605 = r208589 * r208604;
double r208606 = sqrt(r208605);
double r208607 = 6.910518267908312e-202;
bool r208608 = r208582 <= r208607;
double r208609 = sqrt(r208589);
double r208610 = r208599 * r208598;
double r208611 = r208610 * r208601;
double r208612 = r208595 - r208611;
double r208613 = sqrt(r208612);
double r208614 = r208609 * r208613;
double r208615 = 8.686066584720358e+76;
bool r208616 = r208582 <= r208615;
double r208617 = r208589 * r208612;
double r208618 = cbrt(r208617);
double r208619 = r208618 * r208618;
double r208620 = r208619 * r208618;
double r208621 = sqrt(r208620);
double r208622 = r208616 ? r208621 : r208614;
double r208623 = r208608 ? r208614 : r208622;
double r208624 = r208584 ? r208606 : r208623;
return r208624;
}



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 < 6.407435670977317e-273Initial program 34.3
rmApplied *-un-lft-identity34.3
Applied times-frac31.2
Simplified31.2
rmApplied sqr-pow31.2
Applied associate-*r*30.3
rmApplied associate-*l*30.0
if 6.407435670977317e-273 < t < 6.910518267908312e-202 or 8.686066584720358e+76 < t Initial program 35.6
rmApplied *-un-lft-identity35.6
Applied times-frac33.0
Simplified33.0
rmApplied sqr-pow33.0
Applied associate-*r*32.4
rmApplied sqrt-prod25.2
if 6.910518267908312e-202 < t < 8.686066584720358e+76Initial program 31.5
rmApplied *-un-lft-identity31.5
Applied times-frac28.7
Simplified28.7
rmApplied sqr-pow28.7
Applied associate-*r*28.0
rmApplied add-cube-cbrt28.3
Final simplification28.4
herbie shell --seed 2020089
(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*))))))