\frac{\sin ky}{\sqrt{{\left(\sin kx\right)}^{2} + {\left(\sin ky\right)}^{2}}} \cdot \sin th\left(\sqrt[3]{\frac{\sin ky}{\sqrt{{\left(\sin kx\right)}^{2} + {\left(\sin ky\right)}^{2}}}} \cdot \sqrt[3]{\frac{\sin ky}{\sqrt{{\left(\sin kx\right)}^{2} + {\left(\sin ky\right)}^{2}}}}\right) \cdot \left(\sqrt[3]{\frac{\sin ky}{\sqrt{{\left(\sin kx\right)}^{2} + {\left(\sin ky\right)}^{2}}}} \cdot \sin th\right)double f(double kx, double ky, double th) {
double r39740 = ky;
double r39741 = sin(r39740);
double r39742 = kx;
double r39743 = sin(r39742);
double r39744 = 2.0;
double r39745 = pow(r39743, r39744);
double r39746 = pow(r39741, r39744);
double r39747 = r39745 + r39746;
double r39748 = sqrt(r39747);
double r39749 = r39741 / r39748;
double r39750 = th;
double r39751 = sin(r39750);
double r39752 = r39749 * r39751;
return r39752;
}
double f(double kx, double ky, double th) {
double r39753 = ky;
double r39754 = sin(r39753);
double r39755 = kx;
double r39756 = sin(r39755);
double r39757 = 2.0;
double r39758 = pow(r39756, r39757);
double r39759 = pow(r39754, r39757);
double r39760 = r39758 + r39759;
double r39761 = sqrt(r39760);
double r39762 = r39754 / r39761;
double r39763 = cbrt(r39762);
double r39764 = r39763 * r39763;
double r39765 = th;
double r39766 = sin(r39765);
double r39767 = r39763 * r39766;
double r39768 = r39764 * r39767;
return r39768;
}



Bits error versus kx



Bits error versus ky



Bits error versus th
Results
Initial program 12.3
rmApplied add-cube-cbrt12.7
Applied associate-*l*12.7
Final simplification12.7
herbie shell --seed 2019354
(FPCore (kx ky th)
:name "Toniolo and Linder, Equation (3b), real"
:precision binary64
(* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)))