\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|\left(\sqrt[3]{\left(\left(\left(\sqrt[3]{\tan^{-1}_* \frac{\mathsf{expm1}\left(\sin \left(\mathsf{expm1}\left(a\right)\right)\right)}{\tan^{-1} a}} \cdot \sqrt[3]{\tan^{-1}_* \frac{\mathsf{expm1}\left(\sin \left(\mathsf{expm1}\left(a\right)\right)\right)}{\tan^{-1} a}}\right) \cdot \sqrt[3]{\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(\sqrt[3]{\left(\left(\left(\sqrt[3]{\tan^{-1}_* \frac{\mathsf{expm1}\left(\sin \left(\mathsf{expm1}\left(a\right)\right)\right)}{\tan^{-1} a}} \cdot \sqrt[3]{\tan^{-1}_* \frac{\mathsf{expm1}\left(\sin \left(\mathsf{expm1}\left(a\right)\right)\right)}{\tan^{-1} a}}\right) \cdot \sqrt[3]{\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(\left(\sqrt[3]{\tan^{-1}_* \frac{\mathsf{expm1}\left(\sin \left(\mathsf{expm1}\left(a\right)\right)\right)}{\tan^{-1} a}} \cdot \sqrt[3]{\tan^{-1}_* \frac{\mathsf{expm1}\left(\sin \left(\mathsf{expm1}\left(a\right)\right)\right)}{\tan^{-1} a}}\right) \cdot \sqrt[3]{\tan^{-1}_* \frac{\mathsf{expm1}\left(\sin \left(\mathsf{expm1}\left(a\right)\right)\right)}{\tan^{-1} a}}\right) \bmod a\right)}\right) \cdot \sqrt[3]{\left(\left(\left(\sqrt[3]{\tan^{-1}_* \frac{\mathsf{expm1}\left(\sin \left(\mathsf{expm1}\left(a\right)\right)\right)}{\tan^{-1} a}} \cdot \sqrt[3]{\tan^{-1}_* \frac{\mathsf{expm1}\left(\sin \left(\mathsf{expm1}\left(a\right)\right)\right)}{\tan^{-1} a}}\right) \cdot \sqrt[3]{\tan^{-1}_* \frac{\mathsf{expm1}\left(\sin \left(\mathsf{expm1}\left(a\right)\right)\right)}{\tan^{-1} a}}\right) \bmod a\right)}}\right) \cdot \sqrt[3]{\left(\left(\left(\sqrt[3]{\tan^{-1}_* \frac{\mathsf{expm1}\left(\sin \left(\mathsf{expm1}\left(a\right)\right)\right)}{\tan^{-1} a}} \cdot \sqrt[3]{\tan^{-1}_* \frac{\mathsf{expm1}\left(\sin \left(\mathsf{expm1}\left(a\right)\right)\right)}{\tan^{-1} a}}\right) \cdot \mathsf{log1p}\left(\mathsf{expm1}\left(\sqrt[3]{\tan^{-1}_* \frac{\mathsf{expm1}\left(\sin \left(\mathsf{expm1}\left(a\right)\right)\right)}{\tan^{-1} a}}\right)\right)\right) \bmod a\right)}\right|double f(double a) {
double r11687 = a;
double r11688 = expm1(r11687);
double r11689 = sin(r11688);
double r11690 = expm1(r11689);
double r11691 = atan(r11687);
double r11692 = atan2(r11690, r11691);
double r11693 = fmod(r11692, r11687);
double r11694 = fabs(r11693);
return r11694;
}
double f(double a) {
double r11695 = a;
double r11696 = expm1(r11695);
double r11697 = sin(r11696);
double r11698 = expm1(r11697);
double r11699 = atan(r11695);
double r11700 = atan2(r11698, r11699);
double r11701 = cbrt(r11700);
double r11702 = r11701 * r11701;
double r11703 = r11702 * r11701;
double r11704 = fmod(r11703, r11695);
double r11705 = cbrt(r11704);
double r11706 = r11705 * r11705;
double r11707 = r11706 * r11705;
double r11708 = cbrt(r11707);
double r11709 = r11705 * r11708;
double r11710 = expm1(r11701);
double r11711 = log1p(r11710);
double r11712 = r11702 * r11711;
double r11713 = fmod(r11712, r11695);
double r11714 = cbrt(r11713);
double r11715 = r11709 * r11714;
double r11716 = fabs(r11715);
return r11716;
}



Bits error versus a
Initial program 33.8
rmApplied add-cube-cbrt33.9
rmApplied add-cube-cbrt33.9
rmApplied log1p-expm1-u33.8
rmApplied add-cube-cbrt33.8
Final simplification33.8
herbie shell --seed 2020039 +o rules:numerics
(FPCore (a)
:name "Random Jason Timeout Test 006"
:precision binary64
(fabs (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)))