> with(plots): SC:=scaling=constrained: AT:=arrows=thick: G5x5:=grid=[5,5]: ALL:=SC,AT,G5x5: > f:=x^2+y^2:L:=10:Range:=x=-L..L,y=-L..L: > A:=gradplot(f,Range,ALL): > B:=contourplot(f,Range,color=black): > display(A,B); >