\left(-x \cdot \frac{1}{\tan B}\right) + \frac{F}{\sin B} \cdot {\left(\left(F \cdot F + 2\right) + 2 \cdot x\right)}^{\left(-\frac{1}{2}\right)}\begin{array}{l}
\mathbf{if}\;F \le -61781114441641127683218472587214714361090000:\\
\;\;\;\;\left(\frac{-1}{\sin B} + \frac{\frac{1}{F \cdot F}}{\sin B}\right) - \frac{x \cdot 1}{\tan B}\\
\mathbf{elif}\;F \le 662194.586172068375162780284881591796875:\\
\;\;\;\;\frac{F}{{\left(\mathsf{fma}\left(F, F, \mathsf{fma}\left(2, x, 2\right)\right)\right)}^{\left(\frac{1}{2}\right)} \cdot \sin B} - \frac{x \cdot 1}{\tan B}\\
\mathbf{else}:\\
\;\;\;\;\left(\frac{1}{\sin B} - \frac{\frac{1}{\sin B}}{F \cdot F}\right) - \frac{x \cdot 1}{\tan B}\\
\end{array}double f(double F, double B, double x) {
double r2072995 = x;
double r2072996 = 1.0;
double r2072997 = B;
double r2072998 = tan(r2072997);
double r2072999 = r2072996 / r2072998;
double r2073000 = r2072995 * r2072999;
double r2073001 = -r2073000;
double r2073002 = F;
double r2073003 = sin(r2072997);
double r2073004 = r2073002 / r2073003;
double r2073005 = r2073002 * r2073002;
double r2073006 = 2.0;
double r2073007 = r2073005 + r2073006;
double r2073008 = r2073006 * r2072995;
double r2073009 = r2073007 + r2073008;
double r2073010 = r2072996 / r2073006;
double r2073011 = -r2073010;
double r2073012 = pow(r2073009, r2073011);
double r2073013 = r2073004 * r2073012;
double r2073014 = r2073001 + r2073013;
return r2073014;
}
double f(double F, double B, double x) {
double r2073015 = F;
double r2073016 = -6.178111444164113e+43;
bool r2073017 = r2073015 <= r2073016;
double r2073018 = -1.0;
double r2073019 = B;
double r2073020 = sin(r2073019);
double r2073021 = r2073018 / r2073020;
double r2073022 = 1.0;
double r2073023 = r2073015 * r2073015;
double r2073024 = r2073022 / r2073023;
double r2073025 = r2073024 / r2073020;
double r2073026 = r2073021 + r2073025;
double r2073027 = x;
double r2073028 = r2073027 * r2073022;
double r2073029 = tan(r2073019);
double r2073030 = r2073028 / r2073029;
double r2073031 = r2073026 - r2073030;
double r2073032 = 662194.5861720684;
bool r2073033 = r2073015 <= r2073032;
double r2073034 = 2.0;
double r2073035 = fma(r2073034, r2073027, r2073034);
double r2073036 = fma(r2073015, r2073015, r2073035);
double r2073037 = r2073022 / r2073034;
double r2073038 = pow(r2073036, r2073037);
double r2073039 = r2073038 * r2073020;
double r2073040 = r2073015 / r2073039;
double r2073041 = r2073040 - r2073030;
double r2073042 = 1.0;
double r2073043 = r2073042 / r2073020;
double r2073044 = r2073022 / r2073020;
double r2073045 = r2073044 / r2073023;
double r2073046 = r2073043 - r2073045;
double r2073047 = r2073046 - r2073030;
double r2073048 = r2073033 ? r2073041 : r2073047;
double r2073049 = r2073017 ? r2073031 : r2073048;
return r2073049;
}



Bits error versus F



Bits error versus B



Bits error versus x
if F < -6.178111444164113e+43Initial program 29.0
Simplified22.3
rmApplied associate-*l/22.3
rmApplied div-inv22.3
Applied *-un-lft-identity22.3
Applied times-frac22.2
Simplified22.2
Taylor expanded around -inf 0.2
Simplified0.2
if -6.178111444164113e+43 < F < 662194.5861720684Initial program 0.5
Simplified0.4
rmApplied associate-*l/0.3
rmApplied div-inv0.3
Applied *-un-lft-identity0.3
Applied times-frac0.3
Simplified0.3
rmApplied distribute-frac-neg0.3
Applied pow-neg0.3
Applied un-div-inv0.3
Applied frac-times0.3
Simplified0.3
if 662194.5861720684 < F Initial program 25.7
Simplified20.1
rmApplied associate-*l/20.0
rmApplied div-inv20.0
Applied *-un-lft-identity20.0
Applied times-frac20.0
Simplified20.0
rmApplied distribute-frac-neg20.0
Applied pow-neg20.0
Applied un-div-inv19.9
Applied frac-times20.0
Simplified20.0
Taylor expanded around inf 0.2
Simplified0.2
Final simplification0.2
herbie shell --seed 2019171 +o rules:numerics
(FPCore (F B x)
:name "VandenBroeck and Keller, Equation (23)"
(+ (- (* x (/ 1.0 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2.0) (* 2.0 x)) (- (/ 1.0 2.0))))))