\left|\left(\left(\tan^{-1}_* \frac{\mathsf{expm1}\left(\sin \left(\mathsf{expm1}\left(a\right)\right)\right)}{\tan^{-1} a}\right) \bmod a\right)\right|\left|{e}^{\left(\log \left(\sqrt[3]{\left(\left(\tan^{-1}_* \frac{\mathsf{expm1}\left(\sin \left(\mathsf{expm1}\left(a\right)\right)\right)}{\tan^{-1} a}\right) \bmod a\right)} \cdot \sqrt[3]{\left(\left(\tan^{-1}_* \frac{\mathsf{expm1}\left(\sin \left(\mathsf{expm1}\left(a\right)\right)\right)}{\tan^{-1} a}\right) \bmod a\right)}\right)\right)} \cdot \sqrt[3]{\left(\left(\tan^{-1}_* \frac{\mathsf{expm1}\left(\sin \left(\mathsf{expm1}\left(a\right)\right)\right)}{\tan^{-1} a}\right) \bmod a\right)}\right|double f(double a) {
double r763498 = a;
double r763499 = expm1(r763498);
double r763500 = sin(r763499);
double r763501 = expm1(r763500);
double r763502 = atan(r763498);
double r763503 = atan2(r763501, r763502);
double r763504 = fmod(r763503, r763498);
double r763505 = fabs(r763504);
return r763505;
}
double f(double a) {
double r763506 = exp(1.0);
double r763507 = a;
double r763508 = expm1(r763507);
double r763509 = sin(r763508);
double r763510 = expm1(r763509);
double r763511 = atan(r763507);
double r763512 = atan2(r763510, r763511);
double r763513 = fmod(r763512, r763507);
double r763514 = cbrt(r763513);
double r763515 = r763514 * r763514;
double r763516 = log(r763515);
double r763517 = pow(r763506, r763516);
double r763518 = r763517 * r763514;
double r763519 = fabs(r763518);
return r763519;
}



Bits error versus a
Initial program 32.8
rmApplied add-cube-cbrt32.8
rmApplied add-exp-log32.8
rmApplied *-un-lft-identity32.8
Applied exp-prod32.8
Simplified32.8
Final simplification32.8
herbie shell --seed 2019143
(FPCore (a)
:name "Random Jason Timeout Test 006"
(fabs (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)))