{VERSION 4 0 "HP RISC UNIX" "4.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 "" 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 1 }0 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "" 0 256 1 {CSTYLE "" -1 -1 "helvetica" 1 24 0 0 0 0 0 0 0 0 0 0 0 0 0 0 } 3 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }} {SECT 0 {EXCHG {PARA 256 "" 0 "" {TEXT -1 33 "Parametrisierungen der K reislinie" }{MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 59 "plot([(t^2-1)/(t^2+1), 2*t/(t^2+1)], t=-3..3, thickness=3);" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 84 "plot([(t^2-1)/(t^2+1), 2*t/( t^2+1), t=-100..100], thickness=3, scaling=constrained);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 247 "with(plots):\ndisplay([plot([cos(t ), sin(t), t=0..2*Pi], color=red, thickness=3),\nseq( plot([[cos(j*Pi/ 4), sin(j*Pi/4)],\n[cos(j*Pi/4)-sin(j*Pi/4)*(Pi/4), sin(j*Pi/4)+cos(j* Pi/4)*(Pi/4)]], color=blue, thickness=3, scaling=CONSTRAINED),\nj = 0. .7\n)]);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 243 "display([plot( [cos(t), sin(t), t=0..2*Pi], color=red, thickness=3),\nseq( plot([[cos (j*Pi/10), sin(j*Pi/10)],\n[cos(j*Pi/10)-sin(j*Pi/10)*(Pi/10), sin(j*P i/10)+cos(j*Pi/10)*(Pi/10)]], color=blue, thickness=3),\nj = 0..19\n)] , scaling=CONSTRAINED);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 243 "display([plot([cos(t), sin(t), t=0..2*Pi], color=red, thickness=3),\n seq( plot([[cos(j*Pi/50), sin(j*Pi/50)],\n[cos(j*Pi/50)-sin(j*Pi/50)*( Pi/50), sin(j*Pi/50)+cos(j*Pi/50)*(Pi/50)]], color=blue, thickness=3), \nj = 0..99\n)], scaling=CONSTRAINED);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 241 "display([plot([cos(t), sin(t), t=0..2*Pi], color=red , thickness=3),\nseq( plot([[(t^2-1)/(t^2+1), 2*t/(t^2+1)],\n[(t^2-1)/ (t^2+1)+4*t/(t^2+1)^2, 2*t/(1+t^2)-2*(t^2-1)/(t^2+1)^2]], color=blue, \+ scaling=constrained, thickness=3),\nt = -10..10\n)]);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 251 "display([plot([cos(t), sin(t), t=0 ..2*Pi], color=red, thickness=3),\nseq( plot([[(t^2/4-1)/(t^2/4+1), t/ (t^2/4+1)],\n[(t^2/4-1)/(t^2/4+1)+t/(t^2/4+1)^2, t/(1+t^2/4)-(t^2/4-1) /(t^2/4+1)^2]], color=blue, scaling=constrained, thickness=3),\nt = -2 0..20\n)]);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}}{MARK " 1 0 0" 0 }{VIEWOPTS 1 1 0 1 1 1803 1 1 1 1 }{PAGENUMBERS 0 1 2 33 1 1 }