\frac{\sqrt{2} \cdot t}{\sqrt{\frac{x + 1}{x - 1} \cdot \left(\ell \cdot \ell + 2 \cdot \left(t \cdot t\right)\right) - \ell \cdot \ell}}\begin{array}{l}
\mathbf{if}\;t \le -2.58652833655722446 \cdot 10^{92}:\\
\;\;\;\;\frac{\sqrt{2} \cdot t}{-\left(t \cdot \sqrt{2} + 2 \cdot \frac{t}{\sqrt{2} \cdot x}\right)}\\
\mathbf{elif}\;t \le -5.97813168999397746 \cdot 10^{-164}:\\
\;\;\;\;\frac{\sqrt{\sqrt{2}} \cdot \left(\sqrt{\sqrt{2}} \cdot t\right)}{\sqrt{\mathsf{fma}\left(2, {t}^{2}, \mathsf{fma}\left(2, \frac{\ell}{\frac{x}{\ell}}, 4 \cdot \frac{{t}^{2}}{x}\right)\right)}}\\
\mathbf{elif}\;t \le -1.266525205706161 \cdot 10^{-201}:\\
\;\;\;\;\frac{\sqrt{2} \cdot t}{-\left(t \cdot \sqrt{2} + 2 \cdot \frac{t}{\sqrt{2} \cdot x}\right)}\\
\mathbf{elif}\;t \le 8.2220900153568203 \cdot 10^{-233}:\\
\;\;\;\;\frac{\sqrt{2} \cdot t}{\sqrt{\sqrt{\mathsf{fma}\left(2, {t}^{2}, \mathsf{fma}\left(2, \frac{{\ell}^{2}}{x}, 4 \cdot \frac{{t}^{2}}{x}\right)\right)}} \cdot \sqrt{\sqrt{\mathsf{fma}\left(2, {t}^{2}, \mathsf{fma}\left(2, \frac{{\ell}^{2}}{x}, 4 \cdot \frac{{t}^{2}}{x}\right)\right)}}}\\
\mathbf{elif}\;t \le 2.22970333260875448 \cdot 10^{-211}:\\
\;\;\;\;\frac{\sqrt{2} \cdot t}{\mathsf{fma}\left(2, \frac{t}{\sqrt{2} \cdot {x}^{2}}, \mathsf{fma}\left(2, \frac{t}{\sqrt{2} \cdot x}, t \cdot \sqrt{2}\right) - 2 \cdot \frac{t}{{\left(\sqrt{2}\right)}^{3} \cdot {x}^{2}}\right)}\\
\mathbf{elif}\;t \le 4.23781599126157683 \cdot 10^{112}:\\
\;\;\;\;\frac{\left(\sqrt[3]{\sqrt{2}} \cdot \sqrt[3]{\sqrt{2}}\right) \cdot \left(\sqrt[3]{\sqrt{2}} \cdot t\right)}{\sqrt{\mathsf{fma}\left(2, {t}^{2}, \mathsf{fma}\left(2, \frac{\ell}{\frac{x}{\ell}}, 4 \cdot \frac{{t}^{2}}{x}\right)\right)}}\\
\mathbf{else}:\\
\;\;\;\;\frac{\sqrt{2} \cdot t}{\mathsf{fma}\left(2, \frac{t}{\sqrt{2} \cdot {x}^{2}}, \mathsf{fma}\left(2, \frac{t}{\sqrt{2} \cdot x}, t \cdot \sqrt{2}\right) - 2 \cdot \frac{t}{{\left(\sqrt{2}\right)}^{3} \cdot {x}^{2}}\right)}\\
\end{array}double code(double x, double l, double t) {
return ((sqrt(2.0) * t) / sqrt(((((x + 1.0) / (x - 1.0)) * ((l * l) + (2.0 * (t * t)))) - (l * l))));
}
double code(double x, double l, double t) {
double VAR;
if ((t <= -2.5865283365572245e+92)) {
VAR = ((sqrt(2.0) * t) / -((t * sqrt(2.0)) + (2.0 * (t / (sqrt(2.0) * x)))));
} else {
double VAR_1;
if ((t <= -5.9781316899939775e-164)) {
VAR_1 = ((sqrt(sqrt(2.0)) * (sqrt(sqrt(2.0)) * t)) / sqrt(fma(2.0, pow(t, 2.0), fma(2.0, (l / (x / l)), (4.0 * (pow(t, 2.0) / x))))));
} else {
double VAR_2;
if ((t <= -1.2665252057061608e-201)) {
VAR_2 = ((sqrt(2.0) * t) / -((t * sqrt(2.0)) + (2.0 * (t / (sqrt(2.0) * x)))));
} else {
double VAR_3;
if ((t <= 8.22209001535682e-233)) {
VAR_3 = ((sqrt(2.0) * t) / (sqrt(sqrt(fma(2.0, pow(t, 2.0), fma(2.0, (pow(l, 2.0) / x), (4.0 * (pow(t, 2.0) / x)))))) * sqrt(sqrt(fma(2.0, pow(t, 2.0), fma(2.0, (pow(l, 2.0) / x), (4.0 * (pow(t, 2.0) / x))))))));
} else {
double VAR_4;
if ((t <= 2.2297033326087545e-211)) {
VAR_4 = ((sqrt(2.0) * t) / fma(2.0, (t / (sqrt(2.0) * pow(x, 2.0))), (fma(2.0, (t / (sqrt(2.0) * x)), (t * sqrt(2.0))) - (2.0 * (t / (pow(sqrt(2.0), 3.0) * pow(x, 2.0)))))));
} else {
double VAR_5;
if ((t <= 4.237815991261577e+112)) {
VAR_5 = (((cbrt(sqrt(2.0)) * cbrt(sqrt(2.0))) * (cbrt(sqrt(2.0)) * t)) / sqrt(fma(2.0, pow(t, 2.0), fma(2.0, (l / (x / l)), (4.0 * (pow(t, 2.0) / x))))));
} else {
VAR_5 = ((sqrt(2.0) * t) / fma(2.0, (t / (sqrt(2.0) * pow(x, 2.0))), (fma(2.0, (t / (sqrt(2.0) * x)), (t * sqrt(2.0))) - (2.0 * (t / (pow(sqrt(2.0), 3.0) * pow(x, 2.0)))))));
}
VAR_4 = VAR_5;
}
VAR_3 = VAR_4;
}
VAR_2 = VAR_3;
}
VAR_1 = VAR_2;
}
VAR = VAR_1;
}
return VAR;
}



Bits error versus x



Bits error versus l



Bits error versus t
Results
if t < -2.5865283365572245e+92 or -5.9781316899939775e-164 < t < -1.2665252057061608e-201Initial program 51.6
Taylor expanded around inf 48.7
Simplified48.7
Taylor expanded around -inf 6.5
if -2.5865283365572245e+92 < t < -5.9781316899939775e-164Initial program 27.5
Taylor expanded around inf 9.8
Simplified9.8
rmApplied unpow29.8
Applied associate-/l*5.0
rmApplied add-sqr-sqrt5.0
Applied sqrt-prod5.2
Applied associate-*l*5.1
if -1.2665252057061608e-201 < t < 8.22209001535682e-233Initial program 63.4
Taylor expanded around inf 33.1
Simplified33.1
rmApplied add-sqr-sqrt33.1
Applied sqrt-prod33.1
if 8.22209001535682e-233 < t < 2.2297033326087545e-211 or 4.237815991261577e+112 < t Initial program 52.6
Taylor expanded around inf 5.5
Simplified5.5
if 2.2297033326087545e-211 < t < 4.237815991261577e+112Initial program 31.0
Taylor expanded around inf 13.4
Simplified13.4
rmApplied unpow213.4
Applied associate-/l*9.0
rmApplied add-cube-cbrt9.0
Applied associate-*l*8.9
Final simplification9.6
herbie shell --seed 2020079 +o rules:numerics
(FPCore (x l t)
:name "Toniolo and Linder, Equation (7)"
:precision binary64
(/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))))