Question: Filling between two lines.

I am trying to plot a graph of two functions and fill between the two lines. The code I have seems to work as I type it, but when I remove the output and re-execute it completely ignores the 'white' fillings. Here is the code I have so far: restart:with(plots): First I assign to u and v to the equations. u:=0.21e-1*x^3-0.947e-1*x^2-1.77*x+1.79; v:=-0.451e-2*x^3-0.473e-1*x^2+.243*x+4.74; Then I plot the functions and find the intercepts. plot([u,v],x=-8..11,y=-9..7,color=[blue,green]); inters:=fsolve(u=v); x_int_u:=fsolve(u); x_int_v:=fsolve(v); Plot again and shade the regions of interest. p1:=plot([u,v],x=-8..12,y=-9..7,color=[blue,green],thickness=2): p2:=plot(u,x=x_int_u[1]..x_int_u[3],filled=true,color="Gainsboro"): p3:=plot(v,x=inters[2]..x_int_v,filled=true,color="Gainsboro"): p4:=plot(u,x=inters[3]..x_int_u[3],filled=true,color=white): p5:=plot(v,x=x_int_v..inters[3],filled=true,color=white): p6:=plot(u,x=x_int_u[1]..inters[1],filled=true,color=white): p7:=plot(v,x=inters[1]..inters[2],filled=true,color=white): p8:=plot(u,x=inters[2]..x_int_u[2],filled=true,color=white): display({p1,p2,p3,p4,p5,p6,p7,p8}); Can anyone help me figure out what I am doing wrong? Or give me an easier way to shade between these two lines? I've been trying to do this now for almost 2 hours and am about to throw my laptop across the room. It wouldn't be so frustrating except that it works until I re-execute the worksheet then it seems to forget about p4-p8. ARG! Thanks!
Please Wait...