f(x,y):=(mode_declare([x,y],float), (X^3+Y^4-0.2*X)*EXP(-X^2-Y^2)+0.3*EXP(-(X-1.225)^2-Y^2)); compile(f); grindef(f); plot_f():= PLOT3D('f,-3,3,-3,3);