{VERSION 6 1 "Windows XP" "6.1" } {USTYLETAB {PSTYLE "Dash Item" -1 16 1 {CSTYLE "" -1 -1 "Times" 1 12 0 0 0 1 2 2 2 2 2 2 0 0 0 1 }1 1 0 0 3 3 2 0 2 0 2 2 -1 3 }{PSTYLE "Wa rning" -1 7 1 {CSTYLE "" -1 -1 "Courier" 1 10 0 0 255 1 0 0 0 2 2 1 0 0 0 1 }1 0 0 -1 -1 -1 2 0 2 0 2 2 -1 1 }{PSTYLE "Bullet Item" -1 15 1 {CSTYLE "" -1 -1 "Times" 1 12 0 0 0 1 2 2 2 2 2 2 0 0 0 1 }1 1 0 0 3 3 2 0 2 0 2 2 -1 2 }{PSTYLE "_pstyle4" -1 200 1 {CSTYLE "" -1 -1 "" 0 1 0 0 0 0 0 0 0 2 2 2 0 0 0 1 }0 0 0 -1 -1 -1 2 0 2 0 2 2 -1 1 } {PSTYLE "_pstyle3" -1 201 1 {CSTYLE "" -1 -1 "Times" 1 12 0 0 0 1 2 2 2 2 2 2 0 0 0 1 }1 1 0 0 0 0 2 0 2 0 2 2 -1 1 }{PSTYLE "_pstyle2" -1 202 1 {CSTYLE "" -1 -1 "Courier" 0 1 255 0 0 1 0 1 0 2 1 2 0 0 0 1 }1 1 0 0 0 0 2 0 2 0 2 2 -1 1 }{PSTYLE "_pstyle1" -1 203 1 {CSTYLE "" -1 -1 "Trebuchet MS" 1 14 0 0 0 1 2 2 2 2 2 2 0 0 0 1 }1 1 0 0 0 0 2 0 2 0 2 2 -1 1 }{PSTYLE "Line Printed Output" -1 6 1 {CSTYLE "" -1 -1 "Cou rier" 1 10 0 0 255 1 0 0 0 2 2 1 0 0 0 1 }1 0 0 -1 -1 -1 2 0 2 0 2 2 -1 1 }{PSTYLE "Heading 4" -1 20 1 {CSTYLE "" -1 -1 "Times" 1 10 0 0 0 1 1 1 2 2 2 2 0 0 0 1 }1 1 0 0 0 0 2 0 2 0 2 2 -1 1 }{PSTYLE "Heading \+ 3" -1 5 1 {CSTYLE "" -1 -1 "Times" 1 12 0 0 0 1 1 1 2 2 2 2 0 0 0 1 } 1 1 0 0 0 0 2 0 2 0 2 2 -1 1 }{PSTYLE "Heading 2" -1 4 1 {CSTYLE "" -1 -1 "Times" 1 14 0 0 0 1 2 1 2 2 2 2 0 0 0 1 }1 1 0 0 8 2 2 0 2 0 2 2 -1 1 }{PSTYLE "Maple Output" -1 11 1 {CSTYLE "" -1 -1 "Times" 1 12 0 0 0 1 2 2 2 2 2 2 0 0 0 1 }3 3 0 0 0 0 2 0 2 0 2 2 -1 1 }{PSTYLE "He ading 1" -1 3 1 {CSTYLE "" -1 -1 "Times" 1 18 0 0 0 1 2 1 2 2 2 2 0 0 0 1 }1 1 0 0 8 4 2 0 2 0 2 2 -1 1 }{PSTYLE "Author" -1 19 1 {CSTYLE "" -1 -1 "Times" 1 12 0 0 0 1 2 2 2 2 2 2 0 0 0 1 }3 1 0 0 8 8 2 0 2 0 2 2 -1 1 }{PSTYLE "Maple Plot" -1 13 1 {CSTYLE "" -1 -1 "Times" 1 12 0 0 0 1 2 2 2 2 2 2 0 0 0 1 }3 1 0 0 0 0 2 0 2 0 2 2 -1 1 }{PSTYLE "He lp" -1 10 1 {CSTYLE "" -1 -1 "Courier" 1 9 0 0 255 1 0 0 0 2 2 1 0 0 0 1 }1 0 0 -1 -1 -1 2 0 2 0 2 2 -1 1 }{PSTYLE "Left Justified Maple Ou tput" -1 12 1 {CSTYLE "" -1 -1 "Times" 1 12 0 0 0 1 2 2 2 2 2 2 0 0 0 1 }1 3 0 0 0 0 2 0 2 0 2 2 -1 1 }{PSTYLE "Fixed Width" -1 17 1 {CSTYLE "" -1 -1 "Courier" 1 10 0 0 0 1 2 2 2 2 2 2 0 0 0 1 }3 1 0 0 0 0 2 0 2 0 2 2 -1 1 }{PSTYLE "Text Output" -1 2 1 {CSTYLE "" -1 -1 "C ourier" 1 10 0 0 255 1 0 0 0 2 2 1 0 0 0 1 }1 0 0 -1 -1 -1 2 0 2 0 2 2 -1 1 }{PSTYLE "List Item" -1 14 1 {CSTYLE "" -1 -1 "Times" 1 12 0 0 0 1 2 2 2 2 2 2 0 0 0 1 }1 1 0 0 3 3 2 0 2 0 2 2 -1 5 }{PSTYLE "Error" -1 8 1 {CSTYLE "" -1 -1 "Courier" 1 10 255 0 255 1 0 0 0 2 2 1 0 0 0 1 }1 0 0 -1 -1 -1 2 0 2 0 2 2 -1 1 }{PSTYLE "Diagnostic" -1 9 1 {CSTYLE "" -1 -1 "Courier" 1 10 64 128 64 1 0 0 0 2 2 1 0 0 0 1 }1 0 0 -1 -1 -1 2 0 2 0 2 2 -1 1 }{PSTYLE "Title" -1 18 1 {CSTYLE "" -1 -1 "Times" 1 18 0 0 0 1 2 1 1 2 2 2 0 0 0 1 }3 1 0 0 12 12 2 0 2 0 2 2 -1 1 }{PSTYLE "Normal" -1 0 1 {CSTYLE "" -1 -1 "Trebuchet MS" 1 14 0 0 0 1 2 2 2 2 2 2 0 0 0 1 }1 1 0 0 0 0 2 0 2 0 2 2 -1 1 }{CSTYLE "LaTe X" -1 32 "" 0 1 0 0 0 0 0 0 0 2 2 2 0 0 0 1 }{CSTYLE "Maple Comment" -1 21 "Courier" 0 1 0 0 0 1 0 0 0 2 2 2 0 0 0 1 }{CSTYLE "2D Math Bold " -1 5 "Times" 0 1 0 0 0 0 0 1 2 2 2 2 0 0 0 1 }{CSTYLE "Help Underlin ed" -1 44 "Times" 1 12 0 0 0 0 0 0 1 2 2 2 0 0 0 1 }{CSTYLE "Output La bels" -1 29 "Times" 1 8 0 0 0 1 0 0 0 2 2 2 0 0 0 1 }{CSTYLE "Maple In put" -1 0 "Courier" 0 1 255 0 0 1 0 1 0 2 1 2 0 0 0 1 }{CSTYLE "Page N umber" -1 33 "Times" 0 1 0 0 0 0 0 0 2 2 2 2 0 0 0 1 }{CSTYLE "Maple I nput Placeholder" -1 200 "Courier" 1 12 200 0 200 1 0 1 0 2 1 2 0 0 0 1 }{CSTYLE "Text" -1 201 "Times" 1 12 0 0 0 1 2 2 2 2 2 2 0 0 0 1 } {CSTYLE "2D Math Italic Small" -1 202 "Times" 0 1 0 0 0 0 1 0 2 2 2 2 0 0 0 1 }{CSTYLE "Help Heading" -1 26 "" 1 14 0 0 0 0 0 1 0 2 2 2 0 0 0 1 }{CSTYLE "Help Italic Bold" -1 40 "Times" 1 12 0 0 0 0 1 1 0 2 2 2 0 0 0 1 }{CSTYLE "Help Normal" -1 30 "Times" 1 12 0 0 0 0 0 0 0 2 2 2 0 0 0 1 }{CSTYLE "Help Nonterminal" -1 24 "Courier" 0 1 0 0 0 1 0 1 0 2 2 2 0 0 0 1 }{CSTYLE "2D Math Small" -1 7 "Times" 0 1 0 0 0 0 0 0 2 2 2 2 0 0 0 1 }{CSTYLE "Help Underlined Italic" -1 43 "Times" 1 12 0 0 0 0 1 0 1 2 2 2 0 0 0 1 }{CSTYLE "2D Math" -1 2 "Times" 0 1 0 0 0 0 0 0 2 2 2 2 0 0 0 1 }{CSTYLE "Copyright" -1 34 "Times" 1 10 0 0 0 0 2 2 2 2 2 2 0 0 0 1 }{CSTYLE "Hyperlink" -1 17 "" 0 1 0 128 128 1 2 0 1 2 2 2 0 0 0 1 }{CSTYLE "Plot Title" -1 27 "" 1 10 0 0 0 0 0 1 0 2 2 2 0 0 0 1 }{CSTYLE "2D Input" -1 19 "Times" 0 1 255 0 0 1 0 0 2 2 1 2 0 0 0 1 }{CSTYLE "Help Maple Name" -1 35 "" 0 1 104 64 92 1 0 1 0 2 2 2 0 0 0 1 }{CSTYLE "Help Italic" -1 42 "Times" 1 12 0 0 0 0 1 0 0 2 2 2 0 0 0 1 }{CSTYLE "Help Underlined Bold" -1 41 "Times" 1 12 0 0 0 0 0 1 1 2 2 2 0 0 0 1 }{CSTYLE "Default" -1 38 "" 0 1 0 0 0 0 0 0 0 2 2 2 0 0 0 1 }{CSTYLE "Help Fixed" -1 23 "Courier" 1 10 0 0 0 0 0 0 0 2 2 2 0 0 0 1 }{CSTYLE "Dictionary Hyperlink" -1 45 "" 0 1 147 0 15 1 2 0 1 2 2 2 0 0 0 1 }{CSTYLE "2D Output" -1 20 "Times" 0 1 0 0 255 1 0 0 2 2 2 2 0 0 0 1 }{CSTYLE "2D Math Italic" -1 3 "Times" 0 1 0 0 0 0 1 0 2 2 2 2 0 0 0 1 }{CSTYLE "Popup" -1 31 "" 0 1 0 128 128 1 1 0 1 2 2 2 0 0 0 1 }{CSTYLE "2D Math Symbol 2" -1 16 "Times" 0 1 0 0 0 0 2 2 2 2 2 2 0 0 0 1 }{CSTYLE "Plot Text" -1 28 "" 1 8 0 0 0 0 0 0 0 2 2 2 0 0 0 1 }{CSTYLE "Help Notes" -1 37 "" 0 1 0 0 0 1 0 1 0 2 2 2 0 0 0 1 }{CSTYLE "Help Bold" -1 39 "Times" 1 12 0 0 0 0 0 1 0 2 2 2 0 0 0 1 }{CSTYLE "Help Menus" -1 36 "" 0 1 0 0 0 1 0 1 0 2 2 2 0 0 0 1 } {CSTYLE "2D Comment" -1 18 "Times" 0 1 0 0 0 0 0 0 2 2 2 2 0 0 0 1 } {CSTYLE "Help Variable" -1 25 "Courier" 0 1 0 0 0 1 2 2 0 2 2 2 0 0 0 1 }{CSTYLE "_cstyle4" -1 203 "Courier" 0 1 255 0 0 1 0 1 0 2 1 2 0 0 0 1 }{CSTYLE "_cstyle3" -1 204 "Times" 1 12 0 0 0 1 2 2 2 2 2 2 0 0 0 1 }{CSTYLE "_cstyle2" -1 205 "Courier" 1 14 255 0 0 1 2 1 2 2 1 2 0 0 0 1 }{CSTYLE "_cstyle1" -1 206 "Trebuchet MS" 1 14 0 0 0 1 2 2 2 2 2 2 0 0 0 1 }{CSTYLE "2D Math Bold Small" -1 10 "Times" 0 1 0 0 0 0 0 1 2 2 2 2 0 0 0 1 }{CSTYLE "Help Emphasized" -1 207 "" 0 1 0 0 0 0 1 2 0 2 2 2 0 0 0 1 }{CSTYLE "Prompt" -1 1 "Courier" 0 1 0 0 0 1 0 0 0 2 2 2 0 0 0 1 }{PSTYLE "_pstyle5" -1 204 1 {CSTYLE "" -1 -1 "Trebuchet M S" 1 14 0 0 0 1 2 2 2 2 2 2 1 0 0 1 }1 1 0 0 0 0 2 0 2 0 2 2 -1 1 } {CSTYLE "_cstyle5" -1 208 "Trebuchet MS" 1 14 0 0 0 1 2 2 2 2 2 2 0 0 0 1 }{PSTYLE "_pstyle6" -1 205 1 {CSTYLE "" -1 -1 "Courier" 1 14 255 0 0 1 2 1 2 2 1 2 1 0 0 1 }1 1 0 0 0 0 2 0 2 0 2 2 -1 1 }{CSTYLE "_cst yle6" -1 209 "Courier" 1 14 255 0 0 1 2 1 2 2 1 2 0 0 0 1 }{PSTYLE "_p style7" -1 206 1 {CSTYLE "" -1 -1 "Courier" 0 1 255 0 0 1 0 1 0 2 1 2 0 0 0 1 }1 1 0 0 0 0 2 0 2 0 2 2 -1 1 }{PSTYLE "_pstyle8" -1 207 1 {CSTYLE "" -1 -1 "Times" 1 12 0 0 0 1 2 2 2 2 2 2 1 0 0 1 }1 1 0 0 0 0 2 0 2 0 2 2 -1 1 }{CSTYLE "_cstyle7" -1 210 "Times" 1 12 0 0 0 1 2 2 2 2 2 2 0 0 0 1 }{PSTYLE "_pstyle9" -1 208 1 {CSTYLE "" -1 -1 "Couri er" 0 1 255 0 0 1 0 1 0 2 1 2 1 0 0 1 }1 1 0 0 0 0 2 0 2 0 2 2 -1 1 } {CSTYLE "_cstyle8" -1 211 "Courier" 0 1 255 0 0 1 0 1 0 2 1 2 0 0 0 1 }{PSTYLE "_pstyle10" -1 209 1 {CSTYLE "" -1 -1 "" 0 1 0 0 0 0 0 0 0 2 2 2 0 0 0 1 }0 0 0 -1 -1 -1 2 0 2 0 2 2 -1 1 }{CSTYLE "_cstyle9" -1 212 "Times" 0 1 0 0 0 0 0 0 0 2 2 2 0 0 0 1 }{PSTYLE "_pstyle11" -1 210 1 {CSTYLE "" -1 -1 "" 0 1 0 0 0 0 0 0 0 2 2 2 0 0 0 1 }0 0 0 -1 -1 -1 1 0 1 0 2 2 -1 1 }} {SECT 0 {EXCHG {PARA 204 "" 0 "" {TEXT 208 0 "" }}{PARA 204 "" 0 "" {TEXT 208 25 "Programming Euler Method." }{TEXT 208 0 "" }}{PARA 204 " " 0 "" {TEXT 208 0 "" }}}{EXCHG {PARA 205 "> " 0 "" {MPLTEXT 1 209 8 " restart;" }{MPLTEXT 1 209 0 "" }}}{EXCHG {PARA 204 "" 0 "" {TEXT 208 0 "" }}{PARA 204 "" 0 "" {TEXT 208 43 "Problem 13 in Section 2.7 in B oyce's book." }{TEXT 208 0 "" }}{PARA 204 "" 0 "" {TEXT 208 0 "" }}} {EXCHG {PARA 205 "> " 0 "" {MPLTEXT 1 209 33 "f:=(t,y)-> (4-t*y(t))/(1 +y(t)^2);" }{MPLTEXT 1 209 0 "" }}}{EXCHG {PARA 204 "" 0 "" {TEXT 208 1 " " }{TEXT 208 0 "" }}{PARA 204 "" 0 "" {TEXT 208 34 "Initial Value \+ and uniform stepsize" }{TEXT 208 0 "" }}{PARA 204 "" 0 "" {TEXT 208 0 "" }}}{EXCHG {PARA 205 "> " 0 "" {MPLTEXT 1 209 29 "tv[1]:=0; yv[1]:=- 2; h:= 0.1;" }{MPLTEXT 1 209 0 "" }}}{EXCHG {PARA 204 "" 0 "" {TEXT 208 0 "" }}{PARA 204 "" 0 "" {TEXT 208 60 "Loop to generate the approx imations at every partition point" }{TEXT 208 0 "" }}{PARA 204 "" 0 "" {TEXT 208 0 "" }}}{EXCHG {PARA 205 "> " 0 "" {MPLTEXT 1 209 50 "for i to 50 do fev:=f(tv[i],yv[i]); tv[i+1]:= i*h;" }{MPLTEXT 1 209 0 "" }} {PARA 205 "> " 0 "" {MPLTEXT 1 209 23 "yv[i+1]:= yv[i] + fev*h" } {MPLTEXT 1 209 0 "" }}{PARA 205 "> " 0 "" {MPLTEXT 1 209 7 "end do:" } {MPLTEXT 1 209 0 "" }}}{EXCHG {PARA 204 "" 0 "" {TEXT 208 0 "" }} {PARA 204 "" 0 "" {TEXT 208 39 "Printing the results at selected point s" }{TEXT 208 0 "" }}{PARA 204 "" 0 "" {TEXT 208 0 "" }}}{EXCHG {PARA 205 "> " 0 "" {MPLTEXT 1 209 15 "for i to 51 do" }{MPLTEXT 1 209 0 "" }}{PARA 205 "> " 0 "" {MPLTEXT 1 209 18 "print(tv[i],yv[i])" } {MPLTEXT 1 209 0 "" }}{PARA 205 "> " 0 "" {MPLTEXT 1 209 7 "end do;" } {MPLTEXT 1 209 0 "" }}}{EXCHG {PARA 206 "> " 0 "" {MPLTEXT 1 0 13 "eva lf(48/25);" }}}{EXCHG {PARA 206 "> " 0 "" {MPLTEXT 1 0 33 "f1:=(4-.1*( -1.92))/(1+(-1.92)^2);" }}}{EXCHG {PARA 206 "> " 0 "" {MPLTEXT 1 0 16 "-1.92+0.895*0.1;" }}}{EXCHG {PARA 204 "" 0 "" {TEXT 208 0 "" }}{PARA 204 "" 0 "" {TEXT 208 22 "Refining the step size" }{TEXT 208 0 "" }} {PARA 204 "" 0 "" {TEXT 208 34 "Initial Value and uniform stepsize" } {TEXT 208 0 "" }}{PARA 204 "" 0 "" {TEXT 208 0 "" }}}{EXCHG {PARA 205 "> " 0 "" {MPLTEXT 1 209 30 "tv[1]:=0; yv[1]:=-2; h:= 0.05;" } {MPLTEXT 1 209 0 "" }}}{EXCHG {PARA 204 "" 0 "" {TEXT 208 0 "" }} {PARA 204 "" 0 "" {TEXT 208 60 "Loop to generate the approximations at every partition point" }{TEXT 208 0 "" }}{PARA 204 "" 0 "" {TEXT 208 0 "" }}}{EXCHG {PARA 205 "> " 0 "" {MPLTEXT 1 209 51 "for i to 100 do \+ fev:=f(tv[i],yv[i]); tv[i+1]:= i*h;" }{MPLTEXT 1 209 0 "" }}{PARA 205 "> " 0 "" {MPLTEXT 1 209 23 "yv[i+1]:= yv[i] + fev*h" }{MPLTEXT 1 209 0 "" }}{PARA 205 "> " 0 "" {MPLTEXT 1 209 7 "end do:" }{MPLTEXT 1 209 0 "" }}}{EXCHG {PARA 204 "" 0 "" {TEXT 208 0 "" }}{PARA 204 "" 0 "" {TEXT 208 39 "Printing the results at selected points" }{TEXT 208 0 "" }}{PARA 204 "" 0 "" {TEXT 208 0 "" }}}{EXCHG {PARA 205 "> " 0 "" {MPLTEXT 1 209 21 "for i by 10 to 101 do" }{MPLTEXT 1 209 0 "" }} {PARA 205 "> " 0 "" {MPLTEXT 1 209 18 "print(tv[i],yv[i])" }{MPLTEXT 1 209 0 "" }}{PARA 205 "> " 0 "" {MPLTEXT 1 209 7 "end do;" }{MPLTEXT 1 209 0 "" }}}{EXCHG {PARA 207 "" 0 "" {TEXT 210 0 "" }}{PARA 207 "" 0 "" {TEXT 210 38 "Analizing errors for book's example 2." }{TEXT 210 0 "" }}{PARA 207 "" 0 "" {TEXT 210 0 "" }}}{EXCHG {PARA 208 "> " 0 "" {MPLTEXT 1 211 14 "3.5175-3.4446;" }{MPLTEXT 1 211 0 "" }}}{EXCHG {PARA 208 "> " 0 "" {MPLTEXT 1 211 13 "%*100/3.5175;" }{MPLTEXT 1 211 0 "" }}}{EXCHG {PARA 208 "> " 0 "" {MPLTEXT 1 211 14 "3.4517-3.4446;" }{MPLTEXT 1 211 0 "" }}}{EXCHG {PARA 208 "> " 0 "" {MPLTEXT 1 211 13 " %*100/3.4446;" }{MPLTEXT 1 211 0 "" }}}{EXCHG {PARA 207 "" 0 "" {TEXT 210 51 "Analyzing direction fields for both book's examples" }{TEXT 210 0 "" }}{PARA 207 "" 0 "" {TEXT 210 0 "" }}}{EXCHG {PARA 208 "> " 0 "" {MPLTEXT 1 211 37 "eq1:=diff(y(t),t)=3+exp(-t)-1/2*y(t);" } {MPLTEXT 1 211 0 "" }}}{EXCHG {PARA 208 "> " 0 "" {MPLTEXT 1 211 15 "w ith (DEtools):" }{MPLTEXT 1 211 0 "" }}}{EXCHG {PARA 208 "> " 0 "" {MPLTEXT 1 211 114 "DEplot(eq1, y(t),t=-1..10, y=-10..10, dirgrid=[30, 30],\{[0,1],[1,3.52]\},stepsize=0.1,arrows=THIN,title=`Figure 1`);" } {MPLTEXT 1 211 0 "" }}}{EXCHG {PARA 208 "> " 0 "" {MPLTEXT 1 211 29 "e q2:=diff(y(t),t)=4-t+2*y(t);" }{MPLTEXT 1 211 0 "" }}}{EXCHG {PARA 208 "> " 0 "" {MPLTEXT 1 211 113 "DEplot(eq2, y(t),t=-1..2, y=-20..20, dirgrid=[30,30],\{[0,1],[1,15.7]\},stepsize=0.1,arrows=THIN,title=`Fi gure 1`);" }{MPLTEXT 1 211 0 "" }}}{EXCHG {PARA 208 "> " 0 "" {MPLTEXT 1 211 0 "" }}}{PARA 209 "" 0 "" {TEXT 212 0 "" }}{PARA 210 "" 0 "" {TEXT -1 0 "" }}}{MARK "0 0 0" 0 }{VIEWOPTS 1 1 0 15 10 1804 1 1 1 1 }{PAGENUMBERS 0 1 2 33 1 1 }