\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 -5.19934999049700251 \cdot 10^{36}:\\
\;\;\;\;\frac{\sqrt{2} \cdot t}{\mathsf{fma}\left(2, \frac{t}{{\left(\sqrt{2}\right)}^{3} \cdot {x}^{2}}, -\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)\right)\right)}\\
\mathbf{elif}\;t \le 2.85675210770604991 \cdot 10^{-244}:\\
\;\;\;\;\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, \ell \cdot \frac{\ell}{x}, 4 \cdot \frac{{t}^{2}}{x}\right)\right)}}\\
\mathbf{elif}\;t \le 3.03005972100276706 \cdot 10^{-173}:\\
\;\;\;\;\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 2.2589321978357942 \cdot 10^{91}:\\
\;\;\;\;\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, \ell \cdot \frac{\ell}{x}, 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 <= -5.1993499904970025e+36)) {
VAR = ((sqrt(2.0) * t) / fma(2.0, (t / (pow(sqrt(2.0), 3.0) * pow(x, 2.0))), -fma(2.0, (t / (sqrt(2.0) * pow(x, 2.0))), fma(2.0, (t / (sqrt(2.0) * x)), (t * sqrt(2.0))))));
} else {
double VAR_1;
if ((t <= 2.85675210770605e-244)) {
VAR_1 = (((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 * (l / x)), (4.0 * (pow(t, 2.0) / x))))));
} else {
double VAR_2;
if ((t <= 3.030059721002767e-173)) {
VAR_2 = ((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_3;
if ((t <= 2.258932197835794e+91)) {
VAR_3 = (((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 * (l / x)), (4.0 * (pow(t, 2.0) / x))))));
} else {
VAR_3 = ((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_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 < -5.1993499904970025e+36Initial program 43.1
Taylor expanded around -inf 4.7
Simplified4.7
if -5.1993499904970025e+36 < t < 2.85675210770605e-244 or 3.030059721002767e-173 < t < 2.258932197835794e+91Initial program 38.1
Taylor expanded around inf 16.3
Simplified16.3
rmApplied *-un-lft-identity16.3
Applied add-sqr-sqrt40.5
Applied unpow-prod-down40.5
Applied times-frac38.4
Simplified38.4
Simplified12.3
rmApplied add-cube-cbrt12.3
Applied associate-*l*12.3
if 2.85675210770605e-244 < t < 3.030059721002767e-173 or 2.258932197835794e+91 < t Initial program 52.7
Taylor expanded around inf 8.4
Simplified8.4
Final simplification9.4
herbie shell --seed 2020106 +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)))))