{VERSION 6 0 "IBM INTEL NT" "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 }{CSTYLE "2D Math" -1 2 "Times" 0 1 0 0 0 0 0 0 2 0 0 0 0 
0 0 1 }{CSTYLE "2D Output" 2 20 "" 0 1 0 0 255 1 0 0 0 0 0 0 0 0 0 1 }
{PSTYLE "Normal" -1 0 1 {CSTYLE "" -1 -1 "Times" 1 12 0 0 0 1 2 2 2 2 
2 2 1 1 1 1 }1 1 0 0 0 0 1 0 1 0 2 2 0 1 }{PSTYLE "Text Output" -1 2 
1 {CSTYLE "" -1 -1 "Courier" 1 10 0 0 255 1 0 0 0 0 0 1 3 0 3 0 }1 0 
0 -1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "Warning" 2 7 1 {CSTYLE "" -1 -1 
"" 0 1 0 0 255 1 0 0 0 0 0 0 1 0 0 0 }0 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 
}{PSTYLE "Maple Output" -1 11 1 {CSTYLE "" -1 -1 "Times" 1 12 0 0 0 1 
2 2 2 2 2 2 1 1 1 1 }3 3 0 0 0 0 1 0 1 0 2 2 0 1 }{PSTYLE "Maple Outpu
t" -1 12 1 {CSTYLE "" -1 -1 "Times" 1 12 0 0 0 1 2 2 2 2 2 2 1 1 1 1 }
1 3 0 0 0 0 1 0 1 0 2 2 0 1 }{PSTYLE "Maple Plot" -1 13 1 {CSTYLE "" 
-1 -1 "Times" 1 12 0 0 0 1 2 2 2 2 2 2 1 1 1 1 }3 1 0 0 0 0 1 0 1 0 2 
2 0 1 }}
{SECT 0 {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 12 "with(plots);" }}
{PARA 12 "" 1 "" {XPPMATH 20 "6#7en%(animateG%*animate3dG%-animatecurv
eG%&arrowG%-changecoordsG%,complexplotG%.complexplot3dG%*conformalG%,c
onformal3dG%,contourplotG%.contourplot3dG%*coordplotG%,coordplot3dG%,d
ensityplotG%(displayG%-dualaxisplotG%*fieldplotG%,fieldplot3dG%)gradpl
otG%+gradplot3dG%,graphplot3dG%-implicitplotG%/implicitplot3dG%(inequa
lG%,interactiveG%2interactiveparamsG%.intersectplotG%-listcontplotG%/l
istcontplot3dG%0listdensityplotG%)listplotG%+listplot3dG%+loglogplotG%
(logplotG%+matrixplotG%)multipleG%(odeplotG%'paretoG%,plotcompareG%*po
intplotG%,pointplot3dG%*polarplotG%,polygonplotG%.polygonplot3dG%4poly
hedra_supportedG%.polyhedraplotG%*rootlocusG%,semilogplotG%*setcolorsG
%+setoptionsG%-setoptions3dG%+spacecurveG%1sparsematrixplotG%)surfdata
G%)textplotG%+textplot3dG%)tubeplotG" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 252 "f:=t->cos(t);\ng:=t->sin(t);\nh:=t->2-sin(t);\na:=0;
\nb:=2*Pi;\ng1:=animate3d([f(x*t),g(x*t),h(x*t)],x=0..1,y=0..1,t=a..b,
axes=normal,thickness=15,numpoints=500):\ng2:=implicitplot3d([x^2+y^2=
1,y+z=2],x=-1..1,y=-1..1,z=0..3,color=[blue,red]):\ndisplay(g1,g2);" }
}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"fGf*6#%\"tG6\"6$%)operatorG%&arro
wGF(-%$cosG6#9$F(F(F(" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"gGf*6#%\"
tG6\"6$%)operatorG%&arrowGF(-%$sinG6#9$F(F(F(" }}{PARA 11 "" 1 "" 
{XPPMATH 20 "6#>%\"hGf*6#%\"tG6\"6$%)operatorG%&arrowGF(,&\"\"#\"\"\"-
%$sinG6#9$!\"\"F(F(F(" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"aG\"\"!" 
}}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"bG,$*&\"\"#\"\"\"%#PiGF(F(" }}
{PARA 13 "" 1 "" {TEXT -1 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 
0 143 "f:=t->t;\ng:=t->exp(t);\nh:=t->cos(t);\na:=0;\nb:=9;\nanimate3d
([f(x*t),g(x*t),h(x*t)],x=0..1,y=0..1,t=a..b,axes=normal,thickness=15,
numpoints=500);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"fGf*6#%\"tG6\"6
$%)operatorG%&arrowGF(9$F(F(F(" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"
gGf*6#%\"tG6\"6$%)operatorG%&arrowGF(-%$expG6#9$F(F(F(" }}{PARA 11 "" 
1 "" {XPPMATH 20 "6#>%\"hGf*6#%\"tG6\"6$%)operatorG%&arrowGF(-%$cosG6#
9$F(F(F(" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"aG\"\"!" }}{PARA 11 "
" 1 "" {XPPMATH 20 "6#>%\"bG\"\"*" }}{PARA 13 "" 1 "" {TEXT -1 0 "" }}
}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 59 "f:=t->1+t;\ng:=t->sqrt(t);
\ng1:=animatecurve([f(t),g(t),t=0.." }{TEXT -1 0 "" }{MPLTEXT 1 0 86 "
2],axes=normal,thickness=15,numpoints=500):\ng2:=arrow(<2,1>, <1,1/2>)
:\ndisplay(g1,g2);" }}{PARA 7 "" 0 "" {TEXT -1 0 "" }}{PARA 11 "" 1 "
" {XPPMATH 20 "6#>%\"fGf*6#%\"tG6\"6$%)operatorG%&arrowGF(,&9$\"\"\"F.
F.F(F(F(" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"gGf*6#%\"tG6\"6$%)oper
atorG%&arrowGF(-%%sqrtG6#9$F(F(F(" }}{PARA 13 "" 1 "" {TEXT -1 0 "" }}
}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 150 "f:=t->cos(t);\ng:=t->sin(t
);\nh:=t->t;\na:=0;\nb:=10*Pi;\nanimate3d([f(x*t),g(x*t),h(x*t)],x=0..
1,y=0..1,t=a..b,axes=normal,thickness=5,numpoints=10000);\n\n" }}
{PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#
>%\"fGf*6#%\"tG6\"6$%)operatorG%&arrowGF(-%$cosG6#9$F(F(F(" }}{PARA 
11 "" 1 "" {XPPMATH 20 "6#>%\"gGf*6#%\"tG6\"6$%)operatorG%&arrowGF(-%$
sinG6#9$F(F(F(" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"hGf*6#%\"tG6\"6$
%)operatorG%&arrowGF(9$F(F(F(" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"a
G\"\"!" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"bG,$*&\"#5\"\"\"%#PiGF(F
(" }}{PARA 13 "" 1 "" {TEXT -1 0 "" }}}{EXCHG {PARA 13 "" 1 "" {TEXT 
-1 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}}{MARK "7" 0 
}{VIEWOPTS 1 1 0 1 1 1803 1 1 1 1 }{PAGENUMBERS 0 1 2 33 1 1 }