{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 }{CSTYLE "2D Math" -1 2 "Times" 0 1 0 0 0 0 0 0 2 0 0 0 0 0 0 1 }{CSTYLE "2D Output" 2 20 "" 0 1 0 0 255 1 0 0 0 0 0 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 }{PSTYLE "Maple Output" -1 11 1 {CSTYLE "" -1 -1 "Times" 1 12 0 0 0 1 2 2 2 2 2 2 1 1 1 1 }3 3 0 0 0 0 1 0 1 0 2 2 0 1 }{PSTYLE "Maple Plot" -1 13 1 {CSTYLE "" -1 -1 " Times" 1 12 0 0 0 1 2 2 2 2 2 2 1 1 1 1 }3 1 0 0 0 0 1 0 1 0 2 2 0 1 } } {SECT 0 {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 13 "with(plots):\n" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 185 "a:=2: b:=5: m:=11: n:=7:\nA :=implicitplot(y=a/b,x=0..3*m/n,y=0..3*a/b,color=blue):\nB:=implicitpl ot(x=m/n,x=0..3*m/n,y=0..3*a/b,color=blue):\nC2:=evalf((a/b)^a*exp(-a) /((m/n)^m*exp(-m))); " }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%#C2G$\"+40B &)*)!\"*" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 642 "C:=implicitplo t(y^a*exp(-b*y)=C2*x^m*exp(-n*x),x=0..3*m/n,y=0..3*a/b,numpoints=6000, thickness=2):\nE1:=implicitplot(y^a*exp(-b*y)=1.5*C2*x^m*exp(-n*x),x=0 ..3*m/n,y=0..3*a/b,numpoints=2000):\nE2:=implicitplot(y^a*exp(-b*y)=0. 9*C2*x^m*exp(-n*x),x=0..3*m/n,y=0..3*a/b,numpoints=2000):\nE3:=implici tplot(y^a*exp(-b*y)=4*C2*x^m*exp(-n*x),x=0..3*m/n,y=0..3*a/b,numpoints =2000):\nE4:=implicitplot(y^a*exp(-b*y)=0.7*C2*x^m*exp(-n*x),x=0..3*m/ n,y=0..3*a/b,numpoints=2000):\nE5:=implicitplot(y^a*exp(-b*y)=12*C2*x^ m*exp(-n*x),x=0..3*m/n,y=0..3*a/b,numpoints=2000):\nE6:=implicitplot(y ^a*exp(-b*y)=0.5*C2*x^m*exp(-n*x),x=0..3*m/n,y=0..3*a/b,numpoints=2000 ):\n\n" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 33 "display(A,B,C,E1, E2,E3,E4,E5,E6);" }}{PARA 13 "" 1 "" {TEXT -1 0 "" }}}{EXCHG {PARA 0 " > " 0 "" {MPLTEXT 1 0 0 "" }}}}{MARK "0 0 0" 0 }{VIEWOPTS 1 1 0 1 1 1803 1 1 1 1 }{PAGENUMBERS 0 1 2 33 1 1 }