{VERSION 6 0 "IBM INTEL LINUX" "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 }{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 "Heading 1" 0 3 1 {CSTYLE "" -1 -1 "" 1 18 0 0 0 0 0 1 0 0 0 0 0 0 0 0 }1 0 0 0 8 4 0 0 0 0 0 0 -1 0 }} {SECT 0 {EXCHG {PARA 0 "" 0 "" {TEXT -1 44 "ForShowA20.mws\nThu Oct 20 08:18:16 MDT 2005\n" }}}{SECT 0 {PARA 3 "" 0 "" {TEXT -1 12 "Housekee ping" }}{PARA 0 "" 0 "" {TEXT -1 0 "" }}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 67 "restart:\nwith(plots,animate,display):\nwith(plottool s, disk, arrow):" }}}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 64 "############ ####################################################" }}}{SECT 0 {PARA 3 "" 0 "" {TEXT -1 39 "Three Ways to Plot the Sine and Cosine " }}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 16 "TRG := 0..2*Pi: " }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 28 "TINTS := colour=[blue,red]: \+ " }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 24 "POLAR := coords=polar: \+ " }{TEXT -1 16 "A Maple redesign" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 29 "plot([sin,cos],TRG, TINTS); " }{TEXT -1 9 "Cartesian " }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 42 "plot([sin,cos],TRG, TIN TS, POLAR); #Polar" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 29 "plot ([sin,cos,TRG], TINTS); " }{TEXT -1 15 "Parametric Plot" }}}}{SECT 0 {PARA 3 "" 0 "" {TEXT -1 43 "Lissajous and Other Parametric Curves (3. 2)" }}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 15 "S := 5: C := 3:" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 48 "s := t -> sin(S*t): c := th eta -> cos(C*theta):" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }} }{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 23 "plot([c,s,TRG], TINTS);" }} }{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 11 "s(t), c(t);" }}}}{SECT 0 {PARA 3 "" 0 "" {TEXT -1 44 "Fun with Polar Plots (3.4 - a Maple rewri te)" }}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 10 "S :=2: " }{TEXT -1 8 "sin(3t);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 41 "plot(s, T RG, POLAR, scaling=constrained);" }{TEXT -1 17 " r = sin(3t);" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 57 "plot( 1/(3-2*cos(t)), t=TRG, POLAR, scaling=constrained);" }}}}{SECT 0 {PARA 3 "" 0 "" {TEXT -1 61 "Fun with Animation (not in our text -- another Maple rewrite)" }} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}{SECT 0 {PARA 3 "" 0 "" {TEXT -1 15 "Animating Blobs" }}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 " > " 0 "" {MPLTEXT 1 0 14 "f := t -> t^2:" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 49 "BLIST := [ seq( disk([k, f(k)], 1/2), k=0..25) ]:" }} }{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 32 "display(BLIST, insequence=t rue);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}{SECT 0 {PARA 3 "" 0 "" {TEXT -1 66 "Animating Cartesian, Pa rametric, and Polar Plots (New-style Maple)" }}{EXCHG {PARA 0 "" 0 "" {TEXT -1 8 "We have " }}{PARA 0 "" 0 "" {TEXT -1 51 " \+ plot(s, TRG, POLAR);" }}{PARA 0 "" 0 "" {TEXT -1 18 " a bove. " }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 42 "animate( plot, [s, 0..TT, POLAR], TT=TRG);" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 13 "Above we have" }}{PARA 0 "" 0 "" {TEXT -1 0 "" }}{PARA 0 "" 0 " " {TEXT -1 27 " plot([c,s,TRG], TINTS);" }}{PARA 0 "" 0 "" {TEXT -1 0 "" }}{PARA 0 "" 0 "" {TEXT -1 16 "which we redo as" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 16 "C := 3: S := 2:" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 54 "animate( plot, [[c,s, 0..TTT]] , TTT=TRG, frames=100);" }}}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}} {SECT 0 {PARA 3 "" 0 "" {TEXT -1 13 "Assignment #8" }}{EXCHG {PARA 0 " " 0 "" {TEXT -1 0 "" }}{PARA 0 "" 0 "" {TEXT -1 66 "The assignment is \+ to animate something. Choose from among these:" }}{PARA 0 "" 0 "" {TEXT -1 0 "" }}{PARA 0 "" 0 "" {TEXT -1 37 "######################### ############" }}{PARA 0 "" 0 "" {TEXT -1 110 "(i) Animate an example o f the secants approaching the tangent line in the limit definition of the derivative." }}{PARA 0 "" 0 "" {TEXT -1 0 "" }}{PARA 0 "" 0 "" {TEXT -1 41 "#########################################" }}{PARA 0 "" 0 "" {TEXT -1 106 "(ii) Animate a Newton's Method example showing the \+ x-intercepts of the tangent lines approaching the zero." }}{PARA 0 "" 0 "" {TEXT -1 0 "" }}{PARA 0 "" 0 "" {TEXT -1 38 "#################### ##################" }}{PARA 0 "" 0 "" {TEXT -1 70 "(iii) Animate the c ycloid. Go to page 202 and read about the cycloid." }}{PARA 0 "" 0 " " {TEXT -1 0 "" }}{PARA 0 "" 0 "" {TEXT -1 19 "(A) Do problem 1(b)" }} {PARA 0 "" 0 "" {TEXT -1 0 "" }}{PARA 0 "" 0 "" {TEXT -1 41 "(B) Anima te the plot you did in part (A)." }}{PARA 0 "" 0 "" {TEXT -1 0 "" }} {PARA 0 "" 0 "" {TEXT -1 103 "(C) Add to the animation the wheel with \+ the peripheral blob roling with the blob following the cycloid." }} {PARA 0 "" 0 "" {TEXT -1 0 "" }}{PARA 0 "" 0 "" {TEXT -1 38 "######### #############################" }}{PARA 0 "" 0 "" {TEXT -1 99 "(iv) Som e other animation using Maple -- get your instructor's assent (in emai l) before you launch." }}{PARA 0 "" 0 "" {TEXT -1 1 " " }}{PARA 0 "" 0 "" {TEXT -1 0 "" }}{PARA 0 "" 0 "" {TEXT -1 0 "" }}{PARA 0 "" 0 "" {TEXT -1 0 "" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 23 "Google: \"animate Maple\"" }}{PARA 0 "" 0 "" {TEXT -1 0 "" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 43 " In-class quiz at start of class, 10/27/05." }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 55 "##################################################### ##" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}}{MARK "11" 0 }{VIEWOPTS 1 1 0 2 1 1805 1 1 1 1 }{PAGENUMBERS 0 1 2 33 1 1 }