{VERSION 4 0 "Linux" "4.0" } {USTYLETAB {PSTYLE "Heading 4" -1 20 1 {CSTYLE "" -1 -1 "Times" 1 10 0 0 0 1 1 1 2 2 2 2 1 0 0 1 }1 1 0 0 0 0 2 0 2 0 2 2 -1 1 }{PSTYLE "Ord ered List 1" -1 200 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 3 3 2 0 2 0 2 2 -1 1 }{PSTYLE "Left Justified Maple Output" -1 12 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 }{PSTYLE "Help" -1 10 1 {CSTYLE "" -1 -1 "Courier" 1 9 0 0 255 1 2 2 2 2 2 1 1 0 0 1 }1 1 0 0 0 0 2 0 2 0 2 2 -1 1 }{PSTYLE "Diagnostic" -1 9 1 {CSTYLE "" -1 -1 "Courier" 1 10 64 128 64 1 2 2 2 2 2 1 1 0 0 1 }1 1 0 0 0 0 2 0 2 0 2 2 -1 1 } {PSTYLE "Ordered List 3" -1 201 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 3 3 2 72 2 0 2 2 -1 1 }{PSTYLE "Normal" -1 0 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 }{PSTYLE "Heading 3" -1 5 1 {CSTYLE "" -1 -1 "Times" 1 12 0 0 0 1 1 1 2 2 2 2 1 0 0 1 }1 1 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 1 0 0 1 }3 1 0 0 0 0 2 0 2 0 2 2 -1 1 }{PSTYLE "Error" -1 8 1 {CSTYLE "" -1 -1 "Courier" 1 10 255 0 255 1 2 2 2 2 2 1 1 0 0 1 }1 1 0 0 0 0 2 0 2 0 2 2 -1 1 }{PSTYLE "Heading 1" -1 3 1 {CSTYLE "" -1 -1 "Times" 1 18 0 0 0 1 2 1 2 2 2 2 1 0 0 1 }1 1 0 0 8 4 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 1 0 0 1 }3 1 0 0 12 12 2 0 2 0 2 2 -1 1 }{PSTYLE "Ordered \+ List 5" -1 202 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 3 3 2 144 2 0 2 2 -1 1 }{PSTYLE "Text Output" -1 2 1 {CSTYLE "" -1 -1 "Courier" 1 10 0 0 255 1 2 2 2 2 2 1 1 0 0 1 }1 1 0 0 0 0 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 1 0 0 1 }1 1 0 0 3 3 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 1 0 0 1 }3 1 0 0 8 8 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 1 0 0 1 }1 1 0 0 8 2 2 0 2 0 2 2 -1 1 }{PSTYLE "Maple Plot" -1 13 1 {CSTYLE "" -1 -1 "T imes" 1 12 0 0 0 1 2 2 2 2 2 2 1 0 0 1 }3 1 0 0 0 0 2 0 2 0 2 2 -1 1 } {PSTYLE "Dash Item" -1 16 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 3 3 2 0 2 0 2 2 -1 1 }{PSTYLE "Ordered List 4 " -1 203 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 3 3 2 108 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 1 0 0 1 }3 1 0 0 0 0 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 1 0 0 1 }1 1 0 0 3 3 2 0 2 0 2 2 -1 1 }{PSTYLE "Li ne Printed Output" -1 6 1 {CSTYLE "" -1 -1 "Courier" 1 10 0 0 255 1 2 2 2 2 2 1 1 0 0 1 }1 1 0 0 0 0 2 0 2 0 2 2 -1 1 }{PSTYLE "Warning" -1 7 1 {CSTYLE "" -1 -1 "Courier" 1 10 0 0 255 1 2 2 2 2 2 1 1 0 0 1 }1 1 0 0 0 0 2 0 2 0 2 2 -1 1 }{PSTYLE "Ordered List 2" -1 204 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 3 3 2 36 2 0 2 2 -1 1 }{CSTYLE "Help Variable" -1 25 "Courier" 1 12 0 0 0 1 2 2 2 2 2 2 0 0 0 1 }{CSTYLE "Text" -1 200 "Times" 1 12 0 0 0 1 2 2 2 2 2 2 0 0 0 1 }{CSTYLE "Help Bold" -1 39 "Times" 1 12 0 0 0 1 2 1 2 2 2 2 0 0 0 1 }{CSTYLE "Page Number" -1 33 "Times" 1 12 0 0 0 1 2 2 2 2 2 2 0 0 0 1 }{CSTYLE "2D Math Italic Small" -1 201 "Times" 1 1 0 0 0 1 1 2 2 2 2 2 0 0 0 1 }{CSTYLE "Help Nonterminal" -1 24 "Courier" 1 12 0 0 0 1 2 1 2 2 2 2 0 0 0 1 }{CSTYLE "Default" -1 38 "Times" 1 12 0 0 0 1 2 2 2 2 2 2 0 0 0 1 }{CSTYLE "Maple Comment" -1 21 "Courier" 1 12 0 0 0 1 2 1 2 2 2 2 0 0 0 1 }{CSTYLE "Maple Input" -1 0 "Courier" 1 12 255 0 0 1 2 1 2 2 1 2 0 0 0 1 }{CSTYLE "2D Math Small" -1 7 "Times" 1 1 0 0 0 1 2 2 2 2 2 2 0 0 0 1 }{CSTYLE "Help Fixed" -1 23 "Courier" 1 10 0 0 0 1 2 2 2 2 2 2 0 0 0 1 }{CSTYLE "Popup" -1 31 "Times" 1 12 0 128 128 1 1 2 1 2 2 2 0 0 0 1 }{CSTYLE "Plot Title" -1 27 "Times" 1 10 0 0 0 1 2 1 2 2 2 2 0 0 0 1 }{CSTYLE "2D Input" -1 19 "Times" 1 12 255 0 0 1 2 2 2 2 1 2 0 0 0 1 }{CSTYLE "Copyright" -1 34 "Times" 1 10 0 0 0 1 2 2 2 2 2 2 0 0 0 1 }{CSTYLE "Maple Input Placeholder" -1 202 "Couri er" 1 12 200 0 200 1 2 1 2 2 1 2 0 0 0 1 }{CSTYLE "2D Math Bold Small" -1 10 "Times" 1 1 0 0 0 1 2 1 2 2 2 2 0 0 0 1 }{CSTYLE "2D Math" -1 2 "Times" 1 12 0 0 0 1 2 2 2 2 2 2 0 0 0 1 }{CSTYLE "Help Notes" -1 37 "Times" 1 12 0 0 0 1 2 1 2 2 2 2 0 0 0 1 }{CSTYLE "Help Underlined Bol d" -1 41 "Times" 1 12 0 0 0 1 1 1 2 2 2 2 0 0 0 1 }{CSTYLE "Hyperlink" -1 17 "Times" 1 12 0 128 128 1 2 2 1 2 2 2 0 0 0 1 }{CSTYLE "2D Math \+ Symbol 2" -1 16 "Times" 1 12 0 0 0 1 2 2 2 2 2 2 0 0 0 1 }{CSTYLE "Plo t Text" -1 28 "Times" 1 8 0 0 0 1 2 2 2 2 2 2 0 0 0 1 }{CSTYLE "Help I talic" -1 42 "Times" 1 12 0 0 0 1 1 2 2 2 2 2 0 0 0 1 }{CSTYLE "Output Labels" -1 29 "Times" 1 8 0 0 0 1 2 2 2 2 2 2 0 0 0 1 }{CSTYLE "Help \+ Heading" -1 26 "Times" 1 14 0 0 0 1 2 1 2 2 2 2 0 0 0 1 }{CSTYLE "Help Normal" -1 30 "Times" 1 12 0 0 0 1 2 2 2 2 2 2 0 0 0 1 }{CSTYLE "2D C omment" -1 18 "Times" 1 12 0 0 0 1 2 2 2 2 2 2 0 0 0 1 }{CSTYLE "Help \+ Maple Name" -1 35 "Times" 1 12 104 64 92 1 2 1 2 2 2 2 0 0 0 1 } {CSTYLE "2D Output" -1 20 "Times" 1 12 0 0 255 1 2 2 2 2 2 2 0 0 0 1 } {CSTYLE "Dictionary Hyperlink" -1 45 "Times" 1 12 147 0 15 1 2 2 1 2 2 2 0 0 0 1 }{CSTYLE "Help Emphasized" -1 22 "Times" 1 12 0 0 0 1 1 2 2 2 2 2 0 0 0 1 }{CSTYLE "Help Italic Bold" -1 40 "Times" 1 12 0 0 0 1 1 2 2 2 2 2 0 0 0 1 }{CSTYLE "LaTeX" -1 32 "Times" 1 12 0 0 0 1 2 2 2 2 2 2 0 0 0 1 }{CSTYLE "Help Menus" -1 36 "Times" 1 12 0 0 0 1 2 1 2 2 2 2 0 0 0 1 }{CSTYLE "Prompt" -1 1 "Courier" 1 12 0 0 0 1 2 1 2 2 2 2 0 0 0 1 }{CSTYLE "Help Underlined" -1 44 "Times" 1 12 0 0 0 1 2 2 1 2 2 2 0 0 0 1 }{CSTYLE "Help Underlined Italic" -1 43 "Times" 1 12 0 0 0 1 1 2 1 2 2 2 0 0 0 1 }{CSTYLE "2D Math Bold" -1 5 "Times" 1 12 0 0 0 1 2 1 2 2 2 2 0 0 0 1 }{CSTYLE "2D Math Italic" -1 3 "Times" 1 12 0 0 0 1 1 2 2 2 2 2 0 0 0 1 }{PSTYLE "" -1 205 1 {CSTYLE "" -1 -1 "Times " 1 24 0 0 0 1 2 1 2 2 2 2 1 0 0 1 }1 1 0 0 0 0 2 0 2 0 2 2 -1 1 } {PSTYLE "" -1 206 1 {CSTYLE "" -1 -1 "Times" 1 18 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 }{PSTYLE "" -1 207 1 {CSTYLE "" -1 -1 "Times" 1 18 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 }{PSTYLE "" -1 208 1 {CSTYLE "" -1 -1 "Times" 1 18 0 0 0 1 2 2 2 2 2 2 1 0 0 1 }3 1 0 0 0 0 2 0 2 0 2 2 -1 1 }{PSTYLE "" -1 209 1 {CSTYLE "" -1 -1 "Times" 1 18 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 }{PSTYLE "" -1 210 1 {CSTYLE "" -1 -1 "Times" 1 18 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 }{PSTYLE "" -1 211 1 {CSTYLE "" -1 -1 "Times" 1 18 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 }{PSTYLE "" -1 212 1 {CSTYLE "" -1 -1 "Time s" 1 18 0 0 0 1 2 2 2 2 2 2 1 0 0 1 }3 1 0 0 0 0 2 0 2 0 2 2 -1 1 } {PSTYLE "" -1 213 1 {CSTYLE "" -1 -1 "Times" 1 18 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 }{PSTYLE "" -1 214 1 {CSTYLE "" -1 -1 "Times" 1 18 0 0 0 1 2 2 2 2 2 2 1 0 0 1 }3 1 0 0 0 0 2 0 2 0 2 2 -1 1 }{PSTYLE "" -1 215 1 {CSTYLE "" -1 -1 "Times" 1 18 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 }{PSTYLE "" -1 216 1 {CSTYLE "" -1 -1 "Times" 1 18 0 0 0 1 2 2 2 2 2 2 1 0 0 1 }3 1 0 0 0 0 2 0 2 0 2 2 -1 1 }{PSTYLE "" -1 217 1 {CSTYLE "" -1 -1 "Times" 1 18 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 }{PSTYLE "" -1 218 1 {CSTYLE "" -1 -1 "Times" 1 18 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 }{PSTYLE "" -1 219 1 {CSTYLE "" -1 -1 "Time s" 1 18 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 } {PSTYLE "" -1 220 1 {CSTYLE "" -1 -1 "Times" 1 18 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 }{PSTYLE "" -1 221 1 {CSTYLE "" -1 -1 "Times" 1 18 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 }{PSTYLE "" -1 222 1 {CSTYLE "" -1 -1 "Times" 1 18 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 }{PSTYLE "" -1 223 1 {CSTYLE "" -1 -1 "Times" 1 18 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 }{PSTYLE "" -1 224 1 {CSTYLE "" -1 -1 "Times" 1 18 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 }{PSTYLE "" -1 225 1 {CSTYLE "" -1 -1 "Times" 1 18 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 }{PSTYLE "" -1 226 1 {CSTYLE "" -1 -1 "Time s" 1 18 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 } {PSTYLE "" -1 227 1 {CSTYLE "" -1 -1 "Times" 1 18 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 }{PSTYLE "" -1 228 1 {CSTYLE "" -1 -1 "Times" 1 18 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 }} {SECT 0 {SECT 0 {PARA 3 "" 0 "" {TEXT 203 21 "The Swinging Pendulum" } }{EXCHG {PARA 0 "" 0 "" {TEXT 204 0 "" }}{PARA 205 "" 0 "" {TEXT 200 21 "The Swinging Pendulum" }}{PARA 0 "" 0 "" {TEXT 204 0 "" }}{PARA 206 "" 0 "" {TEXT 200 57 "The force equation for the swinging pendulum reduces to :" }}{PARA 207 "" 0 "" {TEXT 200 0 "" }}{PARA 208 "" 0 "" {XPPEDIT 18 0 "Typesetting:-mrow(Typesetting:-mi(\"\"), Typesetting:-m row(Typesetting:-mi(\"\"), Typesetting:-mrow(Typesetting:-mi(\"\"), Ty pesetting:-mfrac(Typesetting:-mrow(Typesetting:-mi(\"\"), Typesetting: -msup(Typesetting:-mo(\"∂\", form = \"prefix\", fence = \"fal se\", separator = \"false\", lspace = \"0em\", rspace = \"0em\", stret chy = \"false\", symmetric = \"false\", maxsize = \"infinity\", minsiz e = \"1\", largeop = \"false\", movablelimits = \"false\", accent = \" false\", font_style_name = \"2D Comment\", size = \"12\", foreground = \"[0,0,0]\", background = \"[255,255,255]\"), Typesetting:-mn(\"2\"), superscriptshift = \"0\"), Typesetting:-mi(\"\")), Typesetting:-mrow( Typesetting:-mi(\"\"), Typesetting:-mrow(Typesetting:-mo(\"∂ \", form = \"prefix\", fence = \"false\", separator = \"false\", lspac e = \"0em\", rspace = \"0em\", stretchy = \"false\", symmetric = \"fal se\", maxsize = \"infinity\", minsize = \"1\", largeop = \"false\", mo vablelimits = \"false\", accent = \"false\", font_style_name = \"2D Co mment\", size = \"12\", foreground = \"[0,0,0]\", background = \"[255, 255,255]\"), Typesetting:-msup(Typesetting:-mi(\"t\"), Typesetting:-mn (\"2\"), superscriptshift = \"0\"), Typesetting:-mi(\"\")), Typesettin g:-mi(\"\")), linethickness = \"1\", denomalign = \"center\", numalign = \"center\", bevelled = \"false\", foreground = \"[0,0,0]\", backgro und = \"[255,255,255]\"), Typesetting:-mo(\"⁢\", form = \"infix\", fence = \"false\", separator = \"false\", lspace = \"0em\" , rspace = \"0em\", stretchy = \"false\", symmetric = \"false\", maxsi ze = \"infinity\", minsize = \"1\", largeop = \"false\", movablelimits = \"false\", accent = \"false\", font_style_name = \"2D Comment\", si ze = \"12\", foreground = \"[0,0,0]\", background = \"[255,255,255]\") , Typesetting:-mrow(Typesetting:-mo(\"(\", form = \"prefix\", fence = \+ \"true\", separator = \"false\", lspace = \"thinmathspace\", rspace = \+ \"thinmathspace\", stretchy = \"true\", symmetric = \"false\", maxsize = \"infinity\", minsize = \"1\", largeop = \"false\", movablelimits = \"false\", accent = \"false\", font_style_name = \"2D Comment\", size = \"12\", foreground = \"[0,0,0]\", background = \"[255,255,255]\"), \+ Typesetting:-mrow(Typesetting:-mi(\"diff\"), Typesetting:-mo(\"&ApplyF unction;\", form = \"infix\", fence = \"false\", separator = \"false\" , lspace = \"0em\", rspace = \"0em\", stretchy = \"false\", symmetric \+ = \"false\", maxsize = \"infinity\", minsize = \"1\", largeop = \"fals e\", movablelimits = \"false\", accent = \"false\", font_style_name = \+ \"2D Comment\", size = \"12\", foreground = \"[0,0,0]\", background = \+ \"[255,255,255]\"), Typesetting:-mrow(Typesetting:-mo(\"(\", form = \" prefix\", fence = \"true\", separator = \"false\", lspace = \"thinmath space\", rspace = \"thinmathspace\", stretchy = \"true\", symmetric = \+ \"false\", maxsize = \"infinity\", minsize = \"1\", largeop = \"false \", movablelimits = \"false\", accent = \"false\", font_style_name = \+ \"2D Comment\", size = \"12\", foreground = \"[0,0,0]\", background = \+ \"[255,255,255]\"), Typesetting:-mrow(Typesetting:-mi(\"theta\")), Typ esetting:-mo(\")\", form = \"postfix\", fence = \"true\", separator = \+ \"false\", lspace = \"thinmathspace\", rspace = \"verythinmathspace\", stretchy = \"true\", symmetric = \"false\", maxsize = \"infinity\", m insize = \"1\", largeop = \"false\", movablelimits = \"false\", accent = \"false\", font_style_name = \"2D Comment\", size = \"12\", foregro und = \"[0,0,0]\", background = \"[255,255,255]\")), Typesetting:-mi( \"\")), Typesetting:-mo(\")\", form = \"postfix\", fence = \"true\", s eparator = \"false\", lspace = \"thinmathspace\", rspace = \"verythinm athspace\", stretchy = \"true\", symmetric = \"false\", maxsize = \"in finity\", minsize = \"1\", largeop = \"false\", movablelimits = \"fals e\", accent = \"false\", font_style_name = \"2D Comment\", size = \"12 \", foreground = \"[0,0,0]\", background = \"[255,255,255]\")), Typese tting:-mi(\"\")), Typesetting:-mo(\"=\", form = \"infix\", fence = \"f alse\", separator = \"false\", lspace = \"thickmathspace\", rspace = \+ \"thickmathspace\", stretchy = \"false\", symmetric = \"false\", maxsi ze = \"infinity\", minsize = \"1\", largeop = \"false\", movablelimits = \"false\", accent = \"false\", font_style_name = \"2D Comment\", si ze = \"12\", foreground = \"[0,0,0]\", background = \"[255,255,255]\") , Typesetting:-mrow(Typesetting:-mo(\"&uminus0;\", form = \"prefix\", \+ fence = \"false\", separator = \"false\", lspace = \"0em\", rspace = \+ \"0em\", stretchy = \"false\", symmetric = \"false\", maxsize = \"infi nity\", minsize = \"1\", largeop = \"false\", movablelimits = \"false \", accent = \"false\", font_style_name = \"2D Comment\", size = \"12 \", foreground = \"[0,0,0]\", background = \"[255,255,255]\"), Typeset ting:-mrow(Typesetting:-mi(\"\"), Typesetting:-mfrac(Typesetting:-mrow (Typesetting:-mi(\"g\")), Typesetting:-mrow(Typesetting:-mi(\"R\")), l inethickness = \"1\", denomalign = \"center\", numalign = \"center\", \+ bevelled = \"false\", foreground = \"[0,0,0]\", background = \"[255,25 5,255]\"), Typesetting:-mo(\"⁢\", form = \"infix\", fen ce = \"false\", separator = \"false\", lspace = \"0em\", rspace = \"0e m\", stretchy = \"false\", symmetric = \"false\", maxsize = \"infinity \", minsize = \"1\", largeop = \"false\", movablelimits = \"false\", a ccent = \"false\", font_style_name = \"2D Comment\", size = \"12\", fo reground = \"[0,0,0]\", background = \"[255,255,255]\"), Typesetting:- mrow(Typesetting:-mi(\"sin\"), Typesetting:-mo(\"⁡\", fo rm = \"infix\", fence = \"false\", separator = \"false\", lspace = \"0 em\", rspace = \"0em\", stretchy = \"false\", symmetric = \"false\", m axsize = \"infinity\", minsize = \"1\", largeop = \"false\", movableli mits = \"false\", accent = \"false\", font_style_name = \"2D Comment\" , size = \"12\", foreground = \"[0,0,0]\", background = \"[255,255,255 ]\"), Typesetting:-mrow(Typesetting:-mo(\"(\", form = \"prefix\", fenc e = \"true\", separator = \"false\", lspace = \"thinmathspace\", rspac e = \"thinmathspace\", stretchy = \"true\", symmetric = \"false\", max size = \"infinity\", minsize = \"1\", largeop = \"false\", movablelimi ts = \"false\", accent = \"false\", font_style_name = \"2D Comment\", \+ size = \"12\", foreground = \"[0,0,0]\", background = \"[255,255,255] \"), Typesetting:-mrow(Typesetting:-mi(\"theta\")), Typesetting:-mo(\" )\", form = \"postfix\", fence = \"true\", separator = \"false\", lspa ce = \"thinmathspace\", rspace = \"verythinmathspace\", stretchy = \"t rue\", symmetric = \"false\", maxsize = \"infinity\", minsize = \"1\", largeop = \"false\", movablelimits = \"false\", accent = \"false\", f ont_style_name = \"2D Comment\", size = \"12\", foreground = \"[0,0,0] \", background = \"[255,255,255]\")), Typesetting:-mi(\"\")), Typesett ing:-mi(\"\")), Typesetting:-mi(\"\")), Typesetting:-mi(\"\")), Typese tting:-mi(\"\"));" "-I%mrowG6#/I+modulenameG6\"I,TypesettingGI(_syslib GF'6%-I#miGF$6#Q!F'-F#6'F+-F#6'F+-I&mfracGF$6*-F#6%F+-I%msupGF$6%-I#mo GF$63Q+∂F'/%%formGQ'prefixF'/%&fenceGQ&falseF'/%*separatorGFD /%'lspaceGQ$0emF'/%'rspaceGFI/%)stretchyGFD/%*symmetricGFD/%(maxsizeGQ )infinityF'/%(minsizeGQ\"1F'/%(largeopGFD/%.movablelimitsGFD/%'accentG FD/%0font_style_nameGQ+2D~CommentF'/%%sizeGQ#12F'/%+foregroundGQ([0,0, 0]F'/%+backgroundGQ.[255,255,255]F'-I#mnGF$6#Q\"2F'/%1superscriptshift GQ\"0F'F+-F#6%F+-F#6%F;-F96%-F,6#Q\"tF'FboFfoF+F+/%.linethicknessGQ\"1 F'/%+denomalignGQ'centerF'/%)numalignGFgp/%)bevelledGFDF\\oF_o-F<63Q1& InvisibleTimes;F'/F@Q&infixF'FBFEFGFJFLFNFPFSFVFXFZFfnFinF\\oF_o-F#6%- F<63Q\"(F'F?/FCQ%trueF'FE/FHQ.thinmathspaceF'/FKFiq/FMFgqFNFPFSFVFXFZF fnFinF\\oF_o-F#6&-F,6#Q%diffF'-F<63Q0⁡F'F_qFBFEFGFJFLFNF PFSFVFXFZFfnFinF\\oF_o-F#6%Fcq-F#6#-F,6#Q&thetaF'-F<63Q\")F'/F@Q(postf ixF'FfqFEFhq/FKQ2verythinmathspaceF'F[rFNFPFSFVFXFZFfnFinF\\oF_oF+F[sF +-F<63Q\"=F'F_qFBFE/FHQ/thickmathspaceF'/FKFfsFLFNFPFSFVFXFZFfnFinF\\o F_o-F#6%-F<63Q*&uminus0;F'F?FBFEFGFJFLFNFPFSFVFXFZFfnFinF\\oF_o-F#6'F+ -F46*-F#6#-F,6#Q\"gF'-F#6#-F,6#Q\"RF'FbpFepFhpFjpF\\oF_oF\\q-F#6&-F,6# Q$sinF'FarFdrF+F+F+F+F+" }}{PARA 209 "" 0 "" {TEXT 200 0 "" }}{PARA 0 "" 0 "" {TEXT 204 0 "" }}{PARA 210 "" 0 "" {TEXT 200 7 "where " } {XPPEDIT 18 0 "Typesetting:-mrow(Typesetting:-mi(\"theta\"));" "-I%mro wG6#/I+modulenameG6\"I,TypesettingGI(_syslibGF'6#-I#miGF$6#Q&thetaF'" }{TEXT 200 72 " is a function of t and r is the length of the pendu lum. If we let " }}{PARA 211 "" 0 "" {TEXT 200 0 "" }}{PARA 212 "" 0 "" {XPPEDIT 18 0 "Typesetting:-mrow(Typesetting:-mi(\"\"), Typesettin g:-mrow(Typesetting:-mi(\"omega\"), Typesetting:-mo(\"=\", form = \"in fix\", fence = \"false\", separator = \"false\", lspace = \"thickmaths pace\", rspace = \"thickmathspace\", stretchy = \"false\", symmetric = \"false\", maxsize = \"infinity\", minsize = \"1\", largeop = \"false \", movablelimits = \"false\", accent = \"false\", font_style_name = \+ \"2D Comment\", size = \"12\", foreground = \"[0,0,0]\", background = \+ \"[255,255,255]\"), Typesetting:-mrow(Typesetting:-mi(\"\"), Typesetti ng:-mfrac(Typesetting:-mrow(Typesetting:-mo(\"∂\", form = \"p refix\", fence = \"false\", separator = \"false\", lspace = \"0em\", r space = \"0em\", stretchy = \"false\", symmetric = \"false\", maxsize \+ = \"infinity\", minsize = \"1\", largeop = \"false\", movablelimits = \+ \"false\", accent = \"false\", font_style_name = \"2D Comment\", size \+ = \"12\", foreground = \"[0,0,0]\", background = \"[255,255,255]\")), \+ Typesetting:-mrow(Typesetting:-mi(\"\"), Typesetting:-mrow(Typesetting :-mo(\"∂\", form = \"prefix\", fence = \"false\", separator = \"false\", lspace = \"0em\", rspace = \"0em\", stretchy = \"false\", \+ symmetric = \"false\", maxsize = \"infinity\", minsize = \"1\", largeo p = \"false\", movablelimits = \"false\", accent = \"false\", font_sty le_name = \"2D Comment\", size = \"12\", foreground = \"[0,0,0]\", bac kground = \"[255,255,255]\"), Typesetting:-mi(\"t\")), Typesetting:-mi (\"\")), linethickness = \"1\", denomalign = \"center\", numalign = \" center\", bevelled = \"false\", foreground = \"[0,0,0]\", background = \"[255,255,255]\"), Typesetting:-mo(\"⁢\", form = \"in fix\", fence = \"false\", separator = \"false\", lspace = \"0em\", rsp ace = \"0em\", stretchy = \"false\", symmetric = \"false\", maxsize = \+ \"infinity\", minsize = \"1\", largeop = \"false\", movablelimits = \" false\", accent = \"false\", font_style_name = \"2D Comment\", size = \+ \"12\", foreground = \"[0,0,0]\", background = \"[255,255,255]\"), Typ esetting:-mi(\"theta\")), Typesetting:-mi(\"\")), Typesetting:-mi(\"\" ));" "-I%mrowG6#/I+modulenameG6\"I,TypesettingGI(_syslibGF'6%-I#miGF$6 #Q!F'-F#6&-F,6#Q&omegaF'-I#moGF$63Q\"=F'/%%formGQ&infixF'/%&fenceGQ&fa lseF'/%*separatorGF=/%'lspaceGQ/thickmathspaceF'/%'rspaceGFB/%)stretch yGF=/%*symmetricGF=/%(maxsizeGQ)infinityF'/%(minsizeGQ\"1F'/%(largeopG F=/%.movablelimitsGF=/%'accentGF=/%0font_style_nameGQ+2D~CommentF'/%%s izeGQ#12F'/%+foregroundGQ([0,0,0]F'/%+backgroundGQ.[255,255,255]F'-F#6 &F+-I&mfracGF$6*-F#6#-F563Q+∂F'/F9Q'prefixF'F;F>/FAQ$0emF'/FD FhoFEFGFIFLFOFQFSFUFXFenFhn-F#6%F+-F#6$Fbo-F,6#Q\"tF'F+/%.linethicknes sGQ\"1F'/%+denomalignGQ'centerF'/%)numalignGFfp/%)bevelledGF=FenFhn-F5 63Q1⁢F'F8F;F>FgoFioFEFGFIFLFOFQFSFUFXFenFhn-F,6#Q&theta F'F+F+" }}{PARA 0 "" 0 "" {TEXT 204 0 "" }}{PARA 0 "" 0 "" {TEXT 204 0 "" }}{PARA 213 "" 0 "" {TEXT 200 50 "then we obtain the first order \+ system of equations" }}{PARA 0 "" 0 "" {TEXT 204 0 "" }}{PARA 214 "" 0 "" {XPPEDIT 18 0 "Typesetting:-mrow(Typesetting:-mi(\"\"), Typesettin g:-mrow(Typesetting:-mi(\"\"), Typesetting:-mrow(Typesetting:-mi(\"\") , Typesetting:-mfrac(Typesetting:-mrow(Typesetting:-mo(\"∂\", form = \"prefix\", fence = \"false\", separator = \"false\", lspace = \"0em\", rspace = \"0em\", stretchy = \"false\", symmetric = \"false \", maxsize = \"infinity\", minsize = \"1\", largeop = \"false\", mova blelimits = \"false\", accent = \"false\", font_style_name = \"2D Comm ent\", size = \"12\", foreground = \"[0,0,0]\", background = \"[255,25 5,255]\")), Typesetting:-mrow(Typesetting:-mi(\"\"), Typesetting:-mrow (Typesetting:-mo(\"∂\", form = \"prefix\", fence = \"false\", separator = \"false\", lspace = \"0em\", rspace = \"0em\", stretchy = \"false\", symmetric = \"false\", maxsize = \"infinity\", minsize = \+ \"1\", largeop = \"false\", movablelimits = \"false\", accent = \"fals e\", font_style_name = \"2D Comment\", size = \"12\", foreground = \"[ 0,0,0]\", background = \"[255,255,255]\"), Typesetting:-mi(\"t\")), Ty pesetting:-mi(\"\")), linethickness = \"1\", denomalign = \"center\", \+ numalign = \"center\", bevelled = \"false\", foreground = \"[0,0,0]\", background = \"[255,255,255]\"), Typesetting:-mo(\"⁢\" , form = \"infix\", fence = \"false\", separator = \"false\", lspace = \"0em\", rspace = \"0em\", stretchy = \"false\", symmetric = \"false \", maxsize = \"infinity\", minsize = \"1\", largeop = \"false\", mova blelimits = \"false\", accent = \"false\", font_style_name = \"2D Comm ent\", size = \"12\", foreground = \"[0,0,0]\", background = \"[255,25 5,255]\"), Typesetting:-mi(\"theta\")), Typesetting:-mo(\"=\", form = \+ \"infix\", fence = \"false\", separator = \"false\", lspace = \"thickm athspace\", rspace = \"thickmathspace\", stretchy = \"false\", symmetr ic = \"false\", maxsize = \"infinity\", minsize = \"1\", largeop = \"f alse\", movablelimits = \"false\", accent = \"false\", font_style_name = \"2D Comment\", size = \"12\", foreground = \"[0,0,0]\", background = \"[255,255,255]\"), Typesetting:-mi(\"omega\")), Typesetting:-mi(\" \"));" "-I%mrowG6#/I+modulenameG6\"I,TypesettingGI(_syslibGF'6%-I#miGF $6#Q!F'-F#6&F+-F#6&F+-I&mfracGF$6*-F#6#-I#moGF$63Q+∂F'/%%form GQ'prefixF'/%&fenceGQ&falseF'/%*separatorGFA/%'lspaceGQ$0emF'/%'rspace GFF/%)stretchyGFA/%*symmetricGFA/%(maxsizeGQ)infinityF'/%(minsizeGQ\"1 F'/%(largeopGFA/%.movablelimitsGFA/%'accentGFA/%0font_style_nameGQ+2D~ CommentF'/%%sizeGQ#12F'/%+foregroundGQ([0,0,0]F'/%+backgroundGQ.[255,2 55,255]F'-F#6%F+-F#6$F8-F,6#Q\"tF'F+/%.linethicknessGQ\"1F'/%+denomali gnGQ'centerF'/%)numalignGF[p/%)bevelledGFAFinF\\o-F963Q1&InvisibleTime s;F'/F=Q&infixF'F?FBFDFGFIFKFMFPFSFUFWFYFfnFinF\\o-F,6#Q&thetaF'-F963Q \"=F'FcpF?FB/FEQ/thickmathspaceF'/FHF\\qFIFKFMFPFSFUFWFYFfnFinF\\o-F,6 #Q&omegaF'F+" }}{PARA 215 "" 0 "" {TEXT 200 0 "" }}{PARA 216 "" 0 "" {XPPEDIT 18 0 "Typesetting:-mrow(Typesetting:-mi(\"\"), Typesetting:-m row(Typesetting:-mi(\"\"), Typesetting:-mrow(Typesetting:-mi(\"\"), Ty pesetting:-mfrac(Typesetting:-mrow(Typesetting:-mo(\"∂\", for m = \"prefix\", fence = \"false\", separator = \"false\", lspace = \"0 em\", rspace = \"0em\", stretchy = \"false\", symmetric = \"false\", m axsize = \"infinity\", minsize = \"1\", largeop = \"false\", movableli mits = \"false\", accent = \"false\", font_style_name = \"2D Comment\" , size = \"12\", foreground = \"[0,0,0]\", background = \"[255,255,255 ]\")), Typesetting:-mrow(Typesetting:-mi(\"\"), Typesetting:-mrow(Type setting:-mo(\"∂\", form = \"prefix\", fence = \"false\", sepa rator = \"false\", lspace = \"0em\", rspace = \"0em\", stretchy = \"fa lse\", symmetric = \"false\", maxsize = \"infinity\", minsize = \"1\", largeop = \"false\", movablelimits = \"false\", accent = \"false\", f ont_style_name = \"2D Comment\", size = \"12\", foreground = \"[0,0,0] \", background = \"[255,255,255]\"), Typesetting:-mi(\"t\")), Typesett ing:-mi(\"\")), linethickness = \"1\", denomalign = \"center\", numali gn = \"center\", bevelled = \"false\", foreground = \"[0,0,0]\", backg round = \"[255,255,255]\"), Typesetting:-mo(\"⁢\", form = \"infix\", fence = \"false\", separator = \"false\", lspace = \"0em \", rspace = \"0em\", stretchy = \"false\", symmetric = \"false\", max size = \"infinity\", minsize = \"1\", largeop = \"false\", movablelimi ts = \"false\", accent = \"false\", font_style_name = \"2D Comment\", \+ size = \"12\", foreground = \"[0,0,0]\", background = \"[255,255,255] \"), Typesetting:-mi(\"omega\")), Typesetting:-mo(\"=\", form = \"infi x\", fence = \"false\", separator = \"false\", lspace = \"thickmathspa ce\", rspace = \"thickmathspace\", stretchy = \"false\", symmetric = \+ \"false\", maxsize = \"infinity\", minsize = \"1\", largeop = \"false \", movablelimits = \"false\", accent = \"false\", font_style_name = \+ \"2D Comment\", size = \"12\", foreground = \"[0,0,0]\", background = \+ \"[255,255,255]\"), Typesetting:-mrow(Typesetting:-mo(\"&uminus0;\", f orm = \"prefix\", fence = \"false\", separator = \"false\", lspace = \+ \"0em\", rspace = \"0em\", stretchy = \"false\", symmetric = \"false\" , maxsize = \"infinity\", minsize = \"1\", largeop = \"false\", movabl elimits = \"false\", accent = \"false\", font_style_name = \"2D Commen t\", size = \"12\", foreground = \"[0,0,0]\", background = \"[255,255, 255]\"), Typesetting:-mfrac(Typesetting:-mrow(Typesetting:-mi(\"g\"), \+ Typesetting:-mo(\"⁢\", form = \"infix\", fence = \"fals e\", separator = \"false\", lspace = \"0em\", rspace = \"0em\", stretc hy = \"false\", symmetric = \"false\", maxsize = \"infinity\", minsize = \"1\", largeop = \"false\", movablelimits = \"false\", accent = \"f alse\", font_style_name = \"2D Comment\", size = \"12\", foreground = \+ \"[0,0,0]\", background = \"[255,255,255]\"), Typesetting:-mrow(Typese tting:-mi(\"sin\"), Typesetting:-mo(\"⁡\", form = \"infi x\", fence = \"false\", separator = \"false\", lspace = \"0em\", rspac e = \"0em\", stretchy = \"false\", symmetric = \"false\", maxsize = \" infinity\", minsize = \"1\", largeop = \"false\", movablelimits = \"fa lse\", accent = \"false\", font_style_name = \"2D Comment\", size = \" 12\", foreground = \"[0,0,0]\", background = \"[255,255,255]\"), Types etting:-mrow(Typesetting:-mo(\"(\", form = \"prefix\", fence = \"true \", separator = \"false\", lspace = \"thinmathspace\", rspace = \"thin mathspace\", stretchy = \"true\", symmetric = \"false\", maxsize = \"i nfinity\", minsize = \"1\", largeop = \"false\", movablelimits = \"fal se\", accent = \"false\", font_style_name = \"2D Comment\", size = \"1 2\", foreground = \"[0,0,0]\", background = \"[255,255,255]\"), Typese tting:-mrow(Typesetting:-mi(\"theta\")), Typesetting:-mo(\")\", form = \"postfix\", fence = \"true\", separator = \"false\", lspace = \"thin mathspace\", rspace = \"verythinmathspace\", stretchy = \"true\", symm etric = \"false\", maxsize = \"infinity\", minsize = \"1\", largeop = \+ \"false\", movablelimits = \"false\", accent = \"false\", font_style_n ame = \"2D Comment\", size = \"12\", foreground = \"[0,0,0]\", backgro und = \"[255,255,255]\")), Typesetting:-mi(\"\")), Typesetting:-mi(\" \")), Typesetting:-mrow(Typesetting:-mi(\"R\")), linethickness = \"1\" , denomalign = \"center\", numalign = \"center\", bevelled = \"false\" , foreground = \"[0,0,0]\", background = \"[255,255,255]\"), Typesetti ng:-mi(\"\")), Typesetting:-mi(\"\")), Typesetting:-mi(\"\"));" "-I%mr owG6#/I+modulenameG6\"I,TypesettingGI(_syslibGF'6%-I#miGF$6#Q!F'-F#6'F +-F#6&F+-I&mfracGF$6*-F#6#-I#moGF$63Q+∂F'/%%formGQ'prefixF'/% &fenceGQ&falseF'/%*separatorGFA/%'lspaceGQ$0emF'/%'rspaceGFF/%)stretch yGFA/%*symmetricGFA/%(maxsizeGQ)infinityF'/%(minsizeGQ\"1F'/%(largeopG FA/%.movablelimitsGFA/%'accentGFA/%0font_style_nameGQ+2D~CommentF'/%%s izeGQ#12F'/%+foregroundGQ([0,0,0]F'/%+backgroundGQ.[255,255,255]F'-F#6 %F+-F#6$F8-F,6#Q\"tF'F+/%.linethicknessGQ\"1F'/%+denomalignGQ'centerF' /%)numalignGF[p/%)bevelledGFAFinF\\o-F963Q1⁢F'/F=Q&infi xF'F?FBFDFGFIFKFMFPFSFUFWFYFfnFinF\\o-F,6#Q&omegaF'-F963Q\"=F'FcpF?FB/ FEQ/thickmathspaceF'/FHF\\qFIFKFMFPFSFUFWFYFfnFinF\\o-F#6%-F963Q*&umin us0;F'FF@FCFEFGFIFLFOFQFSFUFXFenFhn-F\\o6*-F#6% F+-Fao6%F1-Fdo6#Q\"5F'FgoF+-F#6#-Fdo6#Q$120F'F_pFbpFepFgpFenFhnF4-F\\o 6*-F#6%F+-Fao6%F1-Fdo6#Q\"7F'FgoF+-F#6%F+-F#6$F`r-F563Q\"!F'F8F;F>/FAQ 2verythinmathspaceF'/FDF[sFEFGFIFLFOFQFSFUFXFenFhnF+F_pFbpFepFgpFenFhn F+F+" }}{PARA 0 "" 0 "" {TEXT 204 0 "" }}{PARA 0 "" 0 "" {TEXT 204 0 " " }}}}{EXCHG {PARA 0 "" 0 "" {TEXT 204 0 "" }}{PARA 223 "" 0 "" {TEXT 200 27 "We will begin by using sin(" }{XPPEDIT 18 0 "Typesetting:-mrow (Typesetting:-mi(\"theta\"));" "-I%mrowG6#/I+modulenameG6\"I,Typesetti ngGI(_syslibGF'6#-I#miGF$6#Q&thetaF'" }{TEXT 200 30 ") in the differnt ial equation." }}{PARA 0 "" 0 "" {TEXT 204 0 "" }}{PARA 0 "" 0 "" {TEXT 204 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 8 "restart;" } }}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 19 "f1 := (x,y,t) -> y;" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 25 "f2 := (x,y,t) -> -sin(x);" } }}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 27 "x_0 := Pi/50.0; y_0 := 0.0 ;" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 17 "yEst := t -> y_0;" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 17 "xEst := t -> x_0;" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 8 "xEst(1);" }}}{EXCHG {PARA 0 " > " 0 "" {MPLTEXT 1 0 57 "yEstNew := unapply(y_0 + int(f2(xEst(t),yEst (t),t),t),t);" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 57 "xEstNew := unapply (x_0 + int(f1(xEst(t),yEst(t),t),t),t);" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 16 "xEst := xEstNew:" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 16 "yEst := yEstNew:" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 1 ":" }}}{EXCHG {PARA 0 "" 0 "" {TEXT 204 0 "" }}{PARA 224 "" 0 "" {TEXT 200 33 "We no w take an approximation for " }{XPPEDIT 18 0 "Typesetting:-mrow(Typese tting:-mi(\"theta\"));" "-I%mrowG6#/I+modulenameG6\"I,TypesettingGI(_s yslibGF'6#-I#miGF$6#Q&thetaF'" }}{PARA 225 "" 0 "" {TEXT 200 6 "with \+ " }{XPPEDIT 18 0 "Typesetting:-mrow(Typesetting:-mi(\"theta\"));" "-I% mrowG6#/I+modulenameG6\"I,TypesettingGI(_syslibGF'6#-I#miGF$6#Q&thetaF '" }{TEXT 200 6 "(0) = " }{XPPEDIT 18 0 "Typesetting:-mrow(Typesetting :-mi(\"Pi\"));" "-I%mrowG6#/I+modulenameG6\"I,TypesettingGI(_syslibGF' 6#-I#miGF$6#Q#PiF'" }{TEXT 200 4 "/50." }}{PARA 0 "" 0 "" {TEXT 204 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 8 "restart;" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 19 "f1 := (x,y,t) -> y;" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 30 "f2 := (x,y,t) -> -x + x^3/6 ;" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 27 "x_0 := Pi/50.0; y_0 := 0.0;" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 17 "yEst := t -> y_0;" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 17 "xEst := t -> x_0;" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 8 "xEst(1);" }}}{EXCHG {PARA 0 " > " 0 "" {MPLTEXT 1 0 57 "yEstNew := unapply(y_0 + int(f2(xEst(t),yEst (t),t),t),t);" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 57 "xEstNew := unapply (x_0 + int(f1(xEst(t),yEst(t),t),t),t);" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 16 "xEst := xEstNew;" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 16 "yEst := yEstNew;" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 59 "plot([xEst(t),(Pi/50)* cos(t)],t=0..1.5, color= [red,blue]);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 1 ":" }}}{EXCHG {PARA 226 "" 0 "" {TEXT 200 33 "We now ta ke an approximation for " }{XPPEDIT 18 0 "Typesetting:-mrow(Typesettin g:-mi(\"theta\"));" "-I%mrowG6#/I+modulenameG6\"I,TypesettingGI(_sysli bGF'6#-I#miGF$6#Q&thetaF'" }}{PARA 227 "" 0 "" {TEXT 200 6 "with " } {XPPEDIT 18 0 "Typesetting:-mrow(Typesetting:-mi(\"theta\"));" "-I%mro wG6#/I+modulenameG6\"I,TypesettingGI(_syslibGF'6#-I#miGF$6#Q&thetaF'" }{TEXT 200 7 "(0) = n" }{XPPEDIT 18 0 "Typesetting:-mrow(Typesetting:- mi(\"Pi\"));" "-I%mrowG6#/I+modulenameG6\"I,TypesettingGI(_syslibGF'6# -I#miGF$6#Q#PiF'" }{TEXT 200 4 "/50." }}{PARA 0 "" 0 "" {TEXT 204 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 16 "restart; n :=49;" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 13 "Digits := 20;" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 19 "f1 := (x,y,t) -> y;" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 38 "f2 := (x,y,t) -> -x + x^3/6 -x^5/12 0 ;" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 29 "x_0 := n*Pi/50.0; y_ 0 := 0.0;" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 17 "yEst := t -> y _0;" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 17 "xEst := t -> x_0;" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 57 "yEstNew := unapply(y_0 + int (f2(xEst(t),yEst(t),t),t),t);" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 57 "xE stNew := unapply(x_0 + int(f1(xEst(t),yEst(t),t),t),t);" }}{PARA 0 "> \+ " 0 "" {MPLTEXT 1 0 16 "xEst := xEstNew;" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 16 "yEst := yEstNew;" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 87 "plot([ xEst(t),x_0*cos(t)],t=0..20, view=[0.0..3,-2..4], color=[red,blue], th ickness=2);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 1 ":" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 69 "plot([yEst(t),-x_0*sin(t)],t=0..20. 0, color=[red,blue], thickness=2);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 41 "d2 := unapply(diff(diff(xEst(t),t),t),t):" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 37 "errxEst := t -> d2(t) + sin(xEst(t) );" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 28 "evalf((n*Pi/50)*errxE st(0));" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 38 "errHsol := t -> \+ -cos(t) + sin(cos(t));" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 28 "e valf(n*(Pi/50)*errHsol(0));" }}}{EXCHG {PARA 0 "" 0 "" {TEXT 204 0 "" }}{PARA 0 "" 0 "" {TEXT 204 0 "" }}{PARA 228 "" 0 "" {TEXT 200 55 "Let us see how the solution changes as a function of n." }}{PARA 0 "" 0 " " {TEXT 204 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 16 "restart; n :=25;" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 19 "f1 := (x,y,t) - > y;" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 48 "f2 := (x,y,t) -> -x + x^3/6 - x^5/120 + x^7/7! ;" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 27 "x_0 := Pi/50.0; y_0 := 0.0;" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 21 "yEst := (t,v) -> y_0;" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 23 "xEst := (t,v) -> v*x_0;" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 61 "yEstNew := unapply(y_0 + int(f2(xEst(t,n),yEst(t,n),t ),t),t);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 63 "xEstNew := unap ply(n*x_0 + int(f1(xEst(t,n),yEst(t,n),t),t),t);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 16 "xEst := xEstNew;" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 16 "yEst := yEstNew;" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 71 "plot([xEst(t,n),n*x_0*cos(t)],t=0..1.9, color=[red,bl ue], thickness=2);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 1 ":" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 72 "plot([yEst(t,n),-n*x_0*sin(t )],t=0..2.0, color=[red,blue], thickness=2);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 44 "D1 := unapply(diff(diff(xEst(t,v),t),t),t);" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 38 "error1 := t -> D1(t) + sin(x Est(t,n));" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 19 "evalf(error1( 1.8));" }}}{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 }