/* [wxMaxima batch file version 1] [ DO NOT EDIT BY HAND! ]*/ /* [ Created with wxMaxima version 11.04.0 ] */ /* [wxMaxima: input start ] */ Ucostante(x,y):=10; /* [wxMaxima: input end ] */ /* [wxMaxima: input start ] */ U(x,y):=2*(x+1)^0.3*(y+1)^0.5; /* [wxMaxima: input end ] */ /* [wxMaxima: input start ] */ plot3d([[Ucostante, [x,0,20], [y,0,20]], U, [x,0,20], [y,0,20]], [plot_format,xmaxima])$ /* [wxMaxima: input end ] */ /* Maxima can't load/batch files which end with a comment! */ "Created with wxMaxima"$