\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 -7465709.54290952813:\\
\;\;\;\;\left(1 \cdot \frac{1}{\sin B \cdot {F}^{2}} - \frac{1}{\sin B}\right) - x \cdot \frac{1}{\tan B}\\
\mathbf{elif}\;F \le 3.740311987670497 \cdot 10^{115}:\\
\;\;\;\;F \cdot \frac{{\left(\left(F \cdot F + 2\right) + 2 \cdot x\right)}^{\left(-\frac{1}{2}\right)}}{\sin B} - \frac{x \cdot 1}{\tan B}\\
\mathbf{else}:\\
\;\;\;\;\left(\frac{1}{\sin B} - 1 \cdot \frac{1}{\sin B \cdot {F}^{2}}\right) - x \cdot \frac{1}{\tan B}\\
\end{array}double code(double F, double B, double x) {
return ((double) (((double) -(((double) (x * ((double) (1.0 / ((double) tan(B)))))))) + ((double) (((double) (F / ((double) sin(B)))) * ((double) pow(((double) (((double) (((double) (F * F)) + 2.0)) + ((double) (2.0 * x)))), ((double) -(((double) (1.0 / 2.0))))))))));
}
double code(double F, double B, double x) {
double VAR;
if ((F <= -7465709.542909528)) {
VAR = ((double) (((double) (((double) (1.0 * ((double) (1.0 / ((double) (((double) sin(B)) * ((double) pow(F, 2.0)))))))) - ((double) (1.0 / ((double) sin(B)))))) - ((double) (x * ((double) (1.0 / ((double) tan(B))))))));
} else {
double VAR_1;
if ((F <= 3.740311987670497e+115)) {
VAR_1 = ((double) (((double) (F * ((double) (((double) pow(((double) (((double) (((double) (F * F)) + 2.0)) + ((double) (2.0 * x)))), ((double) -(((double) (1.0 / 2.0)))))) / ((double) sin(B)))))) - ((double) (((double) (x * 1.0)) / ((double) tan(B))))));
} else {
VAR_1 = ((double) (((double) (((double) (1.0 / ((double) sin(B)))) - ((double) (1.0 * ((double) (1.0 / ((double) (((double) sin(B)) * ((double) pow(F, 2.0)))))))))) - ((double) (x * ((double) (1.0 / ((double) tan(B))))))));
}
VAR = VAR_1;
}
return VAR;
}



Bits error versus F



Bits error versus B



Bits error versus x
Results
if F < -7465709.542909528Initial program 25.4
Simplified25.4
Taylor expanded around -inf 0.2
if -7465709.542909528 < F < 3.740311987670497e+115Initial program 1.0
Simplified1.0
rmApplied div-inv1.0
Applied associate-*l*0.4
Simplified0.4
rmApplied associate-*r/0.3
if 3.740311987670497e+115 < F Initial program 35.8
Simplified35.8
Taylor expanded around inf 0.2
Final simplification0.3
herbie shell --seed 2020121
(FPCore (F B x)
:name "VandenBroeck and Keller, Equation (23)"
:precision binary64
(+ (- (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (- (/ 1 2))))))