\[r \cdot \frac{\sin b}{\color{red}{\cos \left(a + b\right)}} \leadsto r \cdot \frac{\sin b}{\color{blue}{\cos a \cdot \cos b - \sin a \cdot \sin b}}\]
0.2
Using strategy rm
0.2
Applied add-cube-cbrt to get
\[r \cdot \frac{\sin b}{\cos a \cdot \cos b - \sin a \cdot \color{red}{\sin b}} \leadsto r \cdot \frac{\sin b}{\cos a \cdot \cos b - \sin a \cdot \color{blue}{{\left(\sqrt[3]{\sin b}\right)}^3}}\]
0.3
Applied add-cube-cbrt to get
\[r \cdot \frac{\sin b}{\cos a \cdot \cos b - \color{red}{\sin a} \cdot {\left(\sqrt[3]{\sin b}\right)}^3} \leadsto r \cdot \frac{\sin b}{\cos a \cdot \cos b - \color{blue}{{\left(\sqrt[3]{\sin a}\right)}^3} \cdot {\left(\sqrt[3]{\sin b}\right)}^3}\]
0.3
Applied cube-unprod to get
\[r \cdot \frac{\sin b}{\cos a \cdot \cos b - \color{red}{{\left(\sqrt[3]{\sin a}\right)}^3 \cdot {\left(\sqrt[3]{\sin b}\right)}^3}} \leadsto r \cdot \frac{\sin b}{\cos a \cdot \cos b - \color{blue}{{\left(\sqrt[3]{\sin a} \cdot \sqrt[3]{\sin b}\right)}^3}}\]
0.3
Original test:
(lambda ((r default) (a default) (b default))
#:name "r*sin(b)/cos(a+b), B"
(* r (/ (sin b) (cos (+ a b)))))