\left(\left(-2 \cdot J\right) \cdot \cos \left(\frac{K}{2}\right)\right) \cdot \sqrt{1 + {\left(\frac{U}{\left(2 \cdot J\right) \cdot \cos \left(\frac{K}{2}\right)}\right)}^{2}}\left(\left(-2 \cdot J\right) \cdot \cos \left(\frac{K}{2}\right)\right) \cdot \mathsf{hypot}\left(\sqrt{1}, {\left(\frac{U}{\left(2 \cdot J\right) \cdot \cos \left(\frac{K}{2}\right)}\right)}^{\left(\frac{2}{2}\right)}\right)double f(double J, double K, double U) {
double r166855 = -2.0;
double r166856 = J;
double r166857 = r166855 * r166856;
double r166858 = K;
double r166859 = 2.0;
double r166860 = r166858 / r166859;
double r166861 = cos(r166860);
double r166862 = r166857 * r166861;
double r166863 = 1.0;
double r166864 = U;
double r166865 = r166859 * r166856;
double r166866 = r166865 * r166861;
double r166867 = r166864 / r166866;
double r166868 = pow(r166867, r166859);
double r166869 = r166863 + r166868;
double r166870 = sqrt(r166869);
double r166871 = r166862 * r166870;
return r166871;
}
double f(double J, double K, double U) {
double r166872 = -2.0;
double r166873 = J;
double r166874 = r166872 * r166873;
double r166875 = K;
double r166876 = 2.0;
double r166877 = r166875 / r166876;
double r166878 = cos(r166877);
double r166879 = r166874 * r166878;
double r166880 = 1.0;
double r166881 = sqrt(r166880);
double r166882 = U;
double r166883 = r166876 * r166873;
double r166884 = r166883 * r166878;
double r166885 = r166882 / r166884;
double r166886 = 2.0;
double r166887 = r166876 / r166886;
double r166888 = pow(r166885, r166887);
double r166889 = hypot(r166881, r166888);
double r166890 = r166879 * r166889;
return r166890;
}



Bits error versus J



Bits error versus K



Bits error versus U
Results
Initial program 17.9
rmApplied sqr-pow17.9
Applied add-sqr-sqrt17.9
Applied hypot-def7.9
Final simplification7.9
herbie shell --seed 2020001 +o rules:numerics
(FPCore (J K U)
:name "Maksimov and Kolovsky, Equation (3)"
:precision binary64
(* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))