{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 0 }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 0 }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 0 }0 
0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }}
{SECT 0 {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 8 "restart:" }}}{EXCHG 
{PARA 0 "> " 0 "" {MPLTEXT 1 0 18 "read \"mobius.mpl\";" }}}{EXCHG 
{PARA 0 "> " 0 "" {MPLTEXT 1 0 27 "read \"MobiusonCircles.mpl\";" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 15 "print(Hcircle);" }}}{EXCHG 
{PARA 0 "> " 0 "" {MPLTEXT 1 0 25 "interface(verboseproc=2);" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 11 "print(sin);" }}}{EXCHG 
{PARA 0 "> " 0 "" {MPLTEXT 1 0 53 "m:=Matrix([[.96+.03*I,.1+.3*I],[.1+
.3*I,.96+.03*I]]);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 16 "m:=fi
xmatrix(m);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 18 "C0:=Hcircle(
I,.3);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 18 "CircleMap(m^5,C0)
;" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 132 "display( [  seq( \n  \+
    PlotHcircle( CircleMap(m^n, C0) ),\n           n=-15..15 ) ],\n   \+
   scaling=CONSTRAINED,view=[-2..2,-2..2] );" }}}{EXCHG {PARA 0 "> " 
0 "" {MPLTEXT 1 0 16 "c0:=Hcenter(C0);" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 16 "r0:=Hradius(C0);" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 20 "C1:=CircleMap(m,C0):" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 16 "c1:=Hcenter(C1);" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 16 "r1:=Hradius(C1);" }}}}{MARK "0 0 0" 1 }{VIEWOPTS 1 1 
0 1 1 1803 1 1 1 1 }{PAGENUMBERS 0 1 2 33 1 1 }