(*********************************************************************** Mathematica-Compatible Notebook This notebook can be used on any computer system with Mathematica 3.0, MathReader 3.0, or any compatible application. The data for the notebook starts with the line of 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[ 48894, 1852]*) (*NotebookOutlinePosition[ 49949, 1888]*) (* CellTagsIndexPosition[ 49905, 1884]*) (*WindowFrame->Normal*) Notebook[{ Cell[CellGroupData[{Cell[TextData["KeltnerFig.1.eps"], "Section", Evaluatable->False, AspectRatioFixed->True], Cell[CellGroupData[{Cell[TextData[{ StyleBox[ "f[x_] := x^2 - 1\n begint = 0;\n endint = 2;\n minit = 1000;\n \ maxit = 9000;\n stepsize = 2000;\n trials = 9;\n ", AspectRatioFixed->True, FontFamily->"Palatino"], StyleBox[ "z = {}; (*empty list*)\nv = {}; (*empty list*)\n\nminy = \ Min[Table[N[f[x]],{x,begint,endint,0.01}]];\nmaxy = \ Max[Table[N[f[x]],{x,begint,endint,0.01}]];\n\nDo[\n Do[Counter = 0;\n \ Do[r = Random[Real, {miny,maxy}]; \n s = Random[Real,{begint,endint}];\n\ If[r <= f[s] && r >= 0, \n Counter = Counter + 1, \n \ Counter = Counter];\n If[r >= f[s] && r < 0,\n Counter = \ Counter - 1,\n Counter = Counter],\n {i,1,k}];\n\n AppendTo[v, \ N[(Counter/k)*((endint-begint)*(maxy-miny))]];\n AppendTo[z,k], \ {j,1,trials}];\n ,{k, minit, maxit, stepsize}];\n\ndata = Transpose[{z, v}];\ \npoints = ListPlot[data,\n\t\t\tDisplayFunction -> Identity,\n\t\t\t\ PlotRange -> All];\nvalue = NIntegrate[f[x], {x,begint,endint}];\nactualval = \ Plot[value, {x,minit - 25, maxit},\n\t\t\t\tDisplayFunction -> Identity];\n\ Show[points, actualval,\n\tDisplayFunction -> $DisplayFunction];", AspectRatioFixed->True] }], "Input", AspectRatioFixed->True], Cell[GraphicsData["PostScript", "\<\ %! %%Creator: Mathematica %%AspectRatio: .61803 MathPictureStart %% Graphics /Helvetica findfont 6 scalefont setfont % Scaling calculations -0.0919 0.000119 -0.813858 1.697896 [ [(2000)] .14545 .03509 0 2 Msboxa [(4000)] .38281 .03509 0 2 Msboxa [(6000)] .62016 .03509 0 2 Msboxa [(8000)] .85751 .03509 0 2 Msboxa [(0.55)] -0.00946 .11998 1 0 Msboxa [(0.6)] -0.00946 .20488 1 0 Msboxa [(0.65)] -0.00946 .28977 1 0 Msboxa [(0.7)] -0.00946 .37467 1 0 Msboxa [(0.75)] -0.00946 .45956 1 0 Msboxa [(0.8)] -0.00946 .54446 1 0 Msboxa [ -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 .14545 .03509 m .14545 .04134 L s P [(2000)] .14545 .03509 0 2 Mshowa p .002 w .38281 .03509 m .38281 .04134 L s P [(4000)] .38281 .03509 0 2 Mshowa p .002 w .62016 .03509 m .62016 .04134 L s P [(6000)] .62016 .03509 0 2 Mshowa p .002 w .85751 .03509 m .85751 .04134 L s P [(8000)] .85751 .03509 0 2 Mshowa p .001 w .19292 .03509 m .19292 .03884 L s P p .001 w .24039 .03509 m .24039 .03884 L s P p .001 w .28787 .03509 m .28787 .03884 L s P p .001 w .33534 .03509 m .33534 .03884 L s P p .001 w .43028 .03509 m .43028 .03884 L s P p .001 w .47775 .03509 m .47775 .03884 L s P p .001 w .52522 .03509 m .52522 .03884 L s P p .001 w .57269 .03509 m .57269 .03884 L s P p .001 w .66763 .03509 m .66763 .03884 L s P p .001 w .7151 .03509 m .7151 .03884 L s P p .001 w .76257 .03509 m .76257 .03884 L s P p .001 w .81004 .03509 m .81004 .03884 L s P p .001 w .09798 .03509 m .09798 .03884 L s P p .001 w .05051 .03509 m .05051 .03884 L s P p .001 w .90498 .03509 m .90498 .03884 L s P p .001 w .95246 .03509 m .95246 .03884 L s P p .001 w .99993 .03509 m .99993 .03884 L s P p .002 w 0 .03509 m 1 .03509 L s P p .002 w .00304 .11998 m .00929 .11998 L s P [(0.55)] -0.00946 .11998 1 0 Mshowa p .002 w .00304 .20488 m .00929 .20488 L s P [(0.6)] -0.00946 .20488 1 0 Mshowa p .002 w .00304 .28977 m .00929 .28977 L s P [(0.65)] -0.00946 .28977 1 0 Mshowa p .002 w .00304 .37467 m .00929 .37467 L s P [(0.7)] -0.00946 .37467 1 0 Mshowa p .002 w .00304 .45956 m .00929 .45956 L s P [(0.75)] -0.00946 .45956 1 0 Mshowa p .002 w .00304 .54446 m .00929 .54446 L s P [(0.8)] -0.00946 .54446 1 0 Mshowa p .001 w .00304 .05207 m .00679 .05207 L s P p .001 w .00304 .06905 m .00679 .06905 L s P p .001 w .00304 .08603 m .00679 .08603 L s P p .001 w .00304 .10301 m .00679 .10301 L s P p .001 w .00304 .13696 m .00679 .13696 L s P p .001 w .00304 .15394 m .00679 .15394 L s P p .001 w .00304 .17092 m .00679 .17092 L s P p .001 w .00304 .1879 m .00679 .1879 L s P p .001 w .00304 .22186 m .00679 .22186 L s P p .001 w .00304 .23884 m .00679 .23884 L s P p .001 w .00304 .25582 m .00679 .25582 L s P p .001 w .00304 .2728 m .00679 .2728 L s P p .001 w .00304 .30675 m .00679 .30675 L s P p .001 w .00304 .32373 m .00679 .32373 L s P p .001 w .00304 .34071 m .00679 .34071 L s P p .001 w .00304 .35769 m .00679 .35769 L s P p .001 w .00304 .39165 m .00679 .39165 L s P p .001 w .00304 .40863 m .00679 .40863 L s P p .001 w .00304 .42561 m .00679 .42561 L s P p .001 w .00304 .44258 m .00679 .44258 L s P p .001 w .00304 .47654 m .00679 .47654 L s P p .001 w .00304 .49352 m .00679 .49352 L s P p .001 w .00304 .5105 m .00679 .5105 L s P p .001 w .00304 .52748 m .00679 .52748 L s P p .001 w .00304 .01811 m .00679 .01811 L s P p .001 w .00304 .00113 m .00679 .00113 L s P p .001 w .00304 .56144 m .00679 .56144 L s P p .001 w .00304 .57842 m .00679 .57842 L s P p .001 w .00304 .5954 m .00679 .5954 L s P p .001 w .00304 .61237 m .00679 .61237 L s P p .002 w .00304 0 m .00304 .61803 L s P P p p p .008 w .02678 .36788 Mdot .02678 .08263 Mdot .02678 .31354 Mdot .02678 .34071 Mdot .02678 .31354 Mdot .02678 .01472 Mdot .02678 .25921 Mdot .02678 .24563 Mdot .02678 .47654 Mdot .26413 .28638 Mdot .26413 .39052 Mdot .26413 .19582 Mdot .26413 .60332 Mdot .26413 .23205 Mdot .26413 .48107 Mdot .26413 .22299 Mdot .26413 .22299 Mdot .26413 .44485 Mdot .50148 .17771 Mdot .50148 .24835 Mdot .50148 .27551 Mdot .50148 .32441 Mdot .50148 .20488 Mdot .50148 .47111 Mdot .50148 .2239 Mdot .50148 .32713 Mdot .50148 .26193 Mdot .73884 .37176 Mdot .73884 .25533 Mdot .73884 .25145 Mdot .73884 .3116 Mdot .73884 .33101 Mdot .73884 .32131 Mdot .73884 .32519 Mdot .73884 .27668 Mdot .73884 .45714 Mdot .97619 .34675 Mdot .97619 .33316 Mdot .97619 .26827 Mdot .97619 .4207 Mdot .97619 .35429 Mdot .97619 .2728 Mdot .97619 .26072 Mdot .97619 .35278 Mdot .97619 .39655 Mdot P P p p .001 w .02381 .31807 m .06349 .31807 L .10317 .31807 L .14286 .31807 L .18254 .31807 L .22222 .31807 L .2619 .31807 L .30159 .31807 L .34127 .31807 L .38095 .31807 L .42063 .31807 L .46032 .31807 L .5 .31807 L .53968 .31807 L .57937 .31807 L .61905 .31807 L .65873 .31807 L .69841 .31807 L .7381 .31807 L .77778 .31807 L .81746 .31807 L .85714 .31807 L .89683 .31807 L .93651 .31807 L .97619 .31807 L s P P P 0 0 m 1 0 L 1 .61803 L 0 .61803 L closepath clip newpath % End of Graphics MathPictureEnd \ \>"], "Graphics", Evaluatable->False, AspectRatioFixed->True, ImageSize->{282, 174}, ImageMargins->{{34, Inherited}, {Inherited, Inherited}}, ImageCache->GraphicsData["Bitmap", "\<\ CF5dJ6E]HGAYHf4PAg9QL6QYHgOol00`00Oomoo`0MOol300000goo001oo`02Ool01000Oomoo`00=7oo00@007ooOol000=oo`04 001oogoo000dOol01000Oomoo`000goo00@007ooOol003Eoo`04001oogoo0003Ool01000Oomoo`00 8Woo000>Ool00`00Oomoo`03Ool2000HOol02@00Oomoo`00Ool007oo001oo`0200000goo001oo`0a Ool400001Goo001oo`00Ool00P0000=oo`00Ool0Ool20004Ool2000K Ool01P00Ool007oo001oo`800003Ool007oo035oo`800007Ool007oo001oo`00Ool00P0000=oo`00 Ool0Oooo000<0001Ool000ioo`03001oogoo 00Yoo`03001oogoo00Yoo`03001oogoo00Uoo`03001oogoo00Yoo`03001oogoo00Yoo`03001oogoo 00Uoo`03001oogoo00Yoo`03001oogoo00Yoo`03001oogoo00Uoo`03001oogoo00Yoo`03001oogoo 00Yoo`03001oogoo00Uoo`03001oogoo00Yoo`03001oogoo00Yoo`03001oogoo00Uoo`03001oogoo 00Yoo`03001oogoo00Yoo`03001oogoo00Uoo`03001oogoo00Yoo`03001oogoo00Yoo`03001oogoo 00Uoo`40005oo`003Woo00<007ooOol08goo00<007ooOol0?Goo00<007ooOol0?7oo00<007ooOol0 ?7oo00<007ooOol09Goo000>Ool00`00Oomoo`3oOol:Ool000ioo`03001oogoo0?moo`Yoo`003Woo 0P00ogoo2goo000>Ool00`00Oomoo`3oOol:Ool000ioo`03001oogoo0?moo`Yoo`003Woo00<007oo Ool0ogoo2Woo000>Ool2003oOol;Ool000ioo`03001oogoo0?moo`Yoo`003Woo00<007ooOol0ogoo 2Woo000>Ool00`00Oomoo`03Ool2003oOol5Ool000ioo`03001oogoo00=oo`800?moo`Eoo`003Woo 0P00ogoo2goo000>Ool00`00Oomoo`3oOol:Ool000ioo`03001oogoo0?moo`Yoo`003Woo00<007oo Ool0ogoo2Woo000>Ool2003oOol;Ool000ioo`03001oogoo0?moo`Yoo`003Woo00<007ooOol0ogoo 2Woo000>Ool00`00Oomoo`3oOol:Ool00004Ool007oo0002Ool01000Oomoo`0017oo00<007ooOol0 ogoo2Woo00000`00Ool00004Ool01000Oomoo`000goo0`00ogoo2Woo00000`00Ool00002Ool20000 0goo00000004Ool00`00Oomoo`3oOol:Ool00003001oo`00009oo`04001oogoo0005Ool00`00Oomo o`3oOol:Ool00003Ool007oo009oo`H000=oo`03001oogoo0?moo`Yoo`003Woo0P00ogoo2goo000> Ool00`00Oomoo`3oOol:Ool000ioo`03001oogoo0?moo`Yoo`003Woo00<007ooOol0ogoo2Woo000> Ool00`00Oomoo`3oOol:Ool000ioo`800?moo`]oo`003Woo00<007ooOol0ogoo2Woo000>Ool00`00 Oomoo`3oOol:Ool000ioo`03001oogoo0?moo`Yoo`003Woo0P00ogoo2goo000>Ool00`00Oomoo`3o Ool:Ool000ioo`03001oogoo089oo`8008Eoo`003Woo00<007ooOol0PWoo0P00QGoo000>Ool00`00 Oomoo`3oOol:Ool000ioo`800?moo`]oo`003Woo00<007ooOol0@goo0P00a7oo000>Ool00`00Oomo o`13Ool20034Ool000Aoo`03001oo`00009oo`03001oogoo009oo`03001oogoo0?moo`Yoo`000goo 00<007oo00000Woo00<007oo00000goo0`00PWoo0P00QGoo0003Ool00`00Ool00002Ool20004Ool0 0`00Oomoo`22Ool20025Ool000=oo`03001oo`00009oo`03001oogoo00=oo`03001oogoo0?moo`Yo o`0017oo00<007ooOol00Woo00<007ooOol00Woo00<007ooOol0ogoo2Woo000>Ool00`00Oomoo`3o Ool:Ool000ioo`8004Aoo`8003eoo`8008Eoo`003Woo00<007ooOol0@goo0P00?Goo0P00QGoo000> Ool00`00Oomoo`13Ool20034Ool000ioo`03001oogoo04=oo`800 Ool00`00Oomoo`3oOol:Ool000ioo`03001oogoo00=oo`8007eoo`8008Eoo`003Woo00<007ooOol0 0goo0P00OGoo0P00?Goo0P00AWoo000>Ool00`00Oomoo`31Ool20016Ool000ioo`8000Aoo`800;ao o`8004Ioo`003Woo00<007ooOol00goo0P00OGoo0P00O7oo0P001goo000>Ool00`00Oomoo`22Ool2 001lOol20007Ool000ioo`03001oogoo0?moo`5oo`8000Moo`003Woo0P00ogoo0Woo0P001goo000> Ool00`00Oomoo`22Ool2000mOol2000mOol20007Ool000ioo`03001oogoo089oo`8003eoo`8004Io o`003Woo00<007ooOol0ogoo2Woo000017oo001oo`000Woo00@007ooOol000Aoo`03001oogoo04=o o`800Ool00`00Oomoo`03Ool2 002lOol20016Ool000ioo`03001oogoo00=oool000Moo`003Woo00<007ooOol0`Goo0P00AWoo000> Ool20023Ool2000mOol20016Ool000ioo`03001oogoo089oo`8003eoo`8004Ioo`003Woo00<007oo Ool0`Goo0P00?Goo0P001goo000>Ool00`00Oomoo`3oOol1Ool20007Ool000ioo`8000Aoo`800?mo o`Eoo`003Woo00<007ooOol00goo0P00ogoo1Goo000>Ool00`00Oomoo`3oOol1Ool20007Ool000io o`03001oogoo0?moo`5oo`8000Moo`003Woo00<007ooOol0ogoo0Goo0P001goo000>Ool2003oOol2 Ool20007Ool000ioo`03001oogoo0?moo`Yoo`003Woo00<007ooOol00goo0P00ogoo1Goo000>Ool0 0`00Oomoo`03Ool2002lOol20016Ool000Aoo`03001oo`00009oo`03001oogoo009oo`03001oogoo 0<5oo`8004Ioo`000goo00<007oo00000goo00<007ooOol00Woo0`00ogoo2Woo0003Ool00`00Ool0 0008Ool00`00Oomoo`3oOol:Ool000=oo`03001oo`0000Aoo`05001oogooOol0003oOolOol00`00Oomoo`3oOol1Ool20007Ool000ioo`03001oogoo0?mo o`Yoo`003Woo00<007ooOol0ogoo2Woo000>Ool2003oOol;Ool000ioo`03001oogoo0?moo`Yoo`00 3Woo00<007ooOol0ogoo0Goo0P001goo000>Ool00`00Oomoo`3oOol1Ool20007Ool000ioo`800?mo o`]oo`003Woo00<007ooOol0ogoo2Woo000>Ool00`00Oomoo`3oOol:Ool000ioo`03001oogoo0?mo o`Yoo`003Woo00<007ooOol0ogoo2Woo000>Ool20014Ool20034Ool000ioo`03001oogoo04=oo`80 0Ool20004Ool2000nOol20034Ool000ioo`03001oogoo04=oo`800Ool00`00Oomoo`3oOol:Ool000ioo`800?moo`]oo`003Woo00<007oo Ool0ogoo2Woo000>Ool00`00Oomoo`3oOol:Ool000ioo`03001oogoo0?moo`Yoo`003Woo00<007oo Ool0ogoo2Woo000>Ool2003oOol;Ool000ioo`03001oogoo0?moo`Yoo`003Woo00<007ooOol0ogoo 2Woo000>Ool00`00Oomoo`3oOol:Ool000ioo`800?moo`]oo`003Woo00<007ooOol0ogoo2Woo000> Ool00`00Oomoo`3oOol:Ool000ioo`03001oogoo0?moo`Yoo`0017oo00<007oo00000Woo00<007oo Ool00Woo00<007ooOol0ogoo2Woo0003Ool00`00Ool00002Ool00`00Ool00003Ool3003oOol:Ool0 00=oo`03001oo`0000=oo`03001oogoo009oo`03001oogoo0?moo`Yoo`000goo00<007oo00000Woo 00<007oo00000goo00<007ooOol0ogoo2Woo0004Ool00`00Oomoo`02Ool00`00Oomoo`02Ool00`00 Oomoo`3oOol:Ool000ioo`800?moo`]oo`003Woo00<007ooOol0ogoo2Woo000>Ool00`00Oomoo`3o Ool:Ool000ioo`03001oogoo0?moo`Yoo`003Woo00<007ooOol0ogoo2Woo000>Ool2003oOol;Ool0 00ioo`03001oogoo0?moo`Yoo`003Woo00<007ooOol0ogoo2Woo000>Ool00`00Oomoo`3oOol:Ool0 00ioo`800?moo`]oo`003Woo00<007ooOol0ogoo2Woo000>Ool00`00Oomoo`13Ool20034Ool000io o`03001oogoo04=oo`800Ool2003oOol;Ool000ioo`03 001oogoo0?moo`Yoo`00ogoo6goo003oOolKOol00?mooa]oo`00ogoo6goo0000\ \>"], ImageRangeCache->{{{0, 281}, {173, 0}} -> {326.283, 0.470227, 31.5224, 0.0022093}}]}, Open]]}, Open]], Cell[CellGroupData[{Cell[TextData["KeltnerFig.2.eps"], "Section", Evaluatable->False, AspectRatioFixed->True], Cell[CellGroupData[{Cell[TextData["Plot[Sin[1/x], {x, -1, 3}];"], "Input", AspectRatioFixed->True], Cell[GraphicsData["PostScript", "\<\ %! %%Creator: Mathematica %%AspectRatio: .61803 MathPictureStart %% Graphics /Helvetica findfont 6 scalefont setfont % Scaling calculations 0.261905 0.238095 0.309017 0.294303 [ [(-1)] .02381 .30902 0 2 Msboxa [(1)] .5 .30902 0 2 Msboxa [(2)] .7381 .30902 0 2 Msboxa [(3)] .97619 .30902 0 2 Msboxa [(-1)] .2494 .01471 1 0 Msboxa [(-0.5)] .2494 .16187 1 0 Msboxa [(0.5)] .2494 .45617 1 0 Msboxa [(1)] .2494 .60332 1 0 Msboxa [ -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 .02381 .30902 m .02381 .31527 L s P [(-1)] .02381 .30902 0 2 Mshowa p .002 w .5 .30902 m .5 .31527 L s P [(1)] .5 .30902 0 2 Mshowa p .002 w .7381 .30902 m .7381 .31527 L s P [(2)] .7381 .30902 0 2 Mshowa p .002 w .97619 .30902 m .97619 .31527 L s P [(3)] .97619 .30902 0 2 Mshowa p .001 w .07143 .30902 m .07143 .31277 L s P p .001 w .11905 .30902 m .11905 .31277 L s P p .001 w .16667 .30902 m .16667 .31277 L s P p .001 w .21429 .30902 m .21429 .31277 L s P p .001 w .30952 .30902 m .30952 .31277 L s P p .001 w .35714 .30902 m .35714 .31277 L s P p .001 w .40476 .30902 m .40476 .31277 L s P p .001 w .45238 .30902 m .45238 .31277 L s P p .001 w .54762 .30902 m .54762 .31277 L s P p .001 w .59524 .30902 m .59524 .31277 L s P p .001 w .64286 .30902 m .64286 .31277 L s P p .001 w .69048 .30902 m .69048 .31277 L s P p .001 w .78571 .30902 m .78571 .31277 L s P p .001 w .83333 .30902 m .83333 .31277 L s P p .001 w .88095 .30902 m .88095 .31277 L s P p .001 w .92857 .30902 m .92857 .31277 L s P p .002 w 0 .30902 m 1 .30902 L s P p .002 w .2619 .01471 m .26815 .01471 L s P [(-1)] .2494 .01471 1 0 Mshowa p .002 w .2619 .16187 m .26815 .16187 L s P [(-0.5)] .2494 .16187 1 0 Mshowa p .002 w .2619 .45617 m .26815 .45617 L s P [(0.5)] .2494 .45617 1 0 Mshowa p .002 w .2619 .60332 m .26815 .60332 L s P [(1)] .2494 .60332 1 0 Mshowa p .001 w .2619 .04414 m .26565 .04414 L s P p .001 w .2619 .07357 m .26565 .07357 L s P p .001 w .2619 .103 m .26565 .103 L s P p .001 w .2619 .13244 m .26565 .13244 L s P p .001 w .2619 .1913 m .26565 .1913 L s P p .001 w .2619 .22073 m .26565 .22073 L s P p .001 w .2619 .25016 m .26565 .25016 L s P p .001 w .2619 .27959 m .26565 .27959 L s P p .001 w .2619 .33845 m .26565 .33845 L s P p .001 w .2619 .36788 m .26565 .36788 L s P p .001 w .2619 .39731 m .26565 .39731 L s P p .001 w .2619 .42674 m .26565 .42674 L s P p .001 w .2619 .4856 m .26565 .4856 L s P p .001 w .2619 .51503 m .26565 .51503 L s P p .001 w .2619 .54446 m .26565 .54446 L s P p .001 w .2619 .57389 m .26565 .57389 L s P p .002 w .2619 0 m .2619 .61803 L s P P 0 0 m 1 0 L 1 .61803 L 0 .61803 L closepath clip newpath p p .001 w .02381 .06137 m .06349 .03471 L .07341 .02853 L .08333 .02297 L .08829 .02054 L .09325 .01843 L .09821 .0167 L .10069 .01601 L .10317 .01545 L .10441 .01523 L .10565 .01504 L .10689 .01489 L .10813 .01479 L .10938 .01473 L .11062 .01472 L .11186 .01475 L .1131 .01484 L .11434 .01498 L .11558 .01518 L .11806 .01576 L .1193 .01615 L .12054 .0166 L .12302 .01774 L .1255 .01919 L .12798 .021 L .13294 .0258 L .1379 .03248 L .14286 .04141 L .14782 .05306 L .15278 .06796 L .15774 .08677 L .1627 .11023 L .16766 .13915 L .17262 .17444 L .18254 .26748 L .19246 .39232 L .19742 .46302 L .20238 .53175 L .20486 .56167 L .2061 .57457 L .20734 .5856 L .20858 .59437 L .20982 .6004 L .21106 .60319 L .2123 .60219 L .21354 .59681 L .21478 .58645 L .21602 .5705 L .21726 .54838 L .2185 .51962 L Mistroke .21974 .48386 L .22222 .39125 L .2247 .27472 L .22718 .14922 L .22842 .09225 L .22966 .04654 L .2309 .01916 L .23214 .01785 L .23338 .04988 L .23462 .11998 L .2371 .36032 L .23834 .49418 L .23958 .58754 L .24082 .5903 L .24206 .46693 L .2433 .24088 L .24454 .04064 L .24702 .39375 L .24826 .59878 L .2495 .20798 L .25074 .12908 L .25198 .57553 L .25322 .08874 L .25446 .14673 L .2557 .11922 L .25694 .53512 L .25818 .03825 L .25942 .01954 L .2619 .04493 L .26314 .20456 L .26438 .59849 L .26563 .57978 L .26687 .08292 L .26811 .49881 L .26935 .4713 L .27059 .5293 L .27183 .0425 L .27307 .48895 L .27431 .41006 L .27555 .01925 L .27679 .22429 L .27803 .54646 L .27927 .5774 L .28051 .37715 L .28175 .1511 L .28299 .02773 L .28423 .03049 L .28671 .25771 L .28795 .39089 L .28919 .49805 L Mistroke .29043 .56816 L .29167 .60019 L .29291 .59888 L .29415 .57149 L .29663 .46881 L .29911 .34332 L .30159 .22678 L .30407 .13418 L .30531 .09842 L .30655 .06965 L .30779 .04754 L .30903 .03159 L .31027 .02122 L .31151 .01584 L .31275 .01484 L .31399 .01763 L .31523 .02367 L .31647 .03243 L .31895 .05636 L .32143 .08629 L .33135 .22571 L .34127 .35055 L .35119 .44359 L .35615 .47888 L .36111 .50781 L .36607 .53126 L .37103 .55007 L .37599 .56498 L .38095 .57663 L .38591 .58556 L .39087 .59223 L .39335 .59485 L .39583 .59704 L .39831 .59884 L .40079 .6003 L .40327 .60143 L .40575 .60227 L .40699 .60259 L .40823 .60285 L .40947 .60305 L .41071 .60319 L .41195 .60328 L .41319 .60332 L .41443 .60331 L .41567 .60325 L .41691 .60314 L .41815 .603 L .42063 .60258 L .42312 .60202 L .4256 .60133 L Mistroke .43056 .59961 L .44048 .59506 L .46032 .58332 L .5 .55666 L .53968 .5315 L .57937 .50963 L .61905 .49101 L .65873 .47519 L .69841 .4617 L .7381 .45011 L .77778 .44008 L .81746 .43132 L .85714 .42362 L .89683 .41681 L .93651 .41075 L .97619 .40531 L Mfstroke P P % End of Graphics MathPictureEnd \ \>"], "Graphics", Evaluatable->False, AspectRatioFixed->True, ImageSize->{282, 174}, ImageMargins->{{34, Inherited}, {Inherited, Inherited}}, ImageCache->GraphicsData["Bitmap", "\<\ CF5dJ6E]HGAYHf4PAg9QL6QYHgOol00`00Ool00002Ool<0004Ool00`00Oomoo`03Ool00`00Oomoo`2lOol002mo o`03001oogoo00ioo`03001oo`00009oo``000Aoo`03001oogoo00=oo`03001oogoo0;aoo`00;goo 00<007ooOol03Woo00<007oo00000Woo300017oo00<007ooOol00goo00<007ooOol0_7oo000_Ool0 0`00Oomoo`0>Ool01000Ool007oo3@0017oo00<007ooOol00goo00<007ooOol0_7oo000_Ool00`00 Oomoo`0>Ool01000Ool007oo3@0017oo00<007ooOol00goo00<007ooOol0_7oo000`Ool00`00Oomo o`0=Ool01000Ool007oo3@0017oo00<007ooOol00goo00<007ooOol0_7oo000`Ool00`00Oomoo`0= Ool01000Ool007oo3@0017oo00<007ooOol00goo00<007ooOol0_7oo000`Ool00`00Oomoo`0goo000gOol00`00Oomoo`04Ool00`00Oomoo`02Ool600000goo000000040000 17oo001oo`003Woo00<007ooOol0LWoo1@00?Woo000gOol00`00Oomoo`04Ool00`00Oomoo`02Ool6 00000goo00000004000017oo001oo`003Woo00<007ooOol0K7oo1P00@goo000hOol00`00Oomoo`03 Ool00`00Oomoo`02Ool600000goo00000004000017oo001oo`003Woo00<007ooOol0J7oo1000BGoo 000hOol00`00Oomoo`03Ool200000goo001oo`0600000goo00000004000017oo001oo`003Woo00<0 07ooOol0IGoo0`00CGoo000hOol00`00Oomoo`03Ool00`00Ool00002Ool600000goo000000040000 17oo001oo`003goo00<007ooOol0HGoo0`00D7oo000hOol00`00Oomoo`03Ool00`00Ool00002Ool6 00000goo00000004000017oo001oo`003goo00<007ooOol0GWoo0`00Dgoo000hOol00`00Oomoo`03 Ool00`00Ool00002Ool600000goo00000004000017oo001oo`003goo00<007ooOol0Fgoo0`00EWoo 000hOol00`00Oomoo`03Ool20003Ool600000goo00000004000017oo001oo`003goo00<007ooOol0 Egoo1000FGoo000hOol00`00Oomoo`03Ool00`00Oomoo`02Ool600000goo00000004000017oo001o o`003goo00<007ooOol0E7oo0`00GGoo000hOol00`00Oomoo`03Ool00`00Oomoo`02Ool600000goo 00000004000017oo001oo`0047oo00<007ooOol0D7oo0`00H7oo000hOol00`00Oomoo`03Ool00`00 Oomoo`02Ool600000goo00000004000017oo001oo`0047oo00<007ooOol0CWoo0P00Hgoo000hOol0 0`00Oomoo`03Ool00`00Oomoo`02Ool600000goo000000030002Ool00`00Ool0000@Ool00`00Oomo o`1;Ool3001UOol003Qoo`03001oogoo00=oo`03001oogoo009oo`H00003Ool0000000<0009oo`03 001oo`00011oo`03001oogoo04Uoo`8006Qoo`00>7oo00<007ooOol00goo00<007ooOol00Woo1P00 00=oo`0000000`000Woo00<007oo000047oo00<007ooOol0Agoo0P00JWoo000hOol00`00Oomoo`03 Ool00`00Oomoo`02Ool600001Woo00000000Ool0009oo`03001oo`00011oo`03001oogoo04Eoo`80 06aoo`00>7oo00<007ooOol00goo00<007ooOol00Woo1P0000Ioo`00000007oo0002Ool00`00Ool0 000AOol00`00Oomoo`12Ool2001^Ool003Uoo`03001oogoo009oo`03001oogoo009oo`800005Ool0 0000001oo`0300001goo001oogoo001oo`00015oo`03001oogoo03moo`<0071oo`00>Goo00<007oo Ool00Woo00<007ooOol00Woo0P0000Eoo`00000007oo00<00007Ool007ooOol007oo00004Goo00<0 07ooOol0?Goo0P00Lgoo000iOol01@00Oomoogoo00001Goo0P0000Eoo`00000007oo00<00007Ool0 07ooOol007oo00004Goo00<007ooOol0>goo0P00MGoo000iOol01@00Oomoogoo00001Goo0P0000Eo o`00000007oo00<00007Ool007ooOol007oo00004Goo00<007ooOol0>Goo0P00Mgoo000iOol01@00 Oomoogoo00001Goo0P0000Eoo`00000007oo00<00007Ool007ooOol007oo00004Goo00<007ooOol0 =goo0P00NGoo000iOol01@00Oomoogoo00001Goo0P0000Eoo`00000007oo00<00007Ool007ooOol0 07oo00004Woo00<007ooOol0=7oo0P00Ngoo000iOol01@00Oomoogoo00001Goo0P0000Eoo`000000 07oo00<00007Ool007ooOol007oo00004Woo00<007ooOol0Goo00D007ooOomoo`0000Eo o`800003Ool00000009oo`80009oo`04001oogooOol2000DOol00`00Oomoo`0UOol00`00Oomoo`27 Ool003Yoo`04001oogoo0005Ool200000goo00000002Ool20002Ool01000Oomoogoo0P0057oo00<0 07ooOol08goo0P00RWoo000jOol01000Oomoo`001Goo0P0000=oo`0000000Woo0P000Woo00@007oo Oomoo`8001Aoo`03001oogoo029oo`03001oogoo08Yoo`00>Woo00@007ooOol000Eoo`800003Ool0 0000009oo`80009oo`04001oogooOol2000DOol00`00Oomoo`0POol2002=Ool003Yoo`04001oogoo 0005Ool200000goo00000002Ool20002Ool01000Oomoogoo0P005Goo00<007ooOol07Woo00<007oo Ool0SGoo000jOol01000Oomoo`001Goo0P0000=oo`0000000Woo0P000Woo00@007ooOomoo`8001Eo o`03001oogoo01eoo`03001oogoo08ioo`00>Woo00@007ooOol000Eoo`800003Ool00000009oo`80 009oo`04001oogooOol2000EOol00`00Oomoo`0KOol2002AOol003Yoo`04001oogoo0005Ool20000 0goo00000002Ool20002Ool01000Oomoogoo0P005Woo00<007ooOol06Goo00<007ooOol0TGoo000j Ool01000Oomoo`001Goo0P0000=oo`0000000Woo0P000Woo00@007ooOomoo`8001Ioo`03001oogoo 01Moo`8009Aoo`00>Woo00@007ooOol000Eoo`800003Ool007oo009oo`80009oo`04001oogooOol2 000GOol00`00Oomoo`0EOol00`00Oomoo`2DOol003Yoo`03001oo`0000Ioo`800003Ool007oo009o o`8000Ioo`8001Moo`03001oogoo01Aoo`03001oogoo09Eoo`00>Woo00<007oo00001Woo0P0000=o o`00Ool00Woo0P001Woo0P0067oo00<007ooOol04Goo0P00V7oo000jOol00`00Ool00006Ool20000 0goo001oo`02Ool20006Ool00`00Oomoo`0HOol00`00Oomoo`0>Ool2002JOol003]oo`8000Uoo`05 001oogooOol00007Ool00`00Oomoo`0IOol00`00Oomoo`0;Ool2002LOol003]oo`8000Uoo`05001o ogooOol00007Ool00`00Oomoo`0IOol2000:Ool2002NOol003]oo`8000Moo`03001oo`0000=oo`03 001oogoo00Eoo`03001oogoo01]oo`03001oogoo00Eoo`800:1oo`00>goo0P001goo00<007ooOol0 0goo0P009Goo1`00XWoo0014Ool00`00Oomoo`03Ool00`00Oomoo`3=Ool004Aoo`03001oogoo00=o o`03001oogoo0"], ImageRangeCache->{{{0, 281}, {173, 0}} -> {-1.11493, -1.0534, 0.0150529, 0.012178}}]}, Open]]}, Open]], Cell[CellGroupData[{Cell[TextData["KeltnerFig.3.eps"], "Section", Evaluatable->False, AspectRatioFixed->True], Cell[CellGroupData[{Cell[TextData[ "f[x_]= Sin[1/x]; (*function = ??*) \nbegint = -1; (*begin interval*)\n\ endint = 3; (*end interval*)\nminit = 1000; (*smallest # iterations*)\n\ maxit = 12000; (*largest # iterations*)\nstepsize = 2000; (*step size*)\n\ trials = 8; (*repeats for same # iterations*)\nz = {}; (*empty list*)\nv = \ {}; (*empty list*)\n\nminy = Min[Table[N[f[x]],{x,begint,endint,0.01}]];\n\ maxy = Max[Table[N[f[x]],{x,begint,endint,0.01}]];\n\nDo[Do[Counter = 0;\n\ Do[r = Random[Real, {miny,maxy}]; \ns = Random[Real,{begint,endint}];\nIf[r \ <= f[s] && r >= 0, Counter=Counter+1, Counter=Counter];\nIf[r >= f[s] && r < \ 0, Counter=Counter-1, Counter=Counter],{i,1,k}];\n\n\ AppendTo[v,N[(Counter/k)*((endint-begint)*(maxy-miny))]];\n\ AppendTo[z,k],{j,1,trials}];\n,{k,minit,maxit,stepsize}];\n\n\ data=Transpose[{z,v}];\nListPlot[data,PlotRange->All];\n"], "Input", AspectRatioFixed->True], Cell[GraphicsData["PostScript", "\<\ %! %%Creator: Mathematica %%AspectRatio: .61803 MathPictureStart %% Graphics /Helvetica findfont 6 scalefont setfont % Scaling calculations -0.095238 0.000119 -1.798821 1.988595 [ [(4000)] .38095 .18977 0 2 Msboxa [(6000)] .61905 .18977 0 2 Msboxa [(8000)] .85714 .18977 0 2 Msboxa [(0.95)] .13036 .09034 1 0 Msboxa [(1.05)] .13036 .2892 1 0 Msboxa [(1.1)] .13036 .38863 1 0 Msboxa [(1.15)] .13036 .48806 1 0 Msboxa [(1.2)] .13036 .58749 1 0 Msboxa [ -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 .38095 .18977 m .38095 .19602 L s P [(4000)] .38095 .18977 0 2 Mshowa p .002 w .61905 .18977 m .61905 .19602 L s P [(6000)] .61905 .18977 0 2 Mshowa p .002 w .85714 .18977 m .85714 .19602 L s P [(8000)] .85714 .18977 0 2 Mshowa p .001 w .19048 .18977 m .19048 .19352 L s P p .001 w .2381 .18977 m .2381 .19352 L s P p .001 w .28571 .18977 m .28571 .19352 L s P p .001 w .33333 .18977 m .33333 .19352 L s P p .001 w .42857 .18977 m .42857 .19352 L s P p .001 w .47619 .18977 m .47619 .19352 L s P p .001 w .52381 .18977 m .52381 .19352 L s P p .001 w .57143 .18977 m .57143 .19352 L s P p .001 w .66667 .18977 m .66667 .19352 L s P p .001 w .71429 .18977 m .71429 .19352 L s P p .001 w .7619 .18977 m .7619 .19352 L s P p .001 w .80952 .18977 m .80952 .19352 L s P p .001 w .09524 .18977 m .09524 .19352 L s P p .001 w .04762 .18977 m .04762 .19352 L s P p .001 w .90476 .18977 m .90476 .19352 L s P p .001 w .95238 .18977 m .95238 .19352 L s P p .002 w 0 .18977 m 1 .18977 L s P p .002 w .14286 .09034 m .14911 .09034 L s P [(0.95)] .13036 .09034 1 0 Mshowa p .002 w .14286 .2892 m .14911 .2892 L s P [(1.05)] .13036 .2892 1 0 Mshowa p .002 w .14286 .38863 m .14911 .38863 L s P [(1.1)] .13036 .38863 1 0 Mshowa p .002 w .14286 .48806 m .14911 .48806 L s P [(1.15)] .13036 .48806 1 0 Mshowa p .002 w .14286 .58749 m .14911 .58749 L s P [(1.2)] .13036 .58749 1 0 Mshowa p .001 w .14286 .11023 m .14661 .11023 L s P p .001 w .14286 .13012 m .14661 .13012 L s P p .001 w .14286 .15 m .14661 .15 L s P p .001 w .14286 .16989 m .14661 .16989 L s P p .001 w .14286 .20966 m .14661 .20966 L s P p .001 w .14286 .22955 m .14661 .22955 L s P p .001 w .14286 .24943 m .14661 .24943 L s P p .001 w .14286 .26932 m .14661 .26932 L s P p .001 w .14286 .30909 m .14661 .30909 L s P p .001 w .14286 .32898 m .14661 .32898 L s P p .001 w .14286 .34886 m .14661 .34886 L s P p .001 w .14286 .36875 m .14661 .36875 L s P p .001 w .14286 .40852 m .14661 .40852 L s P p .001 w .14286 .42841 m .14661 .42841 L s P p .001 w .14286 .44829 m .14661 .44829 L s P p .001 w .14286 .46818 m .14661 .46818 L s P p .001 w .14286 .50795 m .14661 .50795 L s P p .001 w .14286 .52783 m .14661 .52783 L s P p .001 w .14286 .54772 m .14661 .54772 L s P p .001 w .14286 .56761 m .14661 .56761 L s P p .001 w .14286 .07046 m .14661 .07046 L s P p .001 w .14286 .05057 m .14661 .05057 L s P p .001 w .14286 .03069 m .14661 .03069 L s P p .001 w .14286 .0108 m .14661 .0108 L s P p .001 w .14286 .60738 m .14661 .60738 L s P p .002 w .14286 0 m .14286 .61803 L s P P p p .008 w .02381 .26925 Mdot .02381 .11016 Mdot .02381 .30106 Mdot .02381 .23743 Mdot .02381 .1738 Mdot .02381 .01472 Mdot .02381 .60332 Mdot .02381 .14198 Mdot .2619 .14198 Mdot .2619 .26925 Mdot .2619 .28515 Mdot .2619 .03062 Mdot .2619 .07305 Mdot .2619 .23743 Mdot .2619 .34879 Mdot .2619 .29576 Mdot .5 .32333 Mdot .5 .25652 Mdot .5 .34561 Mdot .5 .02108 Mdot .5 .39333 Mdot .5 .27561 Mdot .5 .27243 Mdot .5 .26925 Mdot .7381 .23061 Mdot .7381 .27152 Mdot .7381 .33061 Mdot .7381 .3647 Mdot .7381 .30334 Mdot .7381 .35788 Mdot .7381 .10562 Mdot .7381 .31015 Mdot .97619 .29753 Mdot .97619 .31344 Mdot .97619 .20915 Mdot .97619 .21268 Mdot .97619 .22859 Mdot .97619 .22152 Mdot .97619 .25157 Mdot .97619 .3753 Mdot P P 0 0 m 1 0 L 1 .61803 L 0 .61803 L closepath clip newpath % End of Graphics MathPictureEnd \ \>"], "Graphics", Evaluatable->False, AspectRatioFixed->True, ImageSize->{282, 174}, ImageMargins->{{34, Inherited}, {Inherited, Inherited}}, ImageCache->GraphicsData["Bitmap", "\<\ CF5dJ6E]HGAYHf4PAg9QL6QYHgmoo`00:7oo00<007ooOol0kgoo0007Ool2000OOol2003` Ool000Moo`8001moo`03001oogoo0>moo`00:7oo00<007ooOol0H7oo0P00SGoo000XOol00`00Oomo o`1POol2002=Ool002Qoo`03001oogoo0>moo`00:7oo0P007goo0P00cgoo000XOol00`00Oomoo`0N Ool2003?Ool002Qoo`03001oogoo0>moo`00:7oo00<007ooOol0kgoo000XOol00`00Oomoo`3_Ool0 02Qoo`03001oogoo0>moo`00:7oo0P00l7oo000XOol00`00Oomoo`3_Ool002Qoo`03001oogoo0>mo o`00:7oo00<007ooOol0kgoo000XOol00`00Oomoo`3_Ool002Qoo`800?1oo`00:7oo00<007ooOol0 7Woo0P00cgoo000XOol00`00Oomoo`0NOol2003?Ool002Qoo`03001oogoo0>moo`00:7oo00<007oo Ool0kgoo000JOol00`00Ool00002Ool01000Oomoo`001Goo00<007ooOol0kgoo000IOol00`00Ool0 0004Ool01000Oomoo`0017oo0`00kgoo000IOol00`00Ool00003Ool40005Ool00`00Oomoo`3_Ool0 01Uoo`03001oo`00009oo`04001oo`000006Ool00`00Oomoo`3_Ool001Yoo`03001oogoo009oo`03 001oo`00008000Aoo`03001oogoo0>moo`00:7oo00<007ooOol0Xgoo0P00BWoo0007Ool2000OOol0 0`00Oomoo`2SOol2001:Ool000Moo`8001moo`800?1oo`00:7oo00<007ooOol0kgoo000XOol00`00 Oomoo`3_Ool002Qoo`03001oogoo0>moo`00:7oo00<007ooOol0kgoo000XOol2003`Ool002Qoo`03 001oogoo0>moo`00:7oo00<007ooOol0kgoo0007Ool2000OOol00`00Oomoo`0NOol2003?Ool000Mo o`8001moo`03001oogoo01ioo`800moo`00:7oo00<007ooOol0kgoo000XOol00`00Oomoo`3_Ool002Qoo`03001oogoo03Yo o`04001oogoo0003Ool01000Oomoo`00>7oo00@007ooOol000=oo`04001oogoo000gOol01000Oomo o`000goo00@007ooOol002Eoo`00:7oo0P00>Woo100000Eoo`00Ool007oo00800003Ool007oo03Eo o`09001oo`00001oo`00Ool007oo00800003Ool007oo03Aoo`09001oo`00001oo`00Ool007oo0080 0003Ool007oo02=oo`001goo0P007goo00<007ooOol0>Goo0P0000Moo`00Ool007oo001oo`020000 0goo001oo`0eOol200001goo001oo`00Ool007oo00800003Ool007oo03Eoo`08001oo`00Ool007oo 001oo`800003Ool007oo02=oo`001goo0P007goo00<007ooOol0>Woo00P007oo001oo`00Ool007oo 0P0000=oo`00Ool0=Goo00T007ooOol007oo001oo`00Ool00P0000=oo`00Ool0=7oo00T007oo0000 07oo001oo`00Ool00P0000=oo`00Ool08goo000XOol00`00Oomoo`0jOol01000Oomoo`000goo00@0 07ooOol003Qoo`04001oogoo0003Ool01000Oomoo`00=goo00@007ooOol000=oo`04001oogoo000U Ool002Qoo`03001oogoo0>moo`00:7oo00<007ooOol0kgoo003o000J0001Ool000ioo`03001oogoo 00Yoo`03001oogoo00Yoo`03001oogoo00]oo`03001oogoo00Yoo`03001oogoo00Yoo`03001oogoo 00Yoo`03001oogoo00]oo`03001oogoo00Yoo`03001oogoo00Yoo`03001oogoo00]oo`03001oogoo 00Yoo`03001oogoo00Yoo`03001oogoo00]oo`03001oogoo00Yoo`03001oogoo00Yoo`03001oogoo 00Yoo`03001oogoo00]oo`03001oogoo00Yoo`03001oogoo00Yoo`03001oogoo00eoo`00:7oo00<0 07ooOol0kgoo000XOol00`00Oomoo`3_Ool002Qoo`03001oogoo0>moo`00:7oo0P00iWoo0P0027oo 000XOol00`00Oomoo`3UOol20008Ool002Qoo`03001oogoo0>Eoo`8000Qoo`00:7oo00<007ooOol0 iGoo0P0027oo000XOol00`00Oomoo`3UOol20008Ool002Qoo`03001oogoo0>Eoo`8000Qoo`00:7oo 0P00Y7oo0P00@7oo0P0027oo000XOol00`00Oomoo`2SOol2001:Ool000Moo`8001moo`03001oogoo 01ioo`800moo`00 6Woo00<007oo00000Woo00@007ooOol000Eoo`03001oogoo01ioo`800Eoo`80 00Qoo`00:7oo00<007ooOol0kgoo000XOol00`00Oomoo`1POol2002=Ool002Qoo`03001oogoo061o o`8008eoo`00:7oo0P00Y7oo0P00BWoo000XOol00`00Oomoo`2SOol2001:Ool002Qoo`03001oogoo 0>moo`00:7oo00<007ooOol0kgoo000XOol00`00Oomoo`1POol2002=Ool002Qoo`8001moo`80041o o`8008eoo`00:7oo00<007ooOol07Woo0P00cgoo000XOol00`00Oomoo`2SOol2001:Ool002Qoo`03 001oogoo0:=oo`8004Yoo`00:7oo00<007ooOol0Xgoo0P00BWoo000XOol00`00Oomoo`2SOol2001: Ool002Qoo`800?1oo`00:7oo00<007ooOol0iGoo0P0027oo000XOol00`00Oomoo`3UOol20008Ool0 02Qoo`03001oogoo0>moo`007Woo00<007oo00000Woo00<007ooOol00Woo00<007ooOol0kgoo000N Ool00`00Oomoo`02Ool00`00Oomoo`02Ool3003_Ool001ioo`03001oogoo009oo`03001oogoo009o o`03001oogoo061oo`8008eoo`007Woo00<007ooOol00Woo00<007ooOol00Woo00<007ooOol0H7oo 0P00SGoo000NOol00`00Oomoo`02Ool00`00Oomoo`02Ool00`00Oomoo`3_Ool002Qoo`03001oogoo 0>moo`00:7oo00<007ooOol0kgoo000XOol2003`Ool002Qoo`03001oogoo0>moo`00:7oo00<007oo Ool0kgoo000XOol00`00Oomoo`3_Ool002Qoo`03001oogoo0>moo`00:7oo0P00l7oo000XOol00`00 Oomoo`3_Ool002Qoo`03001oogoo0>moo`00:7oo00<007ooOol0kgoo000XOol00`00Oomoo`3_Ool0 02Qoo`03001oogoo0>moo`00:7oo0P00l7oo000XOol00`00Oomoo`3_Ool002Qoo`03001oogoo0>mo o`00:7oo00<007ooOol0kgoo000XOol00`00Oomoo`3_Ool002Qoo`800?1oo`00:7oo00<007ooOol0 kgoo000XOol00`00Oomoo`3_Ool002Qoo`03001oogoo0>moo`00:7oo00<007ooOol0kgoo000JOol0 0`00Ool00002Ool01000Oomoo`001Goo00<007ooOol0kgoo000JOol00`00Oomoo`02Ool01@00Oomo ogoo000017oo0`00kgoo000JOol00`00Oomoo`02Ool01000Ool000001Goo00<007ooOol0kgoo000J Ool00`00Oomoo`02Ool00`00Ool00006Ool00`00Oomoo`3_Ool001Yoo`03001oogoo009oo`03001o o`00008000Aoo`03001oogoo0>moo`00:7oo00<007ooOol0kgoo000XOol00`00Oomoo`3_Ool002Qo o`800?1oo`00:7oo00<007ooOol0kgoo000XOol00`00Oomoo`3_Ool002Qoo`03001oogoo0>moo`00 :7oo00<007ooOol0kgoo000XOol2003`Ool002Qoo`03001oogoo0>moo`00:7oo00<007ooOol0kgoo 000XOol00`00Oomoo`3_Ool002Qoo`03001oogoo0>moo`00:7oo00<007ooOol0kgoo000XOol2003` Ool002Qoo`03001oogoo0>moo`00:7oo00<007ooOol0kgoo000XOol00`00Oomoo`3_Ool002Qoo`03 001oogoo0>moo`00:7oo0P00l7oo000XOol00`00Oomoo`3_Ool002Qoo`03001oogoo0>moo`00:7oo 00<007ooOol0kgoo000XOol00`00Oomoo`3_Ool001ioo`04001oo`00Ool30003Ool00`00Oomoo`3_ Ool001ioo`05001oogooOol00005Ool3003_Ool001ioo`03001oogoo00Moo`03001oogoo0>moo`00 7Woo00L007ooOomoo`00Ool00003Ool00`00Oomoo`3_Ool001ioo`03001oogoo009oo`03001oogoo 009oo`03001oogoo0>moo`001goo0P007goo00<007ooOol0kgoo0007Ool2000OOol2003`Ool002Qo o`03001oogoo0>moo`00:7oo00<007ooOol0kgoo000XOol00`00Oomoo`3_Ool00001\ \>"], ImageRangeCache->{{{0, 281}, {173, 0}} -> {770.442, 0.904064, 30.1179, 0.00180229}}]}, Open]]}, Open]] }, FrontEndVersion->"Macintosh 3.0", ScreenRectangle->{{0, 640}, {0, 460}}, WindowToolbars->{}, CellGrouping->Manual, WindowSize->{520, 365}, WindowMargins->{{20, Automatic}, {Automatic, 31}}, PrivateNotebookOptions->{"ColorPalette"->{RGBColor, -1}}, ShowCellLabel->True, ShowCellTags->False, RenderingOptions->{"ObjectDithering"->True, "RasterDithering"->False}, MacintoshSystemPageSetup->"\<\ AVU/IFiQKFD000000V7E<09QgO0000000OZ:d096/NP0AP1Y06`0I@1^0642HMD` 0V7N40000001nXZ`0TJaj000000000000000009QeC0000000000000000000000 00000000000000000000000000000000\>" ] (*********************************************************************** Cached data follows. If you edit this Notebook file directly, not using Mathematica, you must remove the line containing CacheID at the top of the file. The cache data will then be recreated when you save this file from within Mathematica. ***********************************************************************) (*CellTagsOutline CellTagsIndex->{} *) (*CellTagsIndex CellTagsIndex->{} *) (*NotebookFileOutline Notebook[{ Cell[CellGroupData[{ Cell[1731, 51, 93, 2, 70, "Section", Evaluatable->False], Cell[CellGroupData[{ Cell[1847, 55, 1261, 22, 70, "Input"], Cell[3111, 79, 12207, 580, 70, 5068, 487, "GraphicsData", "PostScript", "Graphics", Evaluatable->False] }, Open ]] }, Closed]], Cell[CellGroupData[{ Cell[15359, 661, 93, 2, 70, "Section", Evaluatable->False], Cell[CellGroupData[{ Cell[15475, 665, 80, 1, 70, "Input"], Cell[15558, 668, 21848, 681, 70, 5453, 473, "GraphicsData", "PostScript", "Graphics", Evaluatable->False] }, Open ]] }, Closed]], Cell[CellGroupData[{ Cell[37447, 1351, 93, 2, 70, "Section", Evaluatable->False], Cell[CellGroupData[{ Cell[37563, 1355, 903, 13, 70, "Input"], Cell[38469, 1370, 10404, 481, 70, 3989, 397, "GraphicsData", "PostScript", "Graphics", Evaluatable->False] }, Open ]] }, Closed]] } ] *) (*********************************************************************** End of Mathematica Notebook file. ***********************************************************************)