\cos \left(\frac{K \cdot \left(m + n\right)}{2} - M\right) \cdot e^{\left(-{\left(\frac{m + n}{2} - M\right)}^{2}\right) - \left(\ell - \left|m - n\right|\right)}\log \left({\left(e^{\cos \left(\frac{\frac{K \cdot \log \left(\frac{e^{m \cdot m}}{e^{n \cdot n}}\right)}{m - n}}{2} - M\right)}\right)}^{\left(e^{\left|m - n\right| - \left(\ell + {\left(\frac{m + n}{2} - M\right)}^{2}\right)}\right)}\right)(FPCore (K m n M l) :precision binary64 (* (cos (- (/ (* K (+ m n)) 2.0) M)) (exp (- (- (pow (- (/ (+ m n) 2.0) M) 2.0)) (- l (fabs (- m n)))))))
(FPCore (K m n M l)
:precision binary64
(log
(pow
(exp
(cos
(- (/ (/ (* K (log (/ (exp (* m m)) (exp (* n n))))) (- m n)) 2.0) M)))
(exp (- (fabs (- m n)) (+ l (pow (- (/ (+ m n) 2.0) M) 2.0)))))))double code(double K, double m, double n, double M, double l) {
return cos(((K * (m + n)) / 2.0) - M) * exp(-pow((((m + n) / 2.0) - M), 2.0) - (l - fabs(m - n)));
}
double code(double K, double m, double n, double M, double l) {
return log(pow(exp(cos((((K * log(exp(m * m) / exp(n * n))) / (m - n)) / 2.0) - M)), exp(fabs(m - n) - (l + pow((((m + n) / 2.0) - M), 2.0)))));
}



Bits error versus K



Bits error versus m



Bits error versus n



Bits error versus M



Bits error versus l
Results
Initial program 15.2
Simplified15.2
rmApplied add-log-exp_binary64_114015.3
Simplified1.2
rmApplied flip-+_binary64_10751.2
Applied associate-*r/_binary64_10431.2
rmApplied add-log-exp_binary64_11401.3
Applied add-log-exp_binary64_11401.3
Applied diff-log_binary64_11931.3
Final simplification1.3
herbie shell --seed 2021075
(FPCore (K m n M l)
:name "Maksimov and Kolovsky, Equation (32)"
:precision binary64
(* (cos (- (/ (* K (+ m n)) 2.0) M)) (exp (- (- (pow (- (/ (+ m n) 2.0) M) 2.0)) (- l (fabs (- m n)))))))