Animation on the cloud not working

I am trying to deploy a very simple animation on the cloud, but it does not show up.

This is the deployment with the full code

Does anybody know why this may be?

For context, the Mathematica file that I deployed simply has two lines (exactly as in the link above):

sol[t_]=theta[t]/.DSolve[{theta''[t]==-Sin[theta[t]], theta[0]==-1, theta'[0]==0.1}, theta,t][[1]];
Animate[Show[ListPlot[Re[{{Sin[sol[t]],-Cos[sol[t]]}}],PlotStyle->PointSize[0.02],PlotRange->{{-2,2},{-2,2}},AspectRatio->1],Graphics[Line[{{0,0},{Sin[sol[t]],-Cos[sol[t]]}}]]],{t,0,10}]

To deploy to the cloud I clicked File: Publish to cloud.

Hi Jonathan,

Use the option SaveDefinitions->True in Animate[ ] as shown here
https://www.wolframcloud.com/obj/2a7f3668-8a95-4291-8209-3edaca3b3d51

Ah, brilliant, thank you enormously!

Hi Ahmed, I wonder if you might be able to help with a similar problem. I have some manipulate commands at the end of this document: https://www.wolframcloud.com/obj/jon.shock/MAM1043part4a and they are just impossibly slow. In addition the animations are very very jumpy. Any help would be gratefully received!