Question: animation of the pendulum

Dear colleagues, please help me to animate a pendulum motion, L i s the length of the pendulum,  the differential equation is:

de := diff(theta(t), `$`(t, 2))+c*(diff(theta(t), t))+9.8*sin(theta(t))/L = 0; c := 2; L := 2;
init := theta(0) = 0, (D(theta))(0) = 0;
sol := dsolve({de, init}, theta(t), numeric);

Please Wait...