> with(plots):with(plottools):plotsetup(window); > F1:=fieldplot([x,y],x=-3..3,y=-3..3,grid=[6,6],arrows=thick,scaling=constrained): > F2:=fieldplot([x,0],x=-3..3,y=-3..3,grid=[6,6],arrows=thick,scaling=constrained): > F3:=fieldplot([0,-y],x=-3..3,y=-3..3,grid=[6,6],arrows=thick,scaling=constrained): > F4:=fieldplot([y,0],x=-3..3,y=-3..3,grid=[6,6],arrows=thick,scaling=constrained): > F5:=fieldplot([0,-x],x=-3..3,y=-3..3,grid=[6,6],arrows=thick,scaling=constrained): > F6:=fieldplot([-y,x],x=-3..3,y=-3..3,grid=[6,6],arrows=thick,scaling=constrained): > F7:=fieldplot([y,x],x=-3..3,y=-3..3,grid=[6,6],arrows=thick,scaling=constrained): > C1:=plot([2*cos(t),2*sin(t),t=0..Pi],color=red,thickness=3): > C2:=plot([1.5,t,t=-1.5..1.5],color=green,thickness=3): > C3:=plot([t,1,t=-1.5..1.5],color=blue,thickness=3): > C4:=plot([t,t,t=-1.8..1.8],color=orange,thickness=3): > P1:=polygon([[-0.3,2],[0,2.3],[0,1.7]],color=red): > P2:=polygon([[1.5,1.3],[1.2,1],[1.8,1]],color=green): > P3:=polygon([[-1.3,1],[-1,1.3],[-1,0.7]],color=blue): > P4:=polygon([[1.5,1.5],[1.08,1.5],[1.5,1.08]],color=orange): > display(F1,C1,P1); > display(F2,C1,P1); > display(F3,C1,P1); > display(F4,C1,P1); > display(F5,C1,P1); > display(F6,C1,P1); > display(F7,C1,P1); > display(F1,C2,P2); > display(F2,C2,P2); > display(F3,C2,P2); > display(F4,C2,P2); > display(F5,C2,P2); > display(F6,C2,P2); > display(F7,C2,P2); > display(F1,C3,P3); > display(F2,C3,P3); > display(F3,C3,P3); > display(F4,C3,P3); > display(F5,C3,P3); > display(F6,C3,P3); > display(F7,C3,P3); > display(F1,C4,P4); > display(F2,C4,P4); > display(F3,C4,P4); > display(F4,C4,P4); > display(F5,C4,P4); > display(F6,C4,P4); > display(F7,C4,P4); > >