Lab V Simple Harmonic Motion


II. (a) Use Maple to solve the differential equation describing a damped harmonic oscillator with parameters the same as in I(a) except now there is a damping force characterized by -bv(t) where the damping constant, β= b/2m.

Remember in part Ia there was a mass, m, attached to a spring of force constant, k. The initial position of the mass was at x0 and its initial velocity v0 and the angular frequency was w0 = (k/m)1/2.

Hint:You will solve the equation diff(x(t),t,t) + 2*beta*diff(x(t),t) + omega0^2*x(t) = 0 with x(0)=x0,D(x)(0)=v0 (like last week's lab);

You can also solve the DFQ using Solve DE Intercatively. Go ahead and do this too (just for fun).

Assign your solution

(b) Let x0 = 1, v0 = 0, and w0 = 1. Plot the position x(t) for t from 0 to 4p for the case of β = 0.25 (underdamping), β = 1 (critical damping), β = 4 (overdamping).

Hints: In the case of beta = 1, you will need to plot the limit as beta goes to 1, you may as well do this for all of them, eg plot(Limit(x(t),beta = 0.25),t = 0..4*Pi);. Note that this will take Maple some time to do.

You probably should restart before part c

(c) For the underdamping case of part (b), obtain a simple expression for x(t) in terms of cosines, sines and e-bt by defining w12 = w02 - β 2. Obtain the simple expression for the case when omega1 = 0.9375, beta = 0.25, x0=1.0, v0=0.0

Hints This may work better if you input in text rather than math, but it works for the instructor in math too. Solve the same equation for x(t) in terms of omega0 exactly as you did and then assign the solution and assume omega1, beta are > 0. Then use subs(omega0=sqrt(beta^2+omega1^2),x(t)): Define x2(t) :=simplify(evalc(subs({omega1 = 0.9375, beta = 0.25, x0=1.0, v0=0.0},%))); If asked, choose table.

(d) Make a phase plot for this showing the decay in the position and velocity.

Hint: Define X(t) and V(t): X:= unapply(x2(t),t); V:= unapply(diff(x2(t),t),t); and plot them like last time