\left(-x \cdot \frac{1}{\tan B}\right) + \frac{1}{\sin B}\frac{1}{\sin B} - \frac{x}{\sin B} \cdot \cos Bdouble f(double B, double x) {
double r2100442 = x;
double r2100443 = 1.0;
double r2100444 = B;
double r2100445 = tan(r2100444);
double r2100446 = r2100443 / r2100445;
double r2100447 = r2100442 * r2100446;
double r2100448 = -r2100447;
double r2100449 = sin(r2100444);
double r2100450 = r2100443 / r2100449;
double r2100451 = r2100448 + r2100450;
return r2100451;
}
double f(double B, double x) {
double r2100452 = 1.0;
double r2100453 = B;
double r2100454 = sin(r2100453);
double r2100455 = r2100452 / r2100454;
double r2100456 = x;
double r2100457 = r2100456 / r2100454;
double r2100458 = cos(r2100453);
double r2100459 = r2100457 * r2100458;
double r2100460 = r2100455 - r2100459;
return r2100460;
}



Bits error versus B



Bits error versus x
Results
Initial program 0.2
Simplified0.1
rmApplied tan-quot0.2
Applied associate-/r/0.2
Final simplification0.2
herbie shell --seed 2019158
(FPCore (B x)
:name "VandenBroeck and Keller, Equation (24)"
(+ (- (* x (/ 1 (tan B)))) (/ 1 (sin B))))