{VERSION 2 3 "IBM INTEL NT" "2.3" }
{USTYLETAB {CSTYLE "Maple Input" -1 0 "Courier" 0 1 255 0 0 1 0 1 0 0 
1 0 0 0 0 }{CSTYLE "" -1 256 "" 0 1 0 0 0 0 1 0 0 0 0 0 0 0 0 }
{CSTYLE "" -1 257 "" 0 1 0 0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 258 
"" 0 1 0 0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 259 "" 0 1 0 0 0 0 1 
0 0 0 0 0 0 0 0 }{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 -1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "Title
" 0 18 1 {CSTYLE "" -1 -1 "" 1 18 0 0 0 0 0 1 1 0 0 0 0 0 0 }3 0 0 -1 
12 12 0 0 0 0 0 0 19 0 }{PSTYLE "" 0 256 1 {CSTYLE "" -1 -1 "" 0 1 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 }{PSTYLE "" 
0 257 1 {CSTYLE "" -1 -1 "" 0 1 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 18 "" 0 "" {TEXT -1 28 "Animation & Parametric Pl
ots" }}{PARA 256 "" 0 "" {TEXT -1 18 "Original Version: " }{TEXT 256 
16 "Earl C. Swallow " }{TEXT -1 10 "  9/22/98 " }}{PARA 257 "" 0 "" 
{TEXT -1 50 "Revised witrh expanded commentary:  ECS   10/11/99" }}
{PARA 0 "" 0 "" {TEXT -1 0 "" }}{PARA 0 "" 0 "" {TEXT -1 94 "This is w
orksheet simply presents some examples of making parametric plots and \+
animating them." }}{PARA 0 "" 0 "" {TEXT -1 0 "" }}}{EXCHG {PARA 0 "> \+
" 0 "" {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 8 "r
estart;" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}{EXCHG 
{PARA 0 "" 0 "" {TEXT -1 56 "First, simply make a parametric plot of t
he unit circle." }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 49 "plot([si
n(t),cos(t), t=0..1.99*Pi],-1..1, -1..1);" }}}{EXCHG {PARA 0 "> " 0 "
" {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 8 "restar
t;" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 4 "The " }{TEXT 258 11 "with(pl
ots)" }{TEXT -1 59 " command loads expanded plotting facilities, inclu
ding the " }{TEXT 257 7 "animate" }{TEXT -1 9 " command." }}}{EXCHG 
{PARA 0 "> " 0 "" {MPLTEXT 1 0 12 "with(plots);" }}}{EXCHG {PARA 0 "> \+
" 0 "" {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 70 "Now an
imate the unit circle plot so we can see the circle being drawn." }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 99 "animate([sin(u*t),cos(u*t),t
=0..Pi],u=0..2,view=[-1..1,-1..1],frames=50, color=green, thickness=1)
;" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "" 
0 "" {TEXT -1 144 "The following are a lot more examples.  Take a look
 at them, modifying soem of them to change the \"look and feel,\" or t
o explore how they work, " }{TEXT 259 3 "etc" }{TEXT -1 128 ".  Note: \+
you may want to duplicate the original statement so that you can go ba
ck to it if things go wrong in your explorations." }}}{EXCHG {PARA 0 "
> " 0 "" {MPLTEXT 1 0 45 "animate(sin(x*t),x=-10..10,t=1..2,frames=50)
;" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 62 "animate([sin(x*t),x,x=
-4..4],t=1..4,numpoints=100,frames=100);" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 75 "animate([sin(x*t),x,x=-4..4],t=1..4,coords=polar,nump
oints=100,frames=100);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 45 "a
nimate(sin(5*x*t),x=-3..3,t=0..1,view=0..1);" }}}{EXCHG {PARA 0 "> " 
0 "" {MPLTEXT 1 0 66 "animate( [u*sin(t),u*cos(t),t=-Pi..Pi],u=1..8,vi
ew=[-8..8,-8..8]);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 73 "anima
te( [u*t,t,t=1..8*Pi], u=1..4,coords=polar,frames=60,numpoints=100);" 
}}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 49 "animate( \{x-x^3/u,sin(u*
x)\}, x=0..Pi/2,u=1..16 );" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 
60 "animate( \{x-x^3/u,sin(u*x)\}, x=0..Pi/2,u=1..16 ,color= red);" }}
}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 29 "animate(binomial,1..4,1..10
);" }}}{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 "0 0 0" 0 }
{VIEWOPTS 1 1 0 1 1 1803 }