{VERSION 6 0 "IBM INTEL NT" "6.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 "" 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 }0 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "Maple Output" 0 11 1 {CSTYLE "" -1 -1 "" 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 }3 3 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "Maple Plot" 0 13 1 {CSTYLE "" -1 -1 "" 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 }3 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }} {SECT 0 {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 " > " 0 "" {MPLTEXT 1 0 21 "read(\"e:/euler.txt\");" }}}{EXCHG {PARA 0 " > " 0 "" {MPLTEXT 1 0 33 "f := (t,y) -> t*ln(y)+t^2; # RHS" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"fGf*6$%\"tG%\"yG6\"6$%)operatorG%&arrowG F),&*&9$\"\"\"-%#lnG6#9%F0F0*$)F/\"\"#F0F0F)F)F)" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 13 "a, b := 1, 4;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>6$%\"aG%\"bG6$\"\"\"\"\"%" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 8 "y0 := 5;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%#y0G\"\" &" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 8 "n := 20;" }}{PARA 11 " " 1 "" {XPPMATH 20 "6#>%\"nG\"#?" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 26 "t, y := Euler(f,a,b,y0,n);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>6$%\"tG%\"yG6$-%'RTABLEG6*\"*kOZW\"%)anythingG&%'Vecto rG6#%'columnG%,rectangularG%.Fortran_orderG7\"\"\"\";F4\"#@-F)6*\"*/PZ W\"F,F-F1F2F3F4F5" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 58 "plot([ seq([t[j],y[j]],j=1..n+1)]); # approximate solution" }}{PARA 13 "" 1 "" {GLPLOT2D 395 260 260 {PLOTDATA 2 "6%-%'CURVESG6$777$$\"\"\"\"\"!$ \"\"&F*7$$\"3#*************\\6!#<$\"3G+++(o:9R&F07$$\"3/+++++++8F0$\"3 ?+++n+U!)eF07$$\"3'*************\\9F0$\"3y*****fc(QzkF07$$\"33+++++++; F0$\"3K******>()=,sF07$$\"3+++++++] " 0 "" {MPLTEXT 1 0 41 "dsolve(diff(x(s),s)=s*ln(x(s))+s^2, x(s));" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 0 "" }}{PARA 0 "" 0 "" {TEXT -1 0 "" }}{PARA 0 "" 0 "" {TEXT -1 78 "In-class project: Write a program for solving 2x2 \+ systems by Euler's method." }}{PARA 0 "" 0 "" {TEXT -1 84 "Use your pr ogram to solve the Predator-prey problem and plot two graphs as requir ed." }}{PARA 0 "" 0 "" {TEXT -1 0 "" }}{PARA 0 "" 0 "" {TEXT -1 0 "" } }{PARA 0 "" 0 "" {TEXT -1 12 "Homework: " }}{PARA 0 "" 0 "" {TEXT -1 0 "" }}{PARA 0 "" 0 "" {TEXT -1 13 "#2, Page 186" }}{PARA 0 "" 0 " " {TEXT -1 19 "#6(a,c), page 189" }}{PARA 0 "" 0 "" {TEXT -1 27 " Ex tra credit: #4 page 188" }}{PARA 0 "" 0 "" {TEXT -1 0 "" }}}}{MARK "1 0 10 0" 1 }{VIEWOPTS 1 1 0 1 1 1803 1 1 1 1 }{PAGENUMBERS 0 1 2 33 1 1 }{RTABLE_HANDLES 144473664 144473704 }{RTABLE M7R0 I6RTABLE_SAVE/144473664X*%)anythingG6"6"[gl!#%!!!"6"6$"""""!$"++++]6!"*$"+++++8 F,$"++++]9F,$"+++++;F,$"++++]F,$"++++]?F,$"+++++AF,$"++++]BF,$"+++++ DF,$"++++]EF,$"+++++GF,$"++++]HF,$"+++++JF,$"++++]KF,$"+++++MF,$"++++]NF,$"++++ +PF,$"++++]QF,$"+++++SF,F& } {RTABLE M7R0 I6RTABLE_SAVE/144473704X*%)anythingG6"6"[gl!#%!!!"6"6$""&""!$"+(o:9R&!"*$"+n+U! )eF,$"+mvQzkF,$"+?()=,sF,$"+(y2!f!)F,$"+z_;m!*F,$"+&='fB5!")$"+J`:e6F9$"+!)fe68 F9$"+72:&["F9$"+8&z+o"F9$"+0(ov*=F9$"+j8yQ@F9$"+1([[S#F9$"+e?(op#F9$"+'4Df,$F9$ "+th0jLF9$"+*f!HRPF9$"+&zKc9%F9$"+'GoIe%F9F& }