{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 24 "POLAR := coords=polar: " } {TEXT -1 33 "Maple rewrite obviate \"polarplot\"" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 28 "TINTS := colour=[blue,red]: " }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 27 "plot([sin,cos],TRG, TINTS);" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 34 "plot([sin,cos],TRG, TINTS, P OLAR);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 27 "plot([cos,sin,TRG ], TINTS);" }}}}{SECT 0 {PARA 3 "" 0 "" {TEXT -1 43 "Lissajous and Oth er Parametric Curves (3.2)" }}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 15 "S := 2: C := 1:" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 39 "plot ([cos(C*t),sin(S*t),t=TRG], TINTS);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 36 "plot([exp(2*t), exp(2*t), t=-1..1]);" }}}}{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 :=5: " }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 50 "plot(sin(S*t), t=TRG, POLAR, scaling=CONSTRAINED);" }{TEXT -1 2 " " }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 23 "tyee := 1/(3-2*cos(t));" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 47 "plot( tyee, t=TRG, POLAR, scaling=CONSTRAINED);" }}}} {SECT 0 {PARA 3 "" 0 "" {TEXT -1 61 "Fun with Animation (not in our te xt -- 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 86 "[disk([1,2], 1/10, colour=re d), \ndisk([0,5/2], 1/20, colour=cyan),\ndisk([-1,2], 1/7)]:" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 28 "display(%, insequence=true); " }}}{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 "di splay(BLIST, insequence=true);" }}}{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, Parametric, and Polar Plots (New-style Map le)" }}{EXCHG {PARA 0 "" 0 "" {TEXT -1 8 "We have " }}{PARA 0 "" 0 "" {TEXT -1 58 " plot(sin(S*t), TRG, POLAR) ;" }}{PARA 0 "" 0 "" {TEXT -1 18 " above. " }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 31 "S := 3: s := t -> sin(S*t); " }{TEXT -1 11 "r - sin(3t)" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 42 "anima te( 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 41 "c := t -> cos(C*t): \ns := t -> si n(S*t);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 42 "animate( plot, [ [c,s, 0..TTT]] , TTT=TRG);" }}}}{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 assig nment 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 ex ample of the secants approaching the tangent line in the limit defini tion 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 cycloid. 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) \+ Animate 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 w ith 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) So me other animation using Maple -- get your instructor's assent (in ema il) 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 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 " " }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "> \+ " 0 "" {MPLTEXT 1 0 0 "" }}}}{MARK "14" 0 }{VIEWOPTS 1 1 0 1 1 1803 1 1 1 1 }{PAGENUMBERS 0 1 2 33 1 1 }