m=slider(0,10,0.1)
m=2
c=slider(0,50,0.1)
c=0
k=slider(0,100,0.1)
k=18
w=slider(0,10,0.01)
w=4
f(x)=5*sin(w*x)
xStart=0
yStart=0
yPrimeStart=0
xFinal=100
step=slider(0.01,1,0.01)
SolveODE(c/m,k/m,f,xStart,yStart,yPrimeStart,xFinal,step)
SolveODE(c/m,k/m,f,xStart,yStart,yPrimeStart,-xFinal,step)
Text("Solution to " + m + " u'' + " + c + " u' +" + k + " u = 0", (2, 3), true)
ZoomIn(-50,-10,50,10)