{VERSION 6 0 "IBM INTEL NT" "6.0" }
{USTYLETAB {CSTYLE "Maple Input" -1 0 "Courier" 0 1 255 0 0 1 0 1 0 2 
1 2 0 0 0 1 }{CSTYLE "2D Output" -1 20 "Times" 0 1 0 0 255 1 0 0 2 2 
2 2 0 0 0 1 }{CSTYLE "_cstyle1" -1 204 "Times" 1 14 0 0 0 1 2 1 2 2 2 
2 0 0 0 1 }{CSTYLE "_cstyle2" -1 205 "Courier" 1 12 255 0 0 1 2 1 2 2 
1 2 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 0 0 0 1 }1 1 0 0 0 0 2 0 2 0 2 2 -1 1 }{PSTYLE "Mapl
e Output" -1 11 1 {CSTYLE "" -1 -1 "Times" 1 12 0 0 0 1 2 2 2 2 2 2 0 
0 0 1 }3 3 0 0 0 0 2 0 2 0 2 2 -1 1 }{PSTYLE "_pstyle1" -1 200 1 
{CSTYLE "" -1 -1 "Times" 1 14 0 0 0 1 2 1 2 2 2 2 1 0 0 1 }1 1 0 0 8 
2 2 0 2 0 2 2 -1 1 }{PSTYLE "_pstyle2" -1 201 1 {CSTYLE "" -1 -1 "Time
s" 1 12 0 0 0 1 2 2 2 2 2 2 1 0 0 1 }1 1 0 0 0 0 2 0 2 0 2 2 -1 1 }
{PSTYLE "_pstyle4" -1 203 1 {CSTYLE "" -1 -1 "" 0 1 0 0 0 0 0 0 0 2 2 
2 0 0 0 1 }0 0 0 -1 -1 -1 1 0 1 0 2 2 -1 1 }}
{SECT 0 {EXCHG {PARA 200 "" 0 "" {TEXT 204 14 "Sitzung S. 271" }}}
{EXCHG {PARA 201 "> " 0 "" {MPLTEXT 1 205 76 "p:= rho->fsolve(arccot(r
ho)=P*Pi/2+argument(EllipticK(exp(I*P*Pi))),P=1e-3):" }{MPLTEXT 1 205 
20 "\nDigits:= 16: p(10);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#$\"1E7Dzz
ePQ!#A" }}}{EXCHG {PARA 201 "> " 0 "" {MPLTEXT 1 205 19 "Digits:= 17: \+
p(10);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#$\"2hA^#zzePQ!#B" }}}{EXCHG 
{PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}{PARA 203 "" 0 "" {TEXT -1 0 "
" }}}{MARK "0 0 0" 14 }{VIEWOPTS 1 1 0 1 1 1803 1 1 1 1 }{PAGENUMBERS 
0 1 2 33 1 1 }