' - - File: XIIId; IVP for first order differential equation: X'(t) = F{t,x}

F{t,x} = -(t - 3) x
to = .0  :  tf = 6 :  xo =1
IVP[F, {to, tf, xo}{1.05,0.01}]
' - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
' Construct a slope field for F{x,y}
a = 0: b = tf :  n = 20
c = 0 : d = 10  : m =20
PlotSlopeField[F, { a, b, n}{c,d,m}{1,1}]

' NOTE: Particular solution not available if outside range of graph.
' Change TOL to 0.004 for a closer fit, though this change increases the time.

' The scales are different: note the two vertical "Y" labels. Adjust the scale of the
'   parametric plot: the display used y-scale = 12.5 units to show the near fit.


