{VERSION 5 0 "SUN SPARC SOLARIS" "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 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 "Text \+ Output" -1 2 1 {CSTYLE "" -1 -1 "Courier" 1 10 0 0 255 1 0 0 0 0 0 1 3 0 3 0 }1 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "Warning" 2 7 1 {CSTYLE "" -1 -1 "" 0 1 0 0 255 1 0 0 0 0 0 0 1 0 0 0 }0 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }{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 12 "with(plots):" }} {PARA 7 "" 1 "" {TEXT -1 50 "Warning, the name changecoords has been r edefined\n" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 75 "ps1:=plot(sin (x),x=-Pi/2..Pi/2,color=blue,thickness=2,scaling=constrained):" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 71 "ps2:=plot(arcsin(x),x=-1..1, color=red,thickness=2,scaling=constrained):" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 39 "ps3:=plot(x,x=-1.38..1.38,color=green):" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 43 "ps4:=textplot([1,0.6,`sin(x) `],color=blue):" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 47 "ps5:=tex tplot([0.5,1.4,`arcsin(x)`],color=red):" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 31 "display([ps1,ps2,ps3,ps4,ps5]);" }}{PARA 13 "" 1 "" {GLPLOT2D 400 300 300 {PLOTDATA 2 "6*-%'CURVESG6%7S7$$!3*****\\OK'zq:! #<$!\"\"\"\"!7$$!3WNzQW&=B]\"F*$!3b_D4FJcw**!#=7$$!3.42![ROFW\"F*$!3U3 C*F37$$!3,%4``jnW6\"F*$!3&>>2jDjn(*)F37$$!3(yYu)o'>y/\"F*$!3: GB9]HOj')F37$$!3EWfpKW&Q\")*F3$!3-)*GLjHo7$)F37$$!3'fe1Vw'\\I\"*F3$!3' yIzL\"zr8zF37$$!333*H!e\\fG&)F3$!3/i'G5]X;`(F37$$!35`u@%3'*4&yF3$!3#)* *zF%Rc*oqF37$$!3$ewEV#\\hqrF3$!3BPT#\\TEfF3$!3E(yNitD)zbF37$$!3!=qRrNA:@&F3$!3&[fQ.S(zy\\ F37$$!3Y[5T-#\\F3$!3z::j*R[4'>F37$$!3)*RWU;s`+8F3$!3Y97m2T(oH\"F37$$!3-g SQ$!3%p\"pQ+-*z\"oFjr7$$!3y]Py0ul]:!#?$!3W[zM%yc1b\"F`s7$$\"3N =#e5YQ8x'Fjr$\"3w$p_/5lhw'Fjr7$$\"3H^(**zOz+G\"F3$\"3z4c_Fjew7F37$$\"3 cNv()\\qFJ>F3$\"3-&4Sv&QH>>F37$$\"3y0j*\\(z-/EF3$\"3zoO$\\!zpuDF37$$\" 3_\"oMd]$=iKF3$\"3!4\"))*Q>JY?$F37$$\"3SH4XBG)*)*QF3$\"3>l%fdLV4!QF37$ $\"3=DLY%*)Rgg%F3$\"3%[Dw?K#*[W%F37$$\"3U6;S?@OT_F3$\"3\"*eoz8Ol/]F37$ $\"3KMYS.Uq>fF3$\"3T?'z@Ws*zbF37$$\"3g!oi?&HQMlF3$\"3Y(GhB%**>zgF37$$ \"3Jr$zA=*Q1sF3$\"3!ogrtz[')f'F37$$\"3gHJCuYpQyF3$\"3U]!e4/]-1(F37$$\" 3)fG\"*Q5O'*\\)F3$\"3HM,8\")Qc7vF37$$\"3\"=wm/;Fe9*F3$\"3=!)Qd?13BzF37 $$\"37E5$3JHB#)*F3$\"3G\"fd*>4R<$)F37$$\"31h>eG\")QZ5F*$\"3))[j\\nn?h' )F37$$\"3OK#)fG(=S6\"F*$\"3_3O')>Uyu*)F37$$\"320`g$f(4!=\"F*$\"3o5rJQ= VY#*F37$$\"3%oOhy?<3C\"F*$\"34a:'o4\"\\g%*F37$$\"3XnP+Q(3/J\"F*$\"3!ow '3SE!Hm*F37$$\"3/%yp@B_EP\"F*$\"3MurX7gL/)*F37$$\"3cNK@zn,R9F*$\"3?l,y OjH8**F37$$\"3*p@f'=h`-:F*$\"3m4edk+&p'z.6*F37$$!3\"ommT!R=0vF3$!3$HY QDgh%)[)F37$$!3u****\\P8#\\4(F3$!3%G]K(pFx()yF37$$!3*pmmT?F1n'F3$!3$=1 aWW\"f-tF37$$!3[++](y$pZiF3$!3kKXCi8O[nF37$$!33LLL$yaE\"eF3$!3;YGXl,$G ?'F37$$!3hmmm\">s%HaF3$!3qLMyArURdF37$$!3Q+++]$*4)*\\F3$!3?TNT8KzL_F37 $$!38+++]_&\\c%F3$!3]1LORP_SZF37$$!30+++]1aZTF3$!3pV!=M3DnF%F37$$!3umm ;/#)[oPF3$!3!)[U0,%>R'QF37$$!3hLLL$=exJ$F3$!3vsBLnR&=Q$F37$$!3)RLLLtIf $HF3$!3X!4?s(R$)zHF37$$!3]++]PYx\"\\#F3$!3_ek+k$3$=DF37$$!3EMLLL7i)4#F 3$!3=VL[1%RV6#F37$$!3c****\\P'psm\"F3$!3D#='R>B4v;F37$$!3')****\\74_c7 F3$!3J57JY5&)f7F37$$!3)3LLL3x%z#)Fjr$!3zwH6\\c'*)G)Fjr7$$!3KMLL3s$QM%F jr$!3I\\dHGW?XVFjr7$$!3\\^omm;zr)*!#@$!3'4T[+F$zr)*Fccl7$$\"3%pJL$ezw5 VFjr$\"3Jk9gsT57VFjr7$$\"3s*)***\\PQ#\\\")Fjr$\"3w7G%yH&Ge\")Fjr7$$\"3 GKLLe\"*[H7F3$\"3#z,DK+3EB\"F37$$\"3H*******pvxl\"F3$\"3`X*y?Rkam\"F37 $$\"3#z****\\_qn2#F3$\"3WS([2O'*>4#F37$$\"3U)***\\i&p@[#F3$\"3$4\">H?< R3DF37$$\"3A)****\\2'HKHF3$\"3F3,!)y>.wHF37$$\"3ElmmmZvOLF3$\"3^#eBbI) *>S$F37$$\"3h******\\2goPF3$\"3bSm204/kQF37$$\"3UKL$eR<*fTF3$\"37c!)[> 6L!H%F37$$\"3l******\\)Hxe%F3$\"3c%RZb#z8mZF37$$\"3ckm;H!o-*\\F3$\"3/d _t%)QvC_F37$$\"3y)***\\7k.6aF3$\"30L\"RJ@*[8F*Fe[m7$$!3\")**\\dL[\\n7F*Fh[m7$$!3$)***\\HQF'37 F*F[\\m7$$!3)****\\1sp$\\6F*F^\\m7$$!3))**\\n*p$R!4\"F*Fa\\m7$$!3(*** \\xy`rN5F*Fd\\m7$$!39***\\dW\"*4z*F3Fg\\m7$$!3w***\\T%e^SF3Fe^m7 $$!3E++v***['QMF3Fh^m7$$!3C+++-t4'*GF3F[_m7$$!3p)**\\(*4K3I#F3F^_m7$$! 3'))**\\#f))*Rt\"F3Fa_m7$$!3C****\\PycU6F3Fd_m7$$!3-%)**\\Z`\\%*fFjrFg _m7$$!3As****\\sIi8F`sFj_m7$$\"3O$***\\#yf)[fFjrF]`m7$$\"3g***\\d*[fC6 F3F``m7$$\"39++]Q]p'p\"F3Fc`m7$$\"3u*****fYIxG#F3Ff`m7$$\"3*)****\\CL% f'GF3Fi`m7$$\"32***\\i*RRDMF3F\\am7$$\"3r)***\\$eol/%F3F_am7$$\"3E(*** *zd@Zg%F3Fbam7$$\"3m+++N!p1?&F3Feam7$$\"3e(**\\i+'oSdF3Fham7$$\"3w,++$ >n5L'F3F[bm7$$\"3r***\\-))pl)oF3F^bm7$$\"3*3+]#\\-BnuF3Fabm7$$\"3/(*** *\\*=$\\.)F3Fdbm7$$\"3D***\\i!HEH')F3Fgbm7$$\"3(H++!3Vn,#*F3Fjbm7$$\"3 S(***\\Tw/(y*F3F]cm7$$\"3'***\\#)ytvO5F*F`cm7$$\"3;++g-<5!4\"F*Fccm7$$ \"36++b<.C^6F*Ffcm7$$\"3#)****fBM#f?\"F*Ficm7$$\"3()**\\-?qAk7F*F\\dm7 $$\"3$)**\\<,5.?8F*F_dm7$$\"3))************z8F*Fbdm-F\\[l6&F^[lF_[lF`[ lF_[l-%%TEXTG6%7$Fiz$\"\"'F,Q'sin(x)6\"F[[l-Fgdm6%7$$\"\"&F,$\"#9F,Q*a rcsin(x)F]emF\\[m-%(SCALINGG6#%,CONSTRAINEDG-%+AXESLABELSG6%Q\"xF]emQ! F]em-%%FONTG6#%(DEFAULTG-%%VIEWG6$;$!+Fjzq:!\"*$\"+Fjzq:FifmFbfm" 1 2 0 1 10 0 2 9 1 4 1 1.000000 45.000000 45.000000 0 0 "Curve 1" "Curve 2 " "Curve 3" "Curve 4" "Curve 5" }}}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 69 "pc1:=plot(cos(x),x=0..Pi,color=blue,thickness=2,scaling=constr ained):" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 71 "pc2:=plot(arccos (x),x=-1..1,color=red,thickness=2,scaling=constrained):" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 34 "pc3:=plot(x,x=0..1.8,color=green): " }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 45 "pc4:=textplot([1.5,0.6, `cos(x)`],color=blue):" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 48 "p c5:=textplot([-0.1,2.4,`arccos(x)`],color=red):" }}}{EXCHG {PARA 0 "> \+ " 0 "" {MPLTEXT 1 0 31 "display([pc1,pc2,pc3,pc4,pc5]);" }}{PARA 13 " " 1 "" {GLPLOT2D 400 300 300 {PLOTDATA 2 "6*-%'CURVESG6%7S7$$\"\"!F)$ \"\"\"F)7$$\"3$)eD2LzxZo!#>$\"3PWu>HJcw**!#=7$$\"3)\\$px*G*f!G\"F2$\"3 1zSVp_6=**F27$$\"3**4@exGm]>F2$\"3OJ(\\/B[.\")*F27$$\"3[99!=3o^i#F2$\" 3tC\"*pc*)Rd'*F27$$\"35!\\D0[nkH$F2$\"3/:)*HLvch%*F27$$\"37\"=Za&z%)=R F2$\"35<`-+%3>C*F27$$\"3edXa()oGjXF2$\"3hJ\"\\\"oKww*)F27$$\"3W%3**Hbm (H_F2$\"3X33BjHOj')F27$$\"37PRr4)3T*eF2$\"3EW$Hv(Ho7$)F27$$\"3y\"[)yyk YxlF2$\"3`qLdGzr8zF27$$\"3Zs'ocGo$zrF2$\"3mX8)p^X;`(F27$$\"3UQ0;gr'p&y F2$\"3Cr,&4Tc*oqF27$$\"3vFMt?$[t`)F2$\"3YAj*F2 $\"3&f;/]3_P1'F27$$\"3\"*R7\\HeV)y*F2$\"3K)4*=ad#)zbF27$$\"3#G[))*)3W' \\5!#<$\"3;I_[=uzy\\F27$$\"30'[@XS@'46Ffp$\"3;%R%QBf+]WF27$$\"3G9w$3G* Qz6Ffp$\"3)4ZH!zU*[\"QF27$$\"3>%3*3tc9T7Ffp$\"3--F27$$\"3)R :_MgU2W\"Ffp$\"3;41_CT(oH\"F27$$\"3!Qu#)**[jD]\"Ffp$\"3P4p$QO!*z\"oF/7 $$\"3>F27$$\"31Id)H7*>J=Ffp$!3oSpG#*ypuDF27$$\"3Gfb7wY,(*=Ffp$!38*>E@=JY? $F27$$\"3cM5'zg%pg>Ffp$!3^ZZ&[KV4!QF27$$\"3)*oJ8:.SJ?Ffp$!3YF/:7B*[W%F 27$$\"3)**p!zPD$\\4#Ffp$!3bi_v/Ol/]F27$$\"3kzgF27$$\"39/bAzj#Ffp7$$!3:mmm\"4m(G$)F2$\"3&4]$))y83bDFfp7$$!3\"QLL3i.9!zF2$\"3/; \\u$HM=[#Ffp7$$!3\"ommT!R=0vF2$\"3=V([q[U'>CFfp7$$!3u****\\P8#\\4(F2$ \"3tY\"oPgt&fBFfp7$$!3*pmmT?F1n'F2$\"3j-.Cra0,BFfp7$$!3[++](y$pZiF2$\" 3/]$>IYKcC#Ffp7$$!33LLL$yaE\"eF2$\"3Q\"=SLMz5>#Ffp7$$!3hmmm\">s%HaF2$ \"3:SK2R!RZ9#Ffp7$$!3Q+++]$*4)*\\F2$\"3y]i8[c<%4#Ffp7$$!38+++]_&\\c%F2 $\"3EF7t+([[/#Ffp7$$!30+++]1aZTF2$\"3/,n8N)o%)*>Ffp7$$!3umm;/#)[oPF2$ \"3a@.!pE)=d>Ffp7$$!3hLLL$=exJ$F2$\"3*Q8GNs\")*3>Ffp7$$!3)RLLLtIf$HF2$ \"3a0p^C(z(o=Ffp7$$!3]++]PYx\"\\#F2$\"3TUb>jriA=Ffp7$$!3EMLLL7i)4#F2$ \"3(3BVuEIAy\"Ffp7$$!3c****\\P'psm\"F2$\"3'[^M(ebIQ71Nyr:Ffp7$$\"3%pJL$e zw5VF/$\"3&>))o]Gvw_\"Ffp7$$\"3s*)***\\PQ#\\\")F/$\"3Sok\"QZ8#*[\"Ffp7 $$\"3GKLLe\"*[H7F2$\"3![Rsk_NvW\"Ffp7$$\"3H*******pvxl\"F2$\"3?-qe()) \\US\"Ffp7$$\"3#z****\\_qn2#F2$\"3`A+s!p'fh8Ffp7$$\"3U)***\\i&p@[#F2$ \"3j0dwar&*>8Ffp7$$\"3A)****\\2'HKHF2$\"3*e)[\"*GJ>t7Ffp7$$\"3ElmmmZvO LF2$\"3UQDC'\\'fI7Ffp7$$\"3h******\\2goPF2$\"3bKsGOAR%=\"Ffp7$$\"3UKL$ eR<*fTF2$\"3+\"4Y[@j<9\"Ffp7$$\"3l******\\)Hxe%F2$\"3?d,CMD=%4\"Ffp7$$ \"3ckm;H!o-*\\F2$\"3'4P@$Q4K[5Ffp7$$\"3y)***\\7k.6aF2$\"3_K)4[0u/***F2 7$$\"3#emmmT9C#eF2$\"3%4S&G@S8$\\*F27$$\"32****\\i!*3`iF2$\"3p#=2W9!p_ *)F27$$\"3%QLLL$*zym'F2$\"3!H&\\6>)e!4%)F27$$\"3wKLL3N1#4(F2$\"3sn,0y \\CCyF27$$\"3Mmm;HYt7vF2$\"3Q7=@b%o!3sF27$$\"3Y*******p(G**yF2$\"3sK5l %*\\.,mF27$$\"3]mmmT6KU$)F2$\"3&f!zV$*edSeF27$$\"3fKLLLbdQ()F2$\"3b,c+ !H`r2&F27$$\"3Z++]i`1h\"*F2$\"3$RzZVgr`7%F27$$\"3W++]P?Wl&*F2$\"3BQSG( ))e)eHF27$F*F(-F[[l6&F][lF^[lF(F(Fa[l-F$6$7S7$F(F(7$$\"3U******\\x[BRF /F_[m7$$\"3q****\\iMHPtF/Fb[m7$$\"3.++]-vk<6F2Fe[m7$$\"3(*****\\<06/:F 2Fh[m7$$\"3t***\\7uO())=F2F[\\m7$$\"3#****\\i[M`C#F2F^\\m7$$\"3x***\\i zqXh#F2Fa\\m7$$\"3-++D;bV'*HF2Fd\\m7$$\"3+++D\"fvqP$F2Fg\\m7$$\"3M+++& p5'oPF2Fj\\m7$$\"3#)****\\F]Z8TF2F]]m7$$\"3*******\\e5<]%F2F`]m7$$\"3w *****\\FS:*[F2Fc]m7$$\"3]+++:M@n_F2Ff]m7$$\"3$****\\ihg$3cF2Fi]m7$$\"3 k*****\\j\\5FfpF``m7$$\"3)****\\sM4p3\"FfpFc`m7 $$\"3%***\\ig_RB6FfpFf`m7$$\"3()***\\nk1R;\"FfpFi`m7$$\"3$)******GzI+7 FfpF\\am7$$\"3.++]nS4,]\"Ff pFdbm7$$\"31++v:dGQ:FfpFgbm7$$\"39+]i;h9w:FfpFjbm7$$\"3&******H*e$4h\" FfpF]cm7$$\"3#****\\F!*33l\"FfpF`cm7$$\"3!******zzrko\"FfpFccm7$$\"33+ ]i#)e\\C " 0 "" {MPLTEXT 1 0 93 "pt1:=plot(tan(x),x=-Pi/2+0.01..Pi/2-0.01,y=-8..8,colo r=blue,thickness=2,scaling=constrained):" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 71 "pt2:=plot(arctan(x),x=-8..8,color=red,thickness=2,sca ling=constrained):" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 33 "pt3:= plot(x,x=-6..6,color=green):" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 43 "pt4:=textplot([3,6.9,`tan(x)`],color=blue):" }}}{EXCHG {PARA 0 " > " 0 "" {MPLTEXT 1 0 45 "pt5:=textplot([6,2.2,`arctan(x)`],color=red) :" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 31 "display([pt1,pt2,pt3,p t4,pt5]);" }}{PARA 13 "" 1 "" {GLPLOT2D 400 300 300 {PLOTDATA 2 "6*-%' CURVESG6%7co7$$!3)****ROK'zg:!#<$!3AT&oI:j9F*$!3*eJZ=kOSD*F*7$$!3/\"p?'\\; bL9F*$!3a5tl(H^/C(F*7$$!3q@)G\"emMZ'Fjq$!31g?.1-EgvFjq7$$!3]RSuMD%=)eFjq$!3[.lv ;3HpmFjq7$$!3Z\">t_xW$y^Fjq$!3Ij!=GZ**op&Fjq7$$!3Yb$[]*)*Q#e%Fjq$!31+e xRRdK\\Fjq7$$!3k$R\\Np_\"*)QFjq$!3%y39Rmuy4%Fjq7$$!3!3^*p0._vKFjq$!3!f $)eK!)>zR$Fjq7$$!34&fE2KoAg#Fjq$!3Rz$**ySWEm#Fjq7$$!3\"yx13At6'>Fjq$!3 #==!f<(4n)>Fjq7$$!3QHGLRxD#H\"Fjq$!3e%\\l@Q*\\*H\"Fjq7$$!3v7tDX^%)zn!# >$!3YU1iFCD!z'Fav7$$!3a?u59cyS:!#?$!3uCSRLoyS:Fgv7$$\"3YlF\"Fjq$\"3[MD%3$R$)y7Fjq7$$\"3K.>Ge@)*= >Fjq$\"3YV.rP)*)G%>Fjq7$$\"3SD(zz@]ue#Fjq$\"3Ro&[n*>yYEFjq7$$\"3K4RY+e TTKFjq$\"3@?HoE:#*fLFjq7$$\"3m06!y7hT(QFjq$\"3D]&)pkjP!3%Fjq7$$\"3n**R oLprwXFjq$\"3]it/.F_D\\Fjq7$$\"3Hv:qsX*z?&Fjq$\"3Uf;(fdQit&Fjq7$$\"32Z p'e>=?)eFjq$\"3UCl$RhW&pmFjq7$$\"35XF1yPy#\\'Fjq$\"3csQOyOm!f(Fjq7$$\" 3!p[LP)=^grFjq$\"3D\"Qz)y(Fjq$\"3z!=r(HLYq)*Fj q7$$\"37u@rRd_X%)Fjq$\"3*)\\NybM!f7\"F*7$$\"3Gl=C;Ig(3*Fjq$\"3T8uZMN3$ G\"F*7$$\"3j!\\V,U)zf(*Fjq$\"3FZ%Q9gy!y9F*7$$\"3Lf>k[-sS5F*$\"3Es:&RpG kq\"F*7$$\"3o1G3lm#p5\"F*$\"3GN0GH-*))*>F*7$$\"3=D'o*e[es6F*$\"3>%3IOh mqP#F*7$$\"3CnM:?z\"HB\"F*$\"3Ww`de=:YGF*7$$\"37eP&oTm?I\"F*$\"3)*=r0E v>JOF*7$$\"3Y6xicO\"RO\"F*$\"34ffnx\"*\\kZF*7$$\"3#GkM_o%)oR\"F*$\"33L HVx&e>p&F*7$$\"389Y\"F*$\"3)ps *o+to0\"*F*7$$\"3)3:7mnqH\\\"F*$\"3z^n)e<,WF-7$$\"3%)=:w<\"=Bb\"F*$\"3h4#pH$R;6aF-7$$\"3,R6BpwVa: F*$\"3c&p@`uDC6'F-7$$\"3Tf2q?sbc:F*$\"3?2kmmmOhzZtF*$!3Mp* =%H@`N9F*7$$!3LLLL`b`1qF*$!3U0$oP')H!H9F*7$$!3\"HLLL(G,jmF*$!3*>NYZ$f# =U\"F*7$$!3/nmm'*G7@jF*$!3Ic,Xzo*QT\"F*7$$!3XLLLBr9/gF*$!3%zPn%e'fdS\" F*7$$!3!)******pq$fn&F*$!3%eK3Hm.kR\"F*7$$!3eLLLj<]O`F*$!30gY8Afb&Q\"F *7$$!3Q+++I]:)*\\F*$!3t-ZP\"yHLP\"F*7$$!3YmmmEQ7]YF*$!3$o#3y_U(*e8F*7$ $!3GLLL`xdVVF*$!3v$)*f\\H9XM\"F*7$$!3I+++![z%)*RF*$!3\\RTI*=GdK\"F*7$$ !35++++U'>l$F*$!3%4**e=gANI\"F*7$$!3/+++?D.=LF*$!32VWC?32y7F*7$$!3SLLL j0z9IF*$!3q*3OQH=0D\"F*7$$!3*ommma1Ul#F*$!3@B3wfJ[57F*7$$!3=nmm'eW([BF *$!3*>w#enEGo6F*7$$!3S+++5(>M*>F*$!3z_3S(=He5\"F*7$$!3Tnmm')p*)y;F*$!3 7(3`%yofL5F*7$$!3l******4d\"QL\"F*$!3q)=3SL)ou#*Fjq7$$!3*)******Hn@05F *$!3+7lFjq$\"3KpBr`:PxdFjq7$$\"3AemmmK\" f$)*Fjq$\"3)H='eu9ErxFjq7$$\"3W******f0AE8F*$\"3@'4u3`esC*Fjq7$$\"3M)* ****>kTh;F*$\"3mK'o'HQ)*G5F*7$$\"3u)*****\\ct&)>F*$\"3J0Q_%[zU5\"F*7$$ \"3d)*****fo$eM#F*$\"3#)*3Tl*f$y;\"F*7$$\"3?KLL8QSpEF*$\"3![L^&4GO77F* 7$$\"3p*******f!)[,$F*$\"3x+/(y@F0D\"F*7$$\"3%fmmm\"R$zK$F*$\"3))QyVXI *)y7F*7$$\"3s******zQ=qOF*$\"3$4!R\")fvy/8F*7$$\"3mJLLBW@#*RF*$\"3K1x4 [)e`K\"F*7$$\"3-******H\"H)GVF*$\"3O3K:8&pPM\"F*7$$\"3lKLLL:$zl%F*$\"3 6!f(Q7)=$f8F*7$$\"3E******\\7Z-]F*$\"3FDC()pd\\t8F*7$$\"32nmmYRIM`F*$ \"3>47BN8[&Q\"F*7$$\"3?mmm13ltcF*$\"39_zO1[L'R\"F*7$$\"33LLL.x=5gF*$\" 3pFKdQD#fS\"F*7$$\"3d******f,V>jF*$\"3ST\\jQb&QT\"F*7$$\"3>LLL8p&Qn'F* $\"3$*Q]0LW1A9F*7$$\"33mmmE/'3*pF*$\"3\"RTPlC;(G9F*7$$\"3Q+++!H_)GtF*$ \"3Mu'p'fn=N9F*7$$\"3N+++ION_wF*$\"3o#y')=\"R&3W\"F*7$$\"\")F^bl$\"34N \"[ALTkW\"F*-Fjal6&F\\blF_blF]blF]blFbbl-F$6$7S7$$!\"'F^blFgcm7$$!3z** ****\\TVQdF*Fjcm7$$!3l****\\-r%3^&F*F]dm7$$!3A+++l;!\\D&F*F`dm7$$!3o** ***\\lfs*\\F*Fcdm7$$!3%)****\\s@%3u%F*Ffdm7$$!3J++]U.6.XF*Fidm7$$!3&)* ***\\-G&pD%F*F\\em7$$!3(*****\\AjP-SF*F_em7$$!32++]sih[PF*Fbem7$$!3%)* *****pGf([$F*Feem7$$!3(******\\J$odKF*Fhem7$$!3y******4'f))*HF*F[fm7$$ !33+++]J(*QFF*F^fm7$$!3\")*******QC&)[#F*Fafm7$$!3/++]AH4hAF*Fdfm7$$!3 %*******4\\l!*>F*Fgfm7$$!3&*******R%e:w\"F*Fjfm7$$!33++]#yk]\\\"F*F]gm 7$$!3M+++SFam%**FjqF[im7$$\"3k*****\\JigC\"F*F^im7$$ \"3%*****\\P " 0 "" {MPLTEXT 1 0 86 "pct1:=plot(cot(x),x=0.01..Pi -0.01,y=-8..8,color=blue,thickness=2,scaling=constrained):" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 72 "pct2:=plot(arccot(x),x=-8..8,color= red,thickness=2,scaling=constrained):" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 34 "pct3:=plot(x,x=-6..6,color=green):" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 44 "pct4:=textplot([2,6.9,`cot(x)`],color=blu e):" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 46 "pct5:=textplot([6,1. 5,`arccot(x)`],color=red):" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 36 "display([pct1,pct2,pct3,pct4,pct5]);" }}{PARA 13 "" 1 "" {GLPLOT2D 400 300 300 {PLOTDATA 2 "6*-%'CURVESG6%7co7$$\"3%******4++++ \"!#>$\"3I\"4WWlm'****!#;7$$\"3BQ:p8q$F-7$$\"3Dh3Eg)o:b$F*$\"3:H#>B7tW\"GF-7$$\"38:yM8=4 -WF*$\"3ujc^](z,F#F-7$$\"3!Hs@&>x8.hF*$\"3=L1\"\\cmkj\"F-7$$\"3oIcpDO= /yF*$\"3n()GLb:wy7F-7$$\"3[RL2_DVw5!#=$\"3FKex0p.a#*!#<7$$\"3/;rdTnWs8 F]o$\"3C&*3\")e9XSsF`o7$$\"36P<$olX`q\"F]o$\"3:r(=#o%ep!eF`o7$$\"3Xej3 sXCQ?F]o$\"3\"oR*[n@0Q[F`o7$$\"3#*o8!Gub%3FF]o$\"3,KUVHVT,OF`o7$$\"3DQ G\"o^\"[vLF]o$\"3HG*3#)>g\"\\GF`o7$$\"3))**Qc%z**Q*RF]o$\"3u]TVx3DpBF` o7$$\"3)p]!*45OUj%F]o$\"3!=\\2l\\?6+#F`o7$$\"3udu5DGZ'H&F]o$\"3*3t@vK2 \"3p8 .Mg!z7F`o7$$\"3mM'Rw+jOB(F]o$\"3')[)=5w\\C8\"F`o7$$\"3=?0r`\"[p!zF]o$ \"3_WY\\9Ti%*)*F]o7$$\"3#z2zK(y*He)F]o$\"3'z/K,m*yQ')F]o7$$\"3go,0Zq\\ M#*F]o$\"3#zGq4Cg-c(F]o7$$\"3u\"fq:r?h#)*F]o$\"3ApO,[3HpmF]o7$$\"3&Q8v r%='H0\"F`o$\"3SaM`+&**op&F]o7$$\"3NbxDNtb76F`o$\"3k9N/lRdK\\F]o7$$\"3 ,1wZb5)==\"F`o$\"3e$*G$oouy4%F]o7$$\"36;XK%HWKC\"F`o$\"3')QtXC)>zR$F]o 7$$\"3cX(*)G\\p0J\"F`o$\"3urM_FWkiEF]o7$$\"3??k%H+zYP\"F`o$\"34@f'ft4n )>F]o7$$\"3F:8;^0dT9F`o$\"3#ygb%*R*\\*H\"F]o7$$\"3]6Sqty*H]\"F`o$\"35F s?#f_-z'F*7$$\"3%zL4'RbDp:F`o$\"3-3!\\[S)yS:!#?7$$\"3O7s5L'y!Q;F`o$!3' )f]YW;R$)y7F]o7$$\"36NoCTXpiF]o7$$\"3DsSGZ8aH=F`o$!3AFPu#)>yYEF]o7$$\"3]#[)f0z$\\*=F`o$ !3Oe=&G^@*fLF]o7$$\"3T_gRQC@e>F`o$!3'\\5Y4Nw.3%F]o7$$\"3mO_0>!o%G?F`o$ !3mB&y#*oAb#\\F]o7$$\"3g'p?Iy&f\"4#F`o$!3[%o\"4i&Qit&F]o7$$\"39\\_SX\" )**e@F`o$!3?c+$)*fW&pmF]o7$$\"3Uhko.Z2?AF`o$!3O&QYRmj1f(F]o7$$\"3P;4K9 v%oG#F`o$!3(R5H'za0,()F]o7$$\"3+B6SDbn\\BF`o$!3'4P%H9LYq)*F]o7$$\"3fb% [+!*[`T#F`o$!3oXh:aM!f7\"F`o7$$\"3)o@mxic&zCF`o$!3>J(\\F`$3$G\"F`o7$$ \"3\\5UAohxYDF`o$!35w_d*fy!y9F`o7$$\"3s]r\"\\d;:h#F`o$!3&y`=>pGkq\"F`o 7$$\"3S1[U\"*HsxEF`o$!3ig!=qA!*))*>F`o7$$\"3!3)oP&=\"QVFF`o$!3\\\\(e5h mqP#F`o7$$\"3#[gAmC9P!GF`o$!3()z2hb=:YGF`o7$$\"3mtERVF'G(GF`o$!3zueUAv >JOF`o7$$\"3`P!HK)*4Z$HF`o$!3L\\#)3t\"*\\kZF`o7$$\"3hR#p=,\"onHF`o$!3k v\"z?de>p&F`o7$$\"37U%40/_1+$F`o$!3p/D9AW9[qF`o7$$\"3yul#>_4A.$F`o$!3! *pCq#H(o0\"*F`o7$$\"3)yqVL+nP1$F`o$!3(H))Q[<,WF-7$$\"3]jHbWW6BJF`o$!3Y/\"e>$R;6aF-7$$\"3&GsCg*RBDJF`o$ !3F%3J[uDC6'F-7$$\"3w\"['\\ZNNFJF`o$!3s\"p$eD\"QC-(F-7$$\"3mS#o*)4t%HJ F`o$!3!QK#)3IC2D)F-7$$\"3-++W]EfJJF`o$!3e&>ZX^j'****F--%'COLOURG6&%$RG BG$\"\"!F^blF]bl$\"*++++\"!\")-%*THICKNESSG6#\"\"#-F$6%7W7$$FablF^bl$ \"3VJI/fwBmmmOhzZtF`o$\"3 olQ@c%Gj+$F`o7$$!3LLLL`b`1qF`o$\"3?-Kc!>E)**HF`o7$$!3\"HLLL(G,jmF`o$\" 3c[7ahAi#*HF`o7$$!3/nmm'*G7@jF`o$\"33`]C1Kp%)HF`o7$$!3XLLLBr9/gF`o$\"3 suAE&)fbwHF`o7$$!3!)******pq$fn&F`o$\"3TAKq*)**>nHF`o7$$!3eLLLj<]O`F`o $\"3$obH*[ANcHF`o7$$!3Q+++I]:)*\\F`o$\"3I*fp\"3h7WHF`o7$$!3YmmmEQ7]YF` o$\"3SBddz0xHHF`o7$$!3GLLL`xdVVF`o$\"3K!)[v@1J:HF`o7$$!3I+++![z%)*RF`o $\"3#e.*4;X_'*GF`o7$$!35++++U'>l$F`o$\"3r()QlG*=V(GF`o7$$!3/+++?D.=LF` o$\"3iR$Rq9n)[GF`o7$$!3SLLLj0z9IF`o$\"3E')4j?YJ@GF`o7$$!3*ommma1Ul#F`o $\"3x>db'[z7y#F`o7$$!3=nmm'eW([BF`o$\"3cewP%**y!RFF`o7$$!3S+++5(>M*>F` o$\"3c\\d>9biwEF`o7$$!3Tnmm')p*)y;F`o$\"3!R)zC0KR/EF`o7$$!3l******4d\" QL\"F`o$\"3K:d>g^E)\\#F`o7$$!3*)******Hn@05F`o$\"3vn]XjgzeBF`o7$$!3qkm mm;eBmF]o$\"3$H0.$)=5e:#F`o7$$!32mmm;dK\\]F]o$\"3KN]T-AQQ?F`o7$$!3Wnmm m(p]Z$F]o$\"3v.O(eY[_!>F`o7$$!37,++]?-xlF]o$\"3E'fOUr\"fI**F]o7$$\"3AemmmK\"f$)*F]o$\"3e#y iLz,n$zF]o7$$\"3W******f0AE8F`o$\"3Op[2PZqgkF]o7$$\"3M)*****>kTh;F`o$ \"3#*QEEr\\7=aF]o7$$\"3u)*****\\ct&)>F`o$\"3Z74rA%o^m%F]o7$$\"3d)***** fo$eM#F`o$\"3Jn!QDI.'HSF]o7$$\"3?KLL8QSpEF`o$\"3gHF] o7$$\"3s******zQ=qOF`o$\"3Dc*4)pw3gEF]o7$$\"3mJLLBW@#*RF`o$\"3P->(pyuV X#F]o7$$\"3-******H\"H)GVF`o$\"3'>)oTO\"o-F#F]o7$$\"3lKLLL:$zl%F`o$\"3 WkI2W^x9@F]o7$$\"3E******\\7Z-]F`o$\"3#GrC#pb+t>F]o7$$\"32nmmYRIM`F`o$ \"3etoj:*\\J&=F]o7$$\"3?mmm13ltcF`o$\"30W%pU?:Yu\"F]o7$$\"33LLL.x=5gF` o$\"3r)o;A)yt[;F]o7$$\"3d******f,V>jF`o$\"3e^&*f\")ySp:F]o7$$\"3>LLL8p &Qn'F`o$\"3Bw&)RP*=t[\"F]o7$$\"33mmmE/'3*pF`o$\"3WE[d-3!3U\"F]o7$$\"3Q +++!H_)GtF`o$\"32AADrc4c8F]o7$$\"3N+++ION_wF`o$\"3mQ63\\TU*H\"F]o7$$\" \")F^bl$\"3m9wYX*\\NC\"F]o-Fjal6&F\\blF_blF]blF]blFbbl-F$6$7S7$$!\"'F^ blFgcm7$$!3z******\\TVQdF`oFjcm7$$!3l****\\-r%3^&F`oF]dm7$$!3A+++l;!\\ D&F`oF`dm7$$!3o*****\\lfs*\\F`oFcdm7$$!3%)****\\s@%3u%F`oFfdm7$$!3J++] U.6.XF`oFidm7$$!3&)****\\-G&pD%F`oF\\em7$$!3(*****\\AjP-SF`oF_em7$$!32 ++]sih[PF`oFbem7$$!3%)******pGf([$F`oFeem7$$!3(******\\J$odKF`oFhem7$$ !3y******4'f))*HF`oF[fm7$$!33+++]J(*QFF`oF^fm7$$!3\")*******QC&)[#F`oF afm7$$!3/++]AH4hAF`oFdfm7$$!3%*******4\\l!*>F`oFgfm7$$!3&*******R%e:w \"F`oFjfm7$$!33++]#yk]\\\"F`oF]gm7$$!3M+++SFam%**F] oF[im7$$\"3k*****\\JigC\"F`oF^im7$$\"3%*****\\P " 0 " " {MPLTEXT 1 0 0 "" }}}}{MARK "25 0 0" 0 }{VIEWOPTS 0 0 0 1 1 1803 1 1 1 1 }{PAGENUMBERS 0 1 2 33 1 1 }