\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 -5.089418877320290045251715767332814468357 \cdot 10^{-171}:\\
\;\;\;\;\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)}^{\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.120446384593956204182524815736397125514 \cdot 10^{-154}:\\
\;\;\;\;\sqrt{\left(\left(2 \cdot n\right) \cdot \left(t - \left(2 \cdot \left(\ell \cdot \frac{\ell}{Om}\right) - \left(-\left(U - U*\right)\right) \cdot \left(n \cdot {\left(\frac{\ell}{Om}\right)}^{\left(2 \cdot \frac{2}{2}\right)}\right)\right)\right)\right) \cdot U + \left(U \cdot \left(\left(n \cdot {\left(\frac{\ell}{Om}\right)}^{\left(2 \cdot \frac{2}{2}\right)}\right) \cdot \left(\left(-\left(U - U*\right)\right) + \left(U - U*\right)\right)\right)\right) \cdot \left(2 \cdot n\right)}\\
\mathbf{else}:\\
\;\;\;\;\sqrt{2 \cdot n} \cdot \sqrt{U \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)}\\
\end{array}double f(double n, double U, double t, double l, double Om, double U_) {
double r211099 = 2.0;
double r211100 = n;
double r211101 = r211099 * r211100;
double r211102 = U;
double r211103 = r211101 * r211102;
double r211104 = t;
double r211105 = l;
double r211106 = r211105 * r211105;
double r211107 = Om;
double r211108 = r211106 / r211107;
double r211109 = r211099 * r211108;
double r211110 = r211104 - r211109;
double r211111 = r211105 / r211107;
double r211112 = pow(r211111, r211099);
double r211113 = r211100 * r211112;
double r211114 = U_;
double r211115 = r211102 - r211114;
double r211116 = r211113 * r211115;
double r211117 = r211110 - r211116;
double r211118 = r211103 * r211117;
double r211119 = sqrt(r211118);
return r211119;
}
double f(double n, double U, double t, double l, double Om, double U_) {
double r211120 = n;
double r211121 = -5.08941887732029e-171;
bool r211122 = r211120 <= r211121;
double r211123 = 2.0;
double r211124 = r211123 * r211120;
double r211125 = U;
double r211126 = t;
double r211127 = l;
double r211128 = Om;
double r211129 = r211127 / r211128;
double r211130 = r211127 * r211129;
double r211131 = r211123 * r211130;
double r211132 = r211126 - r211131;
double r211133 = 2.0;
double r211134 = r211123 / r211133;
double r211135 = pow(r211129, r211134);
double r211136 = r211120 * r211135;
double r211137 = U_;
double r211138 = r211125 - r211137;
double r211139 = r211135 * r211138;
double r211140 = r211136 * r211139;
double r211141 = r211132 - r211140;
double r211142 = r211125 * r211141;
double r211143 = r211124 * r211142;
double r211144 = sqrt(r211143);
double r211145 = 1.1204463845939562e-154;
bool r211146 = r211120 <= r211145;
double r211147 = -r211138;
double r211148 = r211133 * r211134;
double r211149 = pow(r211129, r211148);
double r211150 = r211120 * r211149;
double r211151 = r211147 * r211150;
double r211152 = r211131 - r211151;
double r211153 = r211126 - r211152;
double r211154 = r211124 * r211153;
double r211155 = r211154 * r211125;
double r211156 = r211147 + r211138;
double r211157 = r211150 * r211156;
double r211158 = r211125 * r211157;
double r211159 = r211158 * r211124;
double r211160 = r211155 + r211159;
double r211161 = sqrt(r211160);
double r211162 = sqrt(r211124);
double r211163 = r211136 * r211135;
double r211164 = r211163 * r211138;
double r211165 = r211132 - r211164;
double r211166 = r211125 * r211165;
double r211167 = sqrt(r211166);
double r211168 = r211162 * r211167;
double r211169 = r211146 ? r211161 : r211168;
double r211170 = r211122 ? r211144 : r211169;
return r211170;
}



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 < -5.08941887732029e-171Initial program 33.4
rmApplied *-un-lft-identity33.4
Applied times-frac30.3
Simplified30.3
rmApplied associate-*l*30.7
rmApplied sqr-pow30.7
Applied associate-*r*29.7
rmApplied associate-*l*29.2
if -5.08941887732029e-171 < n < 1.1204463845939562e-154Initial program 38.5
rmApplied *-un-lft-identity38.5
Applied times-frac35.4
Simplified35.4
rmApplied associate-*l*36.0
rmApplied sqr-pow36.0
Applied associate-*r*34.8
rmApplied add-sqr-sqrt49.4
Applied prod-diff49.4
Applied distribute-lft-in49.4
Applied distribute-lft-in49.4
Simplified32.8
Simplified31.8
if 1.1204463845939562e-154 < n Initial program 33.3
rmApplied *-un-lft-identity33.3
Applied times-frac30.7
Simplified30.7
rmApplied associate-*l*30.8
rmApplied sqr-pow30.8
Applied associate-*r*29.9
rmApplied sqrt-prod23.3
Final simplification28.1
herbie shell --seed 2019356 +o rules:numerics
(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*))))))