{VERSION 5 0 "IBM INTEL NT" "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 }{CSTYLE "2D Math" -1 2 "Times" 0 1 0 0 0 0 0 0 2 0 0 0 0 0 0 1 }{CSTYLE "2D Output" 2 20 "" 0 1 0 0 255 1 0 0 0 0 0 0 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 1 1 1 }1 1 0 0 0 0 1 0 1 0 2 2 0 1 }{PSTYLE "Error" -1 8 1 {CSTYLE "" -1 -1 "Courier" 1 10 255 0 255 1 2 2 2 2 2 1 1 1 3 1 }1 1 0 0 0 0 1 0 1 0 2 2 0 1 }{PSTYLE "Maple Output" -1 11 1 {CSTYLE "" -1 -1 "Times" 1 12 0 0 0 1 2 2 2 2 2 2 1 1 1 1 }3 3 0 0 0 0 1 0 1 0 2 2 0 1 }{PSTYLE "Maple Plot" -1 13 1 {CSTYLE "" -1 -1 "Times" 1 12 0 0 0 1 2 2 2 2 2 2 1 1 1 1 }3 1 0 0 0 0 1 0 1 0 2 2 0 1 }} {SECT 0 {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 22 "f := 1/(2+sin(theta) );" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"fG*&\"\"\"F&,&\"\"#F&-%$sinG 6#%&thetaGF&!\"\"" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 21 "F := i nt( f, theta );" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"FG,$*&-%%sqrtG6 #\"\"$\"\"\"-%'arctanG6#,$*&,&-%$tanG6#,$%&thetaG#F+\"\"#F8F+F+F+F'F+# F+F*F+#F8F*" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 25 "plot( F, the ta=-10..10 );" }}{PARA 13 "" 1 "" {GLPLOT2D 280 210 210 {PLOTDATA 2 "6 %-%'CURVESG6$7hq7$$!#5\"\"!$\"3GV%))[Wc-c\"!#<7$$!3cKLLe%G?y*F-$\"3o!y w8z?$\\;F-7$$!3!pmmm\"p0k&*F-$\"3Ev1c#>uku\"F-7$$!39+vV[Hk;&*F-$\"3c>C 'z%)*))oj(z\"F-7$$!35\\P4'*>_X%*F-$\"3;\\K)\\w![.=F-7$$!3&yXOS]oOV*F-$\" 3P1JdVRO4=F-7$$!3gm\"z>,:=U*F-$!3W)or8z;B\"=F-7$$!35%eky-3\")R*F-$!3b \\n4%pu.!=F-7$$!3#)***\\P/,WP*F-$!3KtBm;$)G)y\"F-7$$!3Im;H2Jdz#*F-$!3? D(*)ylJ%Q7$$!3k++]P8#\\4(F-$\"39`Fvx+>\\$*Fbr7$$!3#RLL3FuF)oF-$\"3**=3\\, z70DF]q7$$!3Kmm;/siqmF-$\"3=-o\"RM;g*QF]q7$$!3Q****\\(y$pZiF-$\"3!o)*) Gj%**=A'F]q7$$!3jKLL$yaE\"eF-$\"3Gu'R!e>Zi\")F]q7$$!3s%HaF-$\"3 fT*QK))e;j*F]q7$$!3]******\\$*4)*\\F-$\"3l>!G!>\"HN6\"F-7$$!3o******\\ _&\\c%F-$\"3!Gl:Uc.%e7F-7$$!3%)******\\1aZTF-$\"3q_tkOL(3S\"F-7$$!3Imm ;/#)[oPF-$\"3;mCI@R6S:F-7$$!3i***\\P>BJa$F-$\"3*y@?`JR1j\"F-7$$!3%HLLL =exJ$F-$\"3+_c([Rt$H$F-$\"37YO0_Mx&y\"F-7$$!3sKLe*)Gdu JF-$\"3+.ty>PW(z\"F-7$$!3iK3x\"ySE;$F-$\"3d*o-1HIL!=F-7$$!3aK$eRn32:$F -$\"3c^&\\-r^#4=F-7$$!3XKe9mlxQJF-$!3aDyGG.R7=F-7$$!3!GLL$eW%o7$F-$!3b H>/WzR1=F-7$$!3]KL$ef(QJIF-$!3e#GA=>Arv\"F-7$$!3lKLLL2$f$HF-$!30m<.'[5 `q\"F-7$$!3CmmT&o_Qr#F-$!3%*fl0$yqOd\"F-7$$!3%)****\\PYx\"\\#F-$!3g4G$ e[&H#F-$!3KK)H&3MCv7F-7$$!3gLLLL7i)4#F-$!3OD:j/!yf%=\"*F]q7$$!3o)***\\P'psm\"F-$!3a$pDhOR#4 qF]q7$$!3%*)****\\F&*=Y\"F-$!3Y26b!)48f\\F]q7$$!3?****\\74_c7F-$!33f5u 3%fK&HF]q7$$!3PlmT5VBU5F-$!3Mw(R=Hp)[)*Fbr7$$!3M:LL$3x%z#)F]q$\"31XNM` ejr!)Fbr7$$!3gAL$e9d;J'F]q$\"3)pR)R(H\"=$G#F]q7$$!3()HLL3s$QM%F]q$\"3^ n[=!\\?Fg$F]q7$$!3]^omm;zr)*!#?$\"3#)G6x0n^'*fF]q7$$\"3fVLLezw5VF]q$\" 3@A%GeT&[+!)F]q7$$\"3-.++v$Q#\\\")F]q$\"3e2$*)>/K,\\*F]q7$$\"3%\\LL$e \"*[H7F-$\"3)\\0X1%**o%4\"F-7$$\"3=++++dxd;F-$\"3R0n*4*[?Q7F-7$$\"3e++ +D0xw?F-$\"3cM^D;tG!Q\"F-7$$\"35,+]i&p@[#F-$\"3P&*=/\"y,w_\"F-7$$\"3b+ +v=GB2FF-$\"3wOwt7O*ph\"F-7$$\"3++++vgHKHF-$\"3Sh:kb`D96w\"F-7$$\"3jKL$3UDX8$F-$\"3nNRQw>F5=F-7$$\"3#e\"z% \\vkr9$F-$!39RCID%45\"=F-7$$\"3+*\\i!*3/)fJF-$!3sht@P>l/=F-7$$\"3;#3xJ UVC<$F-$!3E\"=$3!y`#)z\"F-7$$\"3yl;HdF3&=$F-$!3Cu!)3VW\"=z\"F-7$$\"3fK 3_D9O5KF-$!3_!*4^r,\")y'G$F-$!3$4jaX/b(Q1!4%H\"F-7$$\"3UKL$eR<*fTF-$!3z/kwwqjJ6F-7$$\"3Qnm\"HiB QP%F-$!3)RMf7-\\%p$*F]q7$$\"3K-++])Hxe%F-$!3sM+;$)zP*G(F]q7$$\"37MLeR* )**)y%F-$!3ih(yr8Y1G&F]q7$$\"3!fmm\"H!o-*\\F-$!3GEC[I@.-LF]q7$$\"3nLL$ 3A_1?&F-$!3LF$z0Q\")=;u8F-7 $$\"3qNLLLbdQ()F-$\"3gFlPcHR<:F-7$$\"33om\"zW?)\\*)F-$\"3Uil![%*[.g\"F -7$$\"3[++]i`1h\"*F-$\"3!z+&QF\"**)*o\"F-7$$\"3#4+]7`f@E*F-$\"3iI\"G2S ?ct\"F-7$$\"3M,+++PDj$*F-$\"3cU[.h2]$y\"F-7$$\"3!>](=Us_)Q*F-$\"37'p([ $HOez\"F-7$$\"3X-]P%y+QT*F-$\"3YQ$*H$yD$3=F-7$$\"3%=voabPkU*F-$!39:ATA #pH\"=F-7$$\"3B,DcEV2R%*F-$!3/,H66bi1=F-7$$\"3i]il(46 " 0 "" {MPLTEXT 1 0 23 "dF := diff( F, theta );" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%#dFG,$*&,&\"\"\"F(*$)-%$tanG6#,$%&thetaG#F(\"\"#F1 F(F(F(,&F(F(*&#F(\"\"$F(),&F+F1F(F(F1F(F(!\"\"#F1F5" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 22 "plot(dF, theta=-5..5);" }}{PARA 13 "" 1 " " {GLPLOT2D 280 210 210 {PLOTDATA 2 "6%-%'CURVESG6$7dp7$$!\"&\"\"!$\"3 c/yW(f1'zL!#=7$$!3Gmm;HU,\"*[!#<$\"3qbR@:m5^LF-7$$!3YLLLe%G?y%F1$\"3#y ,(=w'GgL$F-7$$!3!***\\(=_+so%F1$\"30(*>))GeoLLF-7$$!3OmmT&esBf%F1$\"3x .4LH^MTLF-7$$!3O**\\7`'Gd[%F1$\"3Ir;N[t*>O$F-7$$!3ALL$3s%3zVF1$\"3]KY5 7Wi&R$F-7$$!3_LL$e/$QkTF1$\"3Y%>(z[#)Q/NF-7$$!3ommT5=q]RF1$\"3uX%o_;8: n$F-7$$!3ILL3_>f_PF1$\"3SQ9?)\\xa)QF-7$$!3K++vo1YZNF1$\"3+$f,(RaovTF-7 $$!3;LL3-OJNLF1$\"3g)ey(f$z4c%F-7$$!3p***\\P*o%Q7$F1$\"3z^\"fK>fZ/&F-7 $$!3Kmmm\"RFj!HF1$\"3UW=)y*GjfcF-7$$!3[***\\PuJ0\"GF1$\"3Q[irP]JqfF-7$ $!33LL$e4OZr#F1$\"3AFK,Ce@0jF-7$$!3UmmT&)G*og#F1$\"3$Gt+7WI&4nF-7$$!3u *****\\n\\!*\\#F1$\"3FIJJWr%*QrF-7$$!3y******\\Ow!R#F1$\"3c!))[/ik')e( F-7$$!3%)*****\\ixCG#F1$\"3Ee*eE-nn/)F-7$$!35+++vR7y@F1$\"3Qpd#H\\II[) F-7$$!3#******\\KqP2#F1$\"3#\\Vg![t+)*))F-7$$!3am;a8s+z>F1$\"3oZW]hPrS #*F-7$$!39LL3-TC%)=F1$\"3Re$Gtb)RN&*F-7$$!3#)**\\(ofh:x\"F1$\"3O4KX&[( 4.)*F-7$$!3[mmm\"4z)e;F1$\"3%=2&Q@>Qh**F-7$$!3^m;/w[,N;F1$\"3!*epWx$H% z**F-7$$!3bmmTg1:6;F1$\"3M^4Jm`'=***F-7$$!3Om;zWkG(e\"F1$\"3agXn&fS')* **F-7$$!3Smm;HAUj:F1$\"3=W[/A\"G(****F-7$$!3Wm;a8!e&R:F1$\"3-0iv9O7&** *F-7$$!3Dmm\"zz$p::F1$\"3ea'*[)RX[)**F-7$$!3Gm;H#eH=\\\"F1$\"39ba^tU$* o**F-7$$!3Mmmmm`'zY\"F1$\"37s[%p6`u%**F-7$$!37L$3FMEpN\"F1$\"3_Q&)f`OC x(*F-7$$!3#****\\(=t)eC\"F1$\"3OPW.>3\"G]*F-7$$!3OL$3x'*)fZ6F1$\"39S') *frA$*=*F-7$$!3!ommmh5$\\5F1$\"37^,\"pf[n#))F-7$$!3tIL3xrs9%*F-$\"3]*R 0RpfAR)F-7$$!3S$***\\(=[jL)F-$\"3i\"zcAK**)QzF-7$$!3q%****\\Pw%4tF-$\" 3!**e]>i:^](F-7$$!3)f***\\iXg#G'F-$\"3)ou8=XS33(F-7$$!3$oK$3_:<6_F-$\" 3-Wa\"yv@rl'F-7$$!3ndmmT&Q(RTF-$\"3YeFa&3/)eiF-7$$!3Ihm\"HdGe:$F-$\"3Z X=j6wX=fF-7$$!3%\\mmTg=><#F-$\"3;E%[;)Qx.cF-7$$!3g***\\7yQ16\"F-$\"3mZ Ys3eM$H&F-7$$!3vDMLLe*e$\\!#?$\"3[H&3%=-P7]F-7$$\"3!=nm\"zRQb@F-$\"3YF CWA,(p^%F-7$$\"3_,+](=>Y2%F-$\"3I$er'pW8tTF-7$$\"3summ\"zXu9'F-$\"3G$) H\\Yy&3)QF-7$$\"3#4+++]y))G)F-$\"3s#Hy/j%R`OF-7$$\"3H++]i_QQ5F1$\"3gCU /zfc%\\$F-7$$\"3b++D\"y%3T7F1$\"3qT$zNpwUR$F-7$$\"3G+]P4kh`8F1$\"3_%4& >X/kfLF-7$$\"3+++]P![hY\"F1$\"3wH&)[BHURLF-7$$\"3KmmT5FEn:F1$\"3/yUDq- MLLF-7$$\"3iKLL$Qx$o;F1$\"3dr'4rcF'QLF-7$$\"3cmm;z)Qjx\"F1$\"3G1eF\\q) oN$F-7$$\"3Y+++v.I%)=F1$\"3-haMhYQ)Q$F-7$$\"3?mm\"zpe*z?F1$\"3im(y^s' \\![$F-7$$\"3;,++D\\'QH#F1$\"3))*o6x9cmj$F-7$$\"3%HL$e9S8&\\#F1$\"3R/ \\Ss3mUQF-7$$\"3s++D1#=bq#F1$\"3v+[HFP;GTF-7$$\"3\"HLL$3s?6HF1$\"3[([! zI(>w[%F-7$$\"3a***\\7`Wl7$F1$\"3197[O?mi\\F-7$$\"3cL$e*[ACIKF1$\"3zQV ^b`eJ_F-7$$\"3enmmm*RRL$F1$\"3$>0`/Z:%GbF-7$$\"3wnmTge)*RMF1$\"3?n&\\% zChheF-7$$\"3%zmmTvJga$F1$\"3_i\"**pSCZA'F-7$$\"3A,]PM&*>^OF1$\"3?Z[g* 3JIh'F-7$$\"3]MLe9tOcPF1$\"3)eO^.B$HEqF-7$$\"3yn;H#e0I&QF1$\"3!Q@iDRzL U(F-7$$\"31,++]Qk\\RF1$\"3$4>41a)\\IyF-7$$\"3%zm;/@-/1%F1$\"3'48)p')y# zH)F-7$$\"3![LL3dg6<%F1$\"3Cw*GLr\"\\\\()F-7$$\"3K,+voTAqUF1$\"3w&45H[ ^E7*F-7$$\"3%ymmmw(GpVF1$\"3G\"4kMke#\\%*F-7$$\"3/M$eRA5\\Z%F1$\"3gG?( 3z.qs*F-7$$\"3C++D\"oK0e%F1$\"3,dCivC%R\"**F-7$$\"3Y+]il(z5j%F1$\"3E?V Kb52n**F-7$$\"3m+++]oi\"o%F1$\"3#R)G7n5F&***F-7$$\"3B,v=#R+pq%F1$\"3!H \"[kz$\\)****F-7$$\"3*3+vV$R`TyU)*F-7$$\"\"&F*$\"3a^/l1#\\ag*F--%'COLOURG6&%$RGBG$\"#5! \"\"$F*F*Fdgl-%+AXESLABELSG6$Q&theta6\"Q!Figl-%%VIEWG6$;F(Fifl%(DEFAUL TG" 1 2 0 1 10 0 2 9 1 4 2 1.000000 45.000000 45.000000 0 0 "Curve 1" }}}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 17 "combine(dF,trig);" }} {PARA 11 "" 1 "" {XPPMATH 20 "6#*&,&\"\"\"F%*$)-%$tanG6#,$%&thetaG#F% \"\"#F.F%F%F%,(F.F%*&F.F%F'F%F%*&F.F%F(F%F%!\"\"" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 18 "convert(%,sincos);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#*&,&\"\"\"F%*&,&F%F%-%$cosG6#%&thetaG!\"\"\"\"#-%$sinGF *!\"#F%F%,(F-F%*(F-F%F'F-F.F0F%*(F-F%F'F%F.F,F%F," }}}{EXCHG {PARA 0 " > " 0 "" {MPLTEXT 1 0 12 "simplify(%);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#*&\"\"\"F$,&\"\"#F$-%$sinG6#%&thetaGF$!\"\"" }}}{EXCHG {PARA 0 " > " 0 "" {MPLTEXT 1 0 32 "plot( arctan(tan(x)), x=-5..5 );" }}{PARA 13 "" 1 "" {GLPLOT2D 280 210 210 {PLOTDATA 2 "6%-%'CURVESG6$7ip7$$!\"& \"\"!$\"3Y'ezrI&=$G\"!#<7$$!3Gmm;HU,\"*[F-$\"3;?H,y5<#R\"F-7$$!3YLLLe% G?y%F-$\"3+`i%)[o:,:F-7$$!33](=UZ@$eZF-$\"3RO3'H$Q'[_\"F-7$$!3pmT5!\\9 Yt%F-$\"3y>a2<3d[:F-7$$!3rK\"4VUg:F-7$$!3#*G#=?DMor%F-$\"3ad8;b5Nm:F-7$$!3I$e*)f]24r%F-$!3 '**y*R_[Jp:F-7$$!3/#HKR,a!*p%F-$!3s)\\U.Ohub\"F-7$$!3!***\\(=_+so%F-$! 3e1_GoygX:F-7$$!3:Lek`lyRYF-$!3!)Rg0+R>)\\\"F-7$$!3OmmT&esBf%F-$!3/to# =$*z2X\"F-7$$!3O**\\7`'Gd[%F-$!3,1_`**f8W8F-7$$!3ALL$3s%3zVF-$!3*)RNCn ?\\P7F-7$$!3_LL$e/$QkTF-$!3=SNC#R!zA5F-7$$!3ommT5=q]RF-$!3aM(o#o:4\"4) !#=7$$!3ILL3_>f_PF-$!3x,a$\\)H**4hFhp7$$!3K++vo1YZNF-$!3'42-;:!oeSFhp7 $$!3;LL3-OJNLF-$!3N*RN\\[4s$>Fhp7$$!3p***\\P*o%Q7$F-$\"3Sb$zR)fdu7 $$!3Kmmm\"RFj!HF-$\"3%)o7B>El_BFhp7$$!33LL$e4OZr#F-$\"3)>gkvdl&oUFhp7$ $!3u*****\\n\\!*\\#F-$\"3zMz*eyHaU'Fhp7$$!3%)*****\\ixCG#F-$\"3%\\$z*e G]6f)Fhp7$$!3#******\\KqP2#F-$\"3U$z*eGB#y1\"F-7$$!39LL3-TC%)=F-$\"3'* fk]^&[tD\"F-7$$!3#)**\\(ofh:x\"F-$\"3I$z9n0J+P\"F-7$$!3[mmm\"4z)e;F-$ \"3)o7B>c8F[\"F-7$$!3^m;/w[,N;F-$\"3$o7[vxxl]\"F-7$$!3bmmTg1:6;F-$\"3z EJ<$*>WI:F-7$$!3WmTg_&=#*f\"F-$\"3)oi&)45uBa\"F-7$$!3Om;zWkG(e\"F-$\"3 )p7)z3iIa:F-7$$!3K;a)3R?8e\"F-$\"3-xVqiAFg:F-7$$!3Em\"zpLa`d\"F-$\"31F 1h;$Qic\"F-7$$!3A;H2$G)Qp:F-Fev7$$!3Smm;HAUj:F-Fhv7$$!3Dmm\"zz$p::F-F[ w7$$!3Mmmmm`'zY\"F-F^w7$$!37L$3FMEpN\"F-Faw7$$!3#****\\(=t)eC\"F-Fdw7$ $!3!ommmh5$\\5F-Fgw7$$!3S$***\\(=[jL)FhpFjw7$$!3)f***\\iXg#G'FhpF]x7$$ !3ndmmT&Q(RTFhpF`x7$$!3%\\mmTg=><#FhpFcx7$$!3vDMLLe*e$\\!#?Ffx7$$\"3!= nm\"zRQb@FhpFjx7$$\"3_,+](=>Y2%Fhp$\"3'4++v=>Y2%Fhp7$$\"3summ\"zXu9'Fh pFby7$$\"3#4+++]y))G)FhpFey7$$\"3H++]i_QQ5F-Fhy7$$\"3b++D\"y%3T7F-F[z7 $$\"3G+]P4kh`8F-F^z7$$\"3+++]P![hY\"F-Faz7$$\"3;L$eRP0n^\"F-Fdz7$$\"3K mmT5FEn:F-Fgz7$$\"3!z&RZxBet:F-$!3WNe6w-,o:F-7$$\"3]\\7`W?!*z:F-$!3%Qa e!41ph:F-7$$\"33T&)e6TO:F-7$$\"3Z**\\(o/?yh\"F-$!3(Qz9 ngsP_\"F-7$$\"30mT5:()4V;F-$!3GFc[QR\\)\\\"F-7$$\"3iKLL$Qx$o;F-$!3sgkD q_@t9F-7$$\"3cmm;z)Qjx\"F-$!3yEJUuPDl8F-7$$\"3Y+++v.I%)=F-$!3)Gz*eyAHd 7F-7$$\"3?mm\"zpe*z?F-$!37FJnbRjh5F-7$$\"3;,++D\\'QH#F-$!3u@z*eGxsZ)Fh p7$$\"3%HL$e9S8&\\#F-$!3y-Y1!R'ekkFhp7$$\"3s++D1#=bq#F-$!3/DzRtWugVFhp 7$$\"3\"HLL$3s?6HF-$!3>.Yc_W&QI#Fhp7$$\"3a***\\7`Wl7$F-$!32q$zRB7[]\"F ]r7$$\"3enmmm*RRL$F-$\"3gV(o28tM#>Fhp7$$\"3%zmmTvJga$F-$\"36Z(od+\"RWS Fhp7$$\"3]MLe9tOcPF-$\"3y7a$*4muZhFhp7$$\"31,++]Qk\\RF-$\"3Gx?5k>^!3)F hp7$$\"3![LL3dg6<%F-$\"3YTNCM+a\"F- 7$$\"3%4v$4@OE%p%F-$\"3idR]n4n_:F-7$$\"3B,v=#R+pq%F-$\"3)yq(fQxIl:F-7$ $\"3#fPMxx=Kr%F-$!3a5_WHl'*p:F-7$$\"3h]7Gjr`>ZF-$!3%eL)*Q9[Oc\"F-7$$\" 3JD\"G)[b&es%F-$!39h9Ne(Htb\"F-7$$\"3*3+vV$R " 0 "" {MPLTEXT 1 0 16 "diff(Ei(1,x),x);" } }{PARA 11 "" 1 "" {XPPMATH 20 "6#,$*&-%$expG6#,$%\"xG!\"\"\"\"\"F)F*F* " }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 14 "diff(Ei(x),x);" }} {PARA 11 "" 1 "" {XPPMATH 20 "6#*&-%$expG6#%\"xG\"\"\"F'!\"\"" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 9 "int(%,x);" }}{PARA 11 "" 1 " " {XPPMATH 20 "6#,$-%#EiG6$\"\"\",$%\"xG!\"\"F*" }}}{EXCHG {PARA 0 "> \+ " 0 "" {MPLTEXT 1 0 16 "plot(%,x=-5..5);" }}{PARA 13 "" 1 "" {GLPLOT2D 280 210 210 {PLOTDATA 2 "6%-%'CURVESG6$7G7$$!\"&\"\"!$!+\"f& H[6!#77$$!+e%G?y%!\"*$!+jP9%[\"F-7$$!+'esBf%F1$!+L2vd=F-7$$!+@Z3zVF1$! +Fd7&R#F-7$$!+YIQkTF1$!+j^x)4$F-7$$!+6=q]RF1$!+$f!>7SF-7$$!+_>f_PF1$!+ (oty5&F-7$$!+p1YZNF1$!+Z)))Gd'F-7$$!+-OJNLF1$!+J#)G`&)F-7$$!+%*o%Q7$F1 $!+C!G`6\"!#67$$!+#RFj!HF1$!+avWq9Ffn7$$!+'4OZr#F1$!+g`(=)=Ffn7$$!+v' \\!*\\#F1$!+hTh%\\#Ffn7$$!+DwZ#G#F1$!+`rdFLFfn7$$!+D.xt?F1$!+G+Rt)eC\"F1$!+U^ft9F_q7$$!+<1J\\5F1$!+9s-@?F_q7$$!*>[jL)F1$!+ ,>(R#HF_q7$$!*d/EG'F1$!+hBr%H%F_q7$$!+g:<6_F_q$!+eiW\\`F_q7$$!*bQ(RTF1 $!+&[;_z'F_q7$$!+!eGe:$F_q$!+o$3Xo)F_q7$$!*h=><#F1$!+ySqb6F17$$!++(y7k \"F_q$!+Pa_(Q\"F17$$!+!zQ16\"F_q$!+G()[GF17 $$!++)))**z&Ffn$!+\\\"osK#F17$$!+D!*QtWFfn$!+qn/uDF17$$!+]#*yYJFfn$!+I Rz7HF17$$!+i$*[$[#Ffn$!+(\\rH9$F17$$!+v%*=?=Ffn$!+?L8ZMF17$$!+)e*)o:\" Ffn$!+H]v$*QF17$$!((*e$\\F1$!+3]$*QZF17$%%FAILGF[w-%'COLOURG6&%$RGBG$ \"#5!\"\"$F*F*Fcw-%+AXESLABELSG6$Q\"x6\"Q!Fhw-%%VIEWG6$;F($\"\"&F*%(DE FAULTG" 1 2 0 1 10 0 2 9 1 4 2 1.000000 45.000000 45.000000 0 0 "Curve 1" }}}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 30 "Bah := int( exp(x)/( 1+x), x );" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%$BahG,$*&-%$expG6#!\" \"\"\"\"-%#EiG6$F+,&%\"xGF*F+F*F+F*" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 19 "plot(Bah,x=-1..5 );" }}{PARA 8 "" 1 "" {TEXT -1 26 "P lotting error, empty plot" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 16 "eval(Bah, x=2.);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#*&^$$\"+rD$Q$* *!\"*$\"+aEfTJF'\"\"\"-%$expG6#!\"\"F*" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 23 "plot(Re(Bah),x=-1..5 );" }}{PARA 13 "" 1 "" {GLPLOT2D 280 210 210 {PLOTDATA 2 "6%-%'CURVESG6$7fn7$$!+O.8f**!#5$!+_ &o%4=!\"*7$$!+s1E=**F*$!+Ee'Hb\"F-7$$!+35Rx)*F*$!+IBH-9F-7$$!+W8_O)*F* $!+$pX\\H\"F-7$$!+;?ya(*F*$!+dauU6F-7$$!+)oUIn*F*$!+'oiQ.\"F-7$$!+KSc4 &*F*$!+Svh&y)F*7$$!+v`3Y$*F*$!+K)*RlwF*7$$!+j!G\">!*F*$!+H8f(o\"F*7$$!+i3@/PF*$\"+_DefJ F*7$$!+7$o&F*7$$!)7;)=\"F*$\"+?s ')fpF*7$$\"*k=pD\"F-$\"+$R!zJ#)F*7$$\"*lN?c#F-$\"+b*3*e&*F*7$$\"*U$e6P F-$\"+W0ov5F-7$$\"*&>q0]F-$\"+M=5:7F-7$$\"*DM^I'F-$\"+#>u7O\"F-7$$\"*0 ytb(F-$\"+%)=C4:F-7$$\"*RNXp)F-$\"+'es1l\"F-7$$\"+XDn/5F-$\"+V!>*G=F-7 $$\"+!y?#>6F-$\"+*HB'*)>F-7$$\"+4wY_7F-$\"+pPC*=#F-7$$\"+IOTq8F-$\"+_u oyBF-7$$\"+4\">)*\\\"F-$\"+$yo>g#F-7$$\"+EP/B;F-$\"+m(38$GF-7$$\"+)o:; v\"F-$\"+b0+!4$F-7$$\"+%)[op=F-$\"+5Z$pM$F-7$$\"+i%Qq*>F-$\"+Yc;ZOF-7$ $\"+RIKH@F-$\"+P]@()RF-7$$\"+^rZWAF-$\"+`#y\"4VF-7$$\"+[n%)oBF-$\"+cP( po%F-7$$\"+5FL(\\#F-$\"+9id8^F-7$$\"+e6.BEF-$\"+J-cqbF-7$$\"+p3lWFF-$ \"+_66agF-7$$\"+A))ozGF-$\"+mY.WmF-7$$\"+Ik-,IF-$\"+97&pA(F-7$$\"+D-eI JF-$\"+MSz5zF-7$$\"+>_(zC$F-$\"+p#z6f)F-7$$\"+b*=jP$F-$\"+&*QO3%*F-7$$ \"+4/3(\\$F-$\"+(=xa-\"!\")7$$\"+C4JBOF-$\"+*ytG7\"Fjy7$$\"+DVsYPF-$\" +z/)yA\"Fjy7$$\"+>n#f(QF-$\"+_SM\\8Fjy7$$\"+!)RO+SF-$\"+v6ty9Fjy7$$\"+ _!>w7%F-$\"+Ps1D;Fjy7$$\"+*Q?QD%F-$\"+omx&y\"Fjy7$$\"+5jypVF-$\"+<*\\' [>Fjy7$$\"+Ujp-XF-$\"+yRCb@Fjy7$$\"+gEd@YF-$\"+(f]+O#Fjy7$$\"+4'>$[ZF- $\"+y@j,EFjy7$$\"+6Ejp[F-$\"+m8zdGFjy7$$\"\"&\"\"!$\"+klQjJFjy-%'COLOU RG6&%$RGBG$\"#5!\"\"$Fe]lFe]lF_^l-%+AXESLABELSG6$Q\"x6\"Q!Fd^l-%%VIEWG 6$;$F^^lFe]lFc]l%(DEFAULTG" 1 2 0 1 10 0 2 9 1 4 2 1.000000 45.000000 45.000000 0 0 "Curve 1" }}}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 22 " plot(Im(Bah),x=-1..5);" }}{PARA 13 "" 1 "" {GLPLOT2D 280 210 210 {PLOTDATA 2 "6%-%'CURVESG6$7fn7$$!+O.8f**!#5$\"+]tsb6!\"*7$$!+s1E=**F* F+7$$!+35Rx)*F*F+7$$!+W8_O)*F*F+7$$!+;?ya(*F*F+7$$!+)oUIn*F*F+7$$!+KSc 4&*F*F+7$$!+v`3Y$*F*F+7$$!+j!G\">!*F*F+7$$!+]2<#p)F*F+7$$!+JJ?B\")F*F+ 7$$!+7bBavF*F+7$$!+D$3XF'F*F+7$$!+v#)H')\\F*F+7$$!+i3@/PF*F+7$$!+7q0]F-F+7$$\"*DM^I'F-F+7$$\"*0ytb(F-F+7$$\"*RNXp)F- F+7$$\"+XDn/5F-F+7$$\"+!y?#>6F-F+7$$\"+4wY_7F-F+7$$\"+IOTq8F-F+7$$\"+4 \">)*\\\"F-F+7$$\"+EP/B;F-F+7$$\"+)o:;v\"F-F+7$$\"+%)[op=F-F+7$$\"+i%Q q*>F-F+7$$\"+RIKH@F-F+7$$\"+^rZWAF-F+7$$\"+[n%)oBF-F+7$$\"+5FL(\\#F-F+ 7$$\"+e6.BEF-F+7$$\"+p3lWFF-F+7$$\"+A))ozGF-F+7$$\"+Ik-,IF-F+7$$\"+D-e IJF-F+7$$\"+>_(zC$F-F+7$$\"+b*=jP$F-F+7$$\"+4/3(\\$F-F+7$$\"+C4JBOF-F+ 7$$\"+DVsYPF-F+7$$\"+>n#f(QF-F+7$$\"+!)RO+SF-F+7$$\"+_!>w7%F-F+7$$\"+* Q?QD%F-F+7$$\"+5jypVF-F+7$$\"+Ujp-XF-F+7$$\"+gEd@YF-F+7$$\"+4'>$[ZF-F+ 7$$\"+6Ejp[F-F+7$$\"\"&\"\"!F+-%'COLOURG6&%$RGBG$\"#5!\"\"$FcvFcvF[w-% +AXESLABELSG6$Q\"x6\"Q!F`w-%%VIEWG6$;$FjvFcvFav%(DEFAULTG" 1 2 0 1 10 0 2 9 1 4 2 1.000000 45.000000 45.000000 0 0 "Curve 1" }}}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 22 "plot(Im(Bah),x=-2..0);" }}{PARA 13 "" 1 "" {GLPLOT2D 280 210 210 {PLOTDATA 2 "6%-%'CURVESG6$7hn7$$!\"#\" \"!$F*F*7$$!+#p0k&>!\"*$!\"!F*7$$!+F/F07$$!+Wp\"e(=F/F07$$!+4m(G$ =F/F07$$!+i.9!z\"F/F07$$!+!R=0v\"F/F07$$!+M@\\4s%Ha\"F/F07$$!+N*4)*\\\"F/F07$$!+Db \\c9F/F07$$!+lSv99F/F07$$!+?)[oP\"F/F07$$!+=exJ8F/F07$$!+tIf$H\"F/F07$ $!+ku<\\7F/F07$$!+B@')47F/F07$$!+kpsm6F/F07$$!+\"4_c7\"F/F07$$!+rZz#3 \"F/F07$$!+s$QM/\"F/F07$$!+wF@A5F/F07$$!+zr)4+\"F/F07$$!+Z@4'***!#5$\" +]tsb6F/7$$!+.DJ#)**FgpFhp7$$!+gG`o**FgpFhp7$$!+F* *FgpFhp7$$!+VYj**)*FgpFhp7$$!+qg^W)*FgpFhp7$$!+&\\(R*y*FgpFhp7$$!+[.;z '*FgpFhp7$$!*?B*o&*F/Fhp7$$!+!o**pP*FgpFhp7$$!*;w]=*F/Fhp7$$!*%3^q()F/ Fhp7$$!*ICAM)F/Fhp7$$!*ZHK#zF/Fhp7$$!*WIy^(F/Fhp7$$!*#RqnqF/Fhp7$$!*BX Km'F/Fhp7$$!*D*RJiF/Fhp7$$!*g#3SeF/Fhp7$$!*:qAT&F/Fhp7$$!*(>t4]F/Fhp7$ $!*fj*)e%F/Fhp7$$!*e&exTF/Fhp7$$!*%4\"pu$F/Fhp7$$!*2?@L$F/Fhp7$$!*\\Oz !HF/Fhp7$$!*Pls[#F/Fhp7$$!*I725#F/Fhp7$$!*')ywl\"F/Fhp7$$!*ZC9E\"F/Fhp 7$$!)kM*Q)F/Fhp7$$!)'zbM%F/Fhp7$F+Fhp-%'COLOURG6&%$RGBG$\"#5!\"\"F+F+- %+AXESLABELSG6$Q\"x6\"Q!Ffw-%%VIEWG6$;F(F+%(DEFAULTG" 1 2 0 1 10 0 2 9 1 4 2 1.000000 45.000000 45.000000 0 0 "Curve 1" }}}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 47 "int( exp(I*t)/(1+I*t), t=-infinity..infinit y );" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#,$*&-%$expG6#!\"\"\"\"\"%#PiGF )\"\"#" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 47 "int( exp(I*t)/(a+ I*t), t=-infinity..infinity );" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#\"\" !" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 27 "int( exp(I*t)/(1+I*t), t );" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#*(^#\"\"\"F%-%$expG6#!\"\"F%- %#EiG6$F%,&*&^#F)F%%\"tGF%F%F%F)F%" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 20 "plot(Re(%),t=-5..5);" }}{PARA 13 "" 1 "" {GLPLOT2D 280 210 210 {PLOTDATA 2 "6%-%'CURVESG6$7in7$$!\"&\"\"!$\"+6%Qan&!#67$$ !+e%G?y%!\"*$\"+_(zni\"F-7$$!+'esBf%F1$!+^CVeAF-7$$!+@Z3zVF1$!+kU'>*oF -7$$!+YIQkTF1$!+Ou$p;\"!#57$$!+6=q]RF1$!+06PM;FC7$$!+_>f_PF1$!+vVlU?FC 7$$!+p1YZNF1$!+6XX@CFC7$$!+-OJNLF1$!+Q]HYFFC7$$!+%*o%Q7$F1$!+!*zG#)HFC 7$$!+#RFj!HF1$!+y\\K8JFC7$$!+'4OZr#F1$!+C#e(>JFC7$$!+v'\\!*\\#F1$!+!Q \"o*)HFC7$$!+DwZ#G#F1$!+<=(*)p#FC7$$!+D.xt?F1$!+6z6cAFC7$$!+.TC%)=F1$! +Usv3t)eC \"F1$\"+>hP,7FC7$$!+<1J\\5F1$\"+mMfPCFC7$$!*>[jL)F1$\"+*)yr!)RFC7$$!*d /EG'F1$\"+=D:IcFC7$$!*bQ(RTF1$\"+#pCw_(FC7$$!+!eGe:$FC$\"++Bj^%)FC7$$! *h=><#F1$\"+7(z?S*FC7$$!+!zQ16\"FC$\"+Y0*[/\"F17$$!((*e$\\F1$\"+t9z]6F 17$$\"+!pCR&>!#7$!+EMx`6F17$$\"+!QYP%))F`t$!+>P)o9\"F17$$\"+2oNt:F-$!+ JW**R6F17$$\"+v*QBE#F-$!+!*e5L6F17$$\"+8LISOF-$!+_BL>6F17$$\"+]wE=]F-$ !+7dc06F17$$\"+Dj>uxF-$!+%[j!y5F17$$\"++D,`5FC$!+R(>10\"F17$$\"+N#)>/; FC$!+Pv()f**FC7$$\"*(RQb@F1$!+=.C=%*FC7$$\"+v:+:JFC$!+Pue!\\)FC7$$\"*= >Y2%F1$!+wz%ye(FC7$$\"*yXu9'F1$!+b7qWdFC7$$\"*\\y))G)F1$!+;l(o,%FC7$$ \"+i_QQ5F1$!+_*f5^#FC7$$\"+!y%3T7F1$!+$R['H7FC7$$\"+O![hY\"F1$!+&HGl&z F_q7$$\"+#Qx$o;F1$\"+!)397\"*F-7$$\"+u.I%)=F1$\"+i2%*3 " 0 " " {MPLTEXT 1 0 37 "int(exp(I*t)/(1+I*t),t=-infinity..0);" }}{PARA 11 " " 1 "" {XPPMATH 20 "6#*(^#\"\"\"F%-%#EiG6$F%!\"\"F%-%$expG6#F)F%" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 36 "int(exp(I*t)/(1+I*t),t=0..in finity);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#,&*(^#!\"\"\"\"\"-%$expG6# F&F'-%#EiG6$F'F&F'F'*(\"\"#F'F(F'%#PiGF'F'" }}}{EXCHG {PARA 0 "> " 0 " " {MPLTEXT 1 0 16 "evalf(Ei(1,-1));" }}{PARA 11 "" 1 "" {XPPMATH 20 "6 #^$$!+;y6&*=!\"*$!+aEfTJF&" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 21 "evalf(Ei(1,-1-0.*I));" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#^$$!+;y6& *=!\"*$\"+aEfTJF&" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 21 "evalf( Ei(1,-1+0.*I));" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#^$$!+;y6&*=!\"*$!+a EfTJF&" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}}{MARK "28 0 \+ 0" 0 }{VIEWOPTS 1 1 0 1 1 1803 1 1 1 1 }{PAGENUMBERS 0 1 2 33 1 1 }