Piecewise-Defined Forcing Functions

> MODEL := diff( v(t), t ) = -1/2*v(t) + 3*u(2,t);

> IC := v(0)=4;

> VAR := { v(t) }:

>

> dirPLOT := DEplot( MODEL, VAR, t=0..10, v=-1..10,

> arrows=MEDIUM, title=`Direction Field` ):

> dirPLOT;

>

> solPLOT := DEplot( MODEL, VAR, t=0..10, v=-1..10, [ [IC] ],

> arrows=NONE, stepsize=0.1, linecolor=BLUE,

> title=`Solution Curve` ):

> solPLOT;

> display( [dirPLOT,solPLOT], title=`Direction Field and Solution Curve` );

>

Analytic Solution