Overdamped Motion

If we select [Maple Math] = 1 [Maple Math] and three different d -values: 12, 45, 96 ( [Maple Math] ) , r named rk becomes:

> rk:=(d,m,k)->simplify(sqrt(d+4*m*k)):

> r=[seq(rk(d,1,1),d=[12,45,96])];

[Maple Math]

> plt1:=d->plot(xo(1,rk(d,1,1),1,2,t),t=0..20):

> txt1:=d->textplot([4,xo(1,rk(d,1,1),1,2,4),convert(r = rk(d,1,1),string)]):

> pltod:=display(seq({plt1(d),txt1(d)},d=[12,45,96]),labels=[`t`,`x(t)`],labelfont=[TIMES,BOLD,12]):%;

[Maple Plot]

Figure 3 Overdamped motion, m = 1 kg, k = 1 [Maple Math] , [Maple Math] , r: damping constant

Figure 3 shows three typical graphs of the position function [Maple Math] for the overdamped case. Figure 4 shows the animation of the motion with [Maple Math] [Maple Math] .

> mass_spring(1,4,1,0,5,2,0,14,0,60,scaling=constrained);

[Maple Math]

[Maple Math]

[Maple Plot]

Figure 4 Animation of an overdamped motion of a mass-spring system with dashpot.
m = 1 kg, k = 1 [Maple Math] , [Maple Math] , r = 4 [Maple Math]