' - - File:XIVf  ' 2nd Order differential equation.
' Equation:  X''(t) + 12X'(t) + 100 X(t)  =  48Sin[10t]

F{t,x,y} =  y
G{t,x,y} =  48Sin[10t] - 12y - 100x
' - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
to = 0: tf = 2:   xo = 0  :  yo = 0

IVP[F,G,{to,tf,xo,yo}{1.00, 0.01,1}]

' Check out the phase plot. If TOL is set too small (0.0005 for example), you may be
'   required to see only a partial plot. Set tf = 6  and note any curve changes.



