(************** Content-type: application/mathematica ************** CreatedBy='Mathematica 5.2' 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[ 60992, 1205]*) (*NotebookOutlinePosition[ 61637, 1227]*) (* CellTagsIndexPosition[ 61593, 1223]*) (*WindowFrame->Normal*) Notebook[{ Cell["\<\ Luc Barthelet Dec 6th 2005\ \>", "Subsection"], Cell[CellGroupData[{ Cell["Utilities 2D graphics for presentation", "Section"], Cell[CellGroupData[{ Cell[BoxData[{ \(\(RoundRectangle[{x1_, y1_}, {x2_, y2_}, radius_, color1_, color2_, steps_: 10] := Module[{angle, cornerRadius, points}, \[IndentingNewLine]cornerRadius = \ Min[Abs[x2 - x1]*radius/2. , Abs[y2 - y1]* radius/2. ]; \[IndentingNewLine]points = \ \[IndentingNewLine]Join[\[IndentingNewLine]Table[\ cornerRadius {Cos[angle], Sin[angle]} + {x1, y1} + cornerRadius {1, 1}, {angle, 3. \ Pi/2. , 1. *Pi, \(\(-Pi\)/2\)/steps}], \[IndentingNewLine]Table[\ cornerRadius {Cos[angle], Sin[angle]} + {x1, y2} + cornerRadius {1, \(-1\)}, {angle, 1. *Pi, Pi/2. , \(\(-Pi\)/2\)/steps}], \[IndentingNewLine]Table[\ cornerRadius {Cos[angle], Sin[angle]} + {x2, y2} + cornerRadius {\(-1\), \(-1\)}, {angle, Pi/2. , 0. , \(\(-Pi\)/2\)/steps}], \[IndentingNewLine]Table[ cornerRadius\ {Cos[angle], Sin[angle]} + {x2, y1} + cornerRadius {\(-1\), 1}, {angle, 2. \ Pi, 3. \ Pi/2. , \(\(-Pi\)/2\)/ steps}]\[IndentingNewLine]]; \[IndentingNewLine]{color1\ \ , Polygon[points], color2, Line[Append[points, points[\([1]\)]\ ]]}\[IndentingNewLine]];\)\), "\ \[IndentingNewLine]", \(\(Show[ Graphics[{RoundRectangle[{0, 0}, {1, .5}, .25, Orange, Black]}]];\)\)}], "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.952381 0.0147151 1.17721 [ [ 0 0 0 0 ] [ 1 .61803 0 0 ] ] MathScale % Start of Graphics 1 setlinecap 1 setlinejoin newpath 0 0 m 1 0 L 1 .61803 L 0 .61803 L closepath clip newpath 1 .5 0 r .08333 .01472 m .07402 .01562 L .06494 .01832 L .05631 .02273 L .04835 .02877 L .04124 .03626 L .03518 .04504 L .0303 .05489 L .02672 .06555 L .02454 .07678 L .02381 .08829 L .02381 .52974 L .02454 .54125 L .02672 .55248 L .0303 .56315 L .03518 .57299 L .04124 .58177 L .04835 .58927 L .05631 .5953 L .06494 .59972 L .07402 .60241 L .08333 .60332 L .91667 .60332 L .92598 .60241 L .93506 .59972 L .94369 .5953 L .95165 .58927 L .95876 .58177 L .96482 .57299 L .9697 .56315 L .97328 .55248 L .97546 .54125 L .97619 .52974 L .97619 .08829 L .97546 .07678 L .97328 .06555 L .9697 .05489 L .96482 .04504 L .95876 .03626 L .95165 .02877 L .94369 .02273 L .93506 .01832 L .92598 .01562 L .91667 .01472 L F 0 g .5 Mabswid [ ] 0 setdash .08333 .01472 m .07402 .01562 L .06494 .01832 L .05631 .02273 L .04835 .02877 L .04124 .03626 L .03518 .04504 L .0303 .05489 L .02672 .06555 L .02454 .07678 L .02381 .08829 L .02381 .52974 L .02454 .54125 L .02672 .55248 L .0303 .56315 L .03518 .57299 L .04124 .58177 L .04835 .58927 L .05631 .5953 L .06494 .59972 L .07402 .60241 L .08333 .60332 L .91667 .60332 L .92598 .60241 L .93506 .59972 L .94369 .5953 L .95165 .58927 L .95876 .58177 L .96482 .57299 L .9697 .56315 L .97328 .55248 L .97546 .54125 L .97619 .52974 L .97619 .08829 L .97546 .07678 L .97328 .06555 L .9697 .05489 L .96482 .04504 L .95876 .03626 L .95165 .02877 L .94369 .02273 L .93506 .01832 L .92598 .01562 L .91667 .01472 L .08333 .01472 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]HGAYHf4PAg9QL6QYHg0?mo00030000003oool0oooo00H0oooo00070?ooo`030000003oO`00ogl00?l0ogl0 3P3oO`000`000000oooo0?ooo`060?ooo`001`3oool00`000000ogl00?mo003o0?mo00h0ogl000<0 00000?ooo`3oool01P3oool000L0oooo00<000000?mo003oO`00o`3oO`0>0?mo00030000003oool0 oooo00H0oooo00070?ooo`030000003oO`00ogl00?l0ogl03P3oO`000`000000oooo0?ooo`060?oo o`001`3oool00`000000ogl00?mo003o0?mo00h0ogl000<000000?ooo`3oool01P3oool000L0oooo 00<000000?mo003oO`00o`3oO`0>0?mo00030000003oool0oooo00H0oooo00070?ooo`030000003o O`00ogl00?l0ogl03P3oO`000`000000oooo0?ooo`060?ooo`001`3oool00`000000ogl00?mo003o 0?mo00h0ogl000<000000?ooo`3oool01P3oool000L0oooo00<000000?mo003oO`00o`3oO`0>0?mo 00030000003oool0oooo00H0oooo00070?ooo`030000003oO`00ogl00?l0ogl03P3oO`000`000000 oooo0?ooo`060?ooo`001`3oool00`000000ogl00?mo003o0?mo00h0ogl000<000000?ooo`3oool0 1P3oool000L0oooo00<000000?mo003oO`00o`3oO`0>0?mo00030000003oool0oooo00H0oooo0007 0?ooo`030000003oO`00ogl00?l0ogl03P3oO`000`000000oooo0?ooo`060?ooo`001`3oool00`00 0000ogl00?mo003o0?mo00h0ogl000<000000?ooo`3oool01P3oool000L0oooo00<000000?mo003o O`00o`3oO`0>0?mo00030000003oool0oooo00H0oooo00070?ooo`030000003oO`00ogl00?l0ogl0 3P3oO`000`000000oooo0?ooo`060?ooo`001`3oool00`000000ogl00?mo003o0?mo00h0ogl000<0 00000?ooo`3oool01P3oool000L0oooo00<000000?mo003oO`00o`3oO`0>0?mo00030000003oool0 oooo00H0oooo00070?ooo`030000003oO`00ogl00?l0ogl03P3oO`000`000000oooo0?ooo`060?oo o`001`3oool00`000000ogl00?mo003o0?mo00h0ogl000<000000?ooo`3oool01P3oool000L0oooo 00<000000?mo003oO`00o`3oO`0>0?mo00030000003oool0oooo00H0oooo00070?ooo`030000003o O`00ogl00?l0ogl03P3oO`000`000000oooo0?ooo`060?ooo`001`3oool00`000000ogl00?mo003o 0?mo00h0ogl000<000000?ooo`3oool01P3oool000L0oooo00<000000?mo003oO`00o`3oO`0>0?mo 00030000003oool0oooo00H0oooo00070?ooo`030000003oO`00ogl00?l0ogl03P3oO`000`000000 oooo0?ooo`060?ooo`001`3oool00`000000ogl00?mo003o0?mo00h0ogl000<000000?ooo`3oool0 1P3oool000L0oooo00<000000?mo003oO`00o`3oO`0>0?mo00030000003oool0oooo00H0oooo0007 0?ooo`030000003oO`00ogl00?l0ogl03P3oO`000`000000oooo0?ooo`060?ooo`001`3oool00`00 0000ogl00?mo003o0?mo00h0ogl000<000000?ooo`3oool01P3oool000L0oooo00<000000?mo003o O`00o`3oO`0>0?mo00030000003oool0oooo00H0oooo00070?ooo`030000003oO`00ogl00?l0ogl0 3P3oO`000`000000oooo0?ooo`060?ooo`001`3oool00`000000ogl00?mo003o0?mo00h0ogl000<0 00000?ooo`3oool01P3oool000L0oooo00<000000?mo003oO`00o`3oO`0>0?mo00030000003oool0 oooo00H0oooo00070?ooo`030000003oO`00ogl00?l0ogl03P3oO`000`000000oooo0?ooo`060?oo o`001`3oool00`000000ogl00?mo003o0?mo00h0ogl000<000000?ooo`3oool01P3oool000L0oooo 00<000000?mo003oO`00o`3oO`0>0?mo00030000003oool0oooo00H0oooo00070?ooo`030000003o O`00ogl00?l0ogl03P3oO`000`000000oooo0?ooo`060?ooo`001`3oool00`000000ogl00?mo003o 0?mo00h0ogl000<000000?ooo`3oool01P3oool000L0oooo00<000000?mo003oO`00o`3oO`0>0?mo 00030000003oool0oooo00H0oooo00070?ooo`030000003oO`00ogl00?l0ogl03P3oO`000`000000 oooo0?ooo`060?ooo`001`3oool00`000000ogl00?mo003o0?mo00h0ogl000<000000?ooo`3oool0 1P3oool000L0oooo00<000000?mo003oO`00o`3oO`0>0?mo00030000003oool0oooo00H0oooo0007 0?ooo`030000003oO`00ogl00?l0ogl03P3oO`000`000000oooo0?ooo`060?ooo`001`3oool00`00 0000ogl00?mo003o0?mo00h0ogl000<000000?ooo`3oool01P3oool000L0oooo00<000000?mo003o O`00o`3oO`0>0?mo00030000003oool0oooo00H0oooo00070?ooo`030000003oO`00ogl00?l0ogl0 3P3oO`000`000000oooo0?ooo`060?ooo`001`3oool00`000000ogl00?mo003o0?mo00h0ogl000<0 00000?ooo`3oool01P3oool000L0oooo00<000000?mo003oO`00o`3oO`0>0?mo00030000003oool0 oooo00H0oooo00070?ooo`030000003oO`00ogl00?l0ogl03P3oO`000`000000oooo0?ooo`060?oo o`001`3oool00`000000ogl00?mo003o0?mo00h0ogl000<000000?ooo`3oool01P3oool000L0oooo 00<000000?mo003oO`00o`3oO`0>0?mo00030000003oool0oooo00H0oooo00070?ooo`030000003o O`00ogl00?l0ogl03P3oO`000`000000oooo0?ooo`060?ooo`001`3oool00`000000ogl00?mo003o 0?mo00h0ogl000<000000?ooo`3oool01P3oool000L0oooo00<000000?mo003oO`00o`3oO`0>0?mo 00030000003oool0oooo00H0oooo00070?ooo`030000003oO`00ogl00?l0ogl03P3oO`000`000000 oooo0?ooo`060?ooo`001`3oool00`000000ogl00?mo003o0?mo00h0ogl000<000000?ooo`3oool0 1P3oool000L0oooo00<000000?mo003oO`00o`3oO`0>0?mo00030000003oool0oooo00H0oooo0007 0?ooo`030000003oO`00ogl00?l0ogl03P3oO`000`000000oooo0?ooo`060?ooo`001`3oool00`00 0000ogl00?mo003o0?mo00h0ogl000<000000?ooo`3oool01P3oool000L0oooo00<000000?mo003o O`00o`3oO`0>0?mo00030000003oool0oooo00H0oooo00070?ooo`030000003oO`00ogl00?l0ogl0 3P3oO`000`000000oooo0?ooo`060?ooo`001`3oool00`000000ogl00?mo003o0?mo00h0ogl000<0 00000?ooo`3oool01P3oool000L0oooo00<000000?mo003oO`00o`3oO`0>0?mo00030000003oool0 oooo00H0oooo00070?ooo`030000003oO`00ogl00?l0ogl03P3oO`000`000000oooo0?ooo`060?oo o`001`3oool00`000000ogl00?mo003o0?mo00h0ogl000<000000?ooo`3oool01P3oool000L0oooo 00<000000?mo003oO`00o`3oO`0>0?mo00030000003oool0oooo00H0oooo00070?ooo`030000003o O`00ogl00?l0ogl03P3oO`000`000000oooo0?ooo`060?ooo`001`3oool00`000000ogl00?mo003o 0?mo00h0ogl000<000000?ooo`3oool01P3oool000L0oooo00<000000?mo003oO`00o`3oO`0>0?mo 00030000003oool0oooo00H0oooo00070?ooo`030000003oO`00ogl00?l0ogl03P3oO`000`000000 oooo0?ooo`060?ooo`001`3oool00`000000ogl00?mo003o0?mo00h0ogl000<000000?ooo`3oool0 1P3oool000L0oooo00<000000?mo003oO`00o`3oO`0>0?mo00030000003oool0oooo00H0oooo0007 0?ooo`030000003oO`00ogl00?l0ogl03P3oO`000`000000oooo0?ooo`060?ooo`001`3oool00`00 0000ogl00?mo003o0?mo00h0ogl000<000000?ooo`3oool01P3oool000L0oooo00<000000?mo003o O`00o`3oO`0>0?mo00030000003oool0oooo00H0oooo00070?ooo`030000003oO`00ogl00?l0ogl0 3P3oO`000`000000oooo0?ooo`060?ooo`001`3oool00`000000ogl00?mo003o0?mo00h0ogl000<0 00000?ooo`3oool01P3oool000L0oooo00<000000?mo003oO`00o`3oO`0>0?mo00030000003oool0 oooo00H0oooo00070?ooo`030000003oO`00ogl00?l0ogl03P3oO`000`000000oooo0?ooo`060?oo o`001`3oool00`000000ogl00?mo003o0?mo00h0ogl000<000000?ooo`3oool01P3oool000L0oooo 00<000000?mo003oO`00o`3oO`0>0?mo00030000003oool0oooo00H0oooo00070?ooo`030000003o O`00ogl00?l0ogl03P3oO`000`000000oooo0?ooo`060?ooo`001`3oool00`000000ogl00?mo003o 0?mo00h0ogl000<000000?ooo`3oool01P3oool000L0oooo00<000000?mo003oO`00o`3oO`0>0?mo 00030000003oool0oooo00H0oooo00070?ooo`030000003oO`00ogl00?l0ogl03P3oO`000`000000 oooo0?ooo`060?ooo`001`3oool00`000000ogl00?mo003o0?mo00h0ogl000<000000?ooo`3oool0 1P3oool000L0oooo00<000000?mo003oO`00o`3oO`0>0?mo00030000003oool0oooo00H0oooo0007 0?ooo`030000003oO`00ogl00?l0ogl03P3oO`000`000000oooo0?ooo`060?ooo`001`3oool00`00 0000ogl00?mo003o0?mo00h0ogl000<000000?ooo`3oool01P3oool000L0oooo00<000000?mo003o O`00o`3oO`0>0?mo00030000003oool0oooo00H0oooo00070?ooo`030000003oO`00ogl00?l0ogl0 3P3oO`000`000000oooo0?ooo`060?ooo`001`3oool00`000000ogl00?mo003o0?mo00h0ogl000<0 00000?ooo`3oool01P3oool000L0oooo00<000000?mo003oO`00o`3oO`0>0?mo00030000003oool0 oooo00H0oooo00070?ooo`030000003oO`00ogl00?l0ogl03P3oO`000`000000oooo0?ooo`060?oo o`001`3oool00`000000ogl00?mo003o0?mo00h0ogl000<000000?ooo`3oool01P3oool000L0oooo 00<000000?mo003oO`00o`3oO`0>0?mo00030000003oool0oooo00H0oooo00070?ooo`030000003o O`00ogl00?l0ogl03P3oO`000`000000oooo0?ooo`060?ooo`001`3oool00`000000ogl00?mo003o 0?mo00h0ogl000<000000?ooo`3oool01P3oool000L0oooo00<000000?mo003oO`00o`3oO`0>0?mo 00030000003oool0oooo00H0oooo00070?ooo`030000003oO`00ogl00?l0ogl03P3oO`000`000000 oooo0?ooo`060?ooo`001`3oool00`000000ogl00?mo003o0?mo00h0ogl000<000000?ooo`3oool0 1P3oool000L0oooo00<000000?mo003oO`00o`3oO`0>0?mo00030000003oool0oooo00H0oooo0007 0?ooo`030000003oO`00ogl00?l0ogl03P3oO`000`000000oooo0?ooo`060?ooo`001`3oool00`00 0000ogl00?mo003o0?mo00h0ogl000<000000?ooo`3oool01P3oool000L0oooo00<000000?mo003o O`00o`3oO`0>0?mo00030000003oool0oooo00H0oooo00070?ooo`030000003oO`00ogl00?l0ogl0 3P3oO`000`000000oooo0?ooo`060?ooo`001`3oool00`000000ogl00?mo003o0?mo00h0ogl000<0 00000?ooo`3oool01P3oool000L0oooo00<000000?mo003oO`00o`3oO`0>0?mo00030000003oool0 oooo00H0oooo00070?ooo`030000003oO`00ogl00?l0ogl03P3oO`000`000000oooo0?ooo`060?oo o`001`3oool00`000000ogl00?mo003o0?mo00h0ogl000<000000?ooo`3oool01P3oool000L0oooo 00<000000?mo003oO`00o`3oO`0>0?mo00030000003oool0oooo00H0oooo00070?ooo`030000003o O`00ogl00?l0ogl03P3oO`000`000000oooo0?ooo`060?ooo`001`3oool00`000000ogl00?mo003o 0?mo00h0ogl000<000000?ooo`3oool01P3oool000L0oooo00<000000?mo003oO`00o`3oO`0>0?mo 00030000003oool0oooo00H0oooo00070?ooo`030000003oO`00ogl00?l0ogl03P3oO`000`000000 oooo0?ooo`060?ooo`001`3oool00`000000ogl00?mo003o0?mo00h0ogl000<000000?ooo`3oool0 1P3oool000L0oooo00<000000?mo003oO`00o`3oO`0>0?mo00030000003oool0oooo00H0oooo0007 0?ooo`030000003oO`00ogl00?l0ogl03P3oO`000`000000oooo0?ooo`060?ooo`001`3oool00`00 0000ogl00?mo003o0?mo00h0ogl000<000000?ooo`3oool01P3oool000L0oooo00<000000?mo003o O`00o`3oO`0>0?mo00030000003oool0oooo00H0oooo00070?ooo`030000003oO`00ogl00?l0ogl0 3P3oO`000`000000oooo0?ooo`060?ooo`001`3oool00`000000ogl00?mo003o0?mo00h0ogl000<0 00000?ooo`3oool01P3oool000L0oooo00<000000?mo003oO`00o`3oO`0>0?mo00030000003oool0 oooo00H0oooo00070?ooo`030000003oO`00ogl00?l0ogl03P3oO`000`000000oooo0?ooo`060?oo o`001`3oool00`000000ogl00?mo003o0?mo00h0ogl000<000000?ooo`3oool01P3oool000L0oooo 00<000000?mo003oO`00o`3oO`0>0?mo00030000003oool0oooo00H0oooo00070?ooo`030000003o O`00ogl00?l0ogl03P3oO`000`000000oooo0?ooo`060?ooo`001`3oool00`000000ogl00?mo003o 0?mo00h0ogl000<000000?ooo`3oool01P3oool000L0oooo00<000000?mo003oO`00o`3oO`0>0?mo 00030000003oool0oooo00H0oooo00070?ooo`030000003oO`00ogl00?l0ogl03P3oO`000`000000 oooo0?ooo`060?ooo`001`3oool00`000000ogl00?mo003o0?mo00h0ogl000<000000?ooo`3oool0 1P3oool000L0oooo00<000000?mo003oO`00o`3oO`0>0?mo00030000003oool0oooo00H0oooo0007 0?ooo`030000003oO`00ogl00?l0ogl03P3oO`000`000000oooo0?ooo`060?ooo`001`3oool00`00 0000ogl00?mo003o0?mo00h0ogl000<000000?ooo`3oool01P3oool000P0oooo00<000000?mo003o O`00o`3oO`0<0?mo00030000003oool0oooo00L0oooo00080?ooo`030000003oO`00ogl00?l0ogl0 303oO`000`000000oooo0?ooo`070?ooo`00203oool00`000000ogl00?mo003o0?mo00`0ogl000<0 00000?ooo`3oool01`3oool000T0oooo00<000000?mo003oO`00o`3oO`0:0?mo00030000003oool0 oooo00P0oooo00090?ooo`030000003oO`00ogl00?l0ogl02P3oO`000`000000oooo0?ooo`080?oo o`002@3oool00`000000ogl00?mo003o0?mo00X0ogl000<000000?ooo`3oool0203oool000X0oooo 00<000000?mo003oO`00o`3oO`080?mo00030000003oool0oooo00T0oooo000:0?ooo`030000003o O`00ogl00?l0ogl0203oO`000`000000oooo0?ooo`090?ooo`002`3oool00`000000ogl00?mo003o 0?mo00H0ogl000<000000?ooo`3oool02P3oool000`0oooo00<000000?mo003oO`00o`3oO`040?mo 00030000003oool0oooo00/0oooo000=0?ooo`030000003oO`00ogl00?l0ogl00P3oO`000`000000 oooo0?ooo`0<0?ooo`003P3oool00`000000ogl00?mo003o0?mo00030000003oool0oooo00d0oooo 000?0?ooo`030000003oO`00ogl00?d0ogl000<000000?ooo`3oool03P3oool00100oooo00<00000 0?mo003oO`00n`3oO`000`000000oooo0?ooo`0?0?ooo`004@3oool300000?L0ogl00`00000B0?oo o`00503oooog000001D0oooo003o0?ooob40oooo003o0?ooob40oooo003o0?ooob40oooo003o0?oo ob40oooo0000\ \>"], ImageRangeCache->{{{0, 287}, {176.938, 0}} -> {-0.0263022, -0.0125026, \ 0.00366761, 0.00296715}}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[{ \(\(ShadowRoundRectangle[{x1_, y1_}, {x2_, y2_}, radius_, {shadowx_, shadowy_}, color1_, color2_, steps_: 10] := Module[{angle, cornerRadius, points}, \[IndentingNewLine]cornerRadius = \ Min[Abs[x2 - x1]*radius/2. , Abs[y2 - y1]* radius/2. ]; \[IndentingNewLine]points = \ \[IndentingNewLine]Join[\[IndentingNewLine]Table[\ cornerRadius {Cos[angle], Sin[angle]} + {x1, y1} + cornerRadius {1, 1}, {angle, 3. \ Pi/2. , 1. *Pi, \(\(-Pi\)/2\)/steps}], \[IndentingNewLine]Table[\ cornerRadius {Cos[angle], Sin[angle]} + {x1, y2} + cornerRadius {1, \(-1\)}, {angle, 1. *Pi, Pi/2. , \(\(-Pi\)/2\)/steps}], \[IndentingNewLine]Table[\ cornerRadius {Cos[angle], Sin[angle]} + {x2, y2} + cornerRadius {\(-1\), \(-1\)}, {angle, Pi/2. , 0. , \(\(-Pi\)/2\)/steps}], \[IndentingNewLine]Table[ cornerRadius\ {Cos[angle], Sin[angle]} + {x2, y1} + cornerRadius {\(-1\), 1}, {angle, 2. \ Pi, 3. \ Pi/2. , \(\(-Pi\)/2\)/ steps}]\[IndentingNewLine]]; \[IndentingNewLine]\ \[IndentingNewLine]{\[IndentingNewLine]{GrayLevel[ 0.5], \[IndentingNewLine]Polygon[\(\((# + {shadowx, \ \(-shadowy\)})\) &\)\ \ /@ \ points]\[IndentingNewLine]}, \[IndentingNewLine]{color1\ , Polygon[points], color2, Line[Append[points, points[\([1]\)]\ \ ]]}\[IndentingNewLine]}\[IndentingNewLine]];\)\), "\[IndentingNewLine]", \(\(Show[ Graphics[{EdgeForm[Black], Orange, ShadowRoundRectangle[{0, 0}, {1, .5}, .25, { .05, .05}, Orange, Black]}, PlotRange \[Rule] All]];\)\)}], "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.907029 0.0682245 1.07019 [ [ 0 0 0 0 ] [ 1 .61803 0 0 ] ] MathScale % Start of Graphics 1 setlinecap 1 setlinejoin newpath .5 g .12585 .01472 m .11698 .01554 L .10833 .01799 L .10011 .02201 L .09253 .02749 L .08576 .03431 L .07999 .04229 L .07534 .05124 L .07194 .06093 L .06986 .07114 L .06916 .0816 L .06916 .48292 L .06986 .49339 L .07194 .50359 L .07534 .51329 L .07999 .52224 L .08576 .53022 L .09253 .53704 L .10011 .54252 L .10833 .54654 L .11698 .54899 L .12585 .54981 L .9195 .54981 L .92837 .54899 L .93702 .54654 L .94524 .54252 L .95282 .53704 L .95959 .53022 L .96536 .52224 L .97001 .51329 L .97342 .50359 L .97549 .49339 L .97619 .48292 L .97619 .0816 L .97549 .07114 L .97342 .06093 L .97001 .05124 L .96536 .04229 L .95959 .03431 L .95282 .02749 L .94524 .02201 L .93702 .01799 L .92837 .01554 L .9195 .01472 L F 1 .5 0 r .0805 .06822 m .07163 .06905 L .06298 .0715 L .05476 .07551 L .04718 .081 L .04041 .08782 L .03464 .0958 L .02999 .10475 L .02658 .11444 L .02451 .12465 L .02381 .13511 L .02381 .53643 L .02451 .5469 L .02658 .5571 L .02999 .5668 L .03464 .57575 L .04041 .58373 L .04718 .59054 L .05476 .59603 L .06298 .60005 L .07163 .6025 L .0805 .60332 L .87415 .60332 L .88302 .6025 L .89167 .60005 L .89989 .59603 L .90747 .59054 L .91424 .58373 L .92001 .57575 L .92466 .5668 L .92806 .5571 L .93014 .5469 L .93084 .53643 L .93084 .13511 L .93014 .12465 L .92806 .11444 L .92466 .10475 L .92001 .0958 L .91424 .08782 L .90747 .081 L .89989 .07551 L .89167 .0715 L .88302 .06905 L .87415 .06822 L F 0 g .5 Mabswid [ ] 0 setdash .0805 .06822 m .07163 .06905 L .06298 .0715 L .05476 .07551 L .04718 .081 L .04041 .08782 L .03464 .0958 L .02999 .10475 L .02658 .11444 L .02451 .12465 L .02381 .13511 L .02381 .53643 L .02451 .5469 L .02658 .5571 L .02999 .5668 L .03464 .57575 L .04041 .58373 L .04718 .59054 L .05476 .59603 L .06298 .60005 L .07163 .6025 L .0805 .60332 L .87415 .60332 L .88302 .6025 L .89167 .60005 L .89989 .59603 L .90747 .59054 L .91424 .58373 L .92001 .57575 L .92466 .5668 L .92806 .5571 L .93014 .5469 L .93084 .53643 L .93084 .13511 L .93014 .12465 L .92806 .11444 L .92466 .10475 L .92001 .0958 L .91424 .08782 L .90747 .081 L .89989 .07551 L .89167 .0715 L .88302 .06905 L .87415 .06822 L .0805 .06822 L s 0 0 m 1 0 L 1 .61803 L 0 .61803 L closepath clip newpath % End of Graphics MathPictureEnd \ \>"], "Graphics", ImageSize->{288, 177.938}, ImageMargins->{{43, 0}, {0, 0}}, ImageRegion->{{0, 1}, {0, 1}}, ImageCache->GraphicsData["Bitmap", "\<\ CF5dJ6E]HGAYHf4PAg9QL6QYHgX0ogl00P00000G 07moO`T0oooo000@0?ooo`800000kP3oO`02000001D0Ogmo2@3oool000h0oooo0P00003b0?mo0080 00004`1oOgl90?ooo`003@3oool00`000000ogl00?mo003d0?mo00030000001oOgl0Ogmo0100Ogmo 2@3oool000`0oooo00<000000?mo003oO`00mP3oO`000`000000Ogmo07moO`0?07moO`T0oooo000; 0?ooo`030000003oO`00ogl00?P0ogl000<0000007moO`1oOgl03P1oOgl90?ooo`002P3oool00`00 0000ogl00?mo003i0?mo00030000001oOgl0Ogmo00h0Ogmo2@3oool000X0oooo00<000000?mo003o O`00nP3oO`000`000000Ogmo07moO`0=07moO`T0oooo00090?ooo`030000003oO`00ogl00?`0ogl0 00<0000007moO`1oOgl0301oOgl90?ooo`002@3oool00`000000ogl00?mo003l0?mo00030000001o Ogl0Ogmo00`0Ogmo2@3oool000P0oooo00<000000?mo003oO`00oP3oO`000`000000Ogmo07moO`0; 07moO`T0oooo00070?ooo`030000003oO`00ogl00?l0ogl000<0000007moO`1oOgl02`1oOgl90?oo o`001`3oool00`000000ogl00?mo003o0?mo0040ogl000<0000007moO`1oOgl02P1oOgl90?ooo`00 1`3oool00`000000ogl00?mo003o0?mo0040ogl000<0000007moO`1oOgl02P1oOgl90?ooo`001`3o ool00`000000ogl00?mo003o0?mo0040ogl000<0000007moO`1oOgl02P1oOgl90?ooo`001`3oool0 0`000000ogl00?mo003o0?mo0040ogl000<0000007moO`1oOgl02P1oOgl90?ooo`001`3oool00`00 0000ogl00?mo003o0?mo0040ogl000<0000007moO`1oOgl02P1oOgl90?ooo`001`3oool00`000000 ogl00?mo003o0?mo0040ogl000<0000007moO`1oOgl02P1oOgl90?ooo`001`3oool00`000000ogl0 0?mo003o0?mo0040ogl000<0000007moO`1oOgl02P1oOgl90?ooo`001`3oool00`000000ogl00?mo 003o0?mo0040ogl000<0000007moO`1oOgl02P1oOgl90?ooo`001`3oool00`000000ogl00?mo003o 0?mo0040ogl000<0000007moO`1oOgl02P1oOgl90?ooo`001`3oool00`000000ogl00?mo003o0?mo 0040ogl000<0000007moO`1oOgl02P1oOgl90?ooo`001`3oool00`000000ogl00?mo003o0?mo0040 ogl000<0000007moO`1oOgl02P1oOgl90?ooo`001`3oool00`000000ogl00?mo003o0?mo0040ogl0 00<0000007moO`1oOgl02P1oOgl90?ooo`001`3oool00`000000ogl00?mo003o0?mo0040ogl000<0 000007moO`1oOgl02P1oOgl90?ooo`001`3oool00`000000ogl00?mo003o0?mo0040ogl000<00000 07moO`1oOgl02P1oOgl90?ooo`001`3oool00`000000ogl00?mo003o0?mo0040ogl000<0000007mo O`1oOgl02P1oOgl90?ooo`001`3oool00`000000ogl00?mo003o0?mo0040ogl000<0000007moO`1o Ogl02P1oOgl90?ooo`001`3oool00`000000ogl00?mo003o0?mo0040ogl000<0000007moO`1oOgl0 2P1oOgl90?ooo`001`3oool00`000000ogl00?mo003o0?mo0040ogl000<0000007moO`1oOgl02P1o Ogl90?ooo`001`3oool00`000000ogl00?mo003o0?mo0040ogl000<0000007moO`1oOgl02P1oOgl9 0?ooo`001`3oool00`000000ogl00?mo003o0?mo0040ogl000<0000007moO`1oOgl02P1oOgl90?oo o`001`3oool00`000000ogl00?mo003o0?mo0040ogl000<0000007moO`1oOgl02P1oOgl90?ooo`00 1`3oool00`000000ogl00?mo003o0?mo0040ogl000<0000007moO`1oOgl02P1oOgl90?ooo`001`3o ool00`000000ogl00?mo003o0?mo0040ogl000<0000007moO`1oOgl02P1oOgl90?ooo`001`3oool0 0`000000ogl00?mo003o0?mo0040ogl000<0000007moO`1oOgl02P1oOgl90?ooo`001`3oool00`00 0000ogl00?mo003o0?mo0040ogl000<0000007moO`1oOgl02P1oOgl90?ooo`001`3oool00`000000 ogl00?mo003o0?mo0040ogl000<0000007moO`1oOgl02P1oOgl90?ooo`001`3oool00`000000ogl0 0?mo003o0?mo0040ogl000<0000007moO`1oOgl02P1oOgl90?ooo`001`3oool00`000000ogl00?mo 003o0?mo0040ogl000<0000007moO`1oOgl02P1oOgl90?ooo`001`3oool00`000000ogl00?mo003o 0?mo0040ogl000<0000007moO`1oOgl02P1oOgl90?ooo`001`3oool00`000000ogl00?mo003o0?mo 0040ogl000<0000007moO`1oOgl02P1oOgl90?ooo`001`3oool00`000000ogl00?mo003o0?mo0040 ogl000<0000007moO`1oOgl02P1oOgl90?ooo`001`3oool00`000000ogl00?mo003o0?mo0040ogl0 00<0000007moO`1oOgl02P1oOgl90?ooo`001`3oool00`000000ogl00?mo003o0?mo0040ogl000<0 000007moO`1oOgl02P1oOgl90?ooo`001`3oool00`000000ogl00?mo003o0?mo0040ogl000<00000 07moO`1oOgl02P1oOgl90?ooo`001`3oool00`000000ogl00?mo003o0?mo0040ogl000<0000007mo O`1oOgl02P1oOgl90?ooo`001`3oool00`000000ogl00?mo003o0?mo0040ogl000<0000007moO`1o Ogl02P1oOgl90?ooo`001`3oool00`000000ogl00?mo003o0?mo0040ogl000<0000007moO`1oOgl0 2P1oOgl90?ooo`001`3oool00`000000ogl00?mo003o0?mo0040ogl000<0000007moO`1oOgl02P1o Ogl90?ooo`001`3oool00`000000ogl00?mo003o0?mo0040ogl000<0000007moO`1oOgl02P1oOgl9 0?ooo`001`3oool00`000000ogl00?mo003o0?mo0040ogl000<0000007moO`1oOgl02P1oOgl90?oo o`001`3oool00`000000ogl00?mo003o0?mo0040ogl000<0000007moO`1oOgl02P1oOgl90?ooo`00 1`3oool00`000000ogl00?mo003o0?mo0040ogl000<0000007moO`1oOgl02P1oOgl90?ooo`001`3o ool00`000000ogl00?mo003o0?mo0040ogl000<0000007moO`1oOgl02P1oOgl90?ooo`001`3oool0 0`000000ogl00?mo003o0?mo0040ogl000<0000007moO`1oOgl02P1oOgl90?ooo`001`3oool00`00 0000ogl00?mo003o0?mo0040ogl000<0000007moO`1oOgl02P1oOgl90?ooo`001`3oool00`000000 ogl00?mo003o0?mo0040ogl000<0000007moO`1oOgl02P1oOgl90?ooo`001`3oool00`000000ogl0 0?mo003o0?mo0040ogl000<0000007moO`1oOgl02P1oOgl90?ooo`001`3oool00`000000ogl00?mo 003o0?mo0040ogl000<0000007moO`1oOgl02P1oOgl90?ooo`001`3oool00`000000ogl00?mo003o 0?mo0040ogl000<0000007moO`1oOgl02P1oOgl90?ooo`001`3oool00`000000ogl00?mo003o0?mo 0040ogl000<0000007moO`1oOgl02P1oOgl90?ooo`001`3oool00`000000ogl00?mo003o0?mo0040 ogl000<0000007moO`1oOgl02P1oOgl90?ooo`001`3oool00`000000ogl00?mo003o0?mo0040ogl0 00<0000007moO`1oOgl02P1oOgl90?ooo`001`3oool00`000000ogl00?mo003o0?mo0040ogl000<0 000007moO`1oOgl02P1oOgl90?ooo`001`3oool00`000000ogl00?mo003o0?mo0040ogl000<00000 07moO`1oOgl02P1oOgl90?ooo`001`3oool00`000000ogl00?mo003o0?mo0040ogl000<0000007mo O`1oOgl02P1oOgl90?ooo`001`3oool00`000000ogl00?mo003o0?mo0040ogl000<0000007moO`1o Ogl02P1oOgl90?ooo`001`3oool00`000000ogl00?mo003o0?mo0040ogl000<0000007moO`1oOgl0 2P1oOgl90?ooo`001`3oool00`000000ogl00?mo003o0?mo0040ogl000<0000007moO`1oOgl02P1o Ogl90?ooo`001`3oool00`000000ogl00?mo003o0?mo0040ogl000<0000007moO`1oOgl02P1oOgl9 0?ooo`001`3oool00`000000ogl00?mo003o0?mo0040ogl000<0000007moO`1oOgl02P1oOgl90?oo o`001`3oool00`000000ogl00?mo003o0?mo0040ogl000<0000007moO`1oOgl02P1oOgl90?ooo`00 1`3oool00`000000ogl00?mo003o0?mo0040ogl000<0000007moO`1oOgl02P1oOgl90?ooo`001`3o ool00`000000ogl00?mo003o0?mo0040ogl000<0000007moO`1oOgl02P1oOgl90?ooo`001`3oool0 0`000000ogl00?mo003o0?mo0040ogl000<0000007moO`1oOgl02P1oOgl90?ooo`001`3oool00`00 0000ogl00?mo003o0?mo0040ogl000<0000007moO`1oOgl02P1oOgl90?ooo`001`3oool00`000000 ogl00?mo003o0?mo0040ogl000<0000007moO`1oOgl02P1oOgl90?ooo`001`3oool00`000000ogl0 0?mo003o0?mo0040ogl000<0000007moO`1oOgl02P1oOgl90?ooo`001`3oool00`000000ogl00?mo 003o0?mo0040ogl000<0000007moO`1oOgl02P1oOgl90?ooo`001`3oool00`000000ogl00?mo003o 0?mo0040ogl000<0000007moO`1oOgl02P1oOgl90?ooo`001`3oool00`000000ogl00?mo003o0?mo 0040ogl000<0000007moO`1oOgl02P1oOgl90?ooo`001`3oool00`000000ogl00?mo003o0?mo0040 ogl000<0000007moO`1oOgl02P1oOgl90?ooo`001`3oool00`000000ogl00?mo003o0?mo0040ogl0 00<0000007moO`1oOgl02P1oOgl90?ooo`001`3oool00`000000ogl00?mo003o0?mo0040ogl000<0 000007moO`1oOgl02P1oOgl90?ooo`001`3oool00`000000ogl00?mo003o0?mo0040ogl000<00000 07moO`1oOgl02P1oOgl90?ooo`001`3oool00`000000ogl00?mo003o0?mo0040ogl000<0000007mo O`1oOgl02P1oOgl90?ooo`001`3oool00`000000ogl00?mo003o0?mo0040ogl000<0000007moO`1o Ogl02P1oOgl90?ooo`001`3oool00`000000ogl00?mo003o0?mo0040ogl000<0000007moO`1oOgl0 2P1oOgl90?ooo`001`3oool00`000000ogl00?mo003o0?mo0040ogl000<0000007moO`1oOgl02P1o Ogl90?ooo`001`3oool00`000000ogl00?mo003o0?mo0040ogl000<0000007moO`1oOgl02P1oOgl9 0?ooo`001`3oool00`000000ogl00?mo003o0?mo0040ogl000<0000007moO`1oOgl02P1oOgl90?oo o`001`3oool00`000000ogl00?mo003o0?mo0040ogl000<0000007moO`1oOgl02P1oOgl90?ooo`00 1`3oool00`000000ogl00?mo003o0?mo0040ogl000<0000007moO`1oOgl02P1oOgl90?ooo`001`3o ool00`000000ogl00?mo003o0?mo0040ogl000<0000007moO`1oOgl02P1oOgl90?ooo`001`3oool0 0`000000ogl00?mo003o0?mo0040ogl000<0000007moO`1oOgl02P1oOgl90?ooo`001`3oool00`00 0000ogl00?mo003o0?mo0040ogl000<0000007moO`1oOgl02P1oOgl90?ooo`001`3oool00`000000 ogl00?mo003o0?mo0040ogl000<0000007moO`1oOgl02P1oOgl90?ooo`001`3oool00`000000ogl0 0?mo003o0?mo0040ogl000<0000007moO`1oOgl02P1oOgl90?ooo`001`3oool00`000000ogl00?mo 003o0?mo0040ogl000<0000007moO`1oOgl02P1oOgl90?ooo`001`3oool00`000000ogl00?mo003o 0?mo0040ogl000<0000007moO`1oOgl02P1oOgl90?ooo`001`3oool00`000000ogl00?mo003o0?mo 0040ogl000<0000007moO`1oOgl02P1oOgl90?ooo`001`3oool00`000000ogl00?mo003o0?mo0040 ogl000<0000007moO`1oOgl02P1oOgl90?ooo`001`3oool00`000000ogl00?mo003o0?mo0040ogl0 00<0000007moO`1oOgl02P1oOgl90?ooo`001`3oool00`000000ogl00?mo003o0?mo0040ogl000<0 000007moO`1oOgl02P1oOgl90?ooo`001`3oool00`000000ogl00?mo003o0?mo0040ogl000<00000 07moO`1oOgl02P1oOgl90?ooo`001`3oool00`000000ogl00?mo003o0?mo0040ogl000<0000007mo O`1oOgl02P1oOgl90?ooo`001`3oool00`000000ogl00?mo003o0?mo0040ogl000<0000007moO`1o Ogl02P1oOgl90?ooo`001`3oool00`000000ogl00?mo003o0?mo0040ogl000<0000007moO`1oOgl0 2P1oOgl90?ooo`001`3oool00`000000ogl00?mo003o0?mo0040ogl000<0000007moO`1oOgl02P1o Ogl90?ooo`001`3oool00`000000ogl00?mo003o0?mo0040ogl000<0000007moO`1oOgl02P1oOgl9 0?ooo`001`3oool00`000000ogl00?mo003o0?mo0040ogl000<0000007moO`1oOgl02P1oOgl90?oo o`001`3oool00`000000ogl00?mo003o0?mo0040ogl000<0000007moO`1oOgl02P1oOgl90?ooo`00 1`3oool00`000000ogl00?mo003o0?mo0040ogl000<0000007moO`1oOgl02P1oOgl90?ooo`001`3o ool00`000000ogl00?mo003o0?mo0040ogl000<0000007moO`1oOgl02P1oOgl90?ooo`001`3oool0 0`000000ogl00?mo003o0?mo0040ogl000<0000007moO`1oOgl02P1oOgl90?ooo`001`3oool00`00 0000ogl00?mo003o0?mo0040ogl000<0000007moO`1oOgl02P1oOgl90?ooo`001`3oool00`000000 ogl00?mo003o0?mo0040ogl000<0000007moO`1oOgl02P1oOgl90?ooo`001`3oool00`000000ogl0 0?mo003o0?mo0040ogl000<0000007moO`1oOgl02P1oOgl90?ooo`001`3oool00`000000ogl00?mo 003o0?mo0040ogl000<0000007moO`1oOgl02P1oOgl90?ooo`001`3oool00`000000ogl00?mo003o 0?mo0040ogl000<0000007moO`1oOgl02P1oOgl90?ooo`001`3oool00`000000ogl00?mo003o0?mo 0040ogl000<0000007moO`1oOgl02P1oOgl90?ooo`001`3oool00`000000ogl00?mo003o0?mo0040 ogl000<0000007moO`1oOgl02P1oOgl90?ooo`001`3oool00`000000ogl00?mo003o0?mo0040ogl0 00<0000007moO`1oOgl02P1oOgl90?ooo`001`3oool00`000000ogl00?mo003o0?mo0040ogl000<0 000007moO`1oOgl02P1oOgl90?ooo`001`3oool00`000000ogl00?mo003o0?mo0040ogl000<00000 07moO`1oOgl02P1oOgl90?ooo`001`3oool00`000000ogl00?mo003o0?mo0040ogl000<0000007mo O`1oOgl02P1oOgl90?ooo`001`3oool00`000000ogl00?mo003o0?mo0040ogl000<0000007moO`1o Ogl02@1oOgl:0?ooo`001`3oool00`000000ogl00?mo003o0?mo0040ogl000<0000007moO`1oOgl0 201oOgl;0?ooo`001`3oool00`000000ogl00?mo003o0?mo0040ogl000<0000007moO`1oOgl01`1o Ogl<0?ooo`001`3oool00`000000ogl00?mo003o0?mo0040ogl000<0000007moO`1oOgl01`1oOgl< 0?ooo`001`3oool00`000000ogl00?mo003o0?mo0040ogl000<0000007moO`1oOgl01P1oOgl=0?oo o`001`3oool00`000000ogl00?mo003o0?mo0040ogl000<0000007moO`1oOgl01@1oOgl>0?ooo`00 1`3oool00`000000ogl00?mo003o0?mo0040ogl000<0000007moO`1oOgl0101oOgl?0?ooo`001`3o ool00`000000ogl00?mo003o0?mo0040ogl000<0000007moO`1oOgl00`1oOgl@0?ooo`001`3oool0 0`000000ogl00?mo003o0?mo0040ogl000@0000007moO`1oOgl0Ogmo4P3oool000L0oooo00<00000 0?mo003oO`00o`3oO`010?mo00030000001oOgl0oooo01<0oooo00070?ooo`030000003oO`00ogl0 0?l0ogl00@3oO`000`000000oooo0?ooo`0C0?ooo`001`3oool00`000000ogl00?mo003o0?mo0040 ogl000<000000?ooo`3oool04`3oool000L0oooo00<000000?mo003oO`00o`3oO`010?mo00030000 003oool0oooo01<0oooo00070?ooo`030000003oO`00ogl00?l0ogl00@3oO`000`000000oooo0?oo o`0C0?ooo`00203oool00`000000ogl00?mo003n0?mo00030000003oool0oooo01@0oooo00080?oo o`030000003oO`00ogl00?h0ogl000<000000?ooo`3oool0503oool000T0oooo00<000000?mo003o O`00o03oO`000`000000oooo0?ooo`0E0?ooo`002P3oool00`000000ogl00?mo003j0?mo00030000 003oool0oooo01H0oooo000:0?ooo`030000003oO`00ogl00?X0ogl000<000000?ooo`3oool05P3o ool000/0oooo00<000000?mo003oO`00n03oO`000`000000oooo0?ooo`0G0?ooo`002`3oool00`00 0000ogl00?mo003h0?mo00030000003oool0oooo01L0oooo000<0?ooo`030000003oO`00ogl00?H0 ogl000<000000?ooo`3oool0603oool000d0oooo0P00003d0?mo008000006`3oool000l0oooo0P00 003`0?mo008000007@3oool00140oooo0P00003/0?mo008000007`3oool001<0ooook000000Q0?oo o`00o`3ooolQ0?ooo`00o`3ooolQ0?ooo`00o`3ooolQ0?ooo`00o`3ooolQ0?ooo`00\ \>"], ImageRangeCache->{{{0, 287}, {176.938, 0}} -> {-0.0276173, -0.0637528, \ 0.00385099, 0.00326387}}] }, Open ]], Cell[BoxData[ \(\(LineRectangle[{{x1_, y1_}, {x2_, y2_}}] := \n\t\tLine[{{x1, y1}, {x1, y2}, {x2, y2}, {x2, y1}, {x1, y1}}];\)\)], "Input"], Cell[CellGroupData[{ Cell[BoxData[{ \(\(ShadowRectangle[p1_, p2_, {shadowx_, shadowy_}, color1_, color2_] := Module[{}, \[IndentingNewLine]{\[IndentingNewLine]{GrayLevel[ 0.5], \[IndentingNewLine]Rectangle[ p1 + {shadowx, \(-shadowy\)}, p2 + {shadowx, \(-shadowy\)}]\[IndentingNewLine]}, \ \[IndentingNewLine]{color1\ , Rectangle[p1, p2], color2, LineRectangle[{p1, p2}]}\[IndentingNewLine]\[IndentingNewLine]}\ \[IndentingNewLine]];\)\), "\[IndentingNewLine]", \(\(Show[ Graphics[{ShadowRectangle[{0, 0}, {1, .5}, { .05, .05}, Orange, Black]}, PlotRange \[Rule] All]\ ];\)\)}], "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.907029 0.0682245 1.07019 [ [ 0 0 0 0 ] [ 1 .61803 0 0 ] ] MathScale % Start of Graphics 1 setlinecap 1 setlinejoin newpath .5 g .06916 .01472 m .06916 .54981 L .97619 .54981 L .97619 .01472 L F 1 .5 0 r .02381 .06822 m .02381 .60332 L .93084 .60332 L .93084 .06822 L F 0 g .5 Mabswid [ ] 0 setdash .02381 .06822 m .02381 .60332 L .93084 .60332 L .93084 .06822 L .02381 .06822 L s 0 0 m 1 0 L 1 .61803 L 0 .61803 L closepath clip newpath % End of Graphics MathPictureEnd \ \>"], "Graphics", ImageSize->{288, 177.938}, ImageMargins->{{43, 0}, {0, 0}}, ImageRegion->{{0, 1}, {0, 1}}, ImageCache->GraphicsData["Bitmap", "\<\ CF5dJ6E]HGAYHf4PAg9QL6QYHg"], ImageRangeCache->{{{0, 287}, {176.938, 0}} -> {-0.0276173, -0.0637528, \ 0.00385099, 0.00326387}}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[{ \(\(ShadowDisk[p1_, radius_, {shadowx_, shadowy_}, color1_, color2_] := Module[{}, \[IndentingNewLine]{\[IndentingNewLine]{GrayLevel[ 0.5], \[IndentingNewLine]Disk[p1 + {shadowx, \(-shadowy\)}, radius]\[IndentingNewLine]}, \[IndentingNewLine]{color1, Disk[p1, radius], color2, Circle[p1, radius]}\[IndentingNewLine]}\[IndentingNewLine]];\)\), "\ \[IndentingNewLine]", \(Show[ Graphics[{EdgeForm[Black], Orange, ShadowDisk[{0, 0}, .5, { .05, .05}, Orange, Black]}, PlotRange \[Rule] All]\ ]\)}], "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.477324 0.907029 0.323031 0.560575 [ [ 0 0 0 0 ] [ 1 .61803 0 0 ] ] MathScale % Start of Graphics 1 setlinecap 1 setlinejoin newpath .5 g .52268 .295 m matrix currentmatrix 0.453515 0.280288 scale 1.15251 1.05249 1 0 365.73 arc setmatrix F 1 .5 0 r .47732 .32303 m matrix currentmatrix 0.453515 0.280288 scale 1.05249 1.1525 1 0 365.73 arc setmatrix F 0 g .5 Mabswid [ ] 0 setdash newpath matrix currentmatrix 0.453515 0.280288 scale 1.05249 1.1525 1 0 365.73 arc setmatrix s 0 0 m 1 0 L 1 .61803 L 0 .61803 L closepath clip newpath % End of Graphics MathPictureEnd \ \>"], "Graphics", ImageSize->{288, 177.938}, ImageMargins->{{43, 0}, {0, 0}}, ImageRegion->{{0, 1}, {0, 1}}, ImageCache->GraphicsData["Bitmap", "\<\ CF5dJ6E]HGAYHf4PAg9QL6QYHg0?mo00@000009@1oOgm70?ooo`00C`3oool907moO`H0 0000EP3oO`0600000280OgmoA03oool004`0oooo2@1oOgl300000680ogl00`00000R07moOd40oooo 001:0?ooo`P0Ogmo0`00001X0?mo00<000008@1oOglo0?ooo`00A`3oool807moO`<00000KP3oO`03 00000240Ogmo?03oool004D0oooo1`1oOgl3000007@0ogl00`00000P07moOcX0oooo00140?ooo`H0 Ogmo0P00001j0?mo00800000801oOglh0?ooo`00@P3oool507moO`<00000OP3oO`03000001h0Ogmo =`3oool00400oooo101oOgl3000008@0ogl00`00000M07moOcD0oooo000m0?ooo`@0Ogmo0`00002: 0?mo00<000007@1oOglb0?ooo`00?03oool307moO`800000T03oO`02000001`0Ogmo<@3oool003/0 oooo00@0Ogmo0000000000000000U03oO`03000001X0Ogmo<03oool003T0oooo00<0Ogmo00000000 0000VP3oO`02000001X0Ogmo;P3oool003H0oooo0P1oOgl2000009h0ogl00P00000K07moOb/0oooo 000e0?ooo`0307moO`00000000000:80ogl00P00000J07moObX0oooo000d0?ooo`0307moO`000000 ogl00:D0ogl000<0000007moO`1oOgl0601oOglY0?ooo`0000 ogl000<0000007moO`1oOgl0401oOglC0?ooo`005P3oool00`000000ogl00?mo003R0?mo00030000 001oOgl0Ogmo0100Ogmo4P3oool001D0oooo00<000000?mo003oO`00i03oO`000`000000Ogmo07mo O`0?07moOa80oooo000D0?ooo`030000003oO`00ogl00>H0ogl000<0000007moO`1oOgl03`1oOglA 0?ooo`00503oool00`000000ogl00?mo003W0?mo00030000001oOgl0Ogmo00l0Ogmo403oool001<0 oooo00<000000?mo003oO`00j03oO`000`000000Ogmo07moO`0@07moO`l0oooo000B0?ooo`030000 003oO`00ogl00>X0ogl000<0000007moO`1oOgl0401oOgl>0?ooo`004@3oool00`000000ogl00?mo 003[0?mo00030000001oOgl0Ogmo0100Ogmo3P3oool00140oooo00<000000?mo003oO`00k03oO`00 0`000000Ogmo07moO`0?07moO`h0oooo000@0?ooo`030000003oO`00ogl00>d0ogl000<0000007mo O`1oOgl03`1oOgl>0?ooo`00403oool00`000000ogl00?mo003^0?mo00030000001oOgl0Ogmo00l0 Ogmo3@3oool000l0oooo00<000000?mo003oO`00l03oO`000`000000Ogmo07moO`0>07moO`d0oooo 000?0?ooo`030000003oO`00ogl00?40ogl000<0000007moO`1oOgl03P1oOgl<0?ooo`003@3oool2 00000?@0ogl000<0000007moO`1oOgl03P1oOgl<0?ooo`00303oool00`000000ogl00?mo003e0?mo 00030000001oOgl0Ogmo00h0Ogmo2`3oool000`0oooo00<000000?mo003oO`00mP3oO`000`000000 Ogmo07moO`0=07moO`/0oooo000<0?ooo`030000003oO`00ogl00?H0ogl000<0000007moO`1oOgl0 3@1oOgl;0?ooo`00303oool00`000000ogl00?mo003g0?mo00030000001oOgl0Ogmo00`0Ogmo2`3o ool000/0oooo00<000000?mo003oO`00n03oO`000`000000Ogmo07moO`0=07moO`X0oooo000;0?oo o`030000003oO`00ogl00?P0ogl000<0000007moO`1oOgl03@1oOgl:0?ooo`002P3oool00`000000 ogl00?mo003i0?mo00030000001oOgl0Ogmo00d0Ogmo2P3oool000X0oooo00<000000?mo003oO`00 nP3oO`000`000000Ogmo07moO`0<07moO`X0oooo00090?ooo`030000003oO`00ogl00?/0ogl000<0 000007moO`1oOgl03@1oOgl90?ooo`002@3oool00`000000ogl00?mo003l0?mo00030000001oOgl0 Ogmo00`0Ogmo2@3oool000T0oooo00<000000?mo003oO`00o03oO`000`000000Ogmo07moO`0<07mo O`T0oooo00090?ooo`030000003oO`00ogl00?`0ogl000<0000007moO`1oOgl0301oOgl90?ooo`00 203oool00`000000ogl00?mo003m0?mo00030000001oOgl0Ogmo00`0Ogmo2@3oool000P0oooo00<0 00000?mo003oO`00oP3oO`000`000000Ogmo07moO`0;07moO`T0oooo00080?ooo`030000003oO`00 ogl00?h0ogl000<0000007moO`1oOgl02`1oOgl90?ooo`00203oool00`000000ogl00?mo003n0?mo 00030000001oOgl0Ogmo00/0Ogmo2@3oool000L0oooo00<000000?mo003oO`00o`3oO`000`000000 Ogmo07moO`0;07moO`T0oooo00070?ooo`030000003oO`00ogl00?l0ogl00@3oO`000`000000Ogmo 07moO`0:07moO`T0oooo00070?ooo`030000003oO`00ogl00?l0ogl00@3oO`000`000000Ogmo07mo O`0:07moO`T0oooo00070?ooo`030000003oO`00ogl00?l0ogl00@3oO`000`000000Ogmo07moO`0: 07moO`T0oooo00070?ooo`030000003oO`00ogl00?l0ogl00@3oO`000`000000Ogmo07moO`0:07mo O`T0oooo00070?ooo`030000003oO`00ogl00?l0ogl00@3oO`000`000000Ogmo07moO`0:07moO`T0 oooo00070?ooo`030000003oO`00ogl00?l0ogl00@3oO`000`000000Ogmo07moO`0:07moO`T0oooo 00070?ooo`030000003oO`00ogl00?l0ogl00@3oO`000`000000Ogmo07moO`0:07moO`T0oooo0007 0?ooo`030000003oO`00ogl00?l0ogl00@3oO`000`000000Ogmo07moO`0:07moO`T0oooo00070?oo o`030000003oO`00ogl00?l0ogl00@3oO`000`000000Ogmo07moO`0:07moO`T0oooo00070?ooo`03 0000003oO`00ogl00?l0ogl00@3oO`000`000000Ogmo07moO`0:07moO`T0oooo00070?ooo`030000 003oO`00ogl00?l0ogl00@3oO`000`000000Ogmo07moO`0907moO`X0oooo00070?ooo`030000003o O`00ogl00?l0ogl00@3oO`000`000000Ogmo07moO`0907moO`X0oooo00070?ooo`030000003oO`00 ogl00?l0ogl00@3oO`000`000000Ogmo07moO`0907moO`X0oooo00070?ooo`030000003oO`00ogl0 0?l0ogl00@3oO`000`000000Ogmo07moO`0907moO`X0oooo00070?ooo`030000003oO`00ogl00?l0 ogl00@3oO`000`000000Ogmo07moO`0807moO`/0oooo00070?ooo`030000003oO`00ogl00?l0ogl0 0@3oO`000`000000Ogmo07moO`0807moO`/0oooo00070?ooo`030000003oO`00ogl00?l0ogl00@3o O`000`000000Ogmo07moO`0807moO`/0oooo00070?ooo`030000003oO`00ogl00?l0ogl000<00000 07moO`1oOgl02@1oOgl;0?ooo`00203oool00`000000ogl00?mo003n0?mo00030000001oOgl0Ogmo 00P0Ogmo303oool000P0oooo00<000000?mo003oO`00oP3oO`000`000000Ogmo07moO`0807moO``0 oooo00080?ooo`030000003oO`00ogl00?h0ogl000<0000007moO`1oOgl01`1oOgl=0?ooo`00203o ool00`000000ogl00?mo003m0?mo00030000001oOgl0Ogmo00P0Ogmo3@3oool000T0oooo00<00000 0?mo003oO`00o03oO`000`000000Ogmo07moO`0707moO`h0oooo00090?ooo`030000003oO`00ogl0 0?`0ogl000<0000007moO`1oOgl01`1oOgl>0?ooo`002@3oool00`000000ogl00?mo003l0?mo0003 0000001oOgl0Ogmo00L0Ogmo3P3oool000T0oooo00<000000?mo003oO`00n`3oO`000`000000Ogmo 07moO`0807moO`h0oooo000:0?ooo`030000003oO`00ogl00?X0ogl000<0000007moO`1oOgl01`1o Ogl?0?ooo`002P3oool00`000000ogl00?mo003i0?mo00030000001oOgl0Ogmo00L0Ogmo403oool0 00/0oooo00<000000?mo003oO`00n03oO`000`000000Ogmo07moO`0607moOa40oooo000;0?ooo`03 0000003oO`00ogl00?L0ogl000<0000007moO`1oOgl01P1oOglB0?ooo`00303oool00`000000ogl0 0?mo003f0?mo00030000001oOgl0Ogmo00H0Ogmo4P3oool000`0oooo00<000000?mo003oO`00mP3o O`000`000000Ogmo07moO`0507moOa<0oooo000<0?ooo`030000003oO`00ogl00?H0ogl000<00000 07moO`1oOgl01@1oOglC0?ooo`00303oool00`000000ogl00?mo003e0?mo00030000001oOgl0Ogmo 00D0Ogmo503oool000d0oooo00<000000?mo003oO`00m03oO`000`000000Ogmo07moO`0407moOaD0 oooo000>0?ooo`030000003oO`00ogl00?80ogl000<0000007moO`1oOgl0101oOglF0?ooo`003`3o ool00`000000ogl00?mo003`0?mo00030000001oOgl0Ogmo00D0Ogmo5P3oool00100oooo00<00000 0?mo003oO`00kP3oO`000`000000Ogmo07moO`0507moOaL0oooo000@0?ooo`030000003oO`00ogl0 0>d0ogl000<0000007moO`1oOgl01@1oOglH0?ooo`004@3oool00`000000ogl00?mo003/0?mo0003 0000001oOgl0Ogmo00@0Ogmo6@3oool00140oooo00<000000?mo003oO`00j`3oO`000`000000Ogmo 07moO`0407moOaX0oooo000B0?ooo`030000003oO`00ogl00>X0ogl000<0000007moO`1oOgl00`1o OglK0?ooo`004`3oool00`000000ogl00?mo003X0?mo00030000001oOgl0Ogmo00<0Ogmo703oool0 01@0oooo00<000000?mo003oO`00iP3oO`000`000000Ogmo07moO`0407moOa`0oooo000D0?ooo`03 0000003oO`00ogl00>D0ogl000<0000007moO`1oOgl0101oOglM0?ooo`005@3oool00`000000ogl0 0?mo003T0?mo00030000001oOgl0Ogmo0080Ogmo7`3oool001H0oooo00<000000?mo003oO`00hP3o O`000`000000Ogmo07moO`0207moOb00oooo000G0?ooo`030000003oO`00ogl00>00ogl000<00000 07moO`1oOgl00P1oOglQ0?ooo`00603oool00`000000ogl00?mo003N0?mo00040000001oOgl0Ogmo 07moOb<0oooo000I0?ooo`030000003oO`00ogl00=`0ogl000@0000007moO`1oOgl0Ogmo903oool0 01X0oooo00<000000?mo003oO`00fP3oO`0010000000Ogmo07moO`1oOglU0?ooo`006P3oool00`00 0000ogl00?mo003I0?mo00040000001oOgl0Ogmo07moObH0oooo000K0?ooo`030000003oO`00ogl0 0=P0ogl000<0000007moO`1oOgl09`3oool001`0oooo0P00003F0?mo0080000000<0Ogmo0?ooo`3o ool09`3oool001h0oooo00<000000?mo003oO`00dP3oO`000`000000Ogmo07moO`0Z0?ooo`007`3o ool00`000000ogl00?mo003@0?mo00030000001oOgl0Ogmo02/0oooo000P0?ooo`800000cP3oO`02 000002h0oooo000R0?ooo`030000003oO`00ogl000?mo00D00000 J`3oool00680oooo100000160?mo00@00000L03oool006H0oooo2000000f0?mo00P00000M03oool0 06h0oooo2000000V0?mo00P00000O03oool007H0oooo9P0000240?ooo`00o`3ooolQ0?ooo`00o`3o oolQ0?ooo`00o`3ooolQ0?ooo`00o`3ooolQ0?ooo`00\ \>"], ImageRangeCache->{{{0, 287}, {176.938, 0}} -> {-0.527617, -0.576255, \ 0.00385099, 0.00623104}}], Cell[BoxData[ TagBox[\(\[SkeletonIndicator] Graphics \[SkeletonIndicator]\), False, Editable->False]], "Output"] }, Open ]] }, Open ]] }, FrontEndVersion->"5.2 for Microsoft Windows", ScreenRectangle->{{0, 1600}, {0, 1113}}, WindowSize->{1191, 987}, WindowMargins->{{0, Automatic}, {Automatic, 0}} ] (******************************************************************* 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[1754, 51, 56, 3, 56, "Subsection"], Cell[CellGroupData[{ Cell[1835, 58, 57, 0, 73, "Section"], Cell[CellGroupData[{ Cell[1917, 62, 1538, 28, 250, "Input"], Cell[3458, 92, 14137, 285, 186, 2051, 131, "GraphicsData", "PostScript", \ "Graphics"] }, Open ]], Cell[CellGroupData[{ Cell[17632, 382, 1904, 33, 390, "Input"], Cell[19539, 417, 14875, 331, 186, 2733, 177, "GraphicsData", "PostScript", \ "Graphics"] }, Open ]], Cell[34429, 751, 158, 2, 50, "Input"], Cell[CellGroupData[{ Cell[34612, 757, 692, 12, 210, "Input"], Cell[35307, 771, 13405, 216, 186, 854, 57, "GraphicsData", "PostScript", \ "Graphics"] }, Open ]], Cell[CellGroupData[{ Cell[48749, 992, 644, 12, 190, "Input"], Cell[49396, 1006, 11435, 190, 186, 939, 56, "GraphicsData", "PostScript", \ "Graphics"], Cell[60834, 1198, 130, 3, 29, "Output"] }, Open ]] }, Open ]] } ] *) (******************************************************************* End of Mathematica Notebook file. *******************************************************************)