Phase Portrait & Solution Curve for

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

>

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

> arrows=SLIM,

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

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

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

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

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

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

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

> PHASEplot;

> YVplot;

>