\left(\left(e^{x}\right) \bmod \left(\sqrt{\cos x}\right)\right) \cdot e^{-x}\frac{\sqrt{\left(\left(e^{x}\right) \bmod \left(\left|\sqrt[3]{\cos x}\right| \cdot \sqrt{\sqrt[3]{\cos x}}\right)\right)}}{\sqrt{e^{x}}} \cdot \log \left(e^{\frac{\sqrt{\left(\left(e^{x}\right) \bmod \left(\left|\sqrt[3]{\cos x}\right| \cdot \sqrt{\sqrt[3]{\cos x}}\right)\right)}}{\sqrt{e^{x}}}}\right)(FPCore (x) :precision binary64 (* (fmod (exp x) (sqrt (cos x))) (exp (- x))))
(FPCore (x)
:precision binary64
(*
(/
(sqrt (fmod (exp x) (* (fabs (cbrt (cos x))) (sqrt (cbrt (cos x))))))
(sqrt (exp x)))
(log
(exp
(/
(sqrt (fmod (exp x) (* (fabs (cbrt (cos x))) (sqrt (cbrt (cos x))))))
(sqrt (exp x)))))))double code(double x) {
return ((double) (((double) fmod(((double) exp(x)), ((double) sqrt(((double) cos(x)))))) * ((double) exp(((double) -(x))))));
}
double code(double x) {
return ((double) ((((double) sqrt(((double) fmod(((double) exp(x)), ((double) (((double) fabs(((double) cbrt(((double) cos(x)))))) * ((double) sqrt(((double) cbrt(((double) cos(x)))))))))))) / ((double) sqrt(((double) exp(x))))) * ((double) log(((double) exp((((double) sqrt(((double) fmod(((double) exp(x)), ((double) (((double) fabs(((double) cbrt(((double) cos(x)))))) * ((double) sqrt(((double) cbrt(((double) cos(x)))))))))))) / ((double) sqrt(((double) exp(x)))))))))));
}



Bits error versus x
Initial program 59.6
Simplified59.6
rmApplied add-cube-cbrt_binary6459.6
Applied sqrt-prod_binary6459.6
Simplified59.6
rmApplied add-sqr-sqrt_binary6459.6
Applied add-sqr-sqrt_binary6459.6
Applied times-frac_binary6459.6
rmApplied add-log-exp_binary6459.6
Final simplification59.6
herbie shell --seed 2020210
(FPCore (x)
:name "expfmod"
:precision binary64
(* (fmod (exp x) (sqrt (cos x))) (exp (- x))))