function yprime = pendulum_driven_ode ( x, y )
%
%  function yprime = pendulum_driven_ode ( x, y )
%
%  computes the derivative for the nonlinear driven pendulum ODE.
%
G = 386.09;
L = 10.0;
%W = 5.3;
W = 100;
A = 0.5;
%A = 10.0;
temp = sin ( y(1) );

yprime = [         y(2);
           - ( G - A * W^2 * sin ( W * x ) ) * temp / L ];

