\[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 - \color{red}{\sin a \cdot \sin b}} \leadsto r \cdot \frac{\sin b}{\cos a \cdot \cos b - \color{blue}{{\left(\sqrt[3]{\sin a \cdot \sin b}\right)}^3}}\]
0.3
Removed slow pow expressions
Original test:
(lambda ((r default) (a default) (b default))
#:name "r*sin(b)/cos(a+b), B"
(* r (/ (sin b) (cos (+ a b)))))