\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 -3872607225.0612774:\\
\;\;\;\;\left(\frac{-1}{\sin B} + \frac{1}{\sin B \cdot {F}^{2}}\right) - \frac{x \cdot 1}{\tan B}\\
\mathbf{elif}\;F \le 1.78142540755943292 \cdot 10^{83}:\\
\;\;\;\;\frac{F \cdot {\left(\left(F \cdot F + 2\right) + 2 \cdot x\right)}^{\left(-\frac{1}{2}\right)}}{\sin B} - \frac{x \cdot 1}{\sin B} \cdot \cos B\\
\mathbf{else}:\\
\;\;\;\;\left(\frac{1}{\sin B} - \frac{1}{\sin B \cdot {F}^{2}}\right) - \frac{x \cdot 1}{\tan B}\\
\end{array}double f(double F, double B, double x) {
double r53310 = x;
double r53311 = 1.0;
double r53312 = B;
double r53313 = tan(r53312);
double r53314 = r53311 / r53313;
double r53315 = r53310 * r53314;
double r53316 = -r53315;
double r53317 = F;
double r53318 = sin(r53312);
double r53319 = r53317 / r53318;
double r53320 = r53317 * r53317;
double r53321 = 2.0;
double r53322 = r53320 + r53321;
double r53323 = r53321 * r53310;
double r53324 = r53322 + r53323;
double r53325 = r53311 / r53321;
double r53326 = -r53325;
double r53327 = pow(r53324, r53326);
double r53328 = r53319 * r53327;
double r53329 = r53316 + r53328;
return r53329;
}
double f(double F, double B, double x) {
double r53330 = F;
double r53331 = -3872607225.0612774;
bool r53332 = r53330 <= r53331;
double r53333 = -1.0;
double r53334 = B;
double r53335 = sin(r53334);
double r53336 = r53333 / r53335;
double r53337 = 1.0;
double r53338 = 2.0;
double r53339 = pow(r53330, r53338);
double r53340 = r53335 * r53339;
double r53341 = r53337 / r53340;
double r53342 = r53336 + r53341;
double r53343 = x;
double r53344 = r53343 * r53337;
double r53345 = tan(r53334);
double r53346 = r53344 / r53345;
double r53347 = r53342 - r53346;
double r53348 = 1.781425407559433e+83;
bool r53349 = r53330 <= r53348;
double r53350 = r53330 * r53330;
double r53351 = 2.0;
double r53352 = r53350 + r53351;
double r53353 = r53351 * r53343;
double r53354 = r53352 + r53353;
double r53355 = r53337 / r53351;
double r53356 = -r53355;
double r53357 = pow(r53354, r53356);
double r53358 = r53330 * r53357;
double r53359 = r53358 / r53335;
double r53360 = r53344 / r53335;
double r53361 = cos(r53334);
double r53362 = r53360 * r53361;
double r53363 = r53359 - r53362;
double r53364 = 1.0;
double r53365 = r53364 / r53335;
double r53366 = r53365 - r53341;
double r53367 = r53366 - r53346;
double r53368 = r53349 ? r53363 : r53367;
double r53369 = r53332 ? r53347 : r53368;
return r53369;
}



Bits error versus F



Bits error versus B



Bits error versus x
Results
if F < -3872607225.0612774Initial program 25.2
Simplified25.2
rmApplied associate-*l/19.6
rmApplied associate-*r/19.6
Taylor expanded around -inf 0.1
Simplified0.1
if -3872607225.0612774 < F < 1.781425407559433e+83Initial program 0.7
Simplified0.7
rmApplied associate-*l/0.4
rmApplied associate-*r/0.3
rmApplied tan-quot0.3
Applied associate-/r/0.3
if 1.781425407559433e+83 < F Initial program 30.5
Simplified30.5
rmApplied associate-*l/24.3
rmApplied associate-*r/24.3
Taylor expanded around inf 0.1
Simplified0.1
Final simplification0.2
herbie shell --seed 2019199
(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))))))