{VERSION 5 0 "IBM INTEL LINUX" "5.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 "Times" 1 14 0 
0 0 0 2 2 2 0 0 0 0 0 0 1 }0 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "R
3 Font 0" -1 256 1 {CSTYLE "" -1 -1 "Helvetica" 1 14 0 0 0 0 2 1 2 0 
0 0 0 0 0 1 }0 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "R3 Font 2" -1 
257 1 {CSTYLE "" -1 -1 "Courier" 1 14 0 0 0 0 2 2 2 0 0 0 0 0 0 1 }0 
0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }}
{SECT 0 {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 12 "with(plots):" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 23 "Pt:=z->[Re(z),Im(z),0];" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 111 "ellipse:=r->\n    spacecurv
e(Pt(r*exp(I*t)+1/r*exp(-I*t)),\n    t=0..2*Pi,thickness=2,color=BLACK
,numpoints=200):" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 79 "display
([ellipse(2),ellipse(5)],\n    scaling=CONSTRAINED,orientation=[-90,0]
 );" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 85 "display([seq(ellipse
(1+k*.4),k=0..10)],\n    scaling=CONSTRAINED,orientation=[-90,0]);" }}
}}{MARK "0 0 0" 0 }{VIEWOPTS 1 1 0 1 1 1803 1 1 1 1 }{PAGENUMBERS 0 1 
2 33 1 1 }