>	restart:with(plots):

Warning, the name changecoords has been redefined

>

H:=NULL:for n from 1 to 10 do B:=plot3d(x^2+y^2+3,x=-2..2,y=-2..2,view=0..10,axes=normal,orientation=[18*n,75],scaling=constrained):parvects1:=arrow(<1,1,5>,<1,0,2>,shape=arrow,length=3,color=red,axes=normal,orientation=[18*n,75]):parvects2:=arrow(<1,1,5>,<0,1,2>,shape=arrow,length=3,color=red,axes=normal,orientation=[18*n,75]):normvect1:=arrow(<1,1,5>,<2,2,-1>,shape=arrow,length=6,thickness=4,color=blue,axes=normal,orientation=[18*n,75]):plane1:=plot3d(2*x+2*y+1,x=0..2,y=0..2,view=2..6,axes=normal,orientation=[18*n,75],color=gray,style=patchnogrid):H:=H,display(normvect1,parvects1,parvects2,plane1,B):od:display(H,insequence=true);

>