\left(\left(e^{x}\right) \bmod \left(\sqrt{\cos x}\right)\right) \cdot e^{-x}
e^{\log \left(\left(e^{x}\right) \bmod \left(\sqrt{\cos x}\right)\right) - x}
(FPCore (x) :precision binary64 (* (fmod (exp x) (sqrt (cos x))) (exp (- x))))
(FPCore (x) :precision binary64 (exp (- (log (fmod (exp x) (sqrt (cos x)))) x)))
double code(double x) {
return fmod(exp(x), sqrt(cos(x))) * exp(-x);
}
double code(double x) {
return exp(log(fmod(exp(x), sqrt(cos(x)))) - x);
}



Bits error versus x
Initial program 59.3
Simplified59.3
Applied add-exp-log_binary6459.3
Applied add-exp-log_binary6459.3
Simplified59.3
Final simplification59.3
herbie shell --seed 2022076
(FPCore (x)
:name "expfmod"
:precision binary64
(* (fmod (exp x) (sqrt (cos x))) (exp (- x))))