d) x- and y-solution curves for the IVP
> DOMAIN := t = 0 .. 1 ;
> IC := [ x(0) = 1, y(0) = 0 ];
> P1:= DEplot( MODEL, VAR, DOMAIN, [ IC ],
> scene=[ t, x ], arrows=NONE, linecolor=BLUE ):
> P2:= DEplot( MODEL, VAR, DOMAIN, [ IC ],
> scene=[ t, y ], arrows=NONE, linecolor=GREEN ):
> display( [ P1, P2 ] , title = `x and y solution curves for # 18` );
>