{VERSION 5 0 "IBM INTEL NT" "5.0" } {USTYLETAB {CSTYLE "Maple Input" -1 0 "Courier" 0 1 255 0 0 1 0 1 0 0 1 0 0 0 0 1 }{PSTYLE "Normal" -1 0 1 {CSTYLE "" -1 -1 "Times" 1 12 0 0 0 1 2 2 2 2 2 2 1 1 1 1 }1 1 0 0 0 0 1 0 1 0 2 2 0 1 }} {SECT 0 {EXCHG {PARA 0 "" 0 "" {TEXT -1 24 "Homework 1 problems 1-3:" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 35 "with(plots);with(VecCalc): VCalia s:" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 158 "f:=(x,y)->sin(x)*cos (y); Gradient_f:=Grad(f); Laplacian_f:=Lap(f); plot3d(sin(x)*cos(y), x =-Pi..Pi, y=-Pi..Pi, grid=[100,100], axes=boxed, style=patchnogrid);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 154 "g:=(x,y)->3*x^2+5*y^2; G radient_g:=Grad(g); Laplacian_g:=Lap(g); plot3d(3*x^2+5*y^2, x=-Pi..Pi , y=-Pi..Pi, grid=[100,100], axes=boxed, style=patchnogrid);" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 73 "h:=(x,y,z)->cos(x*y)*exp(2*z ); Gradient_h:=Grad(h); Laplacian_h:=Lap(h); " }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 59 "h2:=(x,y,z)->(cos(x*y)*exp(2*z))^2; Laplacian_h2 :=Lap(h2); " }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 101 "P:=(t,x,y)- >(1/(4*Pi*t))*exp(2*t)*exp(-(x^2+y^2)/(4*t)); Pt:=D[1](P); Pxx:=D[2,2] (P); Pyy:=D[3,3](P);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 43 "Pt( t,x,y)-Pxx(t,x,y)-Pyy(t,x,y)-2*P(t,x,y);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 12 "simplify(%);" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 20 " Homework 2 problem 5" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 29 "fso lve(\{tan(Pi*x)-x=0\}, \{x\});" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 39 "fsolve(\{tan(Pi*x)-x=0\}, \{x\}, 0.5..1.5);" }}}}{MARK "11" 0 }{VIEWOPTS 1 1 0 1 1 1803 1 1 1 1 }{PAGENUMBERS 0 1 2 33 1 1 }