Question: DEplot and error

i tried to plot a differential equation with piecewise.

h:=piecewise(0 <= t and t <= 1, 1, 1 < t and t <= 2, 2, 2 <= t and t <= 3, 0, 3 < t and t <= 4, 2, 4 < t, 1.5):

g3:=diff(y(t),t)=((800-y(t))*y(t)/*(100+y(t)))-E*h

ivs6:=[y(0)=100,y(0)=500,y(0)=1500]:

with(DETools):

DEplot(g3,y(t),t=0..10,ivs6);

i got a warning that plot may be incomplete, the following error(s) were issued:

cannot evaluate the solution further right of .3587993, probably a singularity

help please

Please Wait...