%!PS-Adobe-2.0 EPSF-2.0 %%BoundingBox: 0 0 283.46 175.19 %%Title: 12mag.eps %%Creator: mma2ltx v1.2 %%CreationDate: Mon Jul 18 10:18:35 1994 %%EndComments %MMA2LTXCommandLine: mma2ltx -ucm -sfootnotesize -p -w10cm 12mag.ps %%BeginProcSet: texmma22.pro % Mathematica v2.2 prologue /Mathdict 150 dict def Mathdict begin /Mwidth 283.46 def /Mheight 175.19 def /Mnodistort true def /Mlmarg 0 def /Mrmarg 0 def /Mbmarg 0 def /Mtmarg 0 def /Mtransform{} bind def /Mfixwid true def /Mfixdash false def /Mrot 0 def /Mpstart{ MathPictureStart}bind def /Mpend{MathPictureEnd}bind def /Mscale{0 1 0 1 5 -1 roll MathScale}bind def /ISOLatin1Encoding dup where{pop pop}{[ /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /space /exclam /quotedbl /numbersign /dollar /percent /ampersand /quoteright /parenleft /parenright /asterisk /plus /comma /minus /period /slash /zero /one /two /three /four /five /six /seven /eight /nine /colon /semicolon /less /equal /greater /question /at /A /B /C /D /E /F /G /H /I /J /K /L /M /N /O /P /Q /R /S /T /U /V /W /X /Y /Z /bracketleft /backslash /bracketright /asciicircum /underscore /quoteleft /a /b /c /d /e /f /g /h /i /j /k /l /m /n /o /p /q /r /s /t /u /v /w /x /y /z /braceleft /bar /braceright /asciitilde /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /dotlessi /grave /acute /circumflex /tilde /macron /breve /dotaccent /dieresis /.notdef /ring /cedilla /.notdef /hungarumlaut /ogonek /caron /space /exclamdown /cent /sterling /currency /yen /brokenbar /section /dieresis /copyright /ordfeminine /guillemotleft /logicalnot /hyphen /registered /macron /degree /plusminus /twosuperior /threesuperior /acute /mu /paragraph /periodcentered /cedilla /onesuperior /ordmasculine /guillemotright /onequarter /onehalf /threequarters /questiondown /Agrave /Aacute /Acircumflex /Atilde /Adieresis /Aring /AE /Ccedilla /Egrave /Eacute /Ecircumflex /Edieresis /Igrave /Iacute /Icircumflex /Idieresis /Eth /Ntilde /Ograve /Oacute /Ocircumflex /Otilde /Odieresis /multiply /Oslash /Ugrave /Uacute /Ucircumflex /Udieresis /Yacute /Thorn /germandbls /agrave /aacute /acircumflex /atilde /adieresis /aring /ae /ccedilla /egrave /eacute /ecircumflex /edieresis /igrave /iacute /icircumflex /idieresis /eth /ntilde /ograve /oacute /ocircumflex /otilde /odieresis /divide /oslash /ugrave /uacute /ucircumflex /udieresis /yacute /thorn /ydieresis]def}ifelse /MFontDict 50 dict def /MStrCat{exch dup length 2 index length add string dup 3 1 roll copy length exch dup 4 2 roll exch putinterval}def /MCreateEncoding{1 index 255 string cvs(-)MStrCat 1 index MStrCat cvn exch(Encoding)MStrCat cvn dup where{exch get}{pop StandardEncoding}ifelse 3 1 roll dup MFontDict exch known not{1 index findfont dup length dict begin{1 index /FID ne{ def}{pop pop}ifelse}forall /Encoding 3 index def currentdict end 1 index exch definefont pop MFontDict 1 index null put}if exch pop exch pop}def /ISOLatin1{(ISOLatin1)MCreateEncoding}def /ISO8859{(ISOLatin1) MCreateEncoding}def /Mcopyfont{dup maxlength dict exch{1 index /FID eq{ pop pop}{2 index 3 1 roll put}ifelse}forall}def /Plain /Courier findfont Mcopyfont definefont pop /Bold /Courier findfont Mcopyfont definefont pop /Italic /Courier findfont Mcopyfont definefont pop /MathPictureStart{gsave Mtransform Mlmarg Mbmarg translate Mwidth Mlmarg Mrmarg add sub /Mwidth exch def Mheight Mbmarg Mtmarg add sub /Mheight exch def /Mtmatrix matrix currentmatrix def /Mgmatrix matrix currentmatrix def}bind def /MathPictureEnd{grestore}bind def /MFill{0 0 moveto Mwidth 0 lineto Mwidth Mheight lineto 0 Mheight lineto fill}bind def /MPlotRegion{3 index Mwidth mul 2 index Mheight mul translate exch sub Mheight mul /Mheight exch def exch sub Mwidth mul /Mwidth exch def} bind def /MathSubStart{Momatrix Mgmatrix Mtmatrix Mwidth Mheight 7 -2 roll moveto Mtmatrix setmatrix currentpoint Mgmatrix setmatrix 9 -2 roll moveto Mtmatrix setmatrix currentpoint 2 copy translate /Mtmatrix matrix currentmatrix def 3 -1 roll exch sub /Mheight exch def sub /Mwidth exch def}bind def /MathSubEnd{/Mheight exch def /Mwidth exch def /Mtmatrix exch def dup setmatrix /Mgmatrix exch def /Momatrix exch def}bind def /Mdot{moveto 0 0 rlineto stroke}bind def /Mtetra{moveto lineto lineto lineto fill}bind def /Metetra{moveto lineto lineto lineto closepath gsave fill grestore 0 setgray stroke}bind def /Mistroke{flattenpath 0 0 0{4 2 roll pop pop}{4 -1 roll 2 index sub dup mul 4 -1 roll 2 index sub dup mul add sqrt 4 -1 roll add 3 1 roll}{stop}{stop}pathforall pop pop currentpoint stroke moveto currentdash 3 -1 roll add setdash}bind def /Mfstroke{stroke currentdash pop 0 setdash}bind def /Mrotsboxa{gsave dup /Mrot exch def Mrotcheck Mtmatrix dup setmatrix 7 1 roll 4 index 4 index translate rotate 3 index -1 mul 3 index -1 mul translate /Mtmatrix matrix currentmatrix def grestore Msboxa 3 -1 roll /Mtmatrix exch def /Mrot 0 def}bind def /Msboxa{newpath 5 -1 roll Mvboxa pop Mboxout 6 -1 roll 5 -1 roll 4 -1 roll Msboxa1 5 -3 roll Msboxa1 Mboxrot[7 -2 roll 2 copy[3 1 roll 10 -1 roll 9 -1 roll]6 1 roll 5 -2 roll]}bind def /Msboxa1 {sub 2 div dup 2 index 1 add mul 3 -1 roll -1 add 3 -1 roll mul}bind def /Mvboxa{Mfixwid{Mvboxa1}{dup Mwidthcal 0 exch{add}forall exch Mvboxa1 4 index 7 -1 roll add 4 -1 roll pop 3 1 roll}ifelse}bind def /Mvboxa1{ gsave newpath[true 3 -1 roll{Mbbox 5 -1 roll{0 5 1 roll}{7 -1 roll exch sub(m)stringwidth pop .3 mul sub 7 1 roll 6 -1 roll 4 -1 roll Mmin 3 -1 roll 5 index add 5 -1 roll 4 -1 roll Mmax 4 -1 roll}ifelse false}forall{ stop}if counttomark 1 add 4 roll]grestore}bind def /Mbbox{1 dict begin 0 0 moveto /temp(T)def{gsave currentpoint newpath moveto temp 0 3 -1 roll put temp false charpath flattenpath currentpoint pathbbox grestore moveto lineto moveto}forall pathbbox newpath end}bind def /Mmin{2 copy gt{exch}if pop}bind def /Mmax{2 copy lt{exch}if pop}bind def /Mrotshowa{ dup /Mrot exch def Mrotcheck Mtmatrix dup setmatrix 7 1 roll 4 index 4 index translate rotate 3 index -1 mul 3 index -1 mul translate /Mtmatrix matrix currentmatrix def Mgmatrix setmatrix Mshowa /Mtmatrix exch def /Mrot 0 def}bind def /Mshowa{4 -2 roll moveto 2 index Mtmatrix setmatrix Mvboxa 7 1 roll Mboxout 6 -1 roll 5 -1 roll 4 -1 roll Mshowa1 4 1 roll Mshowa1 rmoveto currentpoint Mfixwid{Mshowax}{Mshoway}ifelse pop pop pop pop Mgmatrix setmatrix}bind def /Mshowax{0 1 4 index length -1 add{2 index 4 index 2 index get 3 index add moveto 4 index exch get Mfixdash{ Mfixdashp}if show}for}bind def /Mfixdashp{dup length 1 gt 1 index true exch{45 eq and}forall and{gsave(--)stringwidth pop(-)stringwidth pop sub 2 div 0 rmoveto dup length 1 sub{(-)show}repeat grestore}if}bind def /Mshoway{3 index Mwidthcal 5 1 roll 0 1 4 index length -1 add{2 index 4 index 2 index get 3 index add moveto 4 index exch get[6 index aload length 2 add -1 roll{pop Strform stringwidth pop neg exch add 0 rmoveto} exch kshow cleartomark}for pop}bind def /Mwidthcal{[exch{Mwidthcal1} forall][exch dup Maxlen -1 add 0 1 3 -1 roll{[exch 2 index{1 index Mget exch}forall pop Maxget exch}for pop]Mreva}bind def /Mreva{[exch aload length -1 1{1 roll}for]}bind def /Mget{1 index length -1 add 1 index ge{ get}{pop pop 0}ifelse}bind def /Maxlen{[exch{length}forall Maxget}bind def /Maxget{counttomark -1 add 1 1 3 -1 roll{pop Mmax}for exch pop}bind def /Mwidthcal1{[exch{Strform stringwidth pop}forall]}bind def /Strform{ /tem(x)def tem 0 3 -1 roll put tem}bind def /Mshowa1{2 copy add 4 1 roll sub mul sub -2 div}bind def /MathScale{Mwidth Mheight Mlp translate scale /yscale exch def /ybias exch def /xscale exch def /xbias exch def /Momatrix xscale yscale matrix scale xbias ybias matrix translate matrix concatmatrix def /Mgmatrix matrix currentmatrix def}bind def /Mlp{3 copy Mlpfirst{Mnodistort{Mmin dup}if 4 index 2 index 2 index Mlprun 11 index 11 -1 roll 10 -4 roll Mlp1 8 index 9 -5 roll Mlp1 4 -1 roll and{exit}if 3 -1 roll pop pop}loop exch 3 1 roll 7 -3 roll pop pop pop}bind def /Mlpfirst{3 -1 roll dup length 2 copy -2 add get aload pop pop pop 4 -2 roll -1 add get aload pop pop pop 6 -1 roll 3 -1 roll 5 -1 roll sub div 4 1 roll exch sub div}bind def /Mlprun{2 copy 4 index 0 get dup 4 1 roll Mlprun1 3 copy 8 -2 roll 9 -1 roll{3 copy Mlprun1 3 copy 11 -3 roll /gt Mlpminmax 8 3 roll 11 -3 roll /lt Mlpminmax 8 3 roll}forall pop pop pop pop 3 1 roll pop pop aload pop 5 -1 roll aload pop exch 6 -1 roll Mlprun2 8 2 roll 4 -1 roll Mlprun2 6 2 roll 3 -1 roll Mlprun2 4 2 roll exch Mlprun2 6 2 roll}bind def /Mlprun1{aload pop exch 6 -1 roll 5 -1 roll mul add 4 -2 roll mul 3 -1 roll add}bind def /Mlprun2{2 copy add 2 div 3 1 roll exch sub}bind def /Mlpminmax{cvx 2 index 6 index 2 index exec{7 -3 roll 4 -1 roll}if 1 index 5 index 3 -1 roll exec{4 1 roll pop 5 -1 roll aload pop pop 4 -1 roll aload pop[8 -2 roll pop 5 -2 roll pop 6 -2 roll pop 5 -1 roll]4 1 roll pop}{pop pop pop}ifelse}bind def /Mlp1{ 5 index 3 index sub 5 index 2 index mul 1 index le 1 index 0 le or dup not{1 index 3 index div .99999 mul 8 -1 roll pop 7 1 roll}if 8 -1 roll 2 div 7 -2 roll pop sub 5 index 6 -3 roll pop pop mul sub exch}bind def /intop 0 def /inrht 0 def /inflag 0 def /outflag 0 def /xadrht 0 def /xadlft 0 def /yadtop 0 def /yadbot 0 def /Minner{outflag 1 eq{/outflag 0 def /intop 0 def /inrht 0 def}if 5 index gsave Mtmatrix setmatrix Mvboxa pop grestore 3 -1 roll pop dup intop gt{/intop exch def}{pop} ifelse dup inrht gt{/inrht exch def}{pop}ifelse pop /inflag 1 def}bind def /Mouter{/xadrht 0 def /xadlft 0 def /yadtop 0 def /yadbot 0 def inflag 1 eq{dup 0 lt{dup intop mul neg /yadtop exch def}if dup 0 gt{dup intop mul /yadbot exch def}if pop dup 0 lt{dup inrht mul neg /xadrht exch def}if dup 0 gt{dup inrht mul /xadlft exch def}if pop /outflag 1 def}{pop pop}ifelse /inflag 0 def /inrht 0 def /intop 0 def}bind def /Mboxout{outflag 1 eq{4 -1 roll xadlft leadjust add sub 4 1 roll 3 -1 roll yadbot leadjust add sub 3 1 roll exch xadrht leadjust add add exch yadtop leadjust add add /outflag 0 def /xadlft 0 def /yadbot 0 def /xadrht 0 def /yadtop 0 def}if}bind def /leadjust{(m)stringwidth pop .5 mul}bind def /Mrotcheck{dup 90 eq{yadbot /yadbot xadrht def /xadrht yadtop def /yadtop xadlft def /xadlft exch def}if dup cos 1 index sin Checkaux dup cos 1 index sin neg exch Checkaux 3 1 roll pop pop}bind def /Checkaux{4 index exch 4 index mul 3 1 roll mul add 4 1 roll}bind def /Mboxrot{Mrot 90 eq{brotaux 4 2 roll}if Mrot 180 eq{4 2 roll brotaux 4 2 roll brotaux}if Mrot 270 eq{4 2 roll brotaux}if}bind def /brotaux{neg exch neg}bind def /Mabsproc{0 matrix defaultmatrix dtransform idtransform dup mul exch dup mul add sqrt}bind def /Mabswid{Mabsproc setlinewidth}bind def /Mabsdash{exch[exch{Mabsproc}forall]exch setdash} bind def /MBeginOrig{Momatrix concat}bind def /MEndOrig{Mgmatrix setmatrix}bind def /sampledsound where{pop}{/sampledsound{exch pop exch 5 1 roll mul 4 idiv mul 2 idiv exch pop exch /Mtempproc exch def{ Mtempproc pop}repeat}bind def}ifelse /g{setgray}bind def /k{ setcmykcolor}bind def /m{moveto}bind def /p{gsave}bind def /r{ setrgbcolor}bind def /w{setlinewidth}bind def /C{curveto}bind def /F{ fill}bind def /L{lineto}bind def /P{grestore}bind def /s{stroke}bind def /setcmykcolor where{pop}{/setcmykcolor{4 1 roll[4 1 roll]{1 index sub 1 sub neg dup 0 lt{pop 0}if dup 1 gt{pop 1}if exch}forall pop setrgbcolor} bind def}ifelse /Mcharproc{currentfile(x)readhexstring pop 0 get exch div}bind def /Mshadeproc{dup 3 1 roll{dup Mcharproc 3 1 roll}repeat 1 eq {setgray}{3 eq{setrgbcolor}{setcmykcolor}ifelse}ifelse}bind def /Mrectproc{3 index 2 index moveto 2 index 3 -1 roll lineto dup 3 1 roll lineto lineto fill}bind def /Mcolorimage{7 1 roll pop pop matrix invertmatrix concat 2 exch exp 1 sub 3 1 roll 1 1 2 index{1 1 4 index{ dup 1 sub exch 2 index dup 1 sub exch 7 index 9 index Mshadeproc Mrectproc}for pop}for pop pop pop pop}bind def /Mimage{pop matrix invertmatrix concat 2 exch exp 1 sub 3 1 roll 1 1 2 index{1 1 4 index{ dup 1 sub exch 2 index dup 1 sub exch 7 index Mcharproc setgray Mrectproc}for pop}for pop pop pop}bind def %%EndProcSet: texmma22.pro %MMA2LTXComment: Here follow the original Mathematica file stripped of the text strings %! %%Creator: Mathematica %%AspectRatio: .61803 MathPictureStart %% Graphics /Courier findfont 10 scalefont setfont % Scaling calculations 0.0238095 0.952381 0.309017 0.294302 [ [ -0.001 -0.001 0 0 ] [ 1.001 .61903 0 0 ] ] MathScale % Start of Graphics 1 setlinecap 1 setlinejoin newpath [ ] 0 setdash 0 g p p .002 w .21429 .30902 m .21429 .31527 L s P p .002 w .40476 .30902 m .40476 .31527 L s P p .002 w .59524 .30902 m .59524 .31527 L s P p .002 w .78571 .30902 m .78571 .31527 L s P p .002 w .97619 .30902 m .97619 .31527 L s P p .001 w .0619 .30902 m .0619 .31277 L s P p .001 w .1 .30902 m .1 .31277 L s P p .001 w .1381 .30902 m .1381 .31277 L s P p .001 w .17619 .30902 m .17619 .31277 L s P p .001 w .25238 .30902 m .25238 .31277 L s P p .001 w .29048 .30902 m .29048 .31277 L s P p .001 w .32857 .30902 m .32857 .31277 L s P p .001 w .36667 .30902 m .36667 .31277 L s P p .001 w .44286 .30902 m .44286 .31277 L s P p .001 w .48095 .30902 m .48095 .31277 L s P p .001 w .51905 .30902 m .51905 .31277 L s P p .001 w .55714 .30902 m .55714 .31277 L s P p .001 w .63333 .30902 m .63333 .31277 L s P p .001 w .67143 .30902 m .67143 .31277 L s P p .001 w .70952 .30902 m .70952 .31277 L s P p .001 w .74762 .30902 m .74762 .31277 L s P p .001 w .82381 .30902 m .82381 .31277 L s P p .001 w .8619 .30902 m .8619 .31277 L s P p .001 w .9 .30902 m .9 .31277 L s P p .001 w .9381 .30902 m .9381 .31277 L s P p .002 w 0 .30902 m 1 .30902 L s P p .002 w .02381 .01472 m .03006 .01472 L s P p .002 w .02381 .16187 m .03006 .16187 L s P p .002 w .02381 .45617 m .03006 .45617 L s P p .002 w .02381 .60332 m .03006 .60332 L s P p .001 w .02381 .04415 m .02756 .04415 L s P p .001 w .02381 .07358 m .02756 .07358 L s P p .001 w .02381 .10301 m .02756 .10301 L s P p .001 w .02381 .13244 m .02756 .13244 L s P p .001 w .02381 .1913 m .02756 .1913 L s P p .001 w .02381 .22073 m .02756 .22073 L s P p .001 w .02381 .25016 m .02756 .25016 L s P p .001 w .02381 .27959 m .02756 .27959 L s P p .001 w .02381 .33845 m .02756 .33845 L s P p .001 w .02381 .36788 m .02756 .36788 L s P p .001 w .02381 .39731 m .02756 .39731 L s P p .001 w .02381 .42674 m .02756 .42674 L s P p .001 w .02381 .4856 m .02756 .4856 L s P p .001 w .02381 .51503 m .02756 .51503 L s P p .001 w .02381 .54446 m .02756 .54446 L s P p .001 w .02381 .57389 m .02756 .57389 L s P p .002 w .02381 0 m .02381 .61803 L s P P 0 0 m 1 0 L 1 .61803 L 0 .61803 L closepath clip newpath p p p .004 w .02505 .60122 m .02629 .50433 L .02753 .01495 L .02877 .20456 L .03001 .40662 L .03125 .52122 L .03249 .37939 L .03373 .59849 L .03497 .16526 L .03621 .59913 L .03745 .49932 L .03869 .57978 L .03993 .47842 L .04117 .01686 L .04241 .54573 L .04365 .08292 L .04489 .58269 L .04613 .02424 L .04737 .42893 L .04861 .49881 L .04985 .04314 L .05109 .20767 L .05233 .57956 L .05357 .4713 L .05481 .12034 L .05605 .02845 L .05729 .25919 L .05853 .5293 L .05977 .59618 L .06101 .44158 L .06225 .20574 L .06349 .0425 L .06473 .02694 L .06597 .14355 L .06721 .32322 L .06845 .48895 L .07341 .41006 L .07465 .27441 L .07589 .15173 L .07713 .06312 L .07837 .01925 L .07961 .02131 L .08085 .06335 L .08209 .13505 L .08333 .22429 L .08581 .40937 L .08705 .48692 L .08829 .54646 L .08953 .58513 L .09077 .60225 L Mistroke .09201 .5989 L .09325 .57739 L .09449 .54088 L .09573 .49293 L .09821 .37715 L .10069 .25654 L .10317 .1511 L .10441 .1082 L .10565 .0731 L .10689 .04624 L .10813 .02773 L .10938 .01739 L .11062 .0148 L .11186 .0194 L .1131 .03049 L .11558 .06901 L .11682 .0948 L .11806 .12385 L .12302 .25771 L .12798 .39089 L .13046 .4487 L .13294 .49805 L .13542 .53798 L .1379 .56815 L .13914 .57962 L .14038 .58873 L .14162 .59555 L .14286 .60019 L .1441 .60272 L .14534 .60328 L .14658 .60195 L .14782 .59888 L .14906 .59417 L .1503 .58795 L .15278 .57149 L .15774 .52578 L .1627 .46881 L .17262 .34332 L .18254 .22678 L .19246 .13418 L .19742 .09842 L .20238 .06965 L .20734 .04754 L .20982 .03883 L .2123 .03159 L .21478 .02574 L .21726 .02122 L .2185 .01943 L .21974 .01795 L .22098 .01675 L Mistroke .22222 .01584 L .22346 .01521 L .2247 .01483 L .22594 .01472 L .22718 .01484 L .22842 .01521 L .22966 .0158 L .2309 .01661 L .23214 .01763 L .23462 .02028 L .2371 .02367 L .24206 .03243 L .25198 .05636 L .2619 .08629 L .30159 .22571 L .34127 .35055 L .36111 .40105 L .38095 .44359 L .40079 .47888 L .42063 .50781 L .44048 .53126 L .46032 .55007 L .48016 .56498 L .5 .57662 L .51984 .58556 L .53968 .59223 L .5496 .59485 L .55952 .59704 L .56944 .59884 L .57937 .60029 L .58929 .60143 L .59921 .60227 L .60417 .60259 L .60913 .60285 L .61409 .60305 L .61657 .60313 L .61905 .60319 L .62153 .60324 L .62277 .60326 L .62401 .60328 L .62525 .6033 L .62649 .60331 L .62773 .60331 L .62897 .60332 L .63021 .60332 L .63145 .60332 L .63269 .60331 L .63393 .6033 L .63641 .60328 L .63765 .60326 L Mistroke .63889 .60325 L .64385 .60314 L .64881 .60299 L .65873 .60258 L .66865 .60202 L .67857 .60133 L .69841 .59961 L .7381 .59506 L .77778 .5895 L .81746 .58332 L .85714 .57678 L .89683 .57008 L .93651 .56334 L .97619 .55666 L Mfstroke P P P % End of Graphics MathPictureEnd end