{VERSION 5 0 "IBM INTEL NT" "5.0" } {USTYLETAB {CSTYLE "Maple Input" -1 0 "Courier" 1 12 255 0 0 1 2 1 2 2 1 2 0 0 0 1 }{CSTYLE "Text" -1 200 "Times" 1 12 0 0 0 1 2 2 2 2 2 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 1 0 0 1 }1 1 0 0 0 0 2 0 2 0 2 2 -1 1 }} {SECT 0 {EXCHG {PARA 0 "" 0 "" {TEXT 200 3 "01." }}}{EXCHG {PARA 0 "> \+ " 0 "" {MPLTEXT 1 0 54 "plot(\{Re(I*(log(x+I)-log(x-I))),2*arctan(x)\} ,x=-2..2);" }}}{EXCHG {PARA 0 "" 0 "" {TEXT 200 3 "02." }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 80 "plot(subs(u=(x^3-2*x)/(x^2-1),\{Re( I*(log(u+I)-log(u-I))),2*arctan(u)\}),x=-2..2);" }}}{EXCHG {PARA 0 "" 0 "" {TEXT 200 3 "03." }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 47 "si mp:=evalc(2*arctan(z)-I*(log(z+I)-log(z-I)));" }}}{EXCHG {PARA 0 "" 0 "" {TEXT 200 3 "04." }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 18 "assu me(z>-1,z<1);\n" }{MPLTEXT 1 0 15 "simplify(simp);" }}}{EXCHG {PARA 0 "" 0 "" {TEXT 200 3 "05." }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 8 " z:='z';\n" }{MPLTEXT 1 0 39 "seq(simplify(subs(z=k,simp)),k=-3..3);\n " }{MPLTEXT 1 0 35 "seq(evalf(subs(z=k,simp)),k=-3..3);" }}}}{MARK "1 \+ 0 0" 0 }{VIEWOPTS 1 1 0 1 1 1803 1 1 1 1 }{PAGENUMBERS 0 1 2 33 1 1 }