\left(-x \cdot \frac{1}{\tan B}\right) + \frac{1}{\sin B}0 - \left(\frac{x \cdot 1}{\tan B} - \frac{1}{\sin B}\right)double f(double B, double x) {
double r37969 = x;
double r37970 = 1.0;
double r37971 = B;
double r37972 = tan(r37971);
double r37973 = r37970 / r37972;
double r37974 = r37969 * r37973;
double r37975 = -r37974;
double r37976 = sin(r37971);
double r37977 = r37970 / r37976;
double r37978 = r37975 + r37977;
return r37978;
}
double f(double B, double x) {
double r37979 = 0.0;
double r37980 = x;
double r37981 = 1.0;
double r37982 = r37980 * r37981;
double r37983 = B;
double r37984 = tan(r37983);
double r37985 = r37982 / r37984;
double r37986 = sin(r37983);
double r37987 = r37981 / r37986;
double r37988 = r37985 - r37987;
double r37989 = r37979 - r37988;
return r37989;
}



Bits error versus B



Bits error versus x
Results
Initial program 0.2
rmApplied associate-*r/0.1
rmApplied clear-num0.2
rmApplied neg-sub00.2
Applied associate-+l-0.2
Simplified0.1
Final simplification0.1
herbie shell --seed 2019354
(FPCore (B x)
:name "VandenBroeck and Keller, Equation (24)"
:precision binary64
(+ (- (* x (/ 1 (tan B)))) (/ 1 (sin B))))