\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 -125465839.257105276:\\
\;\;\;\;\left(-\frac{x \cdot 1}{\tan B}\right) + \left(1 \cdot \frac{1}{\sin B \cdot {F}^{2}} - \frac{1}{\sin B}\right)\\
\mathbf{elif}\;F \le 406748.63273850258:\\
\;\;\;\;\left(-\frac{x \cdot 1}{\tan B}\right) + \frac{F}{\left(\sin B \cdot \sqrt{{\left(\left(F \cdot F + 2\right) + 2 \cdot x\right)}^{\left(\frac{1}{2}\right)}}\right) \cdot \sqrt{{\left(\left(F \cdot F + 2\right) + 2 \cdot x\right)}^{\left(\frac{1}{2}\right)}}}\\
\mathbf{else}:\\
\;\;\;\;\left(-\frac{x \cdot 1}{\tan B}\right) + \frac{F}{1 \cdot \left(\sin B \cdot {\left(\frac{1}{{F}^{1}}\right)}^{1}\right) + \sin B \cdot F}\\
\end{array}double f(double F, double B, double x) {
double r38596 = x;
double r38597 = 1.0;
double r38598 = B;
double r38599 = tan(r38598);
double r38600 = r38597 / r38599;
double r38601 = r38596 * r38600;
double r38602 = -r38601;
double r38603 = F;
double r38604 = sin(r38598);
double r38605 = r38603 / r38604;
double r38606 = r38603 * r38603;
double r38607 = 2.0;
double r38608 = r38606 + r38607;
double r38609 = r38607 * r38596;
double r38610 = r38608 + r38609;
double r38611 = r38597 / r38607;
double r38612 = -r38611;
double r38613 = pow(r38610, r38612);
double r38614 = r38605 * r38613;
double r38615 = r38602 + r38614;
return r38615;
}
double f(double F, double B, double x) {
double r38616 = F;
double r38617 = -125465839.25710528;
bool r38618 = r38616 <= r38617;
double r38619 = x;
double r38620 = 1.0;
double r38621 = r38619 * r38620;
double r38622 = B;
double r38623 = tan(r38622);
double r38624 = r38621 / r38623;
double r38625 = -r38624;
double r38626 = 1.0;
double r38627 = sin(r38622);
double r38628 = 2.0;
double r38629 = pow(r38616, r38628);
double r38630 = r38627 * r38629;
double r38631 = r38626 / r38630;
double r38632 = r38620 * r38631;
double r38633 = r38626 / r38627;
double r38634 = r38632 - r38633;
double r38635 = r38625 + r38634;
double r38636 = 406748.6327385026;
bool r38637 = r38616 <= r38636;
double r38638 = r38616 * r38616;
double r38639 = 2.0;
double r38640 = r38638 + r38639;
double r38641 = r38639 * r38619;
double r38642 = r38640 + r38641;
double r38643 = r38620 / r38639;
double r38644 = pow(r38642, r38643);
double r38645 = sqrt(r38644);
double r38646 = r38627 * r38645;
double r38647 = r38646 * r38645;
double r38648 = r38616 / r38647;
double r38649 = r38625 + r38648;
double r38650 = pow(r38616, r38620);
double r38651 = r38626 / r38650;
double r38652 = pow(r38651, r38620);
double r38653 = r38627 * r38652;
double r38654 = r38620 * r38653;
double r38655 = r38627 * r38616;
double r38656 = r38654 + r38655;
double r38657 = r38616 / r38656;
double r38658 = r38625 + r38657;
double r38659 = r38637 ? r38649 : r38658;
double r38660 = r38618 ? r38635 : r38659;
return r38660;
}



Bits error versus F



Bits error versus B



Bits error versus x
Results
if F < -125465839.25710528Initial program 24.4
rmApplied pow-neg24.4
Applied frac-times18.8
Simplified18.8
rmApplied associate-*r/18.7
Taylor expanded around -inf 0.1
if -125465839.25710528 < F < 406748.6327385026Initial program 0.4
rmApplied pow-neg0.4
Applied frac-times0.4
Simplified0.4
rmApplied associate-*r/0.3
rmApplied add-sqr-sqrt0.3
Applied associate-*r*0.3
if 406748.6327385026 < F Initial program 26.2
rmApplied pow-neg26.2
Applied frac-times20.7
Simplified20.7
rmApplied associate-*r/20.7
Taylor expanded around inf 0.3
Final simplification0.2
herbie shell --seed 2020060
(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))))))