Phase Portrait & Solution Curve for

> IC1 := [ y(0) = 1, v(0) = -2 ] ;

>

> PHASEplot := DEplot( MODEL, VAR, DOMAIN, [ IC1 ], WINDOW,

> arrows=SLIM,

> scene=[ y, v ], linecolor=BLUE,

> title = `Phase Portrait for # 14(c): y1 = exp(-2t)` ):

> Yplot := DEplot( MODEL, VAR, DOMAIN, [ IC1 ],

> scene=[ t, y ], linecolor=BLUE ):

> Vplot := DEplot( MODEL, VAR, DOMAIN, [ IC1 ],

> scene=[ t, v ], linecolor=GREEN ):

> YVplot := display( [ Yplot, Vplot ], title=`Solution Curves for #14(c): y1=exp(-2t)` ):

> PHASEplot;

> YVplot;

>