\cos^{-1} \left({\left(\left(\cosh a\right) \bmod \left(a \cdot a\right)\right)}^{\left(\mathsf{log1p}\left(a\right)\right)}\right)\begin{array}{l}
\mathbf{if}\;\cos^{-1} \left({\left(\left(\cosh a\right) \bmod \left(a \cdot a\right)\right)}^{\left(\mathsf{log1p}\left(a\right)\right)}\right) \le 8.9406967163085964 \cdot 10^{-8}:\\
\;\;\;\;\cos^{-1} \left(\left(\sqrt[3]{{\left(\log \left(e^{\left(\left(\cosh a\right) \bmod \left(a \cdot a\right)\right)}\right)\right)}^{\left(\mathsf{log1p}\left(a\right)\right)}} \cdot \sqrt[3]{{\left(\log \left(e^{\left(\left(\cosh a\right) \bmod \left(a \cdot a\right)\right)}\right)\right)}^{\left(\mathsf{log1p}\left(a\right)\right)}}\right) \cdot \sqrt[3]{{\left(2 \cdot \log \left(\sqrt[3]{e^{\left(\left(\cosh a\right) \bmod \left(a \cdot a\right)\right)}}\right) + \log \left(\sqrt[3]{e^{\left(\left(\cosh a\right) \bmod \left(a \cdot a\right)\right)}}\right)\right)}^{\left(\mathsf{log1p}\left(a\right)\right)}}\right)\\
\mathbf{else}:\\
\;\;\;\;\cos^{-1} \left({\left(\left(\cosh a\right) \bmod \left(a \cdot a\right)\right)}^{\left(\log \left(e^{\mathsf{log1p}\left(a\right)}\right)\right)}\right)\\
\end{array}double code(double a) {
return acos(pow(fmod(cosh(a), (a * a)), log1p(a)));
}
double code(double a) {
double temp;
if ((acos(pow(fmod(cosh(a), (a * a)), log1p(a))) <= 8.940696716308596e-08)) {
temp = acos(((cbrt(pow(log(exp(fmod(cosh(a), (a * a)))), log1p(a))) * cbrt(pow(log(exp(fmod(cosh(a), (a * a)))), log1p(a)))) * cbrt(pow(((2.0 * log(cbrt(exp(fmod(cosh(a), (a * a)))))) + log(cbrt(exp(fmod(cosh(a), (a * a)))))), log1p(a)))));
} else {
temp = acos(pow(fmod(cosh(a), (a * a)), log(exp(log1p(a)))));
}
return temp;
}



Bits error versus a
Results
if (acos (pow (fmod (cosh a) (* a a)) (log1p a))) < 8.940696716308596e-08Initial program 61.6
rmApplied add-log-exp58.9
rmApplied add-cube-cbrt58.9
rmApplied add-cube-cbrt58.9
Applied log-prod58.9
Simplified58.9
if 8.940696716308596e-08 < (acos (pow (fmod (cosh a) (* a a)) (log1p a))) Initial program 60.9
rmApplied add-log-exp58.5
Final simplification58.7
herbie shell --seed 2020065
(FPCore (a)
:name "Random Jason Timeout Test 012"
:precision binary64
(acos (pow (fmod (cosh a) (* a a)) (log1p a))))