Question: Unit circle and sinewave together?

Is there a way to put the 2 following animations together and synchronize them?

Maplesoft Help has an example of how to create the animation.  See last example on
https://de.maplesoft.com/support/help/maple/view.aspx?path=plots%2fanimate

but I couldn't get it to work on my Maple version 2015.

plots[animate](plot, [[cos(t), sin(t), t = 0 .. A]], A = 0 .. 2*Pi, scaling = constrained, frames = 50)

with(plots);
BACK := plot(sin(x), x = 0 .. 2*Pi);
oneFrame := proc (t) options operator, arrow; pointplot([t, sin(t)], color = blue, symbol = circle, symbolsize = 18) end proc;
animate(oneFrame, [t], t = 0 .. 2*Pi, background = BACK);

WC23_Unit_circle_and_sinewave_together.mw

Please Wait...