(************** Content-type: application/mathematica ************** CreatedBy='Mathematica 5.0' Mathematica-Compatible Notebook This notebook can be used with any Mathematica-compatible application, such as Mathematica, MathReader or Publicon. The data for the notebook starts with the line containing stars above. To get the notebook into a Mathematica-compatible application, do one of the following: * Save the data starting with the line of stars above into a file with a name ending in .nb, then open the file inside the application; * Copy the data starting with the line of stars above to the clipboard, then use the Paste menu command inside the application. Data for notebooks contains only printable 7-bit ASCII and can be sent directly in email or through ftp in text mode. Newlines can be CR, LF or CRLF (Unix, Macintosh or MS-DOS style). NOTE: If you modify the data for this notebook not in a Mathematica- compatible application, you must delete the line below containing the word CacheID, otherwise Mathematica-compatible applications may try to use invalid cache data. For more information on notebooks and Mathematica-compatible applications, contact Wolfram Research: web: http://www.wolfram.com email: info@wolfram.com phone: +1-217-398-0700 (U.S.) Notebook reader applications are available free of charge from Wolfram Research. *******************************************************************) (*CacheID: 232*) (*NotebookFileLineBreakTest NotebookFileLineBreakTest*) (*NotebookOptionsPosition[ 142692, 4585]*) (*NotebookOutlinePosition[ 143339, 4607]*) (* CellTagsIndexPosition[ 143295, 4603]*) (*WindowFrame->Normal*) Notebook[{ Cell[BoxData[{ \(\(Array1[i_, \ D_, N_, \ \[Alpha]_]\ = \ \(D\ + \ i\ - \ 1\)\/D - \ N\/D + \ \(N\ \[Alpha]\)\/D;\)\), "\[IndentingNewLine]", \(\(Array2[i_, \ D_, N_, \ \[Alpha]_]\ = \ \(D\ + \ i\)\/D + \ \(N\ \ \[Alpha]\)\/D;\)\), "\[IndentingNewLine]", \(\(FActual[N_, \ \[Lambda]_, \ D_, \ \[Alpha]_]\ := \ Binomial[N, \ \[Alpha]\ N]\ - 4\ \(\((\(-1\))\)\^\(D\ - \ 1\)\) \((Sin[\[Pi]\ \((1\ + \ N\ - \ N\ \[Alpha])\)]\ \(\(Gamma[1\ + \ N]\ Gamma[ D\ - \ N\ + \ N\ \[Alpha]]\)\/\(4\ \[Pi]\ Gamma[ D\ + \ 1\ + \ N\ \[Alpha]]\)\) \ \[ExponentialE]\^\(\(-\[ImaginaryI]\)\ \[Lambda]\))\) \((HypergeometricPFQ[ Union[{1}, \ Table[Array1[i, \ D, \ N, \ \[Alpha]], \ {i, \ 1, \ D}]], \ Union[Table[ Array2[i, \ D, \ N, \ \[Alpha]], \ {i, \ 1, \ D}]], \ \((\(-1\))\)\^D\ \[ExponentialE]\^\(\(-\ \[ImaginaryI]\)\ \[Lambda]\)] + \(\[ExponentialE]\^\(2\ \[ImaginaryI]\ \ \[Lambda]\)\) HypergeometricPFQ[ Union[{1}, \ Table[Array1[i, \ D, \ N, \ \[Alpha]], \ {i, \ 1, \ D}]], \ Union[Table[ Array2[i, \ D, \ N, \ \[Alpha]], \ {i, \ 1, \ D}]], \ \((\(-1\))\)\^D\ \[ExponentialE]\^\(\ \[ImaginaryI]\ \[Lambda]\)])\);\)\)}], "Input"], Cell[CellGroupData[{ Cell[BoxData[ \(\(\(\[IndentingNewLine]\)\(\(Num\ = 5;\)\[IndentingNewLine] \(Dst\ = \ 3;\)\[IndentingNewLine] \(\[Alpha]\ = \ 1\/2;\)\[IndentingNewLine] Plot[{\(\((\[Alpha]\ Num)\)\^\(\(-2\)\ \[Alpha]\ Num\)\) \(Num\^Num\) \(\ \[ExponentialE]\^\(\(-\ \[Lambda]\^2\)\/\(\(\ \)\(4 \((Dst\^2\/\(\[Alpha]\ \ Num\))\)\)\)\)\) \(\[Sum]\+\(x = \(-100\)\)\%100 \[ExponentialE]\^\(\(-\((Dst\ \^2\/\(\[Alpha]\ Num\))\)\) \((x - \(\[ImaginaryI]\ \[Lambda]\)\/\(\(2\)\(\ \ \)\((Dst\^2\/\(\[Alpha]\ Num\))\)\(\ \)\))\)\^2\)\), FActual[Num, \ \[Lambda], \ Dst, \ \[Alpha]]\ }, \ {\[Lambda], \(-\[Pi]\), \ \ \[Pi]}, \ PlotStyle \[Rule] {Hue[ .6], \ Hue[0]}]\[IndentingNewLine] \(Num\ = 51;\)\[IndentingNewLine] \(Dst\ = \ 31;\)\[IndentingNewLine] \(\[Alpha]\ = \ 1\/2;\)\[IndentingNewLine] Plot[{\(\((\[Alpha]\ Num)\)\^\(\(-2\)\ \[Alpha]\ Num\)\) \(Num\^Num\) \(\ \[ExponentialE]\^\(\(-\ \[Lambda]\^2\)\/\(\(\ \)\(4 \((Dst\^2\/\(\[Alpha]\ \ Num\))\)\)\)\)\) \(\[Sum]\+\(x = \(-100\)\)\%100 \[ExponentialE]\^\(\(-\((Dst\ \^2\/\(\[Alpha]\ Num\))\)\) \((x - \(\[ImaginaryI]\ \[Lambda]\)\/\(\(2\)\(\ \ \)\((Dst\^2\/\(\[Alpha]\ Num\))\)\(\ \)\))\)\^2\)\), FActual[Num, \ \[Lambda], \ Dst, \ \[Alpha]]\ }, \ {\[Lambda], \(-\[Pi]\), \ \ \[Pi]}, \ PlotStyle \[Rule] {Hue[ .6], \ Hue[0]}]\[IndentingNewLine] \(Num\ = 51;\)\[IndentingNewLine] \(Dst\ = \ 3;\)\[IndentingNewLine] \(\[Alpha]\ = \ 1\/2;\)\[IndentingNewLine] Plot[{\(\((\[Alpha]\ Num)\)\^\(\(-2\)\ \[Alpha]\ Num\)\) \(Num\^Num\) \(\ \[ExponentialE]\^\(\(-\ \[Lambda]\^2\)\/\(\(\ \)\(4 \((Dst\^2\/\(\[Alpha]\ \ Num\))\)\)\)\)\) \(\[Sum]\+\(x = \(-100\)\)\%100 \[ExponentialE]\^\(\(-\((Dst\ \^2\/\(\[Alpha]\ Num\))\)\) \((x - \(\[ImaginaryI]\ \[Lambda]\)\/\(\(2\)\(\ \ \)\((Dst\^2\/\(\[Alpha]\ Num\))\)\(\ \)\))\)\^2\)\), FActual[Num, \ \[Lambda], \ Dst, \ \[Alpha]]\ }, \ {\[Lambda], \(-\[Pi]\), \ \ \[Pi]}, \ PlotStyle \[Rule] {Hue[ .6], \ Hue[0]}]\[IndentingNewLine] \(Num\ = 101;\)\[IndentingNewLine] \(Dst\ = \ 3;\)\[IndentingNewLine] \(\[Alpha]\ = \ 1\/2;\)\[IndentingNewLine] Plot[{\(\((\[Alpha]\ Num)\)\^\(\(-2\)\ \[Alpha]\ Num\)\) \(Num\^Num\) \(\ \[ExponentialE]\^\(\(-\ \[Lambda]\^2\)\/\(\(\ \)\(4 \((Dst\^2\/\(\[Alpha]\ \ Num\))\)\)\)\)\) \(\[Sum]\+\(x = \(-100\)\)\%100 \[ExponentialE]\^\(\(-\((Dst\ \^2\/\(\[Alpha]\ Num\))\)\) \((x - \(\[ImaginaryI]\ \[Lambda]\)\/\(\(2\)\(\ \ \)\((Dst\^2\/\(\[Alpha]\ Num\))\)\(\ \)\))\)\^2\)\), FActual[Num, \ \[Lambda], \ Dst, \ \[Alpha]]\ }, \ {\[Lambda], \(-\[Pi]\), \ \ \[Pi]}, \ PlotStyle \[Rule] {Hue[ .6], \ Hue[0]}]\)\)\)], "Input"], Cell[GraphicsData["PostScript", "\<\ %! %%Creator: Mathematica %%AspectRatio: .61803 MathPictureStart /Mabs { Mgmatrix idtransform Mtmatrix dtransform } bind def /Mabsadd { Mabs 3 -1 roll add 3 1 roll add exch } bind def %% Graphics %%IncludeResource: font Courier %%IncludeFont: Courier /Courier findfont 10 scalefont setfont % Scaling calculations 0.5 0.151576 -0.247181 0.0252009 [ [.04527 -0.00767 -6 -9 ] [.04527 -0.00767 6 0 ] [.19685 -0.00767 -6 -9 ] [.19685 -0.00767 6 0 ] [.34842 -0.00767 -6 -9 ] [.34842 -0.00767 6 0 ] [.65158 -0.00767 -3 -9 ] [.65158 -0.00767 3 0 ] [.80315 -0.00767 -3 -9 ] [.80315 -0.00767 3 0 ] [.95473 -0.00767 -3 -9 ] [.95473 -0.00767 3 0 ] [.4875 .13083 -12 -4.5 ] [.4875 .13083 0 4.5 ] [.4875 .25684 -12 -4.5 ] [.4875 .25684 0 4.5 ] [.4875 .38284 -12 -4.5 ] [.4875 .38284 0 4.5 ] [.4875 .50885 -12 -4.5 ] [.4875 .50885 0 4.5 ] [ 0 0 0 0 ] [ 1 .61803 0 0 ] ] MathScale % Start of Graphics 1 setlinecap 1 setlinejoin newpath 0 g .25 Mabswid [ ] 0 setdash .04527 .00483 m .04527 .01108 L s [(-3)] .04527 -0.00767 0 1 Mshowa .19685 .00483 m .19685 .01108 L s [(-2)] .19685 -0.00767 0 1 Mshowa .34842 .00483 m .34842 .01108 L s [(-1)] .34842 -0.00767 0 1 Mshowa .65158 .00483 m .65158 .01108 L s [(1)] .65158 -0.00767 0 1 Mshowa .80315 .00483 m .80315 .01108 L s [(2)] .80315 -0.00767 0 1 Mshowa .95473 .00483 m .95473 .01108 L s [(3)] .95473 -0.00767 0 1 Mshowa .125 Mabswid .07559 .00483 m .07559 .00858 L s .1059 .00483 m .1059 .00858 L s .13622 .00483 m .13622 .00858 L s .16653 .00483 m .16653 .00858 L s .22716 .00483 m .22716 .00858 L s .25748 .00483 m .25748 .00858 L s .28779 .00483 m .28779 .00858 L s .31811 .00483 m .31811 .00858 L s .37874 .00483 m .37874 .00858 L s .40905 .00483 m .40905 .00858 L s .43937 .00483 m .43937 .00858 L s .46968 .00483 m .46968 .00858 L s .53032 .00483 m .53032 .00858 L s .56063 .00483 m .56063 .00858 L s .59095 .00483 m .59095 .00858 L s .62126 .00483 m .62126 .00858 L s .68189 .00483 m .68189 .00858 L s .71221 .00483 m .71221 .00858 L s .74252 .00483 m .74252 .00858 L s .77284 .00483 m .77284 .00858 L s .83347 .00483 m .83347 .00858 L s .86378 .00483 m .86378 .00858 L s .8941 .00483 m .8941 .00858 L s .92441 .00483 m .92441 .00858 L s .01496 .00483 m .01496 .00858 L s .98504 .00483 m .98504 .00858 L s .25 Mabswid 0 .00483 m 1 .00483 L s .5 .13083 m .50625 .13083 L s [(15)] .4875 .13083 1 0 Mshowa .5 .25684 m .50625 .25684 L s [(20)] .4875 .25684 1 0 Mshowa .5 .38284 m .50625 .38284 L s [(25)] .4875 .38284 1 0 Mshowa .5 .50885 m .50625 .50885 L s [(30)] .4875 .50885 1 0 Mshowa .125 Mabswid .5 .03003 m .50375 .03003 L s .5 .05523 m .50375 .05523 L s .5 .08043 m .50375 .08043 L s .5 .10563 m .50375 .10563 L s .5 .15603 m .50375 .15603 L s .5 .18124 m .50375 .18124 L s .5 .20644 m .50375 .20644 L s .5 .23164 m .50375 .23164 L s .5 .28204 m .50375 .28204 L s .5 .30724 m .50375 .30724 L s .5 .33244 m .50375 .33244 L s .5 .35764 m .50375 .35764 L s .5 .40804 m .50375 .40804 L s .5 .43324 m .50375 .43324 L s .5 .45845 m .50375 .45845 L s .5 .48365 m .50375 .48365 L s .5 .53405 m .50375 .53405 L s .5 .55925 m .50375 .55925 L s .5 .58445 m .50375 .58445 L s .5 .60965 m .50375 .60965 L s .25 Mabswid .5 0 m .5 .61803 L s 0 0 m 1 0 L 1 .61803 L 0 .61803 L closepath clip newpath 0 .4 1 r .5 Mabswid .02381 .51518 m .02499 .51518 L .02605 .51519 L .02729 .51519 L .02846 .5152 L .03053 .51522 L .03279 .51526 L .03527 .51531 L .0379 .51537 L .04262 .51552 L .04749 .51572 L .05205 .51594 L .06244 .5166 L .07305 .51748 L .08274 .51847 L .10458 .52129 L .14429 .52838 L .18248 .5372 L .22313 .5481 L .26226 .55935 L .30384 .57129 L .34391 .58194 L .38246 .59072 L .402 .59442 L .42346 .59782 L .44388 .60033 L .45301 .60122 L .46295 .60201 L .46838 .60236 L .4734 .60264 L .4781 .60286 L .4833 .60305 L .48553 .60312 L .48794 .60318 L .49002 .60322 L .4923 .60326 L .49473 .60329 L .49605 .6033 L .49728 .60331 L .49844 .60332 L .49949 .60332 L .50071 .60332 L .50186 .60332 L .50301 .60331 L .50425 .6033 L .50542 .60329 L .50648 .60328 L .5091 .60324 L .51158 .60319 L .5165 .60306 L Mistroke .52187 .60286 L .53144 .60237 L .54032 .60177 L .56088 .59981 L .5795 .59739 L .61962 .59029 L .65822 .58141 L .69928 .57041 L .73882 .55904 L .77684 .5481 L .81732 .53725 L .85628 .52826 L .87613 .52444 L .89769 .52096 L .91843 .51834 L .92832 .51736 L .93759 .5166 L .94643 .51603 L .95595 .51557 L .9611 .5154 L .96369 .51533 L .96652 .51527 L .96894 .51523 L .9703 .51521 L .97153 .5152 L .97268 .51519 L .97393 .51519 L .97511 .51518 L .97619 .51518 L Mfstroke 1 0 0 r .02381 .01472 m .02499 .01472 L .02605 .01472 L .02729 .01472 L .02846 .01472 L .03053 .01473 L .03279 .01474 L .03527 .01475 L .0379 .01477 L .04262 .01481 L .04749 .01486 L .05205 .01492 L .06244 .01511 L .07305 .01535 L .08274 .01562 L .10458 .01639 L .14429 .01833 L .18248 .02073 L .22313 .02368 L .26226 .02671 L .30384 .02991 L .34391 .03275 L .38246 .03509 L .402 .03607 L .42346 .03697 L .44388 .03764 L .45301 .03787 L .46295 .03808 L .46838 .03818 L .4734 .03825 L .4781 .03831 L .4833 .03836 L .48553 .03838 L .48794 .03839 L .49002 .0384 L .4923 .03841 L .49473 .03842 L .49605 .03843 L .49728 .03843 L .49844 .03843 L .49949 .03843 L .50071 .03843 L .50186 .03843 L .50301 .03843 L .50425 .03843 L .50542 .03842 L .50648 .03842 L .5091 .03841 L .51158 .0384 L .5165 .03836 L Mistroke .52187 .03831 L .53144 .03818 L .54032 .03802 L .56088 .0375 L .5795 .03686 L .61962 .03497 L .65822 .03261 L .69928 .02967 L .73882 .02662 L .77684 .02368 L .81732 .02074 L .85628 .0183 L .87613 .01725 L .89769 .0163 L .91843 .01558 L .92832 .01531 L .93759 .01511 L .94643 .01495 L .95595 .01482 L .9611 .01478 L .96369 .01476 L .96652 .01474 L .96894 .01473 L .9703 .01472 L .97153 .01472 L .97268 .01472 L .97393 .01472 L .97511 .01472 L .97619 .01472 L Mfstroke % End of Graphics MathPictureEnd \ \>"], "Graphics", ImageSize->{288, 177.938}, ImageMargins->{{43, 0}, {0, 0}}, ImageRegion->{{0, 1}, {0, 1}}, ImageCache->GraphicsData["Bitmap", "\<\ CF5dJ6E]HGAYHf4PAg9QL6QYHgVmI00<006mIKeT0>6mI2g`0BfmI001E KeTEO00UKeT2000TKeTEO01FKeT006Y_F@il01M_F@03001_FFmI01Q_F@]l06]_F@00N6mIKeT008m_F@03001_FFmI08i_F@00SfmI00<006mIKeT0SVmI002?KeT2002? KeT008m_F@03001_FFmI08i_F@00SfmI00<006mIKeT0SVmI002?KeT00`00KeU_F@2>KeT008m_F@03 001_FFmI08i_F@00SfmI00<006mIKeT0SVmI002?KeT00`00KeU_F@2>KeT008m_F@8008m_F@00SfmI 00<006mIKeT0SVmI002?KeT00`00KeU_F@2>KeT008m_F@03001_FFmI08i_F@00SfmI00<006mIKeT0 SVmI002?KeT00`00KeU_F@2>KeT008m_F@03001_FFmI08i_F@00SfmI0P00SfmI002?KeT00`00KeU_ F@2>KeT008m_F@03001_FFmI08i_F@00SfmI00<006mIKeT0SVmI002?KeT00`00KeU_F@2>KeT0085_ F@D0009_F@8000E_F@03001_FFmI08i_F@00PfmI00D006mIKeU_F@00009_F@03001_FFmI009_F@03 001_FFmI08i_F@00PfmI00<006mIKeT016mI00<006mIKeT00VmI0`00SVmI0023KeT00`00KeU_F@02 KeT20005KeT00`00KeU_F@2>KeT008=_F@03001_FFmI009_F@03001_FFmI00A_F@03001_FFmI08i_ F@00PVmI0P0016mI0`0016mI00<006mIKeT0SVmI002?KeT00`00KeU_F@2>KeT008m_F@03001_FFmI 08i_F@00SfmI0P00SfmI002?KeT00`00KeU_F@2>KeT008m_F@03001_FFmI08i_F@00SfmI00<006mI KeT0SVmI002?KeT00`00KeU_F@2>KeT008m_F@03001_FFmI08i_F@00SfmI00<006mIKeT0SVmI002? KeT2002?KeT008m_F@03001_FFmI08i_F@00SfmI00<006mIKeT0SVmI002?KeT00`00KeU_F@2>KeT0 08m_F@03001_FFmI08i_F@00SfmI00<006mIKeT0SVmI002?KeT00`00KeU_F@2>KeT008m_F@8008m_ F@00SfmI00<006mIKeT0SVmI002?KeT00`00KeU_F@2>KeT008m_F@03001_FFmI08i_F@00SfmI00<0 06mIKeT0SVmI002?KeT00`00KeU_F@2>KeT008m_F@03001_FFmI08i_F@00SfmI0P00SfmI002?KeT0 0`00KeU_F@2>KeT008m_F@03001_FFmI08i_F@00SfmI00<006mIKeT0SVmI002?KeT00`00KeU_F@2> KeT0085_F@@000=_F@8000E_F@03001_FFmI08i_F@00PFmI00<006mIKeT00fmI00@006mIKeT000A_ F@03001_FFmI08i_F@00PVmI00<006mIKeT00VmI00@006mIKeT000A_F@<008i_F@00PfmI00D006mI KeU_F@00009_F@03001_FFmI009_F@03001_FFmI08i_F@00PFmI00@006mIKeT0009_F@04001_FFmI 0004KeT00`00KeU_F@2>KeT0089_F@8000A_F@8000E_F@03001_FFmI08i_F@00SfmI00<006mIKeT0 SVmI002?KeT00`00KeU_F@2>KeT008m_F@8008m_F@00SfmI00<006mIKeT0SVmI002?KeT00`00KeU_ F@2>KeT008m_F@03001_FFmI08i_F@00SfmI00<006mIKeT0SVmI002?KeT00`00KeU_F@2>KeT008m_ F@03001_FFmI08i_F@00SfmI0P00SfmI002?KeT00`00KeU_F@2>KeT008m_F@03001_FFmI08i_F@00 SfmI00<006mIKeT0SVmI002?KeT00`00KeU_F@2>KeT008m_F@03001_FFmI08i_F@00SfmI00<006mI KeT0SVmI002?KeT2002?KeT008m_F@03001_FFmI08i_F@00SfmI00<006mIKeT0SVmI002?KeT00`00 KeU_F@2>KeT008m_F@03001_FFmI08i_F@00SfmI00<006mIKeT0SVmI002?KeT00`00KeU_F@2>KeT0 08m_F@8008m_F@00SfmI00<006mIKeT0SVmI002?KeT00`00KeU_F@2>KeT008m_F@03001_FFmI08i_ F@00PFmI10000fmI0P001FmI00<006mIKeT0SVmI0021KeT00`00KeU_F@03KeT01000KeU_F@0016mI 00<006mIKeT0SVmI0022KeT00`00KeU_F@05KeT00`00KeU_F@02KeT3002>KeT008=_F@03001_FFmI 009_F@8000E_F@03001_FFmI08i_F@00PFmI00@006mIKeT000=_F@03001_FFmI00A_F@03001_FFmI 08i_F@00PVmI0P0016mI0`0016mI00<006mIKeT0SVmI002?KeT00`00KeU_F@2>KeT008m_F@03001_ FFmI08i_F@00SfmI00<006mIKeT0SVmI002?KeT2002?KeT008m_F@03001_FFmI08i_F@00SfmI00<0 06mIKeT0SVmI002?KeT00`00KeU_F@2>KeT008m_F@03001_FFmI08i_F@00SfmI00<006mIKeT0SVmI 002?KeT00`00KeU_F@2>KeT008m_F@8008m_F@00SfmI00<006mIKeT0SVmI002?KeT00`00KeU_F@2> KeT008m_F@03001_FFmI08i_F@00SfmI00<006mIKeT0SVmI002?KeT00`00KeU_F@2>KeT008m_F@03 001_FFmI08i_F@00SfmI0P00SfmI002?KeT00`00KeU_F@2>KeT008m_F@03001_FFmI08i_F@00SfmI 00<006mIKeT0SVmI002?KeT00`00KeU_F@2>KeT008m_F@03001_FFmI08i_F@00SfmI0P00SfmI002? KeT00`00KeU_F@2>KeT008m_F@03001_FFmI08i_F@00SfmI00<006mIKeT0SVmI002?KeT00`00KeU_ F@2>KeT0089_F@8000A_F@8000E_F@03001_FFmI08i_F@00PFmI00@006mIKeT0009_F@04001_FFmI 0004KeT00`00KeU_F@2>KeT008=_F@05001_FFmIKeT00002KeT00`00KeU_F@02KeT3002>KeT008A_ F@04001_FFmI0002KeT00`00KeU_F@02KeT00`00KeU_F@2>KeT000m_F@`1WfI_F@04001_FFmI0002 KeT01000KeU_F@0016mI00<006mIKeT0KfmI3`6O46mI000KKeT70ImPKeT20004KeT20005KeT00`00 KeU_F@1VKeT90IlOKeT0029_F@T1WfA_F@03001_FFmI061_F@H1WbQ_F@00:fmI1`6OGFmI00<006mI KeT0G6mI106O;VmI000bKeT30ImJKeT00`00KeU_F@1HKeT40IlbKeT003E_F@@1WeI_F@8005E_F@@1 WcI_F@00>FmI0`6ODfmI00<006mIKeT0DFmI0`6O>VmI000lKeT40Im?KeT00`00KeU_F@1=KeT40Ilm KeT0041_F@@1Wd]_F@03001_FFmI04U_F@@1Wd5_F@00A6mI0`6OB6mI00<006mIKeT0AVmI0`6OAFmI 0017KeT30Im5KeT00`00KeU_F@13KeT30Im8KeT004Y_F@@1Wd5_F@03001_FFmI03m_F@@1Wd]_F@00 CVmI0`6O?VmI0P00?FmI0`6OCfmI001AKeT40IljKeT00`00KeU_F@0hKeT40ImBKeT005E_F@@1WcI_ F@03001_FFmI03A_F@@1WeI_F@00FFmI0`6OKeT008m_F@03001_FFmI08i_F@00\ \>"], ImageRangeCache->{{{0, 287}, {176.938, 0}} -> {-3.52732, 8.17334, \ 0.0245806, 0.147845}}], Cell[BoxData[ TagBox[\(\[SkeletonIndicator] Graphics \[SkeletonIndicator]\), False, Editable->False]], "Output"], Cell[GraphicsData["PostScript", "\<\ %! %%Creator: Mathematica %%AspectRatio: .61803 MathPictureStart /Mabs { Mgmatrix idtransform Mtmatrix dtransform } bind def /Mabsadd { Mabs 3 -1 roll add 3 1 roll add exch } bind def %% Graphics %%IncludeResource: font Courier %%IncludeFont: Courier /Courier findfont 10 scalefont setfont % Scaling calculations 0.5 0.151576 0.0147151 2.61393e-016 [ [.04527 .00222 -6 -9 ] [.04527 .00222 6 0 ] [.19685 .00222 -6 -9 ] [.19685 .00222 6 0 ] [.34842 .00222 -6 -9 ] [.34842 .00222 6 0 ] [.65158 .00222 -3 -9 ] [.65158 .00222 3 0 ] [.80315 .00222 -3 -9 ] [.80315 .00222 3 0 ] [.95473 .00222 -3 -9 ] [.95473 .00222 3 0 ] [.4875 .14541 -33 -6.25 ] [.4875 .14541 0 6.25 ] [.4875 .27611 -33 -6.25 ] [.4875 .27611 0 6.25 ] [.4875 .4068 -45 -6.25 ] [.4875 .4068 0 6.25 ] [.4875 .5375 -33 -6.25 ] [.4875 .5375 0 6.25 ] [ 0 0 0 0 ] [ 1 .61803 0 0 ] ] MathScale % Start of Graphics 1 setlinecap 1 setlinejoin newpath 0 g .25 Mabswid [ ] 0 setdash .04527 .01472 m .04527 .02097 L s [(-3)] .04527 .00222 0 1 Mshowa .19685 .01472 m .19685 .02097 L s [(-2)] .19685 .00222 0 1 Mshowa .34842 .01472 m .34842 .02097 L s [(-1)] .34842 .00222 0 1 Mshowa .65158 .01472 m .65158 .02097 L s [(1)] .65158 .00222 0 1 Mshowa .80315 .01472 m .80315 .02097 L s [(2)] .80315 .00222 0 1 Mshowa .95473 .01472 m .95473 .02097 L s [(3)] .95473 .00222 0 1 Mshowa .125 Mabswid .07559 .01472 m .07559 .01847 L s .1059 .01472 m .1059 .01847 L s .13622 .01472 m .13622 .01847 L s .16653 .01472 m .16653 .01847 L s .22716 .01472 m .22716 .01847 L s .25748 .01472 m .25748 .01847 L s .28779 .01472 m .28779 .01847 L s .31811 .01472 m .31811 .01847 L s .37874 .01472 m .37874 .01847 L s .40905 .01472 m .40905 .01847 L s .43937 .01472 m .43937 .01847 L s .46968 .01472 m .46968 .01847 L s .53032 .01472 m .53032 .01847 L s .56063 .01472 m .56063 .01847 L s .59095 .01472 m .59095 .01847 L s .62126 .01472 m .62126 .01847 L s .68189 .01472 m .68189 .01847 L s .71221 .01472 m .71221 .01847 L s .74252 .01472 m .74252 .01847 L s .77284 .01472 m .77284 .01847 L s .83347 .01472 m .83347 .01847 L s .86378 .01472 m .86378 .01847 L s .8941 .01472 m .8941 .01847 L s .92441 .01472 m .92441 .01847 L s .01496 .01472 m .01496 .01847 L s .98504 .01472 m .98504 .01847 L s .25 Mabswid 0 .01472 m 1 .01472 L s .5 .14541 m .50625 .14541 L s gsave .4875 .14541 -33 -4.25 Mabsadd m 1 1 Mabs scale /Courier findfont 10 scalefont setfont (5) show /Math1Mono findfont 10 scalefont setfont (\\264) show /Courier findfont 10 scalefont setfont (10) show 0 5.25 rmoveto /Courier findfont 7.5 scalefont setfont (14) show grestore .5 .27611 m .50625 .27611 L s gsave .4875 .27611 -33 -4.25 Mabsadd m 1 1 Mabs scale /Courier findfont 10 scalefont setfont (1) show /Math1Mono findfont 10 scalefont setfont (\\264) show /Courier findfont 10 scalefont setfont (10) show 0 5.25 rmoveto /Courier findfont 7.5 scalefont setfont (15) show grestore .5 .4068 m .50625 .4068 L s gsave .4875 .4068 -45 -4.25 Mabsadd m 1 1 Mabs scale /Courier findfont 10 scalefont setfont (1.5) show /Math1Mono findfont 10 scalefont setfont (\\264) show /Courier findfont 10 scalefont setfont (10) show 0 5.25 rmoveto /Courier findfont 7.5 scalefont setfont (15) show grestore .5 .5375 m .50625 .5375 L s gsave .4875 .5375 -33 -4.25 Mabsadd m 1 1 Mabs scale /Courier findfont 10 scalefont setfont (2) show /Math1Mono findfont 10 scalefont setfont (\\264) show /Courier findfont 10 scalefont setfont (10) show 0 5.25 rmoveto /Courier findfont 7.5 scalefont setfont (15) show grestore .125 Mabswid .5 .04085 m .50375 .04085 L s .5 .06699 m .50375 .06699 L s .5 .09313 m .50375 .09313 L s .5 .11927 m .50375 .11927 L s .5 .17155 m .50375 .17155 L s .5 .19769 m .50375 .19769 L s .5 .22383 m .50375 .22383 L s .5 .24997 m .50375 .24997 L s .5 .30225 m .50375 .30225 L s .5 .32839 m .50375 .32839 L s .5 .35453 m .50375 .35453 L s .5 .38066 m .50375 .38066 L s .5 .43294 m .50375 .43294 L s .5 .45908 m .50375 .45908 L s .5 .48522 m .50375 .48522 L s .5 .51136 m .50375 .51136 L s .5 .56364 m .50375 .56364 L s .5 .58978 m .50375 .58978 L s .5 .61592 m .50375 .61592 L s .25 Mabswid .5 0 m .5 .61803 L s 0 0 m 1 0 L 1 .61803 L 0 .61803 L closepath clip newpath 0 .4 1 r .5 Mabswid .02381 .60332 m .06244 .60332 L .10458 .60332 L .14415 .60332 L .18221 .60332 L .22272 .60332 L .26171 .60332 L .30316 .60332 L .34309 .60332 L .3815 .60332 L .42237 .60332 L .46172 .60332 L .49955 .60332 L .53984 .60332 L .57861 .60332 L .61984 .60332 L .65954 .60332 L .69774 .60332 L .73838 .60332 L .77751 .60332 L .81909 .60332 L .85916 .60332 L .89771 .60332 L .93871 .60332 L .97619 .60332 L s 1 0 0 r .02381 .08016 m .06244 .08016 L .10458 .08016 L .14415 .08016 L .18221 .08016 L .22272 .08016 L .26171 .08016 L .30316 .08016 L .34309 .08016 L .3815 .08016 L .42237 .08016 L .46172 .08016 L .49955 .08016 L .53984 .08016 L .57861 .08016 L .61984 .08016 L .65954 .08016 L .69774 .08016 L .73838 .08016 L .77751 .08016 L .81909 .08016 L .85916 .08016 L .89771 .08016 L .93871 .08016 L .97619 .08016 L s % End of Graphics MathPictureEnd \ \>"], "Graphics", ImageSize->{288, 177.938}, ImageMargins->{{43, 0}, {0, 0}}, ImageRegion->{{0, 1}, {0, 1}}, ImageCache->GraphicsData["Bitmap", "\<\ CF5dJ6E]HGAYHf4PAg9QL6QYHgKeT008m_F@03001_FFmI 08i_F@001fmIo`004P0026mI000;KeT00`00KeU_F@05KeT00`00KeU_F@05KeT00`00KeU_F@06KeT0 0`00KeU_F@05KeT00`00KeU_F@05KeT00`00KeU_F@05KeT00`00KeU_F@06KeT00`00KeU_F@05KeT0 0`00KeU_F@05KeT00`00KeU_F@05KeT00`00KeU_F@06KeT00`00KeU_F@05KeT00`00KeU_F@05KeT0 0`00KeU_F@05KeT00`00KeU_F@06KeT00`00KeU_F@05KeT00`00KeU_F@05KeT00`00KeU_F@06KeT0 0`00KeU_F@05KeT00`00KeU_F@05KeT00`00KeU_F@05KeT00`00KeU_F@06KeT00`00KeU_F@05KeT0 0`00KeU_F@05KeT00`00KeU_F@05KeT00`00KeU_F@06KeT00`00KeU_F@05KeT00`00KeU_F@05KeT0 0`00KeU_F@05KeT00`00KeU_F@06KeT00`00KeU_F@05KeT00`00KeU_F@05KeT00`00KeU_F@0:KeT0 01=_F@03001_FFmI02I_F@03001_FFmI02M_F@03001_FFmI02I_F@03001_FFmI02I_F@03001_FFmI 02M_F@03001_FFmI02I_F@03001_FFmI019_F@00SfmI00<006mIKeT0SVmI002?KeT00`00KeU_F@2> KeT008m_F@03001_FFmI08i_F@00SfmI00<006mIKeT0SVmI002?KeT2002?KeT008m_F@03001_FFmI 08i_F@00SfmI00<006mIKeT0SVmI002?KeT00`00KeU_F@2>KeT008m_F@03001_FFmI08i_F@00SfmI 00<006mIKeT0SVmI002?KeT00`00KeU_F@2>KeT008m_F@8008m_F@00SfmI00<006mIKeT0SVmI002? KeT00`00KeU_F@2>KeT008m_F@03001_FFmI08i_F@003FmIog`01W`03VmI002?KeT00`00KeU_F@2> KeT008m_F@03001_FFmI08i_F@00SfmI0P00SfmI002?KeT00`00KeU_F@2>KeT008m_F@03001_FFmI 08i_F@00SfmI00<006mIKeT0SVmI002?KeT00`00KeU_F@2>KeT008m_F@03001_FFmI08i_F@00SfmI 00<006mIKeT0SVmI002?KeT2002?KeT008m_F@03001_FFmI08i_F@00SfmI00<006mIKeT0SVmI002? KeT00`00KeU_F@2>KeT006e_F@8000=_F@03001_FFmI00D0009_F@80015_F@03001_FFmI08i_F@00 K6mI00@006mIKeT000=_F@05001_F@00KeT00003KeT01000KeU_F@0046mI00<006mIKeT0SVmI001_ KeT00`00KeU_F@02KeT01000KeU_F@000fmI00@006mIKeT0011_F@03001_FFmI08i_F@00KFmI0P00 16mI00D006mI001_F@0000=_F@04001_FFmI000@KeT00`00KeU_F@2>KeT006e_F@03001_FFmI009_ F@04001_FFmIKeT20003KeT01000KeU_F@0046mI0`00SVmI001]KeT30006KeT20004KeT2000AKeT0 0`00KeU_F@2>KeT0085_F@<000=_F@8000I_F@03001_FFmI08i_F@00PVmI00@006mIKeU_F@<000I_ F@03001_FFmI08i_F@00PVmI00L006mIKeU_F@00KeT00006KeT00`00KeU_F@2>KeT0089_F@03001_ FFmI009_F@03001_FFmI00E_F@03001_FFmI08i_F@00PFmI0P0016mI00<006mIKeT01FmI00<006mI KeT0SVmI002?KeT2002?KeT008m_F@03001_FFmI08i_F@00SfmI00<006mIKeT0SVmI002?KeT00`00 KeU_F@2>KeT008m_F@03001_FFmI08i_F@00SfmI00<006mIKeT0SVmI002?KeT00`00KeU_F@2>KeT0 08m_F@8008m_F@00SfmI00<006mIKeT0SVmI002?KeT00`00KeU_F@2>KeT008m_F@03001_FFmI08i_ F@00SfmI00<006mIKeT0SVmI002?KeT00`00KeU_F@2>KeT008m_F@03001_FFmI08i_F@00SfmI0P00 SfmI002?KeT00`00KeU_F@2>KeT008m_F@03001_FFmI08i_F@00SfmI00<006mIKeT0SVmI002?KeT0 0`00KeU_F@2>KeT008m_F@03001_FFmI08i_F@00SfmI00<006mIKeT0SVmI002?KeT2002?KeT008m_ F@03001_FFmI08i_F@00SfmI00<006mIKeT0SVmI002?KeT00`00KeU_F@2>KeT006a_F@D00004KeT0 06mIKeT50002KeT2000AKeT00`00KeU_F@2>KeT006i_F@03001_FFmI009_F@05001_F@00KeT00003 KeT01000KeU_F@0046mI00<006mIKeT0SVmI001^KeT00`00KeU_F@03KeT01000KeU_F@000fmI00@0 06mIKeT0011_F@03001_FFmI08i_F@00KVmI00<006mIKeT00VmI00D006mI001_F@0000=_F@04001_ FFmI000@KeT3002>KeT006i_F@05001_FFmIKeT00003KeT20003KeT01000KeU_F@0046mI00<006mI KeT0SVmI001]KeT20007KeT20004KeT20003KeT30002KeT30006KeT00`00KeU_F@2>KeT0089_F@03 001_FFmI00=_F@03001_FFmI00A_F@03001_FFmI08i_F@00PVmI00<006mIKeT00fmI00<006mIKeT0 16mI00<006mIKeT0SVmI0022KeT01000KeU_FFmI0P001fmI00<006mIKeT0SVmI0021KeT20003KeT3 0006KeT00`00KeU_F@2>KeT008m_F@8008m_F@00SfmI00<006mIKeT0SVmI002?KeT00`00KeU_F@2> KeT008m_F@03001_FFmI08i_F@00SfmI00<006mIKeT0SVmI002?KeT00`00KeU_F@2>KeT008m_F@03 001_FFmI08i_F@00SfmI00<006mIKeT0SVmI002?KeT2002?KeT008m_F@03001_FFmI08i_F@00SfmI 00<006mIKeT0SVmI002?KeT00`00KeU_F@2>KeT008m_F@03001_FFmI08i_F@00SfmI00<006mIKeT0 SVmI002?KeT00`00KeU_F@2>KeT008m_F@8008m_F@00SfmI00<006mIKeT0SVmI002?KeT00`00KeU_ F@2>KeT008m_F@03001_FFmI08i_F@00SfmI00<006mIKeT0SVmI002?KeT00`00KeU_F@2>KeT008m_ F@03001_FFmI08i_F@00SfmI0P00SfmI002?KeT00`00KeU_F@2>KeT008m_F@03001_FFmI08i_F@00 SfmI00<006mIKeT0SVmI001PKeT50002KeT20004KeT20003KeT00`00KeU_F@050002KeT2000AKeT0 0`00KeU_F@2>KeT0069_F@03001_FFmI00M_F@04001_FFmI0003KeT01@00KeT006mI00000fmI00@0 06mIKeT0011_F@03001_FFmI08i_F@00HVmI00<006mIKeT02VmI00<006mIKeT00VmI00@006mIKeT0 00=_F@04001_FFmI000@KeT00`00KeU_F@2>KeT0069_F@03001_FFmI00Q_F@8000A_F@05001_F@00 KeT00003KeT01000KeU_F@0046mI0`00SVmI001RKeT00`00KeU_F@08KeT00`00KeU_F@02KeT01000 KeU_FFmI0P000fmI00@006mIKeT0011_F@03001_FFmI08i_F@00HFmI0P002VmI0`001VmI0P0016mI 0P000fmI0`000VmI0`001VmI00<006mIKeT0SVmI0022KeT00`00KeU_F@03KeT00`00KeU_F@04KeT0 0`00KeU_F@2>KeT0089_F@03001_FFmI00=_F@03001_FFmI00A_F@03001_FFmI08i_F@00PVmI00@0 06mIKeU_F@8000M_F@03001_FFmI08i_F@00PFmI0P000fmI0`001VmI00<006mIKeT0SVmI002?KeT2 002?KeT008m_F@03001_FFmI08i_F@00SfmI00<006mIKeT0SVmI002?KeT00`00KeU_F@2>KeT008m_ F@03001_FFmI08i_F@00SfmI00<006mIKeT0SVmI002?KeT00`00KeU_F@2>KeT008m_F@8008m_F@00 SfmI00<006mIKeT0SVmI002?KeT00`00KeU_F@2>KeT008m_F@03001_FFmI08i_F@00SfmI00<006mI KeT0SVmI002?KeT00`00KeU_F@2>KeT008m_F@03001_FFmI08i_F@00SfmI0P00SfmI002?KeT00`00 KeU_F@2>KeT008m_F@03001_FFmI08i_F@00SfmI00<006mIKeT0SVmI002?KeT00`00KeU_F@2>KeT0 08m_F@03001_FFmI08i_F@00SfmI00<006mIKeT0SVmI002?KeT2002?KeT008m_F@03001_FFmI08i_ F@00SfmI00<006mIKeT0SVmI002?KeT00`00KeU_F@2>KeT006a_F@@0009_F@03001_FFmI00D0009_ F@80015_F@03001_FFmI08i_F@00K6mI00<006mIKeT016mI00D006mI001_F@0000=_F@04001_FFmI 000@KeT00`00KeU_F@2>KeT006e_F@03001_FFmI00A_F@04001_FFmI0003KeT01000KeU_F@0046mI 00<006mIKeT0SVmI001^KeT00`00KeU_F@02KeT01@00KeT006mI00000fmI00@006mIKeT0011_F@03 001_FFmI08i_F@00K6mI00@006mIKeT0009_F@04001_FFmIKeT20003KeT01000KeU_F@0046mI0`00 SVmI001]KeT20007KeT20004KeT2000AKeT00`00KeU_F@2>KeT0085_F@<0009_F@<000I_F@03001_ FFmI08i_F@00PVmI00<006mIKeT00fmI00<006mIKeT016mI00<006mIKeT0SVmI0022KeT00`00KeU_ F@03KeT00`00KeU_F@04KeT00`00KeU_F@2>KeT0089_F@04001_FFmIKeT20007KeT00`00KeU_F@2> KeT0085_F@8000=_F@<000I_F@03001_FFmI08i_F@00SfmI0P00SfmI002?KeT00`00KeU_F@2>KeT0 08m_F@03001_FFmI08i_F@00SfmI00<006mIKeT0SVmI002?KeT00`00KeU_F@2>KeT008m_F@03001_ FFmI08i_F@00SfmI00<006mIKeT0SVmI002?KeT2002?KeT008m_F@03001_FFmI08i_F@00SfmI00<0 06mIKeT0SVmI000=KeWo0Il60Il>KeT008m_F@03001_FFmI08i_F@00SfmI00<006mIKeT0SVmI002? KeT00`00KeU_F@2>KeT008m_F@8008m_F@00\ \>"], ImageRangeCache->{{{0, 287}, {176.938, 0}} -> {-3.47156, -1.7407*^14, \ 0.0241921, 1.40284*^13}}], Cell[BoxData[ TagBox[\(\[SkeletonIndicator] Graphics \[SkeletonIndicator]\), False, Editable->False]], "Output"], Cell[GraphicsData["PostScript", "\<\ %! %%Creator: Mathematica %%AspectRatio: .61803 MathPictureStart /Mabs { Mgmatrix idtransform Mtmatrix dtransform } bind def /Mabsadd { Mabs 3 -1 roll add 3 1 roll add exch } bind def %% Graphics %%IncludeResource: font Courier %%IncludeFont: Courier /Courier findfont 10 scalefont setfont % Scaling calculations 0.5 0.151576 0.0147151 8.76142e-017 [ [.04527 .00222 -6 -9 ] [.04527 .00222 6 0 ] [.19685 .00222 -6 -9 ] [.19685 .00222 6 0 ] [.34842 .00222 -6 -9 ] [.34842 .00222 6 0 ] [.65158 .00222 -3 -9 ] [.65158 .00222 3 0 ] [.80315 .00222 -3 -9 ] [.80315 .00222 3 0 ] [.95473 .00222 -3 -9 ] [.95473 .00222 3 0 ] [.4875 .10233 -33 -6.25 ] [.4875 .10233 0 6.25 ] [.4875 .18994 -33 -6.25 ] [.4875 .18994 0 6.25 ] [.4875 .27756 -33 -6.25 ] [.4875 .27756 0 6.25 ] [.4875 .36517 -33 -6.25 ] [.4875 .36517 0 6.25 ] [.4875 .45279 -33 -6.25 ] [.4875 .45279 0 6.25 ] [.4875 .5404 -33 -6.25 ] [.4875 .5404 0 6.25 ] [ 0 0 0 0 ] [ 1 .61803 0 0 ] ] MathScale % Start of Graphics 1 setlinecap 1 setlinejoin newpath 0 g .25 Mabswid [ ] 0 setdash .04527 .01472 m .04527 .02097 L s [(-3)] .04527 .00222 0 1 Mshowa .19685 .01472 m .19685 .02097 L s [(-2)] .19685 .00222 0 1 Mshowa .34842 .01472 m .34842 .02097 L s [(-1)] .34842 .00222 0 1 Mshowa .65158 .01472 m .65158 .02097 L s [(1)] .65158 .00222 0 1 Mshowa .80315 .01472 m .80315 .02097 L s [(2)] .80315 .00222 0 1 Mshowa .95473 .01472 m .95473 .02097 L s [(3)] .95473 .00222 0 1 Mshowa .125 Mabswid .07559 .01472 m .07559 .01847 L s .1059 .01472 m .1059 .01847 L s .13622 .01472 m .13622 .01847 L s .16653 .01472 m .16653 .01847 L s .22716 .01472 m .22716 .01847 L s .25748 .01472 m .25748 .01847 L s .28779 .01472 m .28779 .01847 L s .31811 .01472 m .31811 .01847 L s .37874 .01472 m .37874 .01847 L s .40905 .01472 m .40905 .01847 L s .43937 .01472 m .43937 .01847 L s .46968 .01472 m .46968 .01847 L s .53032 .01472 m .53032 .01847 L s .56063 .01472 m .56063 .01847 L s .59095 .01472 m .59095 .01847 L s .62126 .01472 m .62126 .01847 L s .68189 .01472 m .68189 .01847 L s .71221 .01472 m .71221 .01847 L s .74252 .01472 m .74252 .01847 L s .77284 .01472 m .77284 .01847 L s .83347 .01472 m .83347 .01847 L s .86378 .01472 m .86378 .01847 L s .8941 .01472 m .8941 .01847 L s .92441 .01472 m .92441 .01847 L s .01496 .01472 m .01496 .01847 L s .98504 .01472 m .98504 .01847 L s .25 Mabswid 0 .01472 m 1 .01472 L s .5 .10233 m .50625 .10233 L s gsave .4875 .10233 -33 -4.25 Mabsadd m 1 1 Mabs scale /Courier findfont 10 scalefont setfont (1) show /Math1Mono findfont 10 scalefont setfont (\\264) show /Courier findfont 10 scalefont setfont (10) show 0 5.25 rmoveto /Courier findfont 7.5 scalefont setfont (15) show grestore .5 .18994 m .50625 .18994 L s gsave .4875 .18994 -33 -4.25 Mabsadd m 1 1 Mabs scale /Courier findfont 10 scalefont setfont (2) show /Math1Mono findfont 10 scalefont setfont (\\264) show /Courier findfont 10 scalefont setfont (10) show 0 5.25 rmoveto /Courier findfont 7.5 scalefont setfont (15) show grestore .5 .27756 m .50625 .27756 L s gsave .4875 .27756 -33 -4.25 Mabsadd m 1 1 Mabs scale /Courier findfont 10 scalefont setfont (3) show /Math1Mono findfont 10 scalefont setfont (\\264) show /Courier findfont 10 scalefont setfont (10) show 0 5.25 rmoveto /Courier findfont 7.5 scalefont setfont (15) show grestore .5 .36517 m .50625 .36517 L s gsave .4875 .36517 -33 -4.25 Mabsadd m 1 1 Mabs scale /Courier findfont 10 scalefont setfont (4) show /Math1Mono findfont 10 scalefont setfont (\\264) show /Courier findfont 10 scalefont setfont (10) show 0 5.25 rmoveto /Courier findfont 7.5 scalefont setfont (15) show grestore .5 .45279 m .50625 .45279 L s gsave .4875 .45279 -33 -4.25 Mabsadd m 1 1 Mabs scale /Courier findfont 10 scalefont setfont (5) show /Math1Mono findfont 10 scalefont setfont (\\264) show /Courier findfont 10 scalefont setfont (10) show 0 5.25 rmoveto /Courier findfont 7.5 scalefont setfont (15) show grestore .5 .5404 m .50625 .5404 L s gsave .4875 .5404 -33 -4.25 Mabsadd m 1 1 Mabs scale /Courier findfont 10 scalefont setfont (6) show /Math1Mono findfont 10 scalefont setfont (\\264) show /Courier findfont 10 scalefont setfont (10) show 0 5.25 rmoveto /Courier findfont 7.5 scalefont setfont (15) show grestore .125 Mabswid .5 .03224 m .50375 .03224 L s .5 .04976 m .50375 .04976 L s .5 .06728 m .50375 .06728 L s .5 .08481 m .50375 .08481 L s .5 .11985 m .50375 .11985 L s .5 .13738 m .50375 .13738 L s .5 .1549 m .50375 .1549 L s .5 .17242 m .50375 .17242 L s .5 .20747 m .50375 .20747 L s .5 .22499 m .50375 .22499 L s .5 .24251 m .50375 .24251 L s .5 .26003 m .50375 .26003 L s .5 .29508 m .50375 .29508 L s .5 .3126 m .50375 .3126 L s .5 .33013 m .50375 .33013 L s .5 .34765 m .50375 .34765 L s .5 .38269 m .50375 .38269 L s .5 .40022 m .50375 .40022 L s .5 .41774 m .50375 .41774 L s .5 .43526 m .50375 .43526 L s .5 .47031 m .50375 .47031 L s .5 .48783 m .50375 .48783 L s .5 .50535 m .50375 .50535 L s .5 .52288 m .50375 .52288 L s .5 .55792 m .50375 .55792 L s .5 .57545 m .50375 .57545 L s .5 .59297 m .50375 .59297 L s .5 .61049 m .50375 .61049 L s .25 Mabswid .5 0 m .5 .61803 L s 0 0 m 1 0 L 1 .61803 L 0 .61803 L closepath clip newpath 0 .4 1 r .5 Mabswid .02381 .0158 m .02499 .0158 L .02605 .0158 L .02729 .0158 L .02846 .01581 L .03053 .01582 L .03279 .01583 L .03527 .01586 L .0379 .01589 L .04262 .01595 L .04749 .01605 L .05205 .01616 L .06244 .01649 L .07305 .01697 L .08274 .01755 L .09394 .01842 L .10458 .0195 L .11417 .02072 L .12439 .02234 L .14277 .02624 L .15306 .02912 L .16418 .03291 L .18435 .042 L .20429 .05444 L .22536 .07225 L .245 .09399 L .26333 .11939 L .30224 .19098 L .3436 .29161 L .38344 .40191 L .42177 .50213 L .44116 .54373 L .45146 .56208 L .46256 .57843 L .4677 .5847 L .47312 .59036 L .47814 .59472 L .48281 .59799 L .4872 .60036 L .48966 .60139 L .49189 .60213 L .49434 .60275 L .49572 .60299 L .497 .60316 L .49811 .60326 L .49934 .60332 L .50062 .60332 L .50182 .60327 L .50307 .60315 L .50377 .60307 L Mistroke .50441 .60297 L .5068 .60249 L .50815 .60212 L .5096 .60166 L .51223 .60062 L .51738 .59787 L .52211 .59452 L .53113 .586 L .54065 .57409 L .56032 .54086 L .57867 .50108 L .61763 .39891 L .65904 .28458 L .69894 .18846 L .73732 .1184 L .75714 .09137 L .77816 .0689 L .79767 .05304 L .81596 .04183 L .83618 .03277 L .8547 .02689 L .86453 .02452 L .87366 .02268 L .88432 .02094 L .89438 .01962 L .90422 .01859 L .91487 .01771 L .92456 .0171 L .93347 .01666 L .94319 .01629 L .95228 .01605 L .95749 .01595 L .96224 .01588 L .96487 .01585 L .96773 .01583 L .96904 .01582 L .97043 .01581 L .97162 .01581 L .97293 .0158 L .97375 .0158 L .9745 .0158 L .97532 .0158 L .97619 .0158 L Mfstroke 1 0 0 r .02381 .0148 m .02499 .0148 L .02605 .0148 L .02729 .0148 L .02846 .0148 L .03053 .0148 L .03279 .0148 L .03527 .01481 L .0379 .01481 L .04262 .01482 L .04749 .01482 L .05205 .01484 L .06244 .01487 L .07305 .01491 L .08274 .01497 L .09394 .01506 L .10458 .01517 L .11417 .01529 L .12439 .01546 L .14277 .01587 L .15306 .01618 L .16418 .01659 L .18435 .01757 L .20429 .01894 L .22536 .02091 L .245 .02334 L .26333 .02618 L .30224 .03422 L .3436 .04554 L .38344 .05793 L .42177 .06916 L .44116 .07382 L .45146 .07587 L .46256 .0777 L .4677 .0784 L .47312 .07903 L .47814 .07952 L .48281 .07988 L .4872 .08015 L .48966 .08026 L .49189 .08035 L .49434 .08041 L .49572 .08044 L .497 .08046 L .49811 .08047 L .49934 .08048 L .50062 .08048 L .50182 .08047 L .50307 .08046 L .50377 .08045 L Mistroke .50441 .08044 L .5068 .08038 L .50815 .08034 L .5096 .08029 L .51223 .08018 L .51738 .07987 L .52211 .07949 L .53113 .07854 L .54065 .07721 L .56032 .07349 L .57867 .06904 L .61763 .05759 L .65904 .04475 L .69894 .03394 L .73732 .02607 L .75714 .02304 L .77816 .02054 L .79767 .01879 L .81596 .01756 L .82582 .01703 L .83618 .01657 L .8547 .01594 L .86427 .0157 L .87448 .01548 L .89286 .0152 L .90313 .01509 L .91425 .01499 L .92475 .01493 L .93441 .01488 L .9391 .01486 L .94413 .01485 L .95321 .01482 L .95876 .01481 L .96149 .01481 L .96401 .01481 L .96625 .0148 L .96873 .0148 L .96993 .0148 L .97122 .0148 L .97193 .0148 L .97258 .0148 L .97387 .0148 L .97498 .0148 L .97619 .0148 L Mfstroke % End of Graphics MathPictureEnd \ \>"], "Graphics", ImageSize->{288, 177.938}, ImageMargins->{{43, 0}, {0, 0}}, ImageRegion->{{0, 1}, {0, 1}}, ImageCache->GraphicsData["Bitmap", "\<\ CF5dJ6E]HGAYHf4PAg9QL6QYHgKeT008m_F@03001_FFmI 08i_F@001fmI1P00:G`0]000:7`01P0026mI000;KeT00`00KeU_F@05KeT00`00KeU_F@04KeT;0Il7 KeT00`00KeU_F@05KeT00`00KeUl000:O004KeT00`00KeU_F@05KeT00`00KeU_F@05KeT00`00KeU_ F@05KeT00`00KeU_F@06KeT00`00KeU_F@05KeT00`00KeU_F@05KeT00`00KeU_F@05KeT00`00KeU_ F@06KeT00`00KeU_F@05KeT00`00KeU_F@05KeT00`00KeU_F@06KeT00`00KeU_F@05KeT00`00KeU_ F@05KeT00`00KeU_F@05KeT00`00KeU_F@06KeT00`00KeU_F@05KeT00`00KeU_F@05KeT00`00KeU_ F@05KeT00`00KeU_F@02KeTfmI0P6O:FmI0g`09VmI00<006mIKeT096mI0g`0:6mI0P6O?FmI000mKeT0 0`6OKeU_F@0YKeT2O00TKeT2000SKeT2O00ZKeT00`6OKeU_F@0mKeT003i_F@030Im_FFmI02Y_F@=l 025_F@03001_FFmI01m_F@=l02]_F@030Im_FFmI03i_F@00?fmI00<1WfmIKeT0;6mI0g`07VmI00<0 06mIKeT076mI0g`0;FmI00<1WfmIKeT0?fmI0010KeT00`6OKeU_F@0^KeT4O00JKeT00`00KeU_F@0H KeT4O00_KeT00`6OKeU_F@10KeT0045_F@81Wc9_F@Al01I_F@8001E_F@Al039_F@030Im_FFmI045_ F@00@fmI00<1WfmIKeT0KeT00`00KeU_F@0;KeT5O00hKeT00`6OKeU_F@13KeT004E_F@030Im_FFmI 03U_F@Il00Q_F@03001_FFmI00E_F@Il03a_F@030Im_FFmI04A_F@00AVmI00<1WfmIKeT0?VmI47`0 @FmI00<1WfmIKeT0AFmI0016KeT00`6OKeU_F@16KeT20016KeT00`6OKeU_F@16KeT004M_F@030Im_ FFmI04E_F@03001_FFmI04A_F@030Im_FFmI04M_F@00B6mI00<1WfmIKeT08FmI1@0000A_F@00KeU_ F@D0009_F@80015_F@03001_FFmI04=_F@030Im_FFmI04Q_F@00BFmI00<1WfmIKeT08VmI00<006mI KeT00VmI00D006mI001_F@0000=_F@04001_FFmI000@KeT00`00KeU_F@12KeT00`6OKeU_F@19KeT0 04Y_F@030Im_FFmI025_F@03001_FFmI00=_F@04001_FFmI0003KeT01000KeU_F@0046mI00<006mI KeT0@VmI00<1WfmIKeT0BFmI001:KeT00`6OKeU_F@0QKeT00`00KeU_F@02KeT01@00KeT006mI0000 0fmI00@006mIKeT0011_F@<0045_F@030Im_FFmI04Y_F@00BfmI00<1WfmIKeT086mI00D006mIKeU_ F@0000=_F@8000=_F@04001_FFmI000@KeT00`00KeU_F@10KeT00`6OKeU_F@1;KeT004a_F@030Im_ FFmI01i_F@8000M_F@8000A_F@8000=_F@<0009_F@<000I_F@03001_FFmI03m_F@030Im_FFmI04a_ F@00CFmI00<1WfmIKeT0 KeT004m_F@030Im_FFmI02m_F@8000=_F@<000I_F@03001_FFmI03e_F@030Im_FFmI04i_F@00CfmI 00<1WfmIKeT0?FmI00<006mIKeT0?6mI00<1WfmIKeT0CfmI001@KeT00`6OKeU_F@0lKeT00`00KeU_ F@0lKeT00`6OKeU_F@1?KeT0051_F@030Im_FFmI03a_F@8003a_F@030Im_FFmI051_F@00DFmI00<1 WfmIKeT0>fmI00<006mIKeT0>fmI00<1WfmIKeT0D6mI001AKeT00`6OKeU_F@0kKeT00`00KeU_F@0j KeT00`6OKeU_F@1AKeT0059_F@030Im_FFmI03Y_F@03001_FFmI03U_F@030Im_FFmI059_F@00DfmI 00<1WfmIKeT0>FmI00<006mIKeT0>FmI00<1WfmIKeT0DVmI001CKeT00`6OKeU_F@0iKeT2000iKeT0 0`6OKeU_F@1CKeT005A_F@030Im_FFmI03Q_F@03001_FFmI03Q_F@030Im_FFmI05=_F@00E6mI00<1 WfmIKeT0>6mI00<006mIKeT0=fmI00<1WfmIKeT0E6mI001EKeT00`6OKeU_F@0gKeT00`00KeU_F@0f KeT00`6OKeU_F@1EKeT005I_F@030Im_FFmI03I_F@03001_FFmI03I_F@030Im_FFmI05E_F@00EVmI 00<1WfmIKeT0=VmI0P00=VmI00<1WfmIKeT0EVmI001GKeT00`6OKeU_F@0eKeT00`00KeU_F@0eKeT0 0`6OKeU_F@1FKeT005M_F@030Im_FFmI019_F@@0009_F@03001_FFmI00D0009_F@80015_F@03001_ FFmI03A_F@030Im_FFmI05M_F@00F6mI00<1WfmIKeT04FmI00<006mIKeT016mI00D006mI001_F@00 00=_F@04001_FFmI000@KeT00`00KeU_F@0dKeT00`6OKeU_F@1GKeT005Q_F@030Im_FFmI019_F@03 001_FFmI00A_F@04001_FFmI0003KeT01000KeU_F@0046mI00<006mIKeT0KeT00`6OKeU_ F@1mKeT006a_F@04001_FFmI0004KeT01000KeU_F@000fmI00@006mIKeT1Wa1_F@03001_FFmI00e_ F@030Im_FFmI07i_F@00K6mI0`0016mI00D006mI001_F@0000=_F@05001_FFmI0001W`0?KeT3000= KeT00`6OKeU_F@1nKeT006e_F@03001_FFmI009_F@04001_FFmIKeT20003KeT01@00KeU_F@000Il0 3fmI00<006mIKeT036mI00<1WfmIKeT0OfmI001]KeT30006KeT20004KeT20002KeT0106O00000000 0VmI0`001VmI00<006mIKeT036mI00<1WfmIKeT0OfmI0020KeT00`6OKeT00005KeT00`00KeU_F@04 KeT00`00KeU_F@0;KeT00`6OKeU_F@20KeT0085_F@030Il006mI00A_F@03001_FFmI00A_F@03001_ FFmI00]_F@030Im_FFmI081_F@00PFmI00<1W`00KeT00VmI0P001fmI0P002fmI00<1WfmIKeT0PFmI 0021KeT00`000Im_F@02KeT30006KeT00`00KeU_F@0:KeT00`6OKeU_F@21KeT008=_F@030Im_FFmI 00U_F@03001_FFmI00U_F@030Im_FFmI089_F@00PfmI00<1WfmIKeT02FmI00<006mIKeT02FmI00<1 WfmIKeT0PVmI0024KeT00`6OKeU_F@08KeT00`00KeU_F@08KeT00`6OKeU_F@23KeT008A_F@030Im_ FFmI00Q_F@8000U_F@030Im_FFmI08=_F@00QFmI00<1WfmIKeT01fmI00<006mIKeT01fmI00<1WfmI KeT0Q6mI0026KeT00`6OKeU_F@06KeT00`00KeU_F@06KeT00`6OKeU_F@25KeT008M_F@030Im_FFmI 00E_F@03001_FFmI00E_F@030Im_FFmI08I_F@00R6mI00<1WfmIKeT016mI00<006mIKeT016mI00<1 WfmIKeT0QfmI0029KeT00`6OKeU_F@03KeT20004KeT00`6OKeU_F@28KeT008Y_F@030Im_FFmI009_ F@03001_FFmI009_F@030Im_FFmI08U_F@00RfmI2@6OS6mI002?KeT00`00KeU_F@2>KeT008m_F@80 08m_F@00SfmI00<006mIKeT0SVmI002?KeT00`00KeU_F@2>KeT00001\ \>"], ImageRangeCache->{{{0, 287}, {176.938, 0}} -> {-3.47156, -5.19329*^14, \ 0.0241921, 4.18532*^13}}], Cell[BoxData[ TagBox[\(\[SkeletonIndicator] Graphics \[SkeletonIndicator]\), False, Editable->False]], "Output"], Cell[GraphicsData["PostScript", "\<\ %! %%Creator: Mathematica %%AspectRatio: .61803 MathPictureStart /Mabs { Mgmatrix idtransform Mtmatrix dtransform } bind def /Mabsadd { Mabs 3 -1 roll add 3 1 roll add exch } bind def %% Graphics %%IncludeResource: font Courier %%IncludeFont: Courier /Courier findfont 10 scalefont setfont % Scaling calculations 0.5 0.151576 0.0147151 2.78826e-031 [ [.04527 .00222 -6 -9 ] [.04527 .00222 6 0 ] [.19685 .00222 -6 -9 ] [.19685 .00222 6 0 ] [.34842 .00222 -6 -9 ] [.34842 .00222 6 0 ] [.65158 .00222 -3 -9 ] [.65158 .00222 3 0 ] [.80315 .00222 -3 -9 ] [.80315 .00222 3 0 ] [.95473 .00222 -3 -9 ] [.95473 .00222 3 0 ] [.4875 .15413 -33 -6.25 ] [.4875 .15413 0 6.25 ] [.4875 .29354 -33 -6.25 ] [.4875 .29354 0 6.25 ] [.4875 .43295 -45 -6.25 ] [.4875 .43295 0 6.25 ] [.4875 .57237 -33 -6.25 ] [.4875 .57237 0 6.25 ] [ 0 0 0 0 ] [ 1 .61803 0 0 ] ] MathScale % Start of Graphics 1 setlinecap 1 setlinejoin newpath 0 g .25 Mabswid [ ] 0 setdash .04527 .01472 m .04527 .02097 L s [(-3)] .04527 .00222 0 1 Mshowa .19685 .01472 m .19685 .02097 L s [(-2)] .19685 .00222 0 1 Mshowa .34842 .01472 m .34842 .02097 L s [(-1)] .34842 .00222 0 1 Mshowa .65158 .01472 m .65158 .02097 L s [(1)] .65158 .00222 0 1 Mshowa .80315 .01472 m .80315 .02097 L s [(2)] .80315 .00222 0 1 Mshowa .95473 .01472 m .95473 .02097 L s [(3)] .95473 .00222 0 1 Mshowa .125 Mabswid .07559 .01472 m .07559 .01847 L s .1059 .01472 m .1059 .01847 L s .13622 .01472 m .13622 .01847 L s .16653 .01472 m .16653 .01847 L s .22716 .01472 m .22716 .01847 L s .25748 .01472 m .25748 .01847 L s .28779 .01472 m .28779 .01847 L s .31811 .01472 m .31811 .01847 L s .37874 .01472 m .37874 .01847 L s .40905 .01472 m .40905 .01847 L s .43937 .01472 m .43937 .01847 L s .46968 .01472 m .46968 .01847 L s .53032 .01472 m .53032 .01847 L s .56063 .01472 m .56063 .01847 L s .59095 .01472 m .59095 .01847 L s .62126 .01472 m .62126 .01847 L s .68189 .01472 m .68189 .01847 L s .71221 .01472 m .71221 .01847 L s .74252 .01472 m .74252 .01847 L s .77284 .01472 m .77284 .01847 L s .83347 .01472 m .83347 .01847 L s .86378 .01472 m .86378 .01847 L s .8941 .01472 m .8941 .01847 L s .92441 .01472 m .92441 .01847 L s .01496 .01472 m .01496 .01847 L s .98504 .01472 m .98504 .01847 L s .25 Mabswid 0 .01472 m 1 .01472 L s .5 .15413 m .50625 .15413 L s gsave .4875 .15413 -33 -4.25 Mabsadd m 1 1 Mabs scale /Courier findfont 10 scalefont setfont (5) show /Math1Mono findfont 10 scalefont setfont (\\264) show /Courier findfont 10 scalefont setfont (10) show 0 5.25 rmoveto /Courier findfont 7.5 scalefont setfont (29) show grestore .5 .29354 m .50625 .29354 L s gsave .4875 .29354 -33 -4.25 Mabsadd m 1 1 Mabs scale /Courier findfont 10 scalefont setfont (1) show /Math1Mono findfont 10 scalefont setfont (\\264) show /Courier findfont 10 scalefont setfont (10) show 0 5.25 rmoveto /Courier findfont 7.5 scalefont setfont (30) show grestore .5 .43295 m .50625 .43295 L s gsave .4875 .43295 -45 -4.25 Mabsadd m 1 1 Mabs scale /Courier findfont 10 scalefont setfont (1.5) show /Math1Mono findfont 10 scalefont setfont (\\264) show /Courier findfont 10 scalefont setfont (10) show 0 5.25 rmoveto /Courier findfont 7.5 scalefont setfont (30) show grestore .5 .57237 m .50625 .57237 L s gsave .4875 .57237 -33 -4.25 Mabsadd m 1 1 Mabs scale /Courier findfont 10 scalefont setfont (2) show /Math1Mono findfont 10 scalefont setfont (\\264) show /Courier findfont 10 scalefont setfont (10) show 0 5.25 rmoveto /Courier findfont 7.5 scalefont setfont (30) show grestore .125 Mabswid .5 .0426 m .50375 .0426 L s .5 .07048 m .50375 .07048 L s .5 .09836 m .50375 .09836 L s .5 .12625 m .50375 .12625 L s .5 .18201 m .50375 .18201 L s .5 .20989 m .50375 .20989 L s .5 .23778 m .50375 .23778 L s .5 .26566 m .50375 .26566 L s .5 .32142 m .50375 .32142 L s .5 .34931 m .50375 .34931 L s .5 .37719 m .50375 .37719 L s .5 .40507 m .50375 .40507 L s .5 .46084 m .50375 .46084 L s .5 .48872 m .50375 .48872 L s .5 .5166 m .50375 .5166 L s .5 .54448 m .50375 .54448 L s .5 .60025 m .50375 .60025 L s .25 Mabswid .5 0 m .5 .61803 L s 0 0 m 1 0 L 1 .61803 L 0 .61803 L closepath clip newpath 0 .4 1 r .5 Mabswid .02381 .01472 m .02499 .01472 L .02605 .01472 L .02729 .01472 L .02846 .01472 L .03053 .01472 L .03279 .01472 L .03527 .01472 L .0379 .01472 L .04262 .01472 L .04749 .01473 L .05205 .01473 L .05706 .01473 L .06244 .01474 L .06784 .01475 L .07373 .01476 L .07929 .01478 L .08445 .01479 L .08956 .01482 L .09419 .01484 L .09954 .01488 L .10458 .01493 L .11434 .01505 L .11926 .01514 L .12466 .01526 L .12927 .01539 L .13421 .01556 L .14313 .01596 L .14841 .01628 L .1533 .01664 L .15856 .01712 L .16437 .01777 L .17413 .01925 L .17947 .02032 L .18449 .02152 L .19432 .0246 L .20467 .02916 L .21351 .03449 L .22318 .04229 L .23345 .05349 L .24279 .06698 L .25357 .08752 L .26374 .11297 L .27346 .14403 L .28375 .18552 L .30221 .28704 L .31164 .35489 L .32178 .44154 L s .32178 .44154 m .33826 .61803 L s .66195 .61803 m .67807 .44291 L .69699 .29235 L .70663 .23366 L .71688 .18269 L .73529 .11576 L .74464 .09153 L .75474 .07118 L .76426 .05647 L .77301 .04606 L .78279 .0372 L .79191 .03105 L .80191 .02608 L .80747 .02396 L .8126 .02232 L .82283 .01983 L .82821 .01885 L .83392 .01799 L .84351 .01692 L .84896 .01647 L .85407 .01612 L .85903 .01585 L .86446 .01561 L .86923 .01544 L .87433 .01529 L .87937 .01517 L .88394 .01508 L .89286 .01496 L .89774 .0149 L .90289 .01486 L .91212 .01481 L .91726 .01479 L .92205 .01477 L .92731 .01476 L .93294 .01475 L .93823 .01474 L .94313 .01473 L .9485 .01473 L .9542 .01473 L .95657 .01472 L .95914 .01472 L .96377 .01472 L .96645 .01472 L .96792 .01472 L .96928 .01472 L .97054 .01472 L .97169 .01472 L .97296 .01472 L .97366 .01472 L .97432 .01472 L Mistroke .9753 .01472 L .97619 .01472 L Mfstroke 1 0 0 r .02381 .01472 m .02499 .01472 L .02605 .01472 L .02729 .01472 L .02846 .01472 L .03053 .01472 L .03279 .01472 L .03527 .01472 L .0379 .01472 L .04262 .01472 L .04749 .01472 L .05205 .01472 L .05706 .01472 L .06244 .01472 L .06784 .01472 L .07373 .01472 L .07929 .01472 L .08445 .01472 L .08956 .01472 L .09419 .01472 L .09954 .01472 L .10458 .01473 L .10923 .01473 L .11434 .01474 L .11968 .01474 L .12466 .01475 L .13357 .01477 L .13857 .01478 L .14313 .0148 L .14794 .01482 L .15304 .01484 L .16222 .0149 L .16731 .01495 L .17208 .015 L .17729 .01507 L .18298 .01516 L .19281 .01538 L .19817 .01553 L .20316 .0157 L .21211 .01609 L .22166 .01664 L .23191 .01746 L .24301 .01867 L .25349 .02022 L .26316 .02209 L .27285 .02448 L .28192 .02727 L .29251 .03134 L .30256 .03611 L .32285 .04898 L Mistroke .34139 .06504 L .37963 .11175 L .42033 .17457 L .43917 .20266 L .45951 .2279 L .47069 .23831 L .47559 .24193 L .48096 .24519 L .48605 .24757 L .48848 .24845 L .49079 .24913 L .49204 .24944 L .4934 .24973 L .49454 .24992 L .49579 .2501 L .49714 .25023 L .49788 .25029 L .49857 .25032 L .49981 .25035 L .50051 .25035 L .50115 .25033 L .50243 .25027 L .50364 .25016 L .50473 .25003 L .5059 .24985 L .50854 .2493 L .51098 .24862 L .51542 .24696 L .52011 .2446 L .52998 .23777 L .54082 .22755 L .56031 .20339 L .58122 .17215 L .62254 .10865 L .64322 .08172 L .66236 .06144 L .68092 .04623 L .69041 .04005 L .70065 .03448 L .7108 .02997 L .7201 .0266 L .72893 .024 L .73837 .02176 L .74816 .01995 L .75727 .01863 L .76811 .01746 L .77796 .01667 L .78793 .01608 L .79713 .01569 L .80722 .01538 L Mistroke .81231 .01526 L .81791 .01515 L .82312 .01506 L .82806 .015 L .83734 .01491 L .84252 .01487 L .84733 .01484 L .85256 .01481 L .85822 .01479 L .86373 .01477 L .8688 .01476 L .87355 .01475 L .87876 .01474 L .88781 .01473 L .89276 .01473 L .89737 .01473 L .90238 .01472 L .90783 .01472 L .91298 .01472 L .91774 .01472 L .92202 .01472 L .92674 .01472 L .93167 .01472 L .9363 .01472 L .941 .01472 L .94614 .01472 L .95151 .01472 L .9565 .01472 L .95891 .01472 L .96119 .01472 L .96545 .01472 L .96784 .01472 L .97004 .01472 L .97119 .01472 L .97245 .01472 L .97377 .01472 L .97501 .01472 L .97619 .01472 L Mfstroke % End of Graphics MathPictureEnd \ \>"], "Graphics", ImageSize->{288, 177.938}, ImageMargins->{{43, 0}, {0, 0}}, ImageRegion->{{0, 1}, {0, 1}}, ImageCache->GraphicsData["Bitmap", "\<\ CF5dJ6E]HGAYHf4PAg9QL6QYHgKeT008m_F@03001_FFmI 08i_F@001fmI1P00>7`0V000=G`01P0026mI000;KeT00`00KeU_F@05KeT00`00KeU_F@05KeT00`00 KeU_F@06KeT00`00KeU_F@05KeT00`00KeU_F@02KeT80Il3KeT00`00KeU_F@06KeT8O0000`00KeU_ F@05KeT00`00KeU_F@05KeT00`00KeU_F@06KeT00`00KeU_F@05KeT00`00KeU_F@05KeT00`00KeU_ F@05KeT00`00KeU_F@06KeT00`00KeU_F@05KeT00`00KeU_F@05KeT00`00KeU_F@06KeT00`00KeU_ F@05KeT00`00KeU_F@05KeT00`00KeU_F@05KeT00`00KeU_F@06KeT00`00KeU_F@05KeT00`00KeU_ F@05KeT00`00O01l0009O005KeT01000KeU_FFmI206O16mI00<006mIKeT01FmI00<006mIKeT01VmI 00<006mIKeT01FmI00<006mIKeT01FmI00<006mIKeT02VmI000CKeT00`00KeU_F@0SKeT20Il00fmI 001_F@0?KeT3O00FKeT00`00KeU_F@0VKeT00`00KeU_F@0VKeT00`00KeU_F@0DKeT3O00@KeT01000 0Il1W`6O9FmI00<006mIKeT04VmI000kKeT20IlCKeT5O00jKeT00`00KeU_F@0hKeT5O00BKeT20Ilm KeT003e_F@<1WaE_F@03O01_FFmI03M_F@03001_FFmI03I_F@9l01E_F@81Wcm_F@00@6mI0P6O56mI 0W`0=fmI00<006mIKeT0=6mI0W`05FmI0P6O@FmI0012KeT20IlDKeT2O00eKeT00`00KeU_F@0bKeT2 O00FKeT00`6OKeU_F@11KeT004A_F@030Im_FFmI01=_F@9l03=_F@03001_FFmI035_F@03O01_FFmI 01E_F@030Im_FFmI049_F@00A6mI00<1WfmIKeT05FmI0W`0KeT0 0`6OKeU_F@0KKeT00g`0KeU_F@0PKeT00`00KeU_F@0OKeT00g`0KeU_F@0MKeT00`6OKeU_F@1KeT004m_F@030Im_FFmI01e_F@03O01_FFmI01e_F@03001_FFmI01e_F@03O01_ FFmI01e_F@030Im_FFmI04i_F@00CfmI00<1WfmIKeT07VmI00=l06mIKeT076mI00<006mIKeT076mI 00=l06mIKeT07VmI00<1WfmIKeT0CVmI001@KeT00`6OKeU_F@0MKeT00g`0KeU_F@0LKeT2000LKeT0 0g`0KeU_F@0NKeT00`6OKeU_F@1?KeT0051_F@030Im_FFmI01i_F@03O01_FFmI01]_F@03001_FFmI 01]_F@03O01_FFmI01i_F@030Im_FFmI04m_F@00D6mI00<1WfmIKeT07fmI00=l06mIKeT06VmI00<0 06mIKeT06VmI00=l06mIKeT07fmI00<1WfmIKeT0CfmI001@KeT00`6OKeU_F@0OKeT00g`0KeU_F@0J KeT00`00KeU_F@0IKeT00g`0KeU_F@0PKeT00`6OKeU_F@1?KeT0055_F@030Im_FFmI01m_F@03O01_ FFmI01U_F@03001_FFmI01U_F@03O01_FFmI01m_F@030Im_FFmI051_F@00DFmI00<1WfmIKeT06FmI 0P000fmI00<007`0KeT01@000VmI0P004FmI00<006mIKeT066mI00=l06mIKeT086mI00<1WfmIKeT0 D6mI001AKeT00`6OKeU_F@0HKeT01000KeU_F@000fmI00D007`0001_F@0000=_F@04001_FFmI000@ KeT00`00KeU_F@0HKeT00g`0KeU_F@0PKeT00`6OKeU_F@1@KeT0055_F@030Im_FFmI01]_F@03001_ FFmI009_F@04001l06mI0003KeT01000KeU_F@0046mI00<006mIKeT05fmI00=l06mIKeT086mI00<1 WfmIKeT0DFmI001BKeT00`6OKeU_F@0HKeT20004KeT01@00KeUl06mI00000fmI00@006mIKeT0011_ F@<001I_F@03O01_FFmI025_F@030Im_FFmI055_F@00DVmI00<1WfmIKeT066mI00<006mIKeT00VmI 00H006mIKeU_FG`00003KeT01000KeU_F@0046mI00<006mIKeT05VmI00=l06mIKeT08FmI00<1WfmI KeT0DFmI001BKeT00`6OKeU_F@0HKeT30006KeT00`00O01_F@03KeT20003KeT30002KeT30006KeT0 0`00KeU_F@0EKeT00g`0KeU_F@0RKeT00`6OKeU_F@1AKeT0059_F@030Im_FFmI029_F@03O01_FFmI 00M_F@8000E_F@03001_FFmI00A_F@03001_FFmI01A_F@03O01_FFmI029_F@030Im_FFmI059_F@00 DfmI00<1WfmIKeT08VmI00=l06mIKeT026mI00<006mIKeT00`001VmI00<006mIKeT056mI00=l06mI KeT08VmI00<1WfmIKeT0DVmI001CKeT00`6OKeU_F@0RKeT00g`0KeU_F@08KeT01P00KeU_F@00KeT0 00I_F@03001_FFmI01=_F@03O01_FFmI02=_F@030Im_FFmI059_F@00DfmI00<1WfmIKeT08fmI00=l 06mIKeT01FmI0`000VmI0`001VmI00<006mIKeT04VmI00=l06mIKeT096mI00<1WfmIKeT0DVmI001C KeT00`6OKeU_F@0TKeT00g`0KeU_F@0BKeT00`00KeU_F@0AKeT00g`0KeU_F@0TKeT00`6OKeU_F@1C KeT005A_F@030Im_FFmI02=_F@03O01_FFmI019_F@80019_F@03O01_FFmI02A_F@030Im_FFmI05=_ F@00E6mI00<1WfmIKeT096mI00=l06mIKeT04FmI00<006mIKeT046mI00=l06mIKeT09FmI00<1WfmI KeT0DfmI001DKeT00`6OKeU_F@0UKeT00g`0KeU_F@0@KeT00`00KeU_F@0?KeT00g`0KeU_F@0VKeT0 0`6OKeU_F@1CKeT005A_F@030Im_FFmI02I_F@03O01_FFmI00m_F@03001_FFmI00i_F@03O01_FFmI 02I_F@030Im_FFmI05A_F@00EFmI00<1WfmIKeT09FmI00=l06mIKeT03fmI00<006mIKeT03VmI00=l 06mIKeT09VmI00<1WfmIKeT0E6mI001EKeT00`6OKeU_F@0VKeT00g`0KeU_F@0>KeT00`00KeU_F@0= KeT00g`0KeU_F@0WKeT00`6OKeU_F@1DKeT005E_F@030Im_FFmI02M_F@03O01_FFmI00e_F@03001_ FFmI00a_F@03O01_FFmI02Q_F@030Im_FFmI05A_F@00EFmI00<1WfmIKeT0:6mI00=l06mIKeT036mI 0P003FmI00=l06mIKeT09fmI00<1WfmIKeT0EFmI001EKeT00`6OKeU_F@0YKeT00g`0KeU_F@0;KeT0 0`00KeU_F@0;KeT00g`0KeU_F@0XKeT00`6OKeU_F@1EKeT005E_F@030Im_FFmI02U_F@03O01_FFmI 00]_F@03001_FFmI00Y_F@03O01_FFmI02U_F@030Im_FFmI05E_F@00EVmI00<1WfmIKeT0:FmI00=l 06mIKeT02VmI00<006mIKeT02FmI00=l06mIKeT0:VmI00<1WfmIKeT0EFmI001FKeT00`6OKeU_F@0Z KeT00g`0KeU_F@09KeT00`00KeU_F@09KeT00g`0KeU_F@0ZKeT00`6OKeU_F@1EKeT005I_F@030Im_ FFmI02]_F@03O01_FFmI00Q_F@03001_FFmI00Q_F@03O01_FFmI02Y_F@030Im_FFmI05I_F@00EVmI 00<1WfmIKeT0;6mI00=l06mIKeT01fmI00<006mIKeT01fmI00=l06mIKeT0:fmI00<1WfmIKeT0EVmI 001FKeT00`6OKeU_F@0]KeT00g`0KeU_F@06KeT00`00KeU_F@06KeT00g`0KeU_F@0/KeT00`6OKeU_ F@1FKeT005M_F@030Im_FFmI02e_F@03O01_FFmI00E_F@8000I_F@03O01_FFmI02e_F@030Im_FFmI 05I_F@00EfmI00<1WfmIKeT0;VmI00=l06mIKeT016mI00<006mIKeT00fmI0W`0<6mI00<1WfmIKeT0 EVmI001GKeT00`6OKeU_F@0_KeT3O003KeT01000KeU_FFmI0W`0"], ImageRangeCache->{{{0, 287}, {176.938, 0}} -> {-3.47156, -1.63186*^29, \ 0.0241921, 1.31513*^28}}], Cell[BoxData[ TagBox[\(\[SkeletonIndicator] Graphics \[SkeletonIndicator]\), False, Editable->False]], "Output"] }, Open ]], Cell["\<\ Blue is \"approximate\", red is the real one. I wonder what factor this differs by.\ \>", "Text"], Cell[BoxData[ \(\(\(Ratio[N_, \ D_, \[Alpha]_, \[Lambda]_, \ approx_]\ := \ \(\(\((\[Alpha]\ N)\)\^\(\(-2\)\ \[Alpha]\ N\)\) \ \(N\^N\) \(\[ExponentialE]\^\(\(-\ \[Lambda]\^2\)\/\(\(\ \)\(4 \((D\^2\/\(\ \[Alpha]\ N\))\)\)\)\)\) \(\[Sum]\+\(x = \(-approx\)\)\%approx \ \[ExponentialE]\^\(\(-\((D\^2\/\(\[Alpha]\ N\))\)\) \((x - \(\[ImaginaryI]\ \ \[Lambda]\)\/\(\(2\)\(\ \)\((D\^2\/\(\[Alpha]\ N\))\)\(\ \ \)\))\)\^2\)\)\)\/FActual[N, \ \[Lambda], \ D, \ \[Alpha]];\)\(\ \[IndentingNewLine]\) \)\)], "Input"], Cell[CellGroupData[{ Cell[BoxData[ \(\(\(\[IndentingNewLine]\)\(N[ Ratio[43, \ 5, \ 1\/2, 0, \ 10]]\[IndentingNewLine] N[Ratio[101, \ 5, \ 1\/2, 0, \ 10]]\)\)\)], "Input"], Cell[BoxData[ \(\(\(8.220103979586858`\)\(\[InvisibleSpace]\)\) + 7.434184181533939`*^-16\ \[ImaginaryI]\)], "Output"], Cell[BoxData[ \(\(\(12.595651236800562`\)\(\[InvisibleSpace]\)\) + 8.496352263000154`*^-16\ \[ImaginaryI]\)], "Output"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[{ \(N[Ratio[101, \ 3, \ 1\/2, 0, \ 10]]\), "\[IndentingNewLine]", \(N[Ratio[101, \ 11, \ 1\/2, 0, \ 10]]\), "\[IndentingNewLine]", \(\)}], "Input"], Cell[BoxData[ \(12.595651191582318`\)], "Output"], Cell[BoxData[ \(12.617761612291645`\)], "Output"] }, Open ]], Cell["\<\ The error seems to be a weak function of D and a strong function of N.\ \>", "Text"], Cell[CellGroupData[{ Cell[BoxData[ \(\(\(\[IndentingNewLine]\)\(Plot[ Ratio[51, \ 5, 1\/2, \[Lambda], \ 10]\ , \ {\[Lambda], \ \(-\[Pi]\), \ \[Pi]}]\)\)\)], "Input"], Cell[GraphicsData["PostScript", "\<\ %! %%Creator: Mathematica %%AspectRatio: .61803 MathPictureStart /Mabs { Mgmatrix idtransform Mtmatrix dtransform } bind def /Mabsadd { Mabs 3 -1 roll add 3 1 roll add exch } bind def %% Graphics %%IncludeResource: font Courier %%IncludeFont: Courier /Courier findfont 10 scalefont setfont % Scaling calculations 0.5 0.151576 -13.5498 1.51545 [ [.04527 .0767 -6 -9 ] [.04527 .0767 6 0 ] [.19685 .0767 -6 -9 ] [.19685 .0767 6 0 ] [.34842 .0767 -6 -9 ] [.34842 .0767 6 0 ] [.65158 .0767 -3 -9 ] [.65158 .0767 3 0 ] [.80315 .0767 -3 -9 ] [.80315 .0767 3 0 ] [.95473 .0767 -3 -9 ] [.95473 .0767 3 0 ] [.4875 .24074 -18 -4.5 ] [.4875 .24074 0 4.5 ] [.4875 .39229 -18 -4.5 ] [.4875 .39229 0 4.5 ] [.4875 .54383 -18 -4.5 ] [.4875 .54383 0 4.5 ] [ 0 0 0 0 ] [ 1 .61803 0 0 ] ] MathScale % Start of Graphics 1 setlinecap 1 setlinejoin newpath 0 g .25 Mabswid [ ] 0 setdash .04527 .0892 m .04527 .09545 L s [(-3)] .04527 .0767 0 1 Mshowa .19685 .0892 m .19685 .09545 L s [(-2)] .19685 .0767 0 1 Mshowa .34842 .0892 m .34842 .09545 L s [(-1)] .34842 .0767 0 1 Mshowa .65158 .0892 m .65158 .09545 L s [(1)] .65158 .0767 0 1 Mshowa .80315 .0892 m .80315 .09545 L s [(2)] .80315 .0767 0 1 Mshowa .95473 .0892 m .95473 .09545 L s [(3)] .95473 .0767 0 1 Mshowa .125 Mabswid .07559 .0892 m .07559 .09295 L s .1059 .0892 m .1059 .09295 L s .13622 .0892 m .13622 .09295 L s .16653 .0892 m .16653 .09295 L s .22716 .0892 m .22716 .09295 L s .25748 .0892 m .25748 .09295 L s .28779 .0892 m .28779 .09295 L s .31811 .0892 m .31811 .09295 L s .37874 .0892 m .37874 .09295 L s .40905 .0892 m .40905 .09295 L s .43937 .0892 m .43937 .09295 L s .46968 .0892 m .46968 .09295 L s .53032 .0892 m .53032 .09295 L s .56063 .0892 m .56063 .09295 L s .59095 .0892 m .59095 .09295 L s .62126 .0892 m .62126 .09295 L s .68189 .0892 m .68189 .09295 L s .71221 .0892 m .71221 .09295 L s .74252 .0892 m .74252 .09295 L s .77284 .0892 m .77284 .09295 L s .83347 .0892 m .83347 .09295 L s .86378 .0892 m .86378 .09295 L s .8941 .0892 m .8941 .09295 L s .92441 .0892 m .92441 .09295 L s .01496 .0892 m .01496 .09295 L s .98504 .0892 m .98504 .09295 L s .25 Mabswid 0 .0892 m 1 .0892 L s .5 .24074 m .50625 .24074 L s [(9.1)] .4875 .24074 1 0 Mshowa .5 .39229 m .50625 .39229 L s [(9.2)] .4875 .39229 1 0 Mshowa .5 .54383 m .50625 .54383 L s [(9.3)] .4875 .54383 1 0 Mshowa .125 Mabswid .5 .11951 m .50375 .11951 L s .5 .14982 m .50375 .14982 L s .5 .18012 m .50375 .18012 L s .5 .21043 m .50375 .21043 L s .5 .27105 m .50375 .27105 L s .5 .30136 m .50375 .30136 L s .5 .33167 m .50375 .33167 L s .5 .36198 m .50375 .36198 L s .5 .4226 m .50375 .4226 L s .5 .45291 m .50375 .45291 L s .5 .48321 m .50375 .48321 L s .5 .51352 m .50375 .51352 L s .5 .05889 m .50375 .05889 L s .5 .02858 m .50375 .02858 L s .5 .57414 m .50375 .57414 L s .5 .60445 m .50375 .60445 L s .25 Mabswid .5 0 m .5 .61803 L s 0 0 m 1 0 L 1 .61803 L 0 .61803 L closepath clip newpath .5 Mabswid .02381 .60332 m .02499 .60327 L .02605 .60312 L .02729 .60285 L .02846 .60249 L .03053 .60158 L .03279 .60023 L .03527 .5983 L .0379 .59575 L .04262 .58993 L .05205 .57378 L .06244 .54983 L .10458 .41428 L .14487 .28056 L .18364 .18046 L .20477 .13936 L .22486 .10811 L .24489 .08349 L .26306 .06592 L .28273 .05114 L .3037 .03935 L .32295 .03142 L .33287 .02821 L .34377 .02527 L .36371 .02121 L .3746 .01959 L .38477 .01838 L .39522 .0174 L .40512 .01667 L .41401 .01616 L .42368 .01573 L .43308 .01542 L .44345 .01516 L .44867 .01506 L .45429 .01497 L .45956 .01491 L .46446 .01486 L .46948 .01482 L .47403 .01479 L .4791 .01476 L .48191 .01475 L .4845 .01474 L .48698 .01473 L .48971 .01473 L .49245 .01472 L .49395 .01472 L .49536 .01472 L .49599 .01472 L .49668 .01472 L .49794 .01472 L Mistroke .49916 .01472 L .5003 .01472 L .50099 .01472 L .50164 .01472 L .50287 .01472 L .50418 .01472 L .5056 .01472 L .50798 .01472 L .51053 .01473 L .51513 .01474 L .51794 .01475 L .5206 .01476 L .52558 .01478 L .53083 .01482 L .53568 .01486 L .54097 .01491 L .54666 .01499 L .55631 .01516 L .56536 .01537 L .57612 .01572 L .58598 .01616 L .59581 .01673 L .60494 .01741 L .61496 .01835 L .62565 .01962 L .63592 .02115 L .64704 .0232 L .6672 .02823 L .68712 .03526 L .70817 .04558 L .72779 .05855 L .74611 .07428 L .76644 .09668 L .78499 .12255 L .80566 .15853 L .8248 .19947 L .8631 .30507 L .90233 .43851 L .92048 .49989 L .93001 .52911 L .94005 .55611 L .94905 .57596 L .95381 .5845 L .9589 .59197 L .96359 .59725 L .96581 .59919 L .96785 .60065 L .96991 .6018 L .97097 .60227 L .97214 .60269 L Mistroke .97316 .60296 L .97411 .60315 L .97511 .60327 L .97619 .60332 L Mfstroke % End of Graphics MathPictureEnd \ \>"], "Graphics", ImageSize->{288, 177.938}, ImageMargins->{{43, 0}, {0, 0}}, ImageRegion->{{0, 1}, {0, 1}}, ImageCache->GraphicsData["Bitmap", "\<\ CF5dJ6E]HGAYHf4PAg9QL6QYHgKeT008m_F@03001_FFmI08i_F@00SfmI00<006mIKeT0SVmI001cKeTi 001dKeT006Y_F@T001a_F@03001_FFmI01Y_F@T006]_F@00IVmI10009FmI00<006mIKeT08fmI1P00 IFmI001QKeT5000YKeT00`00KeU_F@0YKeT3001RKeT005i_F@<002i_F@8002e_F@<005m_F@00FfmI 0`006mI00<006mIKeT0=VmI0P00EVmI001CKeT2000j KeT00`00KeU_F@0hKeT2001DKeT000m_F@8002Q_F@@001A_F@80019_F@D002E_F@03001_FFmI02I_ F@D000m_F@8001I_F@@002Q_F@8000i_F@003VmI00@006mIKeT002M_F@03001_FFmI01=_F@8001I_ F@03001_FFmI02E_F@03001_FFmI02Q_F@03001_FFmI015_F@8001A_F@03001_FFmI02Q_F@04001_ FFmI000=KeT0011_F@03001_FFmI02M_F@03001_FFmI015_F@03001_FFmI01I_F@03001_FFmI02E_ F@8002U_F@03001_FFmI01=_F@03001_FFmI019_F@03001_FFmI02U_F@03001_FFmI00a_F@0026mI 10001FmI00<006mIKeT07fmI100016mI00<006mIKeT03VmI0P004FmI100016mI00<006mIKeT09FmI 00<006mIKeT0:6mI00<006mIKeT056mI00<006mIKeT04VmI00<006mIKeT0:FmI00<006mIKeT02fmI 000>KeT01000KeU_F@009fmI00@006mIKeT000i_F@03001_FFmI01U_F@03001_FFmI02E_F@03001_ FFmI02Q_F@03001_FFmI01E_F@03001_FFmI00m_F@04001_FFmI000WKeT01000KeU_F@003FmI000? KeT2000YKeT2000>KeT00`00KeU_F@0IKeT2000WKeT00`00KeU_F@0WKeT2000HKeT00`00KeU_F@0? KeT2000YKeT2000>KeT004U_F@03001_FFmI04=_F@03001_FFmI049_F@03001_FFmI04U_F@00B6mI 00<006mIKeT0A6mI00<006mIKeT0@fmI00<006mIKeT0B6mI0017KeT00`00KeU_F@15KeT00`00KeU_ F@14KeT00`00KeU_F@17KeT004I_F@03001_FFmI04I_F@03001_FFmI04E_F@03001_FFmI04I_F@00 AFmI00<006mIKeT0AfmI00<006mIKeT0AVmI00<006mIKeT0AFmI003o000P0001KeT000A_F@03001_ FFmI00I_F@03001_FFmI00E_F@03001_FFmI00I_F@03001_FFmI00I_F@03001_FFmI00I_F@03001_ FFmI00E_F@03001_FFmI00I_F@04001_FFmI0005KeT00`00KeU_F@05KeT00`00KeU_F@06KeT00`00 KeU_F@06KeT00`00KeU_F@05KeT00`00KeU_F@06KeT00`00KeU_F@06KeT00`00KeU_F@05KeT00`00 KeU_F@06KeT00`00KeU_F@06KeT00`00KeU_F@05KeT00`00KeU_F@06KeT00`00KeU_F@06KeT00`00 KeU_F@05KeT00`00KeU_F@06KeT00`00KeU_F@06KeT00`00KeU_F@05KeT00`00KeU_F@03KeT01000 KeU_F@0026mI00<006mIKeT01FmI00<006mIKeT01VmI00<006mIKeT01VmI00<006mIKeT01VmI00<0 06mIKeT01FmI00<006mIKeT01VmI00<006mIKeT00fmI000=KeT00`00KeU_F@0XKeT00`00KeU_F@08 KeT00`00KeU_F@0NKeT00`00KeU_F@0XKeT00`00KeU_F@0XKeT00`00KeU_F@0NKeT00`00KeU_F@08 KeT00`00KeU_F@0XKeT00`00KeU_F@0KeT00`00KeU_F@1=KeT00`00KeU_F@0nKeT003i_F@03001_FFmI04i_F@8004m_F@03001_ FFmI03e_F@00?FmI00<006mIKeT0CfmI00<006mIKeT0CfmI00<006mIKeT0?6mI000lKeT00`00KeU_ F@1@KeT00`00KeU_F@1@KeT00`00KeU_F@0kKeT003]_F@03001_FFmI055_F@03001_FFmI051_F@03 001_FFmI03]_F@00>fmI00<006mIKeT0DFmI00<006mIKeT0DFmI00<006mIKeT0>VmI000jKeT00`00 KeU_F@1BKeT00`00KeU_F@1AKeT00`00KeU_F@0jKeT003U_F@03001_FFmI05=_F@03001_FFmI059_ F@03001_FFmI03U_F@00>FmI00<006mIKeT0DfmI00<006mIKeT0DfmI00<006mIKeT0>6mI000hKeT0 0`00KeU_F@1DKeT2001DKeT00`00KeU_F@0hKeT003Q_F@03001_FFmI05A_F@03001_FFmI05A_F@03 001_FFmI03M_F@00=fmI00<006mIKeT0EFmI00<006mIKeT0E6mI00<006mIKeT0=fmI000gKeT00`00 KeU_F@1EKeT00`00KeU_F@1EKeT00`00KeU_F@0fKeT003I_F@03001_FFmI05I_F@03001_FFmI05E_ F@03001_FFmI03I_F@00=VmI00<006mIKeT0EVmI00<006mIKeT0EVmI00<006mIKeT0=FmI000eKeT0 0`00KeU_F@1GKeT00`00KeU_F@1FKeT00`00KeU_F@0eKeT003E_F@03001_FFmI05M_F@03001_FFmI 05M_F@03001_FFmI03A_F@00=6mI00<006mIKeT0F6mI00<006mIKeT0EfmI00<006mIKeT0=6mI000d KeT00`00KeU_F@1HKeT2001HKeT00`00KeU_F@0dKeT003A_F@03001_FFmI05Q_F@03001_FFmI05Q_ F@03001_FFmI03=_F@00KeT000m_F@03001_FFmI07e_F@03001_FFmI07e_F@03001_FFmI00i_ F@003fmI00<006mIKeT0OFmI0P00OfmI00<006mIKeT03FmI000>KeT00`00KeU_F@1nKeT00`00KeU_ F@1nKeT00`00KeU_F@0=KeT000e_F@03001_FFmI07m_F@03001_FFmI07m_F@03001_FFmI00a_F@00 3FmI00<006mIKeT0OfmI00<006mIKeT0OfmI00<006mIKeT036mI000KeT008m_F@03001_FFmI08i_F@00SfmI00<006mIKeT0SVmI0000\ \>"], ImageRangeCache->{{{0, 287}, {176.938, 0}} -> {-3.30686, 8.9411, 0.0230443, \ 0.0023049}}], Cell[BoxData[ TagBox[\(\[SkeletonIndicator] Graphics \[SkeletonIndicator]\), False, Editable->False]], "Output"] }, Open ]], Cell["\<\ What you see here is the characteristic shape of this hypergeometric curve. \ \>", "Text"], Cell[CellGroupData[{ Cell[BoxData[ \(\(\(\[IndentingNewLine]\)\(ListPlot[ Table[Ratio[Num, 5, 1\/2, 0, \ 10]\ , \ {Num, 3, 101, 2}], \ PlotJoined \[Rule] True]\)\)\)], "Input"], Cell[GraphicsData["PostScript", "\<\ %! %%Creator: Mathematica %%AspectRatio: .61803 MathPictureStart /Mabs { Mgmatrix idtransform Mtmatrix dtransform } bind def /Mabsadd { Mabs 3 -1 roll add 3 1 roll add exch } bind def %% Graphics %%IncludeResource: font Courier %%IncludeFont: Courier /Courier findfont 10 scalefont setfont % Scaling calculations 0.0238095 0.0190476 -0.121045 0.0575091 [ [.21429 .09649 -6 -9 ] [.21429 .09649 6 0 ] [.40476 .09649 -6 -9 ] [.40476 .09649 6 0 ] [.59524 .09649 -6 -9 ] [.59524 .09649 6 0 ] [.78571 .09649 -6 -9 ] [.78571 .09649 6 0 ] [.97619 .09649 -6 -9 ] [.97619 .09649 6 0 ] [.01131 .22401 -6 -4.5 ] [.01131 .22401 0 4.5 ] [.01131 .33903 -6 -4.5 ] [.01131 .33903 0 4.5 ] [.01131 .45405 -12 -4.5 ] [.01131 .45405 0 4.5 ] [.01131 .56906 -12 -4.5 ] [.01131 .56906 0 4.5 ] [ 0 0 0 0 ] [ 1 .61803 0 0 ] ] MathScale % Start of Graphics 1 setlinecap 1 setlinejoin newpath 0 g .25 Mabswid [ ] 0 setdash .21429 .10899 m .21429 .11524 L s [(10)] .21429 .09649 0 1 Mshowa .40476 .10899 m .40476 .11524 L s [(20)] .40476 .09649 0 1 Mshowa .59524 .10899 m .59524 .11524 L s [(30)] .59524 .09649 0 1 Mshowa .78571 .10899 m .78571 .11524 L s [(40)] .78571 .09649 0 1 Mshowa .97619 .10899 m .97619 .11524 L s [(50)] .97619 .09649 0 1 Mshowa .125 Mabswid .0619 .10899 m .0619 .11274 L s .1 .10899 m .1 .11274 L s .1381 .10899 m .1381 .11274 L s .17619 .10899 m .17619 .11274 L s .25238 .10899 m .25238 .11274 L s .29048 .10899 m .29048 .11274 L s .32857 .10899 m .32857 .11274 L s .36667 .10899 m .36667 .11274 L s .44286 .10899 m .44286 .11274 L s .48095 .10899 m .48095 .11274 L s .51905 .10899 m .51905 .11274 L s .55714 .10899 m .55714 .11274 L s .63333 .10899 m .63333 .11274 L s .67143 .10899 m .67143 .11274 L s .70952 .10899 m .70952 .11274 L s .74762 .10899 m .74762 .11274 L s .82381 .10899 m .82381 .11274 L s .8619 .10899 m .8619 .11274 L s .9 .10899 m .9 .11274 L s .9381 .10899 m .9381 .11274 L s .25 Mabswid 0 .10899 m 1 .10899 L s .02381 .22401 m .03006 .22401 L s [(6)] .01131 .22401 1 0 Mshowa .02381 .33903 m .03006 .33903 L s [(8)] .01131 .33903 1 0 Mshowa .02381 .45405 m .03006 .45405 L s [(10)] .01131 .45405 1 0 Mshowa .02381 .56906 m .03006 .56906 L s [(12)] .01131 .56906 1 0 Mshowa .125 Mabswid .02381 .13775 m .02756 .13775 L s .02381 .1665 m .02756 .1665 L s .02381 .19525 m .02756 .19525 L s .02381 .25276 m .02756 .25276 L s .02381 .28152 m .02756 .28152 L s .02381 .31027 m .02756 .31027 L s .02381 .36778 m .02756 .36778 L s .02381 .39654 m .02756 .39654 L s .02381 .42529 m .02756 .42529 L s .02381 .4828 m .02756 .4828 L s .02381 .51155 m .02756 .51155 L s .02381 .54031 m .02756 .54031 L s .02381 .08024 m .02756 .08024 L s .02381 .05148 m .02756 .05148 L s .02381 .02273 m .02756 .02273 L s .02381 .59782 m .02756 .59782 L s .25 Mabswid .02381 0 m .02381 .61803 L s 0 0 m 1 0 L 1 .61803 L 0 .61803 L closepath clip newpath .5 Mabswid .04286 .01472 m .0619 .04824 L .08095 .077 L .1 .10237 L .11905 .12482 L .1381 .14495 L .15714 .16334 L .17619 .18044 L .19524 .19657 L .21429 .21194 L .23333 .22669 L .25238 .2409 L .27143 .25465 L .29048 .26797 L .30952 .2809 L .32857 .29347 L .34762 .30571 L .36667 .31763 L .38571 .32925 L .40476 .3406 L .42381 .35169 L .44286 .36253 L .4619 .37313 L .48095 .38353 L .5 .39371 L .51905 .4037 L .5381 .4135 L .55714 .42313 L .57619 .43259 L .59524 .4419 L .61429 .45105 L .63333 .46006 L .65238 .46893 L .67143 .47767 L .69048 .48629 L .70952 .49478 L .72857 .50316 L .74762 .51143 L .76667 .51959 L .78571 .52765 L .80476 .53561 L .82381 .54347 L .84286 .55124 L .8619 .55893 L .88095 .56652 L .9 .57404 L .91905 .58147 L .9381 .58883 L .95714 .59611 L .97619 .60332 L Mistroke Mfstroke % End of Graphics MathPictureEnd \ \>"], "Graphics", ImageSize->{288, 177.938}, ImageMargins->{{43, 0}, {0, 0}}, ImageRegion->{{0, 1}, {0, 1}}, ImageCache->GraphicsData["Bitmap", "\<\ CF5dJ6E]HGAYHf4PAg9QL6QYHgKeT00`00KeU_F@0NKeT01@00KeU_FFmI 00000VmI00<006mIKeT0:FmI00@006mIKeT0009_F@04001_FFmI000[KeT01000KeU_F@000VmI00@0 06mIKeT002a_F@03001_F@00009_F@04001_FFmI000/KeT00`00KeU_F@02KeT01000KeU_F@000fmI 000?KeT00`00KeU_F@0?KeT00`00KeU_F@0LKeT20004KeT2000]KeT20004KeT2000]KeT20004KeT2 000^KeT20003KeT2000]KeT30003KeT20004KeT000m_F@03001_FFmI00m_F@03001_FFmI0?a_F@00 3fmI00<006mIKeT046mI00<006mIKeT0nfmI000?KeT00`00KeU_F@0AKeT00`00KeU_F@3jKeT000m_ F@03001_FFmI015_F@03001_FFmI0?Y_F@003fmI00<006mIKeT04VmI00<006mIKeT0nFmI0008KeWo 000I000000m_F@03001_FFmI00Q_F@03001_FFmI00M_F@03001_F@0000Q_F@03001_FFmI00M_F@03 001_FFmI00Q_F@03001_FFmI00Q_F@03001_FFmI00M_F@03001_FFmI00Q_F@03001_FFmI00M_F@03 001_FFmI00Q_F@03001_FFmI00Q_F@03001_FFmI00M_F@03001_FFmI00Q_F@03001_FFmI00M_F@03 001_FFmI00Q_F@03001_FFmI00Q_F@03001_FFmI00M_F@03001_FFmI00Q_F@03001_FFmI00M_F@03 001_FFmI00Q_F@03001_FFmI00M_F@03001_FFmI00Q_F@03001_FFmI00Q_F@03001_FFmI00M_F@03 001_FFmI00Q_F@03001_FFmI00E_F@003fmI00<006mIKeT056mI00<006mIKeT06fmI00<006mIKeT0 i_F@003fmI00<006mIKeT07VmI00<006mIKeT0kFmI 000?KeT00`00KeU_F@0OKeT00`00KeU_F@3/KeT000m_F@03001_FFmI01m_F@03001_FFmI0>a_F@00 3fmI00<006mIKeT086mI00<006mIKeT0jfmI000?KeT00`00KeU_F@0QKeT00`00KeU_F@3ZKeT000m_ F@8002=_F@03001_FFmI0>U_F@003fmI00<006mIKeT08fmI00<006mIKeT0j6mI000?KeT00`00KeU_ F@0TKeT2003XKeT000m_F@03001_FFmI02I_F@03001_FFmI0>E_F@003fmI00<006mIKeT09fmI00<0 06mIKeT0i6mI000?KeT00`00KeU_F@0XKeT00`00KeU_F@3SKeT000m_F@03001_FFmI02U_F@03001_ FFmI0>9_F@003fmI00<006mIKeT0:VmI0P00hVmI000?KeT2000]KeT00`00KeU_F@3OKeT000m_F@03 001_FFmI02e_F@03001_FFmI0=i_F@003fmI00<006mIKeT0;VmI00<006mIKeT0gFmI000?KeT00`00 KeU_F@0_KeT2003MKeT000m_F@03001_FFmI035_F@03001_FFmI0=Y_F@003fmI00<006mIKeT06mI0P00e6mI0008KeT30004KeT00`00KeU_F@0jKeT00`00KeU_F@3AKeT000m_F@03001_FFmI03]_ F@800=5_F@003fmI00<006mIKeT0?FmI00<006mIKeT0cVmI000?KeT00`00KeU_F@0nKeT00`00KeU_ F@3=KeT000m_F@03001_FFmI03m_F@8009_F@80 02Y_F@003fmI00<006mIKeT0i6mI0P00:6mI00000fmI0000000300000fmI000000020004KeT00`00 KeU_F@3VKeT2000VKeT000=_F@05001_FFmIKeT00007KeT00`00KeU_F@3XKeT2000TKeT000=_F@03 001_FFmI009_F@03001_FFmI00A_F@<00>Y_F@<0025_F@000fmI00<006mIKeT00fmI00<006mIKeT0 0fmI00<006mIKeT0kFmI0`007VmI0003KeT01@00KeU_FFmI00000VmI00<006mIKeT00VmI00<006mI KeT0l6mI0`006fmI0002KeT20004KeT20005KeT00`00KeU_F@3cKeT2000IKeT000m_F@03001_FFmI 0?E_F@<001I_F@003fmI00<006mIKeT0n6mI0P0056mI000?KeT00`00KeU_F@3jKeT3000AKeT000m_ F@03001_FFmI0?e_F@<000i_F@003fmI0P00ofmI0VmI0`002fmI000?KeT00`00KeU_F@3oKeT4KeT2 0009KeT000m_F@03001_FFmI0?m_F@I_F@8000M_F@003fmI00<006mIKeT0ofmI3fmI000?KeT00`00 KeU_F@3oKeT?KeT000m_F@03001_FFmI0?m_F@m_F@003fmI00<006mIKeT0ofmI3fmI003oKeTQKeT0 0?m_FB5_F@00\ \>"], ImageRangeCache->{{{0, 287}, {176.938, 0}} -> {-2.92151, 1.94736, 0.188752, \ 0.0625166}}], Cell[BoxData[ TagBox[\(\[SkeletonIndicator] Graphics \[SkeletonIndicator]\), False, Editable->False]], "Output"] }, Open ]], Cell["\<\ It looks like the guess differs by a square-root like factor in N, and that \ there may be a factor in there like 2.\ \>", "Text"], Cell[CellGroupData[{ Cell[BoxData[ \(ListPlot[Table[Ratio[11, Dst, 1\/2, 0, \ 10]\ , \ {Dst, 3, 21, 2}], \ PlotJoined \[Rule] True]\)], "Input"], Cell[GraphicsData["PostScript", "\<\ %! %%Creator: Mathematica %%AspectRatio: .61803 MathPictureStart /Mabs { Mgmatrix idtransform Mtmatrix dtransform } bind def /Mabsadd { Mabs 3 -1 roll add 3 1 roll add exch } bind def %% Graphics %%IncludeResource: font Courier %%IncludeFont: Courier /Courier findfont 10 scalefont setfont % Scaling calculations -0.0820106 0.10582 -23.9222 5.7366 [ [.34127 .15901 -3 -9 ] [.34127 .15901 3 0 ] [.55291 .15901 -3 -9 ] [.55291 .15901 3 0 ] [.76455 .15901 -3 -9 ] [.76455 .15901 3 0 ] [.97619 .15901 -6 -9 ] [.97619 .15901 6 0 ] [.11713 .05678 -24 -4.5 ] [.11713 .05678 0 4.5 ] [.11713 .28624 -24 -4.5 ] [.11713 .28624 0 4.5 ] [.11713 .40097 -24 -4.5 ] [.11713 .40097 0 4.5 ] [.11713 .51571 -24 -4.5 ] [.11713 .51571 0 4.5 ] [ 0 0 0 0 ] [ 1 .61803 0 0 ] ] MathScale % Start of Graphics 1 setlinecap 1 setlinejoin newpath 0 g .25 Mabswid [ ] 0 setdash .34127 .17151 m .34127 .17776 L s [(4)] .34127 .15901 0 1 Mshowa .55291 .17151 m .55291 .17776 L s [(6)] .55291 .15901 0 1 Mshowa .76455 .17151 m .76455 .17776 L s [(8)] .76455 .15901 0 1 Mshowa .97619 .17151 m .97619 .17776 L s [(10)] .97619 .15901 0 1 Mshowa .125 Mabswid .18254 .17151 m .18254 .17526 L s .23545 .17151 m .23545 .17526 L s .28836 .17151 m .28836 .17526 L s .39418 .17151 m .39418 .17526 L s .44709 .17151 m .44709 .17526 L s .5 .17151 m .5 .17526 L s .60582 .17151 m .60582 .17526 L s .65873 .17151 m .65873 .17526 L s .71164 .17151 m .71164 .17526 L s .81746 .17151 m .81746 .17526 L s .87037 .17151 m .87037 .17526 L s .92328 .17151 m .92328 .17526 L s .07672 .17151 m .07672 .17526 L s .02381 .17151 m .02381 .17526 L s .25 Mabswid 0 .17151 m 1 .17151 L s .12963 .05678 m .13588 .05678 L s [(4.18)] .11713 .05678 1 0 Mshowa .12963 .28624 m .13588 .28624 L s [(4.22)] .11713 .28624 1 0 Mshowa .12963 .40097 m .13588 .40097 L s [(4.24)] .11713 .40097 1 0 Mshowa .12963 .51571 m .13588 .51571 L s [(4.26)] .11713 .51571 1 0 Mshowa .125 Mabswid .12963 .08546 m .13338 .08546 L s .12963 .11414 m .13338 .11414 L s .12963 .14283 m .13338 .14283 L s .12963 .20019 m .13338 .20019 L s .12963 .22888 m .13338 .22888 L s .12963 .25756 m .13338 .25756 L s .12963 .31493 m .13338 .31493 L s .12963 .34361 m .13338 .34361 L s .12963 .37229 m .13338 .37229 L s .12963 .42966 m .13338 .42966 L s .12963 .45834 m .13338 .45834 L s .12963 .48702 m .13338 .48702 L s .12963 .0281 m .13338 .0281 L s .12963 .54439 m .13338 .54439 L s .12963 .57307 m .13338 .57307 L s .12963 .60176 m .13338 .60176 L s .25 Mabswid .12963 0 m .12963 .61803 L s 0 0 m 1 0 L 1 .61803 L 0 .61803 L closepath clip newpath .5 Mabswid .02381 .01472 m .12963 .60332 L .23545 .47819 L .34127 .47096 L .44709 .47093 L .55291 .47093 L .65873 .47093 L .76455 .47093 L .87037 .47093 L .97619 .47093 L s % End of Graphics MathPictureEnd \ \>"], "Graphics", ImageSize->{288, 177.938}, ImageMargins->{{43, 0}, {0, 0}}, ImageRegion->{{0, 1}, {0, 1}}, ImageCache->GraphicsData["Bitmap", "\<\ CF5dJ6E]HGAYHf4PAg9QL6QYHg6mI1@00=fmI 00@006mIKeT003U_F@04001_FFmI000gKeT01@00KeU_FFmI00000VmI00<006mIKeT00VmI000=KeT0 0`00KeU_F@0EKeT2000iKeT01000KeU_F@00>6mI0`00>fmI0P00>6mI00D006mIKeU_F@00009_F@03 001_FFmI009_F@003VmI00<006mIKeT056mI00<006mIKeT0>FmI00<006mI0000>FmI00<006mIKeT0 >FmI00@006mIKeT003M_F@05001_FFmIKeT00002KeT00`00KeU_F@02KeT000i_F@03001_FFmI01A_ F@03001_FFmI03Y_F@8003U_F@<003Y_F@8003M_F@8000A_F@8000E_F@003VmI00<006mIKeT056mI 00<006mIKeT0n6mI000>KeT00`00KeU_F@0DKeT00`00KeU_F@3hKeT000i_F@03001_FFmI01A_F@03 001_FFmI0?Q_F@003VmI00<006mIKeT056mI00<006mIKeT0n6mI000?KeT00`00KeU_F@0CKeT00`00 KeU_F@3hKeT000m_F@03001_FFmI01=_F@03001_FFmI0?Q_F@00o`0080000FmI0007KeT00`00KeU_ F@05KeT00`00KeU_F@04KeT00`00KeU_F@0KeT00`00KeU_F@3hKeT001A_F@03001_FFmI00i_F@03001_ FFmI0?Q_F@0056mI00<006mIKeT03VmI00<006mIKeT0n6mI0001_F@0086mI00<006mIKeT00VmI00<006mIKeT056mI00<006mIKeT0 hFmI0009_F@002VmI1@0026mI00<006mIKeT00VmI00H006mIKeT006mI0003KeT3000BKeT0 0`00KeU_F@3SKeT000Y_F@04001_FFmI000:KeT01000KeU_FFmI0`000VmI00D006mIKeU_F@0001=_ F@03001_FFmI0>A_F@002fmI00<006mI000026mI00@006mIKeT000=_F@05001_FFmIKeT00003KeT0 0`00KeU_F@0@KeT00`00KeU_F@3UKeT000a_F@8000U_F@8000A_F@<00003KeT006mI009_F@03001_ FFmI00m_F@03001_FFmI0>I_F@008FmI00D006mIKeU_F@00011_F@03001_FFmI0>M_F@008FmI00D0 06mIKeU_F@00011_F@03001_FFmI0>M_F@008VmI00@006mIKeT000m_F@03001_FFmI0>Q_F@008VmI 00@006mIKeT000i_F@03001_FFmI0>U_F@008VmI00<006mIKeT00P0036mI00<006mIKeT0jVmI000R KeT01000KeU_F@0036mI00<006mIKeT0jfmI000RKeT01000KeU_F@002fmI00<006mIKeT0k6mI000R KeT01000KeU_F@002fmI00<006mIKeT0k6mI000SKeT00`00KeT0000:KeT00`00KeU_F@3]KeT002=_ F@03001_F@0000U_F@03001_FFmI0>i_F@008fmI00<006mI000026mI00<006mIKeT0kfmI000SKeT0 0`00KeT00007KeT00`00KeU_F@3`KeT002=_F@03001_F@0000I_F@03001_FFmI0?5_F@0096mI0`00 1FmI00<006mIKeT0lFmI000TKeT20005KeT00`00KeU_F@3bKeT002A_F@8000A_F@03001_FFmI0?=_ F@0096mI0P000fmI00<006mIKeT0m6mI000TKeT20002KeT00`00KeU_F@3eKeT002A_F@800003KeT0 06mI0?M_F@009FmI00<006mI0000n6mI000UKeT2003iKeT002E_F@800?U_F@009FmI00<006mIKeT0 n6mI000UKeT00`00KeU_F@3hKeT002E_F@03001_FFmI0?Q_F@009FmI00<006mIKeT0n6mI0000\ \>"], ImageRangeCache->{{{0, 287}, {176.938, 0}} -> {0.763281, 4.1701, 0.0330085, \ 0.000608891}}], Cell[BoxData[ TagBox[\(\[SkeletonIndicator] Graphics \[SkeletonIndicator]\), False, Editable->False]], "Output"] }, Open ]], Cell["\<\ And the error seems to be roughly constant in distance. Trying a derivation \ from a more specific form of the Stirling approximation: \ \>", "Text"], Cell[CellGroupData[{ Cell[BoxData[{ \(\(Num\ = 107;\)\), "\[IndentingNewLine]", \(\(Dst\ = 5;\)\), "\[IndentingNewLine]", \(\(\[Alpha]\ = \ 1\/2;\)\), "\[IndentingNewLine]", \(Plot[{\(\(2\ \@\(2\ \[Pi]\ Num\)\)\/Num\) \(\((\[Alpha]\ Num)\)\^\(\(-2\ \)\ \[Alpha]\ Num\)\) \(Num\^Num\) \(\[ExponentialE]\^\(\(-\ \[Lambda]\^2\)\/\ \(\(\ \)\(4 \((Dst\^2\/\(\[Alpha]\ Num\))\)\)\)\)\) \(\[Sum]\+\(x = \ \(-100\)\)\%100 \[ExponentialE]\^\(\(-\((Dst\^2\/\(\[Alpha]\ Num\))\)\) \((x \ - \(\[ImaginaryI]\ \[Lambda]\)\/\(\(2\)\(\ \)\((Dst\^2\/\(\[Alpha]\ \ Num\))\)\(\ \)\))\)\^2\)\), FActual[Num, \ \[Lambda], \ Dst, \ \[Alpha]]\ }, \ {\[Lambda], \(-\[Pi]\), \ \ \[Pi]}, \ PlotStyle \[Rule] {Hue[ .6], \ Hue[0]}]\)}], "Input"], Cell[GraphicsData["PostScript", "\<\ %! %%Creator: Mathematica %%AspectRatio: .61803 MathPictureStart /Mabs { Mgmatrix idtransform Mtmatrix dtransform } bind def /Mabsadd { Mabs 3 -1 roll add 3 1 roll add exch } bind def %% Graphics %%IncludeResource: font Courier %%IncludeFont: Courier /Courier findfont 10 scalefont setfont % Scaling calculations 0.5 0.151576 0.0147151 2.88672e-033 [ [.04527 .00222 -6 -9 ] [.04527 .00222 6 0 ] [.19685 .00222 -6 -9 ] [.19685 .00222 6 0 ] [.34842 .00222 -6 -9 ] [.34842 .00222 6 0 ] [.65158 .00222 -3 -9 ] [.65158 .00222 3 0 ] [.80315 .00222 -3 -9 ] [.80315 .00222 3 0 ] [.95473 .00222 -3 -9 ] [.95473 .00222 3 0 ] [.4875 .15905 -33 -6.25 ] [.4875 .15905 0 6.25 ] [.4875 .30339 -33 -6.25 ] [.4875 .30339 0 6.25 ] [.4875 .44772 -45 -6.25 ] [.4875 .44772 0 6.25 ] [.4875 .59206 -33 -6.25 ] [.4875 .59206 0 6.25 ] [ 0 0 0 0 ] [ 1 .61803 0 0 ] ] MathScale % Start of Graphics 1 setlinecap 1 setlinejoin newpath 0 g .25 Mabswid [ ] 0 setdash .04527 .01472 m .04527 .02097 L s [(-3)] .04527 .00222 0 1 Mshowa .19685 .01472 m .19685 .02097 L s [(-2)] .19685 .00222 0 1 Mshowa .34842 .01472 m .34842 .02097 L s [(-1)] .34842 .00222 0 1 Mshowa .65158 .01472 m .65158 .02097 L s [(1)] .65158 .00222 0 1 Mshowa .80315 .01472 m .80315 .02097 L s [(2)] .80315 .00222 0 1 Mshowa .95473 .01472 m .95473 .02097 L s [(3)] .95473 .00222 0 1 Mshowa .125 Mabswid .07559 .01472 m .07559 .01847 L s .1059 .01472 m .1059 .01847 L s .13622 .01472 m .13622 .01847 L s .16653 .01472 m .16653 .01847 L s .22716 .01472 m .22716 .01847 L s .25748 .01472 m .25748 .01847 L s .28779 .01472 m .28779 .01847 L s .31811 .01472 m .31811 .01847 L s .37874 .01472 m .37874 .01847 L s .40905 .01472 m .40905 .01847 L s .43937 .01472 m .43937 .01847 L s .46968 .01472 m .46968 .01847 L s .53032 .01472 m .53032 .01847 L s .56063 .01472 m .56063 .01847 L s .59095 .01472 m .59095 .01847 L s .62126 .01472 m .62126 .01847 L s .68189 .01472 m .68189 .01847 L s .71221 .01472 m .71221 .01847 L s .74252 .01472 m .74252 .01847 L s .77284 .01472 m .77284 .01847 L s .83347 .01472 m .83347 .01847 L s .86378 .01472 m .86378 .01847 L s .8941 .01472 m .8941 .01847 L s .92441 .01472 m .92441 .01847 L s .01496 .01472 m .01496 .01847 L s .98504 .01472 m .98504 .01847 L s .25 Mabswid 0 .01472 m 1 .01472 L s .5 .15905 m .50625 .15905 L s gsave .4875 .15905 -33 -4.25 Mabsadd m 1 1 Mabs scale /Courier findfont 10 scalefont setfont (5) show /Math1Mono findfont 10 scalefont setfont (\\264) show /Courier findfont 10 scalefont setfont (10) show 0 5.25 rmoveto /Courier findfont 7.5 scalefont setfont (31) show grestore .5 .30339 m .50625 .30339 L s gsave .4875 .30339 -33 -4.25 Mabsadd m 1 1 Mabs scale /Courier findfont 10 scalefont setfont (1) show /Math1Mono findfont 10 scalefont setfont (\\264) show /Courier findfont 10 scalefont setfont (10) show 0 5.25 rmoveto /Courier findfont 7.5 scalefont setfont (32) show grestore .5 .44772 m .50625 .44772 L s gsave .4875 .44772 -45 -4.25 Mabsadd m 1 1 Mabs scale /Courier findfont 10 scalefont setfont (1.5) show /Math1Mono findfont 10 scalefont setfont (\\264) show /Courier findfont 10 scalefont setfont (10) show 0 5.25 rmoveto /Courier findfont 7.5 scalefont setfont (32) show grestore .5 .59206 m .50625 .59206 L s gsave .4875 .59206 -33 -4.25 Mabsadd m 1 1 Mabs scale /Courier findfont 10 scalefont setfont (2) show /Math1Mono findfont 10 scalefont setfont (\\264) show /Courier findfont 10 scalefont setfont (10) show 0 5.25 rmoveto /Courier findfont 7.5 scalefont setfont (32) show grestore .125 Mabswid .5 .04358 m .50375 .04358 L s .5 .07245 m .50375 .07245 L s .5 .10132 m .50375 .10132 L s .5 .13018 m .50375 .13018 L s .5 .18792 m .50375 .18792 L s .5 .21679 m .50375 .21679 L s .5 .24565 m .50375 .24565 L s .5 .27452 m .50375 .27452 L s .5 .33225 m .50375 .33225 L s .5 .36112 m .50375 .36112 L s .5 .38999 m .50375 .38999 L s .5 .41886 m .50375 .41886 L s .5 .47659 m .50375 .47659 L s .5 .50546 m .50375 .50546 L s .5 .53432 m .50375 .53432 L s .5 .56319 m .50375 .56319 L s .25 Mabswid .5 0 m .5 .61803 L s 0 0 m 1 0 L 1 .61803 L 0 .61803 L closepath clip newpath 0 .4 1 r .5 Mabswid .02381 .02071 m .02499 .02071 L .02605 .02072 L .02729 .02072 L .02846 .02074 L .03053 .02077 L .03279 .02082 L .03527 .02088 L .0379 .02097 L .04262 .02118 L .04749 .02147 L .05205 .02179 L .06244 .02276 L .07305 .02411 L .08274 .02568 L .09407 .02797 L .10458 .03058 L .12357 .03669 L .14429 .04578 L .16481 .05781 L .18342 .07181 L .20429 .09156 L .22348 .11395 L .26204 .17217 L .30152 .24992 L .33949 .33778 L .37992 .43544 L .41883 .5196 L .44007 .55609 L .44982 .5698 L .46019 .58199 L .46965 .59083 L .47468 .5946 L .4801 .59792 L .48505 .60027 L .48722 .60109 L .4896 .60184 L .4917 .60238 L .49394 .60282 L .49519 .603 L .49631 .60313 L .49745 .60323 L .49852 .60329 L .49967 .60332 L .50091 .60331 L .50208 .60326 L .50315 .60318 L .5044 .60306 L .50576 .60287 L .50824 .60239 L Mistroke .51083 .60172 L .51358 .6008 L .51853 .59863 L .52352 .59579 L .52822 .59251 L .53698 .58487 L .5571 .56028 L .57559 .53 L .61513 .44702 L .65315 .35561 L .69363 .26057 L .73259 .18173 L .75244 .14819 L .774 .11719 L .8139 .0741 L .83371 .05881 L .85473 .04628 L .87424 .03752 L .89254 .03139 L .90239 .02879 L .91276 .02652 L .92247 .02479 L .93128 .02351 L .94085 .02242 L .94575 .02197 L .95106 .02156 L .95598 .02126 L .96052 .02104 L .96485 .02088 L .96704 .02082 L .96944 .02077 L .97114 .02074 L .97269 .02072 L .97355 .02072 L .97449 .02071 L .97537 .02071 L .97619 .02071 L Mfstroke 1 0 0 r .02381 .01559 m .02499 .01559 L .02605 .01559 L .02729 .01559 L .02846 .01559 L .03053 .0156 L .03279 .0156 L .03527 .01561 L .0379 .01563 L .04262 .01566 L .04749 .01571 L .05205 .01576 L .06244 .01591 L .07305 .01612 L .08274 .01636 L .09407 .01672 L .10458 .01713 L .12357 .01809 L .14429 .01952 L .16481 .02142 L .18342 .02365 L .20429 .02679 L .22348 .03035 L .26204 .03964 L .30152 .05205 L .33949 .06608 L .37992 .08165 L .41883 .09506 L .44007 .10088 L .44982 .10306 L .46019 .105 L .46965 .10641 L .47468 .10701 L .4801 .10753 L .48505 .10791 L .48722 .10804 L .4896 .10816 L .4917 .10824 L .49394 .10831 L .49519 .10834 L .49631 .10836 L .49745 .10838 L .49852 .10839 L .49967 .10839 L .50091 .10839 L .50208 .10839 L .50315 .10837 L .5044 .10835 L .50576 .10832 L .50824 .10825 L Mistroke .51083 .10814 L .51358 .10799 L .51853 .10765 L .52352 .1072 L .52822 .10667 L .53698 .10546 L .5571 .10154 L .57559 .09672 L .61513 .0835 L .65315 .06892 L .69363 .05375 L .73259 .04116 L .75244 .03581 L .774 .03087 L .8139 .02401 L .83371 .02158 L .85473 .0196 L .87424 .01822 L .89254 .01726 L .90239 .01685 L .91276 .01649 L .92247 .01622 L .93128 .01602 L .94085 .01585 L .94575 .01578 L .95106 .01572 L .95598 .01567 L .96052 .01564 L .96485 .01561 L .96704 .0156 L .96944 .0156 L .97114 .01559 L .97269 .01559 L .97355 .01559 L .97449 .01559 L .97537 .01559 L .97619 .01559 L Mfstroke % End of Graphics MathPictureEnd \ \>"], "Graphics", ImageSize->{288, 177.938}, ImageMargins->{{43, 0}, {0, 0}}, ImageRegion->{{0, 1}, {0, 1}}, ImageCache->GraphicsData["Bitmap", "\<\ CF5dJ6E]HGAYHf4PAg9QL6QYHgKeT008m_F@03001_FFmI 08i_F@001fmI1P004W`0h0004g`01P0026mI000;KeT00`00KeU_F@05KeT00`00KeU_F@05KeT01000 KeU_FFmI4W`00fmI00<006mIKeT01FmI00<006mIKeT01VmI00<006mIKeT01FmI00<006mIKeT01FmI 00<006mIKeT01FmI00<006mIKeT01VmI00<006mIKeT01FmI00<006mIKeT01FmI00<006mIKeT01FmI 00<006mIKeT01VmI00<006mIKeT01FmI00<006mIKeT01FmI00<006mIKeT01VmI00<006mIKeT01FmI 00<006mIKeT01FmI00<006mIKeT01FmI00<006mIKeT01VmI00<006mIKeT01FmI00<006mIKeT01FmI 00<006mIKeT01FmI00<006mIKeT01VmI00<006mIKeT01FmI00@006mIKeU_FA5l00A_F@03001_FFmI 00E_F@03001_FFmI00E_F@03001_FFmI00Y_F@003FmI3@6O5fmI2g`000<006mIKeT09fmI00<006mI KeT09VmI00<006mIKeT09VmI00<006mIKeT09fmI00<006mIKeT00fmI1W`05VmI3P6O3VmI000JKeT5 0IlMKeT5O01>KeT00`00KeU_F@1>KeT8O00GKeT50IlLKeT001m_F@H1Waa_F@El04U_F@03001_FFmI 04M_F@Ml01a_F@<1Wb5_F@009FmI0P6O7fmI0g`0AVmI00<006mIKeT0A6mI0g`07fmI106O96mI000W KeT30IlOKeT4O012KeT00`00KeU_F@10KeT4O00OKeT30IlXKeT002Y_F@<1Wb1_F@=l03m_F@03001_ FFmI03]_F@El025_F@81Wb]_F@00;FmI0P6O8FmI17`0>fmI0P00>VmI0W`096mI0P6O;FmI000_KeT2 0IlSKeT4O00gKeT00`00KeU_F@0fKeT3O00UKeT00`6OKeU_F@0]KeT0035_F@030Im_FFmI02A_F@=l 03A_F@03001_FFmI03A_F@9l02I_F@81Wc1_F@00VmI00<1WfmIKeT0;FmI0g`08VmI00<006mIKeT08FmI0W`0;fmI00<1WfmIKeT0 >FmI000kKeT00`6OKeU_F@0_KeT3O00OKeT00`00KeU_F@0NKeT3O00`KeT00`6OKeU_F@0jKeT003a_ F@030Im_FFmI035_F@=l01a_F@03001_FFmI01]_F@=l039_F@030Im_FFmI03]_F@00?FmI00<1WfmI KeT0FmI17`03fmI00<006mIKeT0 3fmI0W`0?6mI00<1WfmIKeT0?VmI0011KeT00`6OKeU_F@0lKeT3O00