{VERSION 3 0 "SUN SPARC SOLARIS" "3.0" }
{USTYLETAB {CSTYLE "Maple Input" -1 0 "Courier" 0 1 255 0 0 1 0 1 0 0 
1 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 }}
{SECT 0 {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 66 "#animation. First a \+
simple example: After executing the next line " }}}{EXCHG {PARA 0 "> \+
" 0 "" {MPLTEXT 1 0 70 "#select the graphics and look at the menu bar.
 There should be either " }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 74 
"#animation window or tape/cd play controls or both. Select continous \+
mode " }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 52 "#and start and wat
ch it for a while. Stop with stop." }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 38 "animate(sin(x+t),x=0..4*Pi,t=0..2*Pi);" }}}{EXCHG 
{PARA 0 "> " 0 "" {MPLTEXT 1 0 74 "#it didn't work, did it? Since mapl
e spit your command back into your face" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 75 "#there is something it does not understand. You forgo
t to load the command." }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 77 "#
The \"with\" command is used to load other commands, the help on anima
te shows" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 43 "#That the plots
, package is what is needed." }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 
0 12 "with(plots);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 70 "#now \+
go back to animate line and re-execute it. This points out a very" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 69 "#odd feature of Maple (and s
imilar software.) There are two programs " }}}{EXCHG {PARA 0 "> " 0 "
" {MPLTEXT 1 0 78 "# running with Maple, the thing (this gui) that you
 see and the thing (kernel)" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 
73 "# that is doing the calculations. Note how they have gotten out of
 synch." }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 1 "#" }}}{EXCHG 
{PARA 0 "> " 0 "" {MPLTEXT 1 0 1 "#" }}}{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 18 "# multple pictures" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 42 "a:=plot(sin(1/x),x=1/(4*Pi)..1,color=red):" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 50 "b:=plot(sin(1/x),x=1/(8*Pi).
.1/(4*Pi),color=blue):" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 52 "c
:=plot(sin(1/x),x=1/(16*Pi)..1/(8*Pi),color=green):" }}}{EXCHG {PARA 
0 "> " 0 "" {MPLTEXT 1 0 35 "display([a,b,c]);# show all at once" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 55 "display([a,b,c],insequence=t
rue);#make it an animation " }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 
1 "#" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 1 "#" }}}{EXCHG {PARA 
0 "> " 0 "" {MPLTEXT 1 0 2 "# " }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 
1 0 101 "f:=x->x^2:g:=(x,t)->2*t*(x-t)+t^2:a:=seq(plot([f(x),g(x,t/2)]
,x=-5..5,color=[blue,green]),t=-10..10):" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 30 "display([a]);#show all at once" }}}{EXCHG {PARA 0 "> \+
" 0 "" {MPLTEXT 1 0 40 "display([a],insequence=true);#animate it" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 1 "#" }}}{EXCHG {PARA 0 "> " 0 "
" {MPLTEXT 1 0 1 "#" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 16 "with
(plottools):" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 65 "c:=seq(poin
t([t/2,f(t/2)],.1,color=red,symbol=circle),t=-10..10):" }}}{EXCHG 
{PARA 0 "> " 0 "" {MPLTEXT 1 0 13 "display([c]);" }}}{EXCHG {PARA 0 ">
 " 0 "" {MPLTEXT 1 0 40 "display([c],insequence=true);# animation" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 92 "display(seq([a[i],c[i]],i=1.
.21),insequence=true);#Still not quite right it flashes between " }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 27 "# the graph and the circles
" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 53 "for i from 1 to 21 do\n
P[i]:=display([a[i],c[i]]);\nod:" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "
" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 27 "display(seq(P[i],i=1..2
1));" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 51 "display(seq(P[i],i=
1..21),insequence=true);#finally" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 0 "" }}}}{MARK "41 0 0" 51 }{VIEWOPTS 1 1 0 1 1 1803 }