\left(-x \cdot \frac{1}{\tan B}\right) + \frac{1}{\sin B}\frac{1}{\sin B} - \frac{\cos B}{\frac{\sin B}{x}}double f(double B, double x) {
double r16073328 = x;
double r16073329 = 1.0;
double r16073330 = B;
double r16073331 = tan(r16073330);
double r16073332 = r16073329 / r16073331;
double r16073333 = r16073328 * r16073332;
double r16073334 = -r16073333;
double r16073335 = sin(r16073330);
double r16073336 = r16073329 / r16073335;
double r16073337 = r16073334 + r16073336;
return r16073337;
}
double f(double B, double x) {
double r16073338 = 1.0;
double r16073339 = B;
double r16073340 = sin(r16073339);
double r16073341 = r16073338 / r16073340;
double r16073342 = cos(r16073339);
double r16073343 = x;
double r16073344 = r16073340 / r16073343;
double r16073345 = r16073342 / r16073344;
double r16073346 = r16073341 - r16073345;
return r16073346;
}



Bits error versus B



Bits error versus x
Results
Initial program 0.2
Simplified0.2
rmApplied tan-quot0.2
Applied associate-/r/0.2
rmApplied *-un-lft-identity0.2
Applied *-un-lft-identity0.2
Applied times-frac0.2
Applied prod-diff0.2
Simplified0.2
Simplified0.2
Final simplification0.2
herbie shell --seed 2019104 +o rules:numerics
(FPCore (B x)
:name "VandenBroeck and Keller, Equation (24)"
(+ (- (* x (/ 1 (tan B)))) (/ 1 (sin B))))