Initial program 33.7
\[\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|\]
- Using strategy
rm Applied expm1-udef36.9
\[\leadsto \left|\left(\left(\tan^{-1}_* \frac{\color{blue}{e^{\sin \left(\mathsf{expm1}\left(a\right)\right)} - 1}}{\tan^{-1} a}\right) \bmod a\right)\right|\]
- Using strategy
rm Applied flip--36.9
\[\leadsto \left|\left(\left(\tan^{-1}_* \frac{\color{blue}{\frac{e^{\sin \left(\mathsf{expm1}\left(a\right)\right)} \cdot e^{\sin \left(\mathsf{expm1}\left(a\right)\right)} - 1 \cdot 1}{e^{\sin \left(\mathsf{expm1}\left(a\right)\right)} + 1}}}{\tan^{-1} a}\right) \bmod a\right)\right|\]
Simplified33.8
\[\leadsto \left|\left(\left(\tan^{-1}_* \frac{\frac{\color{blue}{\mathsf{expm1}\left(2 \cdot \sin \left(\mathsf{expm1}\left(a\right)\right) + 0\right)}}{e^{\sin \left(\mathsf{expm1}\left(a\right)\right)} + 1}}{\tan^{-1} a}\right) \bmod a\right)\right|\]
- Using strategy
rm Applied clear-num33.8
\[\leadsto \left|\left(\left(\tan^{-1}_* \frac{\color{blue}{\frac{1}{\frac{e^{\sin \left(\mathsf{expm1}\left(a\right)\right)} + 1}{\mathsf{expm1}\left(2 \cdot \sin \left(\mathsf{expm1}\left(a\right)\right) + 0\right)}}}}{\tan^{-1} a}\right) \bmod a\right)\right|\]
Simplified33.8
\[\leadsto \left|\left(\left(\tan^{-1}_* \frac{\frac{1}{\color{blue}{\frac{e^{\sin \left(\mathsf{expm1}\left(a\right)\right)} + 1}{\mathsf{expm1}\left(2 \cdot \sin \left(\mathsf{expm1}\left(a\right)\right)\right)}}}}{\tan^{-1} a}\right) \bmod a\right)\right|\]
- Using strategy
rm Applied flip3-+33.8
\[\leadsto \left|\left(\left(\tan^{-1}_* \frac{\frac{1}{\frac{\color{blue}{\frac{{\left(e^{\sin \left(\mathsf{expm1}\left(a\right)\right)}\right)}^{3} + {1}^{3}}{e^{\sin \left(\mathsf{expm1}\left(a\right)\right)} \cdot e^{\sin \left(\mathsf{expm1}\left(a\right)\right)} + \left(1 \cdot 1 - e^{\sin \left(\mathsf{expm1}\left(a\right)\right)} \cdot 1\right)}}}{\mathsf{expm1}\left(2 \cdot \sin \left(\mathsf{expm1}\left(a\right)\right)\right)}}}{\tan^{-1} a}\right) \bmod a\right)\right|\]
Applied associate-/l/33.8
\[\leadsto \left|\left(\left(\tan^{-1}_* \frac{\frac{1}{\color{blue}{\frac{{\left(e^{\sin \left(\mathsf{expm1}\left(a\right)\right)}\right)}^{3} + {1}^{3}}{\mathsf{expm1}\left(2 \cdot \sin \left(\mathsf{expm1}\left(a\right)\right)\right) \cdot \left(e^{\sin \left(\mathsf{expm1}\left(a\right)\right)} \cdot e^{\sin \left(\mathsf{expm1}\left(a\right)\right)} + \left(1 \cdot 1 - e^{\sin \left(\mathsf{expm1}\left(a\right)\right)} \cdot 1\right)\right)}}}}{\tan^{-1} a}\right) \bmod a\right)\right|\]
Simplified33.8
\[\leadsto \left|\left(\left(\tan^{-1}_* \frac{\frac{1}{\frac{{\left(e^{\sin \left(\mathsf{expm1}\left(a\right)\right)}\right)}^{3} + {1}^{3}}{\color{blue}{\left(\left({\left(e^{\sin \left(\mathsf{expm1}\left(a\right)\right)}\right)}^{2} + 1\right) - e^{\sin \left(\mathsf{expm1}\left(a\right)\right)}\right) \cdot \mathsf{expm1}\left(2 \cdot \sin \left(\mathsf{expm1}\left(a\right)\right)\right)}}}}{\tan^{-1} a}\right) \bmod a\right)\right|\]
Final simplification33.8
\[\leadsto \left|\left(\left(\tan^{-1}_* \frac{\frac{1}{\frac{{\left(e^{\sin \left(\mathsf{expm1}\left(a\right)\right)}\right)}^{3} + 1}{\left(\left({\left(e^{\sin \left(\mathsf{expm1}\left(a\right)\right)}\right)}^{2} + 1\right) - e^{\sin \left(\mathsf{expm1}\left(a\right)\right)}\right) \cdot \mathsf{expm1}\left(2 \cdot \sin \left(\mathsf{expm1}\left(a\right)\right)\right)}}}{\tan^{-1} a}\right) \bmod a\right)\right|\]