(************** 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[ 45332, 1344]*) (*NotebookOutlinePosition[ 299311, 10184]*) (* CellTagsIndexPosition[ 299195, 10177]*) (*WindowFrame->Normal*) Notebook[{ Cell[TextData[Cell[BoxData[GridBox[{ { ButtonBox[ StyleBox["\[FirstPage]", "SR"], ButtonFunction:>FrontEndExecute[ { FrontEndToken[ FrontEnd`SelectedNotebook[ ], "ScrollPageFirst"]}], ButtonStyle->"SlideHyperlink", ButtonNote->"First Slide"], ButtonBox[ StyleBox["\[LeftPointer]", "SR"], ButtonFunction:>FrontEndExecute[ { FrontEndToken[ FrontEnd`SelectedNotebook[ ], "ScrollPagePrevious"]}], ButtonStyle->"SlideHyperlink", ButtonNote->"Previous Slide"], ButtonBox[ StyleBox["\[RightPointer]", "SR"], ButtonFunction:>FrontEndExecute[ { FrontEndToken[ FrontEnd`SelectedNotebook[ ], "ScrollPageNext"]}], ButtonStyle->"SlideHyperlink", ButtonNote->"Next Slide"], ButtonBox[ StyleBox["\[LastPage]", "SR"], ButtonFunction:>FrontEndExecute[ { FrontEndToken[ FrontEnd`SelectedNotebook[ ], "ScrollPageLast"]}], ButtonStyle->"SlideHyperlink"], " ", ButtonBox[ StyleBox[ RowBox[{ CounterBox["SlideShowNavigationBar"], \(\(\ \)\(of\)\(\ \)\), CounterBox["SlideShowNavigationBar", {None, "SlideShowHeader", -1}]}], "SR"], ButtonFrame->"None"]} }]]]], "SlideShowNavigationBar", CellTags->"SlideShowHeader"], Cell[CellGroupData[{ Cell["Initializations", "Section"], Cell[CellGroupData[{ Cell["Spelling", "SubsectionIcon"], Cell[TextData[{ "Turn off some annoying warning messages that might otherwise appear about \ similarly-named objects. (If you want to see these messages so as to be sure \ to avoid harm, evaluate expressions like the ones below but replace ", StyleBox["Off", FontFamily->"Courier"], " there by ", StyleBox["On", FontFamily->"Courier"], ".)" }], "Text"], Cell[BoxData[{ \(Off[General::spell]\), "\[IndentingNewLine]", \(Off[General::spell1]\)}], "Input", CellLabel->"In[8]:=", InitializationCell->True] }, Closed]], Cell[CellGroupData[{ Cell["Notations ", "SubsectionIcon"], Cell[BoxData[ \(Needs["\"]\)], "Input", CellLabel->"In[1]:=", InitializationCell->True], Cell[BoxData[ RowBox[{"Notation", "[", RowBox[{ TagBox[\(X_\ \[Intersection] \ Y_\), NotationBoxTag, TagStyle->"NotationTemplateStyle"], " ", "\[DoubleLongLeftRightArrow]", " ", TagBox[\(Intersection[X_, \ Y_]\), NotationBoxTag, TagStyle->"NotationTemplateStyle"]}], "]"}]], "Input", CellLabel->"In[2]:=", InitializationCell->True], Cell[BoxData[ RowBox[{"Notation", "[", RowBox[{ TagBox[\(a_\ mod\ b_\), NotationBoxTag, TagStyle->"NotationTemplateStyle"], " ", "\[DoubleLongLeftRightArrow]", " ", TagBox[\(Mod[a_, \ b_]\), NotationBoxTag, TagStyle->"NotationTemplateStyle"]}], "]"}]], "Input", CellLabel->"In[3]:=", InitializationCell->True] }, Closed]], Cell[CellGroupData[{ Cell["Standard add-on package Combinatorica", "SubsectionIcon"], Cell[BoxData[ \(Needs["\"]\)], "Input", CellLabel->"In[4]:=", InitializationCell->True] }, Closed]], Cell[CellGroupData[{ Cell["David Park's ComplexAnalysis application packages", "SubsectionIcon"], Cell["Load David Park's ComplexAnalysis application packages:", "Text"], Cell[BoxData[{ \(Needs["\"]\), "\[IndentingNewLine]", \(Needs["\"]\), "\[IndentingNewLine]", \ \(Needs["\"]\)}], "Input", CellLabel->"In[5]:=", InitializationCell->True], Cell[TextData[{ "Define the ", StyleBox["ComplexGraphics", FontFamily->"Courier"], " primitive function ", StyleBox["ComplexCurve", FontFamily->"Courier"], ":" }], "Text"], Cell[BoxData[{ \(\(ComplexCurve::usage\ = \ "\";\)\), "\[IndentingNewLine]", \(ComplexCurve[expr_, \ {t_, \ tmin_, \ tmax_}, \ opts___?OptionQ]\ := \ First\ @\ DontShow[ ParametricPlot[ Evaluate\ @\ Simplify[coord[\ expr], \ t\ \[Element] \ Reals], \ {t, \ tmin, \ tmax}, \ opts]]\)}], "Input", CellLabel->"In[10]:=", InitializationCell->True] }, Closed]] }, Closed]], Cell[CellGroupData[{ Cell[TextData[Cell[BoxData[GridBox[{ { ButtonBox[ StyleBox["\[FirstPage]", "SR"], ButtonFunction:>FrontEndExecute[ { FrontEndToken[ FrontEnd`SelectedNotebook[ ], "ScrollPageFirst"]}], ButtonStyle->"SlideHyperlink", ButtonNote->"First Slide"], ButtonBox[ StyleBox["\[LeftPointer]", "SR"], ButtonFunction:>FrontEndExecute[ { FrontEndToken[ FrontEnd`SelectedNotebook[ ], "ScrollPagePrevious"]}], ButtonStyle->"SlideHyperlink", ButtonNote->"Previous Slide"], ButtonBox[ StyleBox["\[RightPointer]", "SR"], ButtonFunction:>FrontEndExecute[ { FrontEndToken[ FrontEnd`SelectedNotebook[ ], "ScrollPageNext"]}], ButtonStyle->"SlideHyperlink", ButtonNote->"Next Slide"], ButtonBox[ StyleBox["\[LastPage]", "SR"], ButtonFunction:>FrontEndExecute[ { FrontEndToken[ FrontEnd`SelectedNotebook[ ], "ScrollPageLast"]}], ButtonStyle->"SlideHyperlink", ButtonNote->"Last Slide"], " ", ButtonBox[ StyleBox[ RowBox[{ CounterBox["SlideShowNavigationBar"], \(\(\ \)\(of\)\(\ \)\), CounterBox["SlideShowNavigationBar", {None, "SlideShowHeader", -1}]}], "SR"], ButtonFrame->"None"]} }]]]], "SlideShowNavigationBar", CellTags->"SlideShowHeader"], Cell[TextData[{ "Computer Technology in Undergraduate Mathematics\n\n", StyleBox["20 November 2003", FontWeight->"Plain", FontSlant->"Italic"] }], "Subsection", TextAlignment->Center, TextJustification->0] }, Closed]], Cell[CellGroupData[{ Cell[TextData[{ StyleBox["Mathematica", FontSlant->"Italic"], " in Complex Analysis and Discrete Structures: Some examples" }], "Section", TextAlignment->Center, TextJustification->0], Cell[TextData[{ "Murray Eisenberg\nUniversity of Massachusetts/Amherst", StyleBox["\n", FontWeight->"Plain"], StyleBox["murray@math.umass.edu\n\n", FontWeight->"Plain", FontSlant->"Italic"], ButtonBox["http://www.math.umass.edu/~murray", ButtonData:>{ URL[ "http://www.math.umass.edu/~murray"], None}, ButtonStyle->"Hyperlink"], StyleBox["\n\n\n\n\n\n\n\n\n", FontWeight->"Plain", FontSlant->"Italic"], StyleBox["Copyright \[Copyright] 2003 by Murray Eisenberg. All rights \ reserved.", FontSize->8] }], "Subsection", TextAlignment->Center, TextJustification->0] }, Open ]], Cell[TextData[Cell[BoxData[GridBox[{ { ButtonBox[ StyleBox["\[FirstPage]", "SR"], ButtonFunction:>FrontEndExecute[ { FrontEndToken[ FrontEnd`SelectedNotebook[ ], "ScrollPageFirst"]}], ButtonStyle->"SlideHyperlink", ButtonNote->"First Slide"], ButtonBox[ StyleBox["\[LeftPointer]", "SR"], ButtonFunction:>FrontEndExecute[ { FrontEndToken[ FrontEnd`SelectedNotebook[ ], "ScrollPagePrevious"]}], ButtonStyle->"SlideHyperlink", ButtonNote->"Previous Slide"], ButtonBox[ StyleBox["\[RightPointer]", "SR"], ButtonFunction:>FrontEndExecute[ { FrontEndToken[ FrontEnd`SelectedNotebook[ ], "ScrollPageNext"]}], ButtonStyle->"SlideHyperlink", ButtonNote->"Next Slide"], ButtonBox[ StyleBox["\[LastPage]", "SR"], ButtonFunction:>FrontEndExecute[ { FrontEndToken[ FrontEnd`SelectedNotebook[ ], "ScrollPageLast"]}], ButtonStyle->"SlideHyperlink", ButtonNote->"Last Slide"], " ", ButtonBox[ StyleBox[ RowBox[{ CounterBox["SlideShowNavigationBar"], \(\(\ \)\(of\)\(\ \)\), CounterBox["SlideShowNavigationBar", {None, "SlideShowHeader", -1}]}], "SR"], ButtonFrame->"None"]} }]]]], "SlideShowNavigationBar", CellTags->"SlideShowHeader"], Cell[CellGroupData[{ Cell["Discrete structures: greatest common divisor", "Section"], Cell[TextData[{ StyleBox["Problem", FontWeight->"Bold"], ": Find gcd(144375, 21175)." }], "Text", CellFrame->True, Background->GrayLevel[0.833326]], Cell[CellGroupData[{ Cell["Built-in function", "SubsectionIcon"], Cell[BoxData[ \(GCD[144375, 21175]\)], "Input", CellLabel->"In[11]:="] }, Closed]], Cell[CellGroupData[{ Cell["Definition", "SubsectionIcon"], Cell[BoxData[{ \({Divisors[144375], Divisors[21175]}\), "\n", \(\((Divisors[144375])\) \[Intersection] \((Divisors[21175])\)\), "\n", \(Max[\((Divisors[144375])\) \[Intersection] \((Divisors[ 21175])\)]\)}], "Input", CellLabel->"In[50]:="], Cell[BoxData[{ \(FTAa\ = \ FactorInteger[144375]\), "\[IndentingNewLine]", \(FTAb\ = \ FactorInteger[21175]\)}], "Input", CellLabel->"In[53]:="], Cell[BoxData[ \(5\^2\ 7\^1\ 11\^1\)], "Input", CellLabel->"In[55]:="] }, Closed]], Cell[CellGroupData[{ Cell["Euclidean algorithm", "SubsectionIcon"], Cell[TextData[{ "\t", Cell[BoxData[{ \(TraditionalForm\`gcd(a, \ 0)\ = \ a\), "\[IndentingNewLine]", \(TraditionalForm\`gcd(a, \ b)\ = \ gcd(b, \ a\ mod\ b)\)}]] }], "Text", CellFrame->True, ParagraphSpacing->{0.5, 12}, FontWeight->"Bold", Background->GrayLevel[0.833326]], Cell[BoxData[ \({q = Quotient[144375, 21175], \ r0 = 144375\ ~Mod~21175}\)], "Input", CellLabel->"In[44]:="], Cell[BoxData[ \({q1 = Quotient[21175, r0], \ r1 = 21175\ ~Mod~\ r0}\)], "Input", CellLabel->"In[45]:="], Cell[BoxData[ \({q2 = Quotient[r0, r1], r2 = \ r0~Mod~\ r1}\)], "Input", CellLabel->"In[46]:="], Cell[BoxData[ \({q3 = Quotient[r1, r2], r3 = r1\ ~Mod~\ r2}\)], "Input", CellLabel->"In[48]:="] }, Closed]], Cell[CellGroupData[{ Cell["Procedural", "SubsectionIcon"], Cell[BoxData[ \(gcdProgram[a_, \ b_]\ := \ \[IndentingNewLine]If[ b\ \[Equal] \ 0\ && \ a\ \[NotEqual] \ 0, \ (*\ then\ *) \ a, \[IndentingNewLine] (*\ else\ *) \ gcdProgram[b, \ a\ ~Mod~\ b]\[IndentingNewLine]]\)], "Input", CellLabel->"In[12]:="], Cell[BoxData[ \(gcdProgram[144375, \ 21175]\)], "Input", CellLabel->"In[13]:="] }, Closed]], Cell[CellGroupData[{ Cell["Recursive definition", "SubsectionIcon"], Cell[TextData[{ "The mathematical version of Euclidean algorithm:\n\t", Cell[BoxData[{ \(TraditionalForm\`gcd(a, \ 0)\ = \ a\), "\[IndentingNewLine]", \(TraditionalForm\`gcd(a, \ b)\ = \ gcd(b, \ a\ mod\ b)\)}]] }], "Text", ParagraphSpacing->{0.5, 0}], Cell[TextData[{ "A ", StyleBox["Mathematica", FontSlant->"Italic"], " implementation:" }], "Text"], Cell[BoxData[{ \(gcd[a_, \ 0]\ := \ a\), "\[IndentingNewLine]", \(gcd[a_, \ b_]\ := \ gcd[b, \ a\ mod\ b]\)}], "Input", CellLabel->"In[56]:="], Cell[BoxData[ \(gcd[144375, 21175]\)], "Input", CellLabel->"In[60]:="] }, Closed]] }, Open ]], Cell[TextData[Cell[BoxData[GridBox[{ { ButtonBox[ StyleBox["\[FirstPage]", "SR"], ButtonFunction:>FrontEndExecute[ { FrontEndToken[ FrontEnd`SelectedNotebook[ ], "ScrollPageFirst"]}], ButtonStyle->"SlideHyperlink", ButtonNote->"First Slide"], ButtonBox[ StyleBox["\[LeftPointer]", "SR"], ButtonFunction:>FrontEndExecute[ { FrontEndToken[ FrontEnd`SelectedNotebook[ ], "ScrollPagePrevious"]}], ButtonStyle->"SlideHyperlink", ButtonNote->"Previous Slide"], ButtonBox[ StyleBox["\[RightPointer]", "SR"], ButtonFunction:>FrontEndExecute[ { FrontEndToken[ FrontEnd`SelectedNotebook[ ], "ScrollPageNext"]}], ButtonStyle->"SlideHyperlink", ButtonNote->"Next Slide"], ButtonBox[ StyleBox["\[LastPage]", "SR"], ButtonFunction:>FrontEndExecute[ { FrontEndToken[ FrontEnd`SelectedNotebook[ ], "ScrollPageLast"]}], ButtonStyle->"SlideHyperlink", ButtonNote->"Last Slide"], " ", ButtonBox[ StyleBox[ RowBox[{ CounterBox["SlideShowNavigationBar"], \(\(\ \)\(of\)\(\ \)\), CounterBox["SlideShowNavigationBar", {None, "SlideShowHeader", -1}]}], "SR"], ButtonFrame->"None"]} }]]]], "SlideShowNavigationBar", CellTags->"SlideShowHeader"], Cell[CellGroupData[{ Cell["Complex analyis: the 6th roots of unity", "Section", CellTags->"LastSlide"], Cell[CellGroupData[{ Cell[TextData[{ "Solve ", StyleBox[" ", FontWeight->"Plain", FontSlant->"Plain"], Cell[BoxData[ \(TraditionalForm\`z\^6\ = \ 1\)]] }], "SubsectionIcon"], Cell[BoxData[ \(Solve[z\^6\ \[Equal] \ 1, \ z]\)], "Input"], Cell[BoxData[ \(ComplexExpand[z\ /. \ Solve[z\^6\ \[Equal] \ 1, \ z]]\)], "Input", CellLabel->"In[188]:="] }, Closed]], Cell[CellGroupData[{ Cell["Calculate using polar form", "SubsectionIcon"], Cell[BoxData[ \(roots6\ = \ ComplexExpand\ /@ \ Exp[\(\(2 \[Pi]\)\/6\) Range[0, \ 5] \[ImaginaryI]]\)], "Input", CellLabel->"In[39]:="], Cell[CellGroupData[{ Cell["Calculate as powers of primitive 6th root of unity", "SubsubsectionIcon"], Cell[BoxData[{ \(\(\[Omega]\_1\ = \ \ ComplexExpand[ Exp[\(2 \[Pi]\)\/6\ \[ImaginaryI]]];\)\), "\n", \(\[Omega]\_k_\ := \ ComplexExpand[\[Omega]\_1\^k]\), "\n", \(roots6\ = \ Table[\[Omega]\_k, \ {k, \ 0, \ 5}]\)}], "Input", CellLabel->"In[40]:="] }, Closed]] }, Closed]], Cell[CellGroupData[{ Cell["Visualize", "SubsectionIcon"], Cell[BoxData[ \(\(ComplexGraphics[\[IndentingNewLine]{\[IndentingNewLine]Cobalt, \ Thickness[0.01], \ \[IndentingNewLine]ComplexLine[ Append[roots6, \ First\ @\ roots6]], \[IndentingNewLine]ForestGreen, \ ComplexCircle[0, \ 1], \ \[IndentingNewLine]Red, \ PointSize[0.04], \ \[IndentingNewLine]ComplexPoint\ /@ \ roots6\[IndentingNewLine]}, \[IndentingNewLine]ImageSize\ \ \[Rule] \ 3\ \[Times]\ 72];\)\)], "Input", CellLabel->"In[56]:="] }, Closed]] }, Open ]], Cell[TextData[Cell[BoxData[GridBox[{ { ButtonBox[ StyleBox["\[FirstPage]", "SR"], ButtonFunction:>FrontEndExecute[ { FrontEndToken[ FrontEnd`SelectedNotebook[ ], "ScrollPageFirst"]}], ButtonStyle->"SlideHyperlink", ButtonNote->"First Slide"], ButtonBox[ StyleBox["\[LeftPointer]", "SR"], ButtonFunction:>FrontEndExecute[ { FrontEndToken[ FrontEnd`SelectedNotebook[ ], "ScrollPagePrevious"]}], ButtonStyle->"SlideHyperlink", ButtonNote->"Previous Slide"], ButtonBox[ StyleBox["\[RightPointer]", "SR"], ButtonFunction:>FrontEndExecute[ { FrontEndToken[ FrontEnd`SelectedNotebook[ ], "ScrollPageNext"]}], ButtonStyle->"SlideHyperlink", ButtonNote->"Next Slide"], ButtonBox[ StyleBox["\[LastPage]", "SR"], ButtonFunction:>FrontEndExecute[ { FrontEndToken[ FrontEnd`SelectedNotebook[ ], "ScrollPageLast"]}], ButtonStyle->"SlideHyperlink"], " ", ButtonBox[ StyleBox[ RowBox[{ CounterBox["SlideShowNavigationBar"], \(\(\ \)\(of\)\(\ \)\), CounterBox["SlideShowNavigationBar", {None, "SlideShowHeader", -1}]}], "SR"], ButtonFrame->"None"]} }]]]], "SlideShowNavigationBar", CellTags->"SlideShowHeader"], Cell[CellGroupData[{ Cell[TextData[{ "Visualize mapping ", Cell[BoxData[ FormBox[Cell[TextData[Cell[BoxData[ \(TraditionalForm\`sin\ : \ \[DoubleStruckCapitalC]\ \[Rule] \ \ \[DoubleStruckCapitalC]\)]]]], TraditionalForm]]] }], "Section"], Cell[BoxData[ \(f[z_]\ := \ Sin[z]\)], "Input", CellLabel->"In[150]:="], Cell[CellGroupData[{ Cell["Image of a grid", "SubsectionIcon"], Cell[BoxData[{ \(\(grids = {{{MediumBlue}, {\(-\[Pi]\), \ \[Pi], \ 12}, {\(-\[Pi]\), \ \[Pi], 0}}, {{VenetianRed}, {\(-\[Pi]\)\ , \[Pi], \ 0}, {\(-\[Pi]\), \ \[Pi], 12}}};\)\), "\[IndentingNewLine]", \(\(TwoPanelPlot[\[IndentingNewLine]{{# &}, \ CartesianGrid, \ {0, \ \[Pi]}, \ {grids}, \ \ {}}, \ \[IndentingNewLine]{{f[#] &}, \ CartesianGrid, \ {0, \ 4}, \ {grids}, \ {}}, \[IndentingNewLine]\ ImageSize\ \[Rule] \ 6*72];\)\)}], "Input", CellLabel->"In[76]:="] }, Closed]], Cell[CellGroupData[{ Cell["Image of horizontal line?", "SubsectionIcon"], Cell[BoxData[{\(horizontal\ = \ {CobaltGreen, \ Thickness[0.012], \ ComplexCurve[\((1\ - \ s)\) \((\(-\[Pi]\)\ \ + \ \[Pi]\/4\ \[ImaginaryI])\)\ + \ \ s \((\[Pi]\ + \ \[Pi]\/4\ \[ImaginaryI])\), \ {s, \ 0, \ 1}]};\), "\[IndentingNewLine]", \(pts\ = \ {PointSize[0.04], \ Sepia, \ ComplexPoint[\(-\(\[Pi]\/2\)\)\ \ + \ \[Pi]\/4\ \[ImaginaryI]], \ GeraniumLake, \ ComplexPoint[\(\[Pi]\/4\) \[ImaginaryI]], \ CadmiumOrange, \ ComplexPoint[\ \[Pi]\/2\ + \ \[Pi]\/4\ \[ImaginaryI]]};\), "\n", \ \(grid\ = \ {{{LightBlue}, \ \ {\(-\[Pi]\), \ \[Pi], \ 12}, \ {\(-\[Pi]\), \ \[Pi], \ 12}}};\), "\n", RowBox[{ RowBox[{"TwoPanelPlot", "[", "\[IndentingNewLine]", RowBox[{\({{# &}, \ CartesianGrid, \ {0, \ \[Pi]}, \ {grid}, \ \ {horizontal, \ pts}}\), ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{ StyleBox["f", FontColor->RGBColor[1, 0, 0]], "[", "#", "]"}], "&"}], "}"}], ",", " ", "CartesianGrid", ",", " ", \({0, \ 4}\), ",", " ", \({grid}\), ",", " ", \({horizontal, \ pts}\)}], "}"}], ",", "\[IndentingNewLine]", " ", \(ImageSize\ \[Rule] \ 6*72\)}], "]"}], ";"}]}], "Input", CellLabel->"In[155]:="] }, Closed]] }, Open ]], Cell[TextData[Cell[BoxData[GridBox[{ { ButtonBox[ StyleBox["\[FirstPage]", "SR"], ButtonFunction:>FrontEndExecute[ { FrontEndToken[ FrontEnd`SelectedNotebook[ ], "ScrollPageFirst"]}], ButtonStyle->"SlideHyperlink", ButtonNote->"First Slide"], ButtonBox[ StyleBox["\[LeftPointer]", "SR"], ButtonFunction:>FrontEndExecute[ { FrontEndToken[ FrontEnd`SelectedNotebook[ ], "ScrollPagePrevious"]}], ButtonStyle->"SlideHyperlink", ButtonNote->"Previous Slide"], ButtonBox[ StyleBox["\[RightPointer]", "SR"], ButtonFunction:>FrontEndExecute[ { FrontEndToken[ FrontEnd`SelectedNotebook[ ], "ScrollPageNext"]}], ButtonStyle->"SlideHyperlink", ButtonNote->"Next Slide"], ButtonBox[ StyleBox["\[LastPage]", "SR"], ButtonFunction:>FrontEndExecute[ { FrontEndToken[ FrontEnd`SelectedNotebook[ ], "ScrollPageLast"]}], ButtonStyle->"SlideHyperlink"], " ", ButtonBox[ StyleBox[ RowBox[{ CounterBox["SlideShowNavigationBar"], \(\(\ \)\(of\)\(\ \)\), CounterBox["SlideShowNavigationBar", {None, "SlideShowHeader", -1}]}], "SR"], ButtonFrame->"None"]} }]]]], "SlideShowNavigationBar", CellTags->"SlideShowHeader"], Cell[CellGroupData[{ Cell["The Riemann sphere", "Section"], Cell[CellGroupData[{ Cell["A quarter-circular wedge", "SubsectionIcon"], Cell[BoxData[{ \(\(grid = \[IndentingNewLine]{{{RoyalBlue}, \ {0. , 1, 10}, \ {0. , \[Pi]/2, 16}}, \[IndentingNewLine]{{IndianRed}, \ {1, 2. , 10}, \ {0. , \[Pi]/2, 16}}};\)\), "\[IndentingNewLine]", \(\(\(gridmap = First[PolarGrid[{# &}, {0, 8}, {grid}]] // FineGrainLines[0.02, 8];\)\(\[IndentingNewLine]\) \)\), "\[IndentingNewLine]", \(\(\(northPole\ = \ {CadmiumLemon, \ PointSize[0.03], \ Point[{0, \ 0, \ 1}]};\)\(\[IndentingNewLine]\) \)\), "\[IndentingNewLine]", \(\(origin\ = \ {CadmiumOrange, \ PointSize[0.02], \ ComplexPoint[0]};\)\), "\[IndentingNewLine]", \(\(xAxis\ = \ {CadmiumLemon, \ Thickness[0.01], \ ComplexLine[{0, \ 2}]\ // \ FineGrainLines[0.2, \ 8]};\)\), "\[IndentingNewLine]", \(\(\(quarterCircle\ = \ {Purple, \ Thickness[0.01], \ ComplexCurve[ Exp[\[Theta]\ I], \ {\[Theta], \ 0, \ \[Pi]/2}]}\ ;\)\(\[IndentingNewLine]\) \)\), "\[IndentingNewLine]", \(\(TwoPanelPlot[\[IndentingNewLine]{\[IndentingNewLine]{# &}, PolarGrid, {0, 3}, {grid}, \ {origin, \ xAxis, quarterCircle}\[IndentingNewLine]}, \[IndentingNewLine]{\ \[IndentingNewLine]{# &}, \[IndentingNewLine]RiemannSphere, \ \[IndentingNewLine]{0, 1}, \[IndentingNewLine]{\(ColoredRiemannSphere[]\)[], {gridmap}}, \ {{northPole}, \ {{origin, \ xAxis, \ quarterCircle}\ // \ ComplexPlaneToRiemann}}, \[IndentingNewLine]{ViewPoint \ \[Rule] \ {2.486, \ 1.127, \ 1.5}}\[IndentingNewLine]}, \[IndentingNewLine]ImageSize \ \[Rule] 7*72];\)\)}], "Input", CellLabel->"In[316]:="] }, Closed]] }, Open ]], Cell[TextData[Cell[BoxData[GridBox[{ { ButtonBox[ StyleBox["\[FirstPage]", "SR"], ButtonFunction:>FrontEndExecute[ { FrontEndToken[ FrontEnd`SelectedNotebook[ ], "ScrollPageFirst"]}], ButtonStyle->"SlideHyperlink", ButtonNote->"First Slide"], ButtonBox[ StyleBox["\[LeftPointer]", "SR"], ButtonFunction:>FrontEndExecute[ { FrontEndToken[ FrontEnd`SelectedNotebook[ ], "ScrollPagePrevious"]}], ButtonStyle->"SlideHyperlink", ButtonNote->"Previous Slide"], ButtonBox[ StyleBox["\[RightPointer]", "SR"], ButtonFunction:>FrontEndExecute[ { FrontEndToken[ FrontEnd`SelectedNotebook[ ], "ScrollPageNext"]}], ButtonStyle->"SlideHyperlink", ButtonNote->"Next Slide"], ButtonBox[ StyleBox["\[LastPage]", "SR"], ButtonFunction:>FrontEndExecute[ { FrontEndToken[ FrontEnd`SelectedNotebook[ ], "ScrollPageLast"]}], ButtonStyle->"SlideHyperlink"], " ", ButtonBox[ StyleBox[ RowBox[{ CounterBox["SlideShowNavigationBar"], \(\(\ \)\(of\)\(\ \)\), CounterBox["SlideShowNavigationBar", {None, "SlideShowHeader", -1}]}], "SR"], ButtonFrame->"None"]} }]]]], "SlideShowNavigationBar", CellTags->"SlideShowHeader"], Cell[CellGroupData[{ Cell[TextData[{ "Visualize reciprocal mapping ", Cell[BoxData[ \(TraditionalForm\`\[DoubleStruckCapitalC]\ \[Rule] \ \ \[DoubleStruckCapitalC]\)]] }], "Section"], Cell[BoxData[ \(f[z_]\ := \ 1\/z\)], "Input", CellLabel->"In[293]:="], Cell[CellGroupData[{ Cell[TextData[{ "Visualize image of circle under ", Cell[BoxData[ \(TraditionalForm\`z\ \[RightTeeArrow] \ 1\/z\)]], " in complex plane ", Cell[BoxData[ \(TraditionalForm\`\[DoubleStruckCapitalC]\)]] }], "SubsectionIcon"], Cell[BoxData[{ \(\(circle\ = \ {Purple, \ Thickness[0.01], \ ComplexCurve[\(-1\)\ + \ \[ImaginaryI] + 2 \[ExponentialE]\^\(\[ImaginaryI]\ \[Theta]\), {\[Theta], 0, 2 \[Pi]}, \ PlotPoints\ \[Rule] \ 100]};\)\), "\n", \(\(center\ = \ {CobaltGreen, \ PointSize[0.025], \ ComplexPoint[\(-1\)\ + \ \[ImaginaryI]]};\)\), \ "\[IndentingNewLine]", \(\(grid\ = \ {{{White}, \ {\(-3.5\), \ 3.5, \ 6}, \ {\(-3.5\), \ \ 3.5, \ \ 6}}};\)\), "\[IndentingNewLine]", \ \(\(TwoPanelPlot[\[IndentingNewLine]{{# &}, \ CartesianGrid, \ {0, \ 3.5}, \ {grid}, \ \ {circle, \ center}}, \[IndentingNewLine]{{f[#] &}, \ CartesianGrid, \ {0, \ 3.5, False}, \ {grid}, \ {circle, \ center}}, \[IndentingNewLine]ImageSize\ \[Rule] \ 7*\ 72];\)\)}], "Input", CellLabel->"In[274]:="] }, Closed]], Cell[CellGroupData[{ Cell["Visualize on Riemann sphere", "SubsectionIcon"], Cell[BoxData[{ \(\(northPole\ = \ {CadmiumLemon, \ PointSize[0.03], \ Point[{0, \ 0, \ 1}]};\)\), "\[IndentingNewLine]", \(\(TwoPanelPlot[\[IndentingNewLine]{\[IndentingNewLine]{# &}, \ \[IndentingNewLine]RiemannSphere, \[IndentingNewLine]{0, 1}, \[IndentingNewLine]{\(ColoredRiemannSphere[]\)[], {circle, \ center}}, \[IndentingNewLine]{{northPole}}, \ \[IndentingNewLine]{ViewPoint -> {2.482, \ 2.124, \ 0.943}}\[IndentingNewLine]}, \[IndentingNewLine]{\ \[IndentingNewLine]{f[#] &}, \[IndentingNewLine]RiemannSphere, \ \[IndentingNewLine]{0, 1}, \[IndentingNewLine]{\(ColoredRiemannSphere[]\)[], {circle, \ center}}, \[IndentingNewLine]{{northPole}}, \ \[IndentingNewLine]{ViewPoint -> {2.482, \ 2.124, \ 0.943}}\[IndentingNewLine]}, \[IndentingNewLine]ImageSize \ \[Rule] 7*72];\)\)}], "Input", CellLabel->"In[278]:="], Cell[CellGroupData[{ Cell["Animate the display", "SubsubsectionIcon"], Cell[BoxData[ \(\(\(TwoPanelAnimation[\[IndentingNewLine]{\[IndentingNewLine]{# &}, \ \[IndentingNewLine]RiemannSphere, rotation, \ \[IndentingNewLine]{0, 1}, \[IndentingNewLine]{\(ColoredRiemannSphere[]\)[], {circle, \ \ center}}, \[IndentingNewLine]{{northPole}}, \[IndentingNewLine]{ViewPoint -> \ {2.482, \ 2.124, \ 0.943}}\[IndentingNewLine]}, \[IndentingNewLine]{\ \[IndentingNewLine]{f[#] &}, \[IndentingNewLine]RiemannSphere, rotation, \ \[IndentingNewLine]{0, 1}, \[IndentingNewLine]{\(ColoredRiemannSphere[]\)[], {circle, \ \ center}}, \[IndentingNewLine]{{northPole}}, \[IndentingNewLine]{ViewPoint -> \ {2.482, \ 2.124, \ 0.943}}\[IndentingNewLine]}, \[IndentingNewLine]ImageSize \ \[Rule] 7*72]\)[24];\)\)], "Input", CellLabel->"In[281]:="] }, Closed]] }, Closed]] }, Open ]], Cell[TextData[Cell[BoxData[GridBox[{ { ButtonBox[ StyleBox["\[FirstPage]", "SR"], ButtonFunction:>FrontEndExecute[ { FrontEndToken[ FrontEnd`SelectedNotebook[ ], "ScrollPageFirst"]}], ButtonStyle->"SlideHyperlink", ButtonNote->"First Slide"], ButtonBox[ StyleBox["\[LeftPointer]", "SR"], ButtonFunction:>FrontEndExecute[ { FrontEndToken[ FrontEnd`SelectedNotebook[ ], "ScrollPagePrevious"]}], ButtonStyle->"SlideHyperlink", ButtonNote->"Previous Slide"], ButtonBox[ StyleBox["\[RightPointer]", "SR"], ButtonFunction:>FrontEndExecute[ { FrontEndToken[ FrontEnd`SelectedNotebook[ ], "ScrollPageNext"]}], ButtonStyle->"SlideHyperlink", ButtonNote->"Next Slide"], ButtonBox[ StyleBox["\[LastPage]", "SR"], ButtonFunction:>FrontEndExecute[ { FrontEndToken[ FrontEnd`SelectedNotebook[ ], "ScrollPageLast"]}], ButtonStyle->"SlideHyperlink"], " ", ButtonBox[ StyleBox[ RowBox[{ CounterBox["SlideShowNavigationBar"], \(\(\ \)\(of\)\(\ \)\), CounterBox["SlideShowNavigationBar", {None, "SlideShowHeader", -1}]}], "SR"], ButtonFrame->"None"]} }]]]], "SlideShowNavigationBar", CellTags->"SlideShowHeader"], Cell[CellGroupData[{ Cell[TextData[{ "Visualize reciprocal mapping ", Cell[BoxData[ \(TraditionalForm\`\[DoubleStruckCapitalC]\ \[Rule] \ \ \[DoubleStruckCapitalC]\)]], ", continued" }], "Section"], Cell[CellGroupData[{ Cell[BoxData[ \(f[z]\)], "Input", CellLabel->"In[294]:="], Cell[BoxData[ \(1\/z\)], "Output", CellLabel->"Out[294]="] }, Closed]], Cell[CellGroupData[{ Cell[TextData[{ "Visualize image of a vertical strip under ", Cell[BoxData[ \(TraditionalForm\`z\ \[RightTeeArrow] \ 1\/z\)]], " in complex plane ", Cell[BoxData[ \(TraditionalForm\`\[DoubleStruckCapitalC]\)]] }], "SubsectionIcon"], Cell[BoxData[{ \(\(grid\ = \ {{{Cerulean}, \ {0.01, \ 0.49, \ 11}, \ {\(-4\), \ 4, \ 55}}};\)\), "\[IndentingNewLine]", \(\(segmentHalf\ = \ {Cobalt, \ Dashing[{0.05, \ 0.03}], \ Thickness[0.01], \ ComplexCurve[\((1\ - \ t)\) \((1\/2\ - \ \[ImaginaryI])\)\ + \ t \((\ 1\/2\ + \ \[ImaginaryI])\), \ {t, \ 0, \ 1}]};\)\ \), "\[IndentingNewLine]", \(\(segmentZero\ = \ {Cobalt, \ Dashing[{0.05, \ 0.03}], \ Thickness[0.0077], \ ComplexCurve[\((1\ - \ t)\) \((\(-\ \[ImaginaryI]\))\)\ + \ t \((\ \[ImaginaryI])\), \ {t, \ 0, \ 1}]};\)\), "\[IndentingNewLine]", \(\(TwoPanelPlot[\[IndentingNewLine]{{# &}, \ CartesianGrid, \ {0, \ 1}, \ {grid}, \ \ {segmentZero, \ segmentHalf}}, \[IndentingNewLine]{{f[#] &}, \ CartesianGrid, \ {0, \ 4, \ False}, \ {grid}, \ {segmentZero, \ segmentHalf}}, \[IndentingNewLine]ImageSize\ \[Rule] \ 7\ *\ 72];\)\)}], "Input", CellLabel->"In[309]:="] }, Closed]], Cell[CellGroupData[{ Cell["Visualize on Riemann sphere", "SubsectionIcon"], Cell[BoxData[{\(gridmap = First[CartesianGrid[{# &}, {0.5, 0.5}, {grid}]] // FineGrainLines[0.02, 8];\), "\[IndentingNewLine]", \(northPole\ = \ {CadmiumLemon, \ PointSize[0.03], \ Point[{0, \ 0, \ 1}]};\), "\[IndentingNewLine]", RowBox[{ RowBox[{"TwoPanelPlot", "[", "\[IndentingNewLine]", RowBox[{\({\[IndentingNewLine]{# &}, \ \[IndentingNewLine]RiemannSphere, \[IndentingNewLine]{0, 1}, \[IndentingNewLine]{\(ColoredRiemannSphere[]\)[], \ {gridmap}}, \[IndentingNewLine]{{northPole}, \ {}}, \ \[IndentingNewLine]{ViewPoint -> {3.260, \ 0.907, \ \(-0.026\)}}\[IndentingNewLine]}\), ",", "\[IndentingNewLine]", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{ StyleBox["f", FontColor->RGBColor[1, 0, 0]], "[", "#", "]"}], "&"}], "}"}], ",", "\[IndentingNewLine]", "RiemannSphere", ",", "\[IndentingNewLine]", \({0, 1}\), ",", "\[IndentingNewLine]", \({\(ColoredRiemannSphere[]\)[], \ {gridmap}}\), ",", "\[IndentingNewLine]", \({{northPole}, \ {}}\), ",", "\[IndentingNewLine]", \({ViewPoint -> {3.260, \ 0.907, \ \(-0.026\)}}\)}], "\[IndentingNewLine]", "}"}], ",", "\[IndentingNewLine]", \(ImageSize \[Rule] 7*72\)}], "]"}], ";"}]}], "Input", CellLabel->"In[313]:="] }, Closed]] }, Open ]], Cell[TextData[Cell[BoxData[GridBox[{ { ButtonBox[ StyleBox["\[FirstPage]", "SR"], ButtonFunction:>FrontEndExecute[ { FrontEndToken[ FrontEnd`SelectedNotebook[ ], "ScrollPageFirst"]}], ButtonStyle->"SlideHyperlink", ButtonNote->"First Slide"], ButtonBox[ StyleBox["\[LeftPointer]", "SR"], ButtonFunction:>FrontEndExecute[ { FrontEndToken[ FrontEnd`SelectedNotebook[ ], "ScrollPagePrevious"]}], ButtonStyle->"SlideHyperlink", ButtonNote->"Previous Slide"], ButtonBox[ StyleBox["\[RightPointer]", "SR"], ButtonFunction:>FrontEndExecute[ { FrontEndToken[ FrontEnd`SelectedNotebook[ ], "ScrollPageNext"]}], ButtonStyle->"SlideHyperlink", ButtonNote->"Next Slide"], ButtonBox[ StyleBox["\[LastPage]", "SR"], ButtonFunction:>FrontEndExecute[ { FrontEndToken[ FrontEnd`SelectedNotebook[ ], "ScrollPageLast"]}], ButtonStyle->"SlideHyperlink"], " ", ButtonBox[ StyleBox[ RowBox[{ CounterBox["SlideShowNavigationBar"], \(\(\ \)\(of\)\(\ \)\), CounterBox["SlideShowNavigationBar", {None, "SlideShowHeader", -1}]}], "SR"], ButtonFrame->"None"]} }]]]], "SlideShowNavigationBar", CellTags->"SlideShowHeader"], Cell[CellGroupData[{ Cell["\<\ Do the Cauchy-Riemann equations suffice for differentiability?\ \>", "Section"], Cell[TextData[{ "If ", Cell[BoxData[ \(TraditionalForm\`f(z)\)]], " is differentiable at ", Cell[BoxData[ \(TraditionalForm\`z\_0\ = \ x\_0\ + \ \[ImaginaryI]\ y\_0\)]], ", then ", Cell[BoxData[ \(TraditionalForm\`u\ = \ Re\ f\)]], " and ", Cell[BoxData[ \(TraditionalForm\`v\ = \ Im\ f\)]], " satisfy the Cauchy-Riemann equations there:\n\t", Cell[BoxData[ \(TraditionalForm\`\[PartialD]\ u\/\[PartialD]x\ = \ \ \(\[PartialD]\ v\/\[PartialD]y\) \((0, \ 0)\)\)]], ", ", Cell[BoxData[ \(TraditionalForm\`\[PartialD]\ u\/\[PartialD]y\ = \ \ \(-\ \(\ \[PartialD]\ v\/\[PartialD]x\)\)\)]], "." }], "Text", ParagraphSpacing->{0.5, 8}], Cell[BoxData[{ \(TraditionalForm\`f(z_)\ := \ z\^5\/\[LeftBracketingBar]z\[RightBracketingBar]\^4\), "\n", \(TraditionalForm\`\(f(0)\ = \ 0;\)\)}], "Input", CellLabel->"In[323]:="], Cell[CellGroupData[{ Cell["Check Cauchy-Riemann equations", "SubsectionIcon"], Cell[BoxData[ \(TraditionalForm\`ComplexCollect( coord(f(x + \[ImaginaryI]\ y)))\)], "Input", CellLabel->"In[352]:="], Cell[BoxData[{ \(TraditionalForm\`u(x_, \ y_)\ := \ First[ComplexCollect(coord(f(x\ + \ \[ImaginaryI]\ y)))]\), "\n", \(TraditionalForm\`v(x_, \ y_)\ := \ Last[ComplexCollect(coord(f(x\ + \ \[ImaginaryI]\ y)))]\), "\n", \(TraditionalForm\`u(0, 0)\ = \ 0; \ v(0, 0)\ = \ 0;\)}], "Input", CellLabel->"In[353]:="], Cell["Caauchy-Riemann equations hold at origin:", "Text"], Cell[BoxData[{ \(TraditionalForm\`{\(u(\[CapitalDelta]x, 0)\ - \ u(0, 0)\)\/\ \[CapitalDelta]x, \ \(v(0, \[CapitalDelta]y)\ - \ v(0, \ 0)\)\/\[CapitalDelta]y}\), "\n", \(TraditionalForm\`{\(u(\[CapitalDelta]x, 0)\ - \ u(0, 0)\)\/\ \[CapitalDelta]x, \ \(v(0, \[CapitalDelta]y)\ - \ v(0, \ 0)\)\/\[CapitalDelta]y}\)}], "Input", CellLabel->"In[350]:="] }, Closed]], Cell[CellGroupData[{ Cell[TextData[{ "Is ", Cell[BoxData[ \(TraditionalForm\`f\)]], " differentiable at origin?" }], "SubsectionIcon"], Cell[BoxData[{ FormBox[ RowBox[{ RowBox[{"Simplify", "[", RowBox[{\(\(f(\[CapitalDelta]x\ + \ 0)\ - \ f(0)\)\/\[CapitalDelta]x\), ",", " ", RowBox[{"\[CapitalDelta]x", " ", "\[Element]", " ", TagBox["\[DoubleStruckCapitalR]", Function[ {}, Reals]]}]}], "]"}], " ", RowBox[{"(*", " ", RowBox[{"along", " ", "line", " ", Cell[TextData[Cell[BoxData[ \(TraditionalForm\`\[CapitalDelta]y\ = \ 0\)]]]]}], " ", "*)"}]}], TraditionalForm], "\n", FormBox[ RowBox[{ RowBox[{"Simplify", "[", RowBox[{\(\(f(\[ImaginaryI]\ \ \[CapitalDelta]x\ + \ \ \[CapitalDelta]x\ + 0) - f(0)\)\/\(\[ImaginaryI]\ \[CapitalDelta]x\ + \ \[CapitalDelta]x\)\), ",", " ", RowBox[{"\[CapitalDelta]x", " ", "\[Element]", " ", TagBox["\[DoubleStruckCapitalR]", Function[ {}, Reals]]}]}], "]"}], " ", RowBox[{"(*", " ", RowBox[{"along", " ", "line", " ", Cell[TextData[Cell[BoxData[ \(TraditionalForm\`\[CapitalDelta]x\ = \ \ \[CapitalDelta]y\)]]]]}], " ", "*)"}]}], TraditionalForm]}], "Input", CellLabel->"In[356]:="] }, Closed]] }, Open ]], Cell[TextData[Cell[BoxData[GridBox[{ { ButtonBox[ StyleBox["\[FirstPage]", "SR"], ButtonFunction:>FrontEndExecute[ { FrontEndToken[ FrontEnd`SelectedNotebook[ ], "ScrollPageFirst"]}], ButtonStyle->"SlideHyperlink", ButtonNote->"First Slide"], ButtonBox[ StyleBox["\[LeftPointer]", "SR"], ButtonFunction:>FrontEndExecute[ { FrontEndToken[ FrontEnd`SelectedNotebook[ ], "ScrollPagePrevious"]}], ButtonStyle->"SlideHyperlink", ButtonNote->"Previous Slide"], ButtonBox[ StyleBox["\[RightPointer]", "SR"], ButtonFunction:>FrontEndExecute[ { FrontEndToken[ FrontEnd`SelectedNotebook[ ], "ScrollPageNext"]}], ButtonStyle->"SlideHyperlink", ButtonNote->"Next Slide"], ButtonBox[ StyleBox["\[LastPage]", "SR"], ButtonFunction:>FrontEndExecute[ { FrontEndToken[ FrontEnd`SelectedNotebook[ ], "ScrollPageLast"]}], ButtonStyle->"SlideHyperlink"], " ", ButtonBox[ StyleBox[ RowBox[{ CounterBox["SlideShowNavigationBar"], \(\(\ \)\(of\)\(\ \)\), CounterBox["SlideShowNavigationBar", {None, "SlideShowHeader", -1}]}], "SR"], ButtonFrame->"None"]} }]]]], "SlideShowNavigationBar", CellTags->"SlideShowHeader"], Cell[CellGroupData[{ Cell["Calculus for Life and Social Sciences: doubling time", "Section"], Cell[TextData[{ "From a Discovery Module used in Math 127\[LongDash]a ", Cell[BoxData[ FormBox[ RowBox[{"web", StyleBox[ AdjustmentBox["Mathematica", BoxMargins->{{-0.175, 0}, {0, 0}}], FontSlant->"Italic"]}], TextForm]]], "application\n", ButtonBox["http://webmath.oit.umass.edu/webmath/index.html", ButtonData:>{ URL[ "http://webmath.oit.umass.edu/webmath/index.html"], None}, ButtonStyle->"Hyperlink"] }], "Text"] }, Open ]], Cell[TextData[Cell[BoxData[GridBox[{ { ButtonBox[ StyleBox["\[FirstPage]", "SR"], ButtonFunction:>FrontEndExecute[ { FrontEndToken[ FrontEnd`SelectedNotebook[ ], "ScrollPageFirst"]}], ButtonStyle->"SlideHyperlink", ButtonNote->"First Slide"], ButtonBox[ StyleBox["\[LeftPointer]", "SR"], ButtonFunction:>FrontEndExecute[ { FrontEndToken[ FrontEnd`SelectedNotebook[ ], "ScrollPagePrevious"]}], ButtonStyle->"SlideHyperlink", ButtonNote->"Previous Slide"], ButtonBox[ StyleBox["\[RightPointer]", "SR"], ButtonFunction:>FrontEndExecute[ { FrontEndToken[ FrontEnd`SelectedNotebook[ ], "ScrollPageNext"]}], ButtonStyle->"SlideHyperlink", ButtonNote->"Next Slide"], ButtonBox[ StyleBox["\[LastPage]", "SR"], ButtonFunction:>FrontEndExecute[ { FrontEndToken[ FrontEnd`SelectedNotebook[ ], "ScrollPageLast"]}], ButtonStyle->"SlideHyperlink"], " ", ButtonBox[ StyleBox[ RowBox[{ CounterBox["SlideShowNavigationBar"], \(\(\ \)\(of\)\(\ \)\), CounterBox["SlideShowNavigationBar", {None, "SlideShowHeader", -1}]}], "SR"], ButtonFrame->"None"]} }]]]], "SlideShowNavigationBar", CellTags->"SlideShowHeader"], Cell[CellGroupData[{ Cell["Web sites", "Section"], Cell[TextData[{ "Math 421, Complex Variables\n", ButtonBox["http://www.math.umass.edu/Courses/Math_421/", ButtonData:>{ URL[ "http://www.math.umass.edu/Courses/Math_421/"], None}, ButtonStyle->"Hyperlink"] }], "Text"], Cell[TextData[{ "Math 455, Discrete Structures\n", ButtonBox["http://www.math.umass.edu/Courses/Math_455_Eisenberg/", ButtonData:>{ URL[ "http://www.math.umass.edu/Courses/Math_455_Eisenberg/"], None}, ButtonStyle->"Hyperlink"] }], "Text"] }, Open ]] }, FrontEndVersion->"5.0 for Microsoft Windows", ScreenRectangle->{{0, 1280}, {0, 979}}, AutoGeneratedPackage->None, ScreenStyleEnvironment->"Brackets", WindowToolbars->{}, InitializationCellEvaluation->True, WindowSize->{903, 741}, WindowMargins->{{Automatic, 171}, {-141, Automatic}}, Visible->True, InputAliases->{"intt"->RowBox[ {"\[Integral]", RowBox[ {"\[SelectionPlaceholder]", RowBox[ {"\[DifferentialD]", "\[Placeholder]"}]}]}], "dintt"->RowBox[ { SubsuperscriptBox[ "\[Integral]", "\[SelectionPlaceholder]", "\[Placeholder]"], RowBox[ {"\[Placeholder]", RowBox[ {"\[DifferentialD]", "\[Placeholder]"}]}]}], "sumt"->RowBox[ { UnderoverscriptBox[ "\[Sum]", RowBox[ {"\[SelectionPlaceholder]", "=", "\[Placeholder]"}], "\[Placeholder]"], "\[Placeholder]"}], "prodt"->RowBox[ { UnderoverscriptBox[ "\[Product]", RowBox[ {"\[SelectionPlaceholder]", "=", "\[Placeholder]"}], "\[Placeholder]"], "\[Placeholder]"}], "dt"->RowBox[ { SubscriptBox[ "\[PartialD]", "\[Placeholder]"], " ", "\[SelectionPlaceholder]"}], "notation"->RowBox[ {"Notation", "[", RowBox[ { TagBox[ "\[Placeholder]", NotationBoxTag, TagStyle -> "NotationTemplateStyle"], " ", "\[DoubleLongLeftRightArrow]", " ", TagBox[ "\[Placeholder]", NotationBoxTag, TagStyle -> "NotationTemplateStyle"]}], "]"}], "notation>"->RowBox[ {"Notation", "[", RowBox[ { TagBox[ "\[Placeholder]", NotationBoxTag, TagStyle -> "NotationTemplateStyle"], " ", "\[DoubleLongRightArrow]", " ", TagBox[ "\[Placeholder]", NotationBoxTag, TagStyle -> "NotationTemplateStyle"]}], "]"}], "notation<"->RowBox[ {"Notation", "[", RowBox[ { TagBox[ "\[Placeholder]", NotationBoxTag, TagStyle -> "NotationTemplateStyle"], " ", "\[DoubleLongLeftArrow]", " ", TagBox[ "\[Placeholder]", NotationBoxTag, TagStyle -> "NotationTemplateStyle"]}], "]"}], "symb"->RowBox[ {"Symbolize", "[", TagBox[ "\[Placeholder]", NotationBoxTag, TagStyle -> "NotationTemplateStyle"], "]"}], "infixnotation"->RowBox[ {"InfixNotation", "[", RowBox[ { TagBox[ "\[Placeholder]", NotationBoxTag, TagStyle -> "NotationTemplateStyle"], ",", "\[Placeholder]"}], "]"}], "addia"->RowBox[ {"AddInputAlias", "[", RowBox[ {"\"\[Placeholder]\"", "\[Rule]", TagBox[ "\[Placeholder]", NotationBoxTag, TagStyle -> "NotationTemplateStyle"]}], "]"}], "pattwraper"->TagBox[ "\[Placeholder]", NotationPatternTag, TagStyle -> "NotationPatternWrapperStyle"], "madeboxeswraper"->TagBox[ "\[Placeholder]", NotationMadeBoxesTag, TagStyle -> "NotationMadeBoxesWrapperStyle"]}, Magnification->1.5, StyleDefinitions -> Notebook[{ Cell[CellGroupData[{ Cell["\<\ Murray's Nov 20 Special Colloquium Style Definitions: minor variant of \ HelpBrowser styles\ \>", "Subtitle"], Cell["\<\ These styles are carefully tuned for all aspects of the online help. It's \ recommended that they remain unchanged.\ \>", "Text"], Cell[CellGroupData[{ Cell["Style Environment Names", "Section"], Cell[StyleData[All, "Working"], PageWidth->WindowWidth, ShowCellBracket->False, CellBracketOptions->{"Color"->RGBColor[0.269993, 0.308507, 0.6]}, ShowAutoStyles->False, ScriptMinSize->9], Cell[StyleData[All, "Brackets"], PageWidth->WindowWidth, ShowCellBracket->True, CellBracketOptions->{"Color"->RGBColor[0.269993, 0.308507, 0.6]}, ShowAutoStyles->False, ScriptMinSize->9], Cell[StyleData[All, "Presentation"], PageWidth->WindowWidth, ShowCellBracket->False, CellBracketOptions->{"Color"->RGBColor[0.269993, 0.308507, 0.6]}, ShowAutoStyles->False, ScriptMinSize->9], Cell[StyleData[All, "SlideShow"], PageWidth->WindowWidth, ScrollingOptions->{"PagewiseDisplay"->True}, ShowCellBracket->False, ScriptMinSize->9], Cell[StyleData[All, "Printout"], PageWidth->PaperWidth, ShowCellBracket->False, ShowAutoStyles->False, ScriptMinSize->5, PrivateFontOptions->{"FontType"->"Outline"}], Cell[StyleData[All, "EnhancedPrintout"], PageWidth->PaperWidth, ShowCellBracket->True, ScriptMinSize->5, FontFamily->"Palatino", PrivateFontOptions->{"FontType"->"Outline"}], Cell[StyleData[All, "EnhancedPrintoutNonGray"], PageWidth->PaperWidth, ShowCellBracket->False, ScriptMinSize->5, FontFamily->"Palatino", PrivateFontOptions->{"FontType"->"Outline"}] }, Open ]], Cell[CellGroupData[{ Cell["Notebook Options", "Section"], Cell["\<\ The options defined for the style below will be used at the Notebook level. \ \ \>", "Text"], Cell[CellGroupData[{ Cell[StyleData["Notebook"], PageHeaders->{{Cell[ TextData[ { CounterBox[ "Page"]}], "PageNumber"], None, Cell[ TextData[ { ValueBox[ "FileName"]}], "Header"]}, {Cell[ TextData[ { ValueBox[ "FileName"]}], "Header"], None, Cell[ TextData[ { CounterBox[ "Page"]}], "PageNumber"]}}, PageHeaderLines->{True, True}, CellLabelAutoDelete->False, CellFrameLabelMargins->6, StyleMenuListing->None], Cell[StyleData["Notebook", "Printout"], PageHeaders->{{Cell[ TextData[ { CounterBox[ "Page"]}], "PageNumber"], None, Cell[ TextData[ { ValueBox[ "FileName"]}], "Header"]}, {Cell[ TextData[ { ValueBox[ "FileName"]}], "Header"], None, Cell[ TextData[ { CounterBox[ "Page"]}], "PageNumber"]}}, PageHeaderLines->{True, True}], Cell[StyleData["Notebook", "EnhancedPrintout"], PageFooters->{{None, None, None}, {None, None, None}}, PageHeaderLines->{True, True}, PageFooterLines->{False, False}, PrintingOptions->{"PrintingMargins"->{{54, 54}, {36, 72}}, "PageSize"->{594, 657}, "PrintRegistrationMarks"->True, "FirstPageHeader"->False, "FacingPages"->True, "FirstPageFace"->Right}] }, Closed]] }, Open ]], Cell[CellGroupData[{ Cell["Headings", "Section"], Cell[CellGroupData[{ Cell[StyleData["Chapter"], CellFrame->{{0, 0}, {0.5, 0}}, CellMargins->{{27, 27}, {10, 40}}, CellGroupingRules->{"TitleGrouping", 0}, PageBreakBelow->False, DefaultNewInlineCellStyle->"None", InputAutoReplacements->{"TeX"->StyleBox[ RowBox[ {"T", AdjustmentBox[ "E", BoxMargins -> {{-.074999999999999997, \ -.085000000000000006}, {0, 0}}, BoxBaselineShift -> .5], "X"}]], "LaTeX"->StyleBox[ RowBox[ {"L", StyleBox[ AdjustmentBox[ "A", BoxMargins -> {{-.35999999999999999, \ -.10000000000000001}, {0, 0}}, BoxBaselineShift -> -.20000000000000001], FontSize -> Smaller], "T", AdjustmentBox[ "E", BoxMargins -> {{-.074999999999999997, \ -.085000000000000006}, {0, 0}}, BoxBaselineShift -> .5], "X"}]], "mma"->"Mathematica", "Mma"->"Mathematica", "MMA"->"Mathematica", "gridMathematica"->FormBox[ RowBox[ {"grid", AdjustmentBox[ StyleBox[ "Mathematica", FontSlant -> "Italic"], BoxMargins -> {{-.17499999999999999, 0}, {0, 0}}]}], TextForm], "webMathematica"->FormBox[ RowBox[ {"web", AdjustmentBox[ StyleBox[ "Mathematica", FontSlant -> "Italic"], BoxMargins -> {{-.17499999999999999, 0}, {0, 0}}]}], TextForm]}, LanguageCategory->"NaturalLanguage", CounterIncrements->"Title", CounterAssignments->{{"Section", 0}, {"Equation", 0}, {"Figure", 0}, { "Subtitle", 0}, {"Subsubtitle", 0}}, FontFamily->"Helvetica", FontSize->24, FontWeight->"Plain", FontColor->RGBColor[0.592157, 0.313726, 0.313726]], Cell[StyleData["Chapter", "Presentation"], FontSize->36], Cell[StyleData["Chapter", "Printout"], CellMargins->{{2, 10}, {6, 30}}, FontSize->24], Cell[StyleData["Chapter", "EnhancedPrintout"], CellMargins->{{2, 10}, {6, 30}}, FontFamily->"Frutiger 55 Roman", FontSize->24, FontColor->GrayLevel[0]], Cell[StyleData["Chapter", "EnhancedPrintoutNonGray"], CellMargins->{{2, 10}, {6, 30}}, FontFamily->"Frutiger 55 Roman", FontSize->24] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["Section"], CellMargins->{{27, 27}, {12, 18}}, CellGroupingRules->{"SectionGrouping", 30}, PageBreakBelow->False, InputAutoReplacements->{"TeX"->StyleBox[ RowBox[ {"T", AdjustmentBox[ "E", BoxMargins -> {{-.074999999999999997, \ -.085000000000000006}, {0, 0}}, BoxBaselineShift -> .5], "X"}]], "LaTeX"->StyleBox[ RowBox[ {"L", StyleBox[ AdjustmentBox[ "A", BoxMargins -> {{-.35999999999999999, \ -.10000000000000001}, {0, 0}}, BoxBaselineShift -> -.20000000000000001], FontSize -> Smaller], "T", AdjustmentBox[ "E", BoxMargins -> {{-.074999999999999997, \ -.085000000000000006}, {0, 0}}, BoxBaselineShift -> .5], "X"}]], "mma"->"Mathematica", "Mma"->"Mathematica", "MMA"->"Mathematica", "gridMathematica"->FormBox[ RowBox[ {"grid", AdjustmentBox[ StyleBox[ "Mathematica", FontSlant -> "Italic"], BoxMargins -> {{-.17499999999999999, 0}, {0, 0}}]}], TextForm], "webMathematica"->FormBox[ RowBox[ {"web", AdjustmentBox[ StyleBox[ "Mathematica", FontSlant -> "Italic"], BoxMargins -> {{-.17499999999999999, 0}, {0, 0}}]}], TextForm]}, CounterIncrements->"Section", FontFamily->"Helvetica", FontSize->20, FontWeight->"Bold", FontColor->RGBColor[0.592157, 0.313726, 0.313726]], Cell[StyleData["Section", "Presentation"], FontSize->30], Cell[StyleData["Section", "SlideShow"], CellFrame->{{0, 0}, {0, 0.5}}, ShowCellBracket->False, CellMargins->{{0, 0}, {5, 0}}, PageBreakBelow->False, CellFrameMargins->{{36, 36}, {Inherited, 15}}, FontFamily->"Helvetica", FontSize->18, FontWeight->"Bold", FontColor->GrayLevel[1], Background->RGBColor[0.408011, 0.440726, 0.8]], Cell[StyleData["Section", "Printout"], CellMargins->{{2, 0}, {0, 18}}, PageBreakBelow->False, FontSize->18], Cell[StyleData["Section", "EnhancedPrintout"], CellFrame->{{0, 0}, {0.5, 0}}, CellMargins->{{2, 2}, {5, 30}}, CellGroupingRules->{"SectionGrouping", 30}, PageBreakBelow->False, CellFrameMargins->8, CounterIncrements->"Section", CounterAssignments->{{"Subsection", 0}, {"Subsubsection", 0}}, FontFamily->"Frutiger 65 Bold", FontSize->16, FontWeight->"Plain", FontColor->GrayLevel[0]], Cell[StyleData["Section", "EnhancedPrintoutNonGray"], CellFrame->{{0, 0}, {0.5, 0}}, CellMargins->{{2, Inherited}, {5, 30}}, CellGroupingRules->{"SectionGrouping", 30}, PageBreakBelow->False, CellFrameMargins->8, CounterIncrements->"Section", CounterAssignments->{{"Subsection", 0}, {"Subsubsection", 0}}, FontFamily->"Frutiger 65 Bold", FontSize->16, FontWeight->"Plain"] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["Subsection"], CellDingbat->None, CellMargins->{{27, 27}, {0, 18}}, CellElementSpacings->{"ClosedGroupTopMargin"->18}, CellGroupingRules->{"SectionGrouping", 40}, PageBreakBelow->False, CellFrameLabelMargins->6, InputAutoReplacements->{"TeX"->StyleBox[ RowBox[ {"T", AdjustmentBox[ "E", BoxMargins -> {{-.074999999999999997, \ -.085000000000000006}, {0, 0}}, BoxBaselineShift -> .5], "X"}]], "LaTeX"->StyleBox[ RowBox[ {"L", StyleBox[ AdjustmentBox[ "A", BoxMargins -> {{-.35999999999999999, \ -.10000000000000001}, {0, 0}}, BoxBaselineShift -> -.20000000000000001], FontSize -> Smaller], "T", AdjustmentBox[ "E", BoxMargins -> {{-.074999999999999997, \ -.085000000000000006}, {0, 0}}, BoxBaselineShift -> .5], "X"}]], "mma"->"Mathematica", "Mma"->"Mathematica", "MMA"->"Mathematica", "gridMathematica"->FormBox[ RowBox[ {"grid", AdjustmentBox[ StyleBox[ "Mathematica", FontSlant -> "Italic"], BoxMargins -> {{-.17499999999999999, 0}, {0, 0}}]}], TextForm], "webMathematica"->FormBox[ RowBox[ {"web", AdjustmentBox[ StyleBox[ "Mathematica", FontSlant -> "Italic"], BoxMargins -> {{-.17499999999999999, 0}, {0, 0}}]}], TextForm]}, FontFamily->"Helvetica", FontSize->16, FontWeight->"Bold", FontColor->RGBColor[0.592157, 0.313726, 0.313726]], Cell[StyleData["Subsection", "Presentation"], FontSize->24], Cell[StyleData["Subsection", "SlideShow"], CellDingbat->None, CellMargins->{{70, 0}, {4, 12}}, FontSize->12], Cell[StyleData["Subsection", "Printout"], CellMargins->{{2, 0}, {5, 24}}, FontSize->12], Cell[StyleData["Subsection", "EnhancedPrintout"], CellMargins->{{2, 0}, {5, 20}}, FontFamily->"Frutiger 65 Bold", FontSize->12, FontWeight->"Plain", FontColor->GrayLevel[0]], Cell[StyleData["Subsection", "EnhancedPrintoutNonGray"], CellMargins->{{9, 0}, {5, 20}}, FontFamily->"Frutiger 65 Bold", FontSize->12, FontWeight->"Plain"] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["Subsubsection"], CellMargins->{{27, 27}, {0, 18}}, CellElementSpacings->{"ClosedGroupTopMargin"->18}, CellGroupingRules->{"SectionGrouping", 50}, PageBreakBelow->False, InputAutoReplacements->{"TeX"->StyleBox[ RowBox[ {"T", AdjustmentBox[ "E", BoxMargins -> {{-.074999999999999997, \ -.085000000000000006}, {0, 0}}, BoxBaselineShift -> .5], "X"}]], "LaTeX"->StyleBox[ RowBox[ {"L", StyleBox[ AdjustmentBox[ "A", BoxMargins -> {{-.35999999999999999, \ -.10000000000000001}, {0, 0}}, BoxBaselineShift -> -.20000000000000001], FontSize -> Smaller], "T", AdjustmentBox[ "E", BoxMargins -> {{-.074999999999999997, \ -.085000000000000006}, {0, 0}}, BoxBaselineShift -> .5], "X"}]], "mma"->"Mathematica", "Mma"->"Mathematica", "MMA"->"Mathematica", "gridMathematica"->FormBox[ RowBox[ {"grid", AdjustmentBox[ StyleBox[ "Mathematica", FontSlant -> "Italic"], BoxMargins -> {{-.17499999999999999, 0}, {0, 0}}]}], TextForm], "webMathematica"->FormBox[ RowBox[ {"web", AdjustmentBox[ StyleBox[ "Mathematica", FontSlant -> "Italic"], BoxMargins -> {{-.17499999999999999, 0}, {0, 0}}]}], TextForm]}, FontFamily->"Helvetica", FontSize->12, FontWeight->"Bold", FontColor->RGBColor[0.592157, 0.313726, 0.313726]], Cell[StyleData["Subsubsection", "Presentation"], FontSize->18], Cell[StyleData["Subsubsection", "Printout"], CellMargins->{{2, 0}, {3, 8}}, FontSize->10], Cell[StyleData["Subsubsection", "EnhancedPrintout"], CellMargins->{{2, 0}, {3, 8}}, FontFamily->"Frutiger 65 Bold", FontSize->10, FontWeight->"Plain", FontColor->GrayLevel[0]], Cell[StyleData["Subsubsection", "EnhancedPrintoutNonGray"], CellMargins->{{2, 0}, {3, 8}}, FontFamily->"Frutiger 65 Bold", FontSize->10, FontWeight->"Plain"] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["SubsubsectionColor"], CellMargins->{{27, 27}, {0, 18}}, CellElementSpacings->{"ClosedGroupTopMargin"->18}, CellGroupingRules->{"SectionGrouping", 50}, InputAutoReplacements->{"TeX"->StyleBox[ RowBox[ {"T", AdjustmentBox[ "E", BoxMargins -> {{-.074999999999999997, \ -.085000000000000006}, {0, 0}}, BoxBaselineShift -> .5], "X"}]], "LaTeX"->StyleBox[ RowBox[ {"L", StyleBox[ AdjustmentBox[ "A", BoxMargins -> {{-.35999999999999999, \ -.10000000000000001}, {0, 0}}, BoxBaselineShift -> -.20000000000000001], FontSize -> Smaller], "T", AdjustmentBox[ "E", BoxMargins -> {{-.074999999999999997, \ -.085000000000000006}, {0, 0}}, BoxBaselineShift -> .5], "X"}]], "mma"->"Mathematica", "Mma"->"Mathematica", "MMA"->"Mathematica", "gridMathematica"->FormBox[ RowBox[ {"grid", AdjustmentBox[ StyleBox[ "Mathematica", FontSlant -> "Italic"], BoxMargins -> {{-.17499999999999999, 0}, {0, 0}}]}], TextForm], "webMathematica"->FormBox[ RowBox[ {"web", AdjustmentBox[ StyleBox[ "Mathematica", FontSlant -> "Italic"], BoxMargins -> {{-.17499999999999999, 0}, {0, 0}}]}], TextForm]}, StyleMenuListing->None, FontFamily->"Helvetica", FontSize->12, FontWeight->"Bold", FontColor->RGBColor[0.297993, 0, 0.454994]], Cell[StyleData["SubsubsectionColor", "Presentation"], FontSize->18], Cell[StyleData["SubsubsectionColor", "Printout"], CellMargins->{{2, 0}, {0, 18}}, PageBreakBelow->False, FontSize->10] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["SubsectionIcon"], ShowGroupOpenCloseIcon->True, CellMargins->{{46, 27}, {0, 18}}, CellElementSpacings->{"ClosedGroupTopMargin"->8}, CellGroupingRules->{"SectionGrouping", 40}, InputAutoReplacements->{"TeX"->StyleBox[ RowBox[ {"T", AdjustmentBox[ "E", BoxMargins -> {{-.074999999999999997, \ -.085000000000000006}, {0, 0}}, BoxBaselineShift -> .5], "X"}]], "LaTeX"->StyleBox[ RowBox[ {"L", StyleBox[ AdjustmentBox[ "A", BoxMargins -> {{-.35999999999999999, \ -.10000000000000001}, {0, 0}}, BoxBaselineShift -> -.20000000000000001], FontSize -> Smaller], "T", AdjustmentBox[ "E", BoxMargins -> {{-.074999999999999997, \ -.085000000000000006}, {0, 0}}, BoxBaselineShift -> .5], "X"}]], "mma"->"Mathematica", "Mma"->"Mathematica", "MMA"->"Mathematica", "gridMathematica"->FormBox[ RowBox[ {"grid", AdjustmentBox[ StyleBox[ "Mathematica", FontSlant -> "Italic"], BoxMargins -> {{-.17499999999999999, 0}, {0, 0}}]}], TextForm], "webMathematica"->FormBox[ RowBox[ {"web", AdjustmentBox[ StyleBox[ "Mathematica", FontSlant -> "Italic"], BoxMargins -> {{-.17499999999999999, 0}, {0, 0}}]}], TextForm]}, CounterIncrements->"Section", FontFamily->"Helvetica", FontSize->16, FontWeight->"Bold", FontColor->RGBColor[0.592157, 0.313726, 0.313726]], Cell[StyleData["SubsectionIcon", "Presentation"], FontSize->24], Cell[StyleData["SubsectionIcon", "Printout"], CellDingbat->"\[FilledSquare]", ShowGroupOpenCloseIcon->False, CellMargins->{{16, 0}, {0, 18}}, PageBreakBelow->False, FontSize->14] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["SubsubsectionIcon"], ShowGroupOpenCloseIcon->True, CellMargins->{{46, 27}, {0, 8}}, CellElementSpacings->{"ClosedGroupTopMargin"->4}, CellGroupingRules->{"SectionGrouping", 50}, InputAutoReplacements->{"TeX"->StyleBox[ RowBox[ {"T", AdjustmentBox[ "E", BoxMargins -> {{-.074999999999999997, \ -.085000000000000006}, {0, 0}}, BoxBaselineShift -> .5], "X"}]], "LaTeX"->StyleBox[ RowBox[ {"L", StyleBox[ AdjustmentBox[ "A", BoxMargins -> {{-.35999999999999999, \ -.10000000000000001}, {0, 0}}, BoxBaselineShift -> -.20000000000000001], FontSize -> Smaller], "T", AdjustmentBox[ "E", BoxMargins -> {{-.074999999999999997, \ -.085000000000000006}, {0, 0}}, BoxBaselineShift -> .5], "X"}]], "mma"->"Mathematica", "Mma"->"Mathematica", "MMA"->"Mathematica", "gridMathematica"->FormBox[ RowBox[ {"grid", AdjustmentBox[ StyleBox[ "Mathematica", FontSlant -> "Italic"], BoxMargins -> {{-.17499999999999999, 0}, {0, 0}}]}], TextForm], "webMathematica"->FormBox[ RowBox[ {"web", AdjustmentBox[ StyleBox[ "Mathematica", FontSlant -> "Italic"], BoxMargins -> {{-.17499999999999999, 0}, {0, 0}}]}], TextForm]}, CounterIncrements->"Subsection", CounterAssignments->{{"Subsubsection", 0}}, FontFamily->"Helvetica", FontSize->12, FontWeight->"Bold", FontColor->RGBColor[0.592157, 0.313726, 0.313726]], Cell[StyleData["SubsubsectionIcon", "Presentation"], FontSize->18], Cell[StyleData["SubsubsectionIcon", "Printout"], ShowGroupOpenCloseIcon->False, CellMargins->{{2, 0}, {0, 18}}, PageBreakBelow->False, FontSize->10] }, Closed]] }, Open ]], Cell[CellGroupData[{ Cell["Text", "Section"], Cell[CellGroupData[{ Cell[StyleData["Text"], CellMargins->{{27, 27}, {0, 8}}, InputAutoReplacements->{"TeX"->StyleBox[ RowBox[ {"T", AdjustmentBox[ "E", BoxMargins -> {{-.074999999999999997, \ -.085000000000000006}, {0, 0}}, BoxBaselineShift -> .5], "X"}]], "LaTeX"->StyleBox[ RowBox[ {"L", StyleBox[ AdjustmentBox[ "A", BoxMargins -> {{-.35999999999999999, \ -.10000000000000001}, {0, 0}}, BoxBaselineShift -> -.20000000000000001], FontSize -> Smaller], "T", AdjustmentBox[ "E", BoxMargins -> {{-.074999999999999997, \ -.085000000000000006}, {0, 0}}, BoxBaselineShift -> .5], "X"}]], "mma"->"Mathematica", "Mma"->"Mathematica", "MMA"->"Mathematica", "gridMathematica"->FormBox[ RowBox[ {"grid", AdjustmentBox[ StyleBox[ "Mathematica", FontSlant -> "Italic"], BoxMargins -> {{-.17499999999999999, 0}, {0, 0}}]}], TextForm], "webMathematica"->FormBox[ RowBox[ {"web", AdjustmentBox[ StyleBox[ "Mathematica", FontSlant -> "Italic"], BoxMargins -> {{-.17499999999999999, 0}, {0, 0}}]}], TextForm]}, ParagraphSpacing->{0, 8}, FontSize->12], Cell[StyleData["Text", "Presentation"], FontSize->18], Cell[StyleData["Text", "SlideShow"], CellMargins->{{36, 24}, {4, 4}}, Hyphenation->False, FontSize->14], Cell[StyleData["Text", "Printout"], CellMargins->{{2, 2}, {6, 6}}, TextJustification->1, Hyphenation->True, FontSize->10], Cell[StyleData["Text", "EnhancedPrintout"], CellMargins->{{2, 2}, {6, 6}}, TextJustification->1, Hyphenation->True, FontFamily->"Palatino", FontSize->10], Cell[StyleData["Text", "EnhancedPrintoutNonGray"], CellMargins->{{2, 2}, {6, 6}}, TextJustification->1, Hyphenation->True, FontFamily->"Palatino", FontSize->10] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["CompactText"], CellMargins->{{27, 27}, {0, 8}}, ParagraphSpacing->{0, 0}, StyleMenuListing->None, FontSize->10], Cell[StyleData["CompactText", "Presentation"], FontSize->15], Cell[StyleData["CompactText", "Printout"], CellMargins->{{2, 0}, {0, 8}}, Hyphenation->True, FontSize->8], Cell[StyleData["CompactText", "EnhancedPrintout"], CellMargins->{{2, 0}, {0, 8}}, Hyphenation->True, FontFamily->"Palatino", FontSize->8], Cell[StyleData["CompactText", "EnhancedPrintoutNonGray"], CellMargins->{{2, 0}, {0, 8}}, Hyphenation->True, FontFamily->"Palatino", FontSize->8] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["Compact12Text"], CellMargins->{{27, 27}, {0, 8}}, ParagraphSpacing->{0, 0}, StyleMenuListing->None], Cell[StyleData["Compact12Text", "Presentation"], FontSize->18], Cell[StyleData["Compact12Text", "Printout"], CellMargins->{{2, 0}, {0, 8}}, Hyphenation->True, FontSize->10], Cell[StyleData["Compact12Text", "EnhancedPrintout"], CellMargins->{{2, 0}, {0, 8}}, Hyphenation->True, FontFamily->"Palatino", FontSize->10], Cell[StyleData["Compact12Text", "EnhancedPrintoutNonGray"], CellMargins->{{2, 0}, {0, 8}}, Hyphenation->True, FontFamily->"Palatino", FontSize->10] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["TextSans"], CellMargins->{{27, 27}, {0, 8}}, CellHorizontalScrolling->True, ParagraphSpacing->{0, 8}, StyleMenuListing->None, FontFamily->"Helvetica", FontSize->10], Cell[StyleData["TextSans", "Presentation"], FontSize->15], Cell[StyleData["TextSans", "Printout"], CellMargins->{{2, 0}, {0, 8}}, Hyphenation->True, FontSize->8], Cell[StyleData["TextSans", "EnhancedPrintout"], CellMargins->{{2, 0}, {0, 8}}, Hyphenation->True, FontFamily->"Frutiger 55 Roman", FontSize->8], Cell[StyleData["TextSans", "EnhancedPrintoutNonGray"], CellMargins->{{2, 0}, {0, 8}}, Hyphenation->True, FontFamily->"Frutiger 55 Roman", FontSize->8] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["ItemizedText"], CellMargins->{{66, 4}, {4, 4}}, LineSpacing->{1, 3}, ParagraphIndent->-22, CounterIncrements->"ItemizedText", StyleMenuListing->None], Cell[StyleData["ItemizedText", "Presentation"], FontSize->18], Cell[StyleData["ItemizedText", "Printout"], CellMargins->{{16, 4}, {2, 4}}, Hyphenation->True, FontSize->10], Cell[StyleData["ItemizedText", "EnhancedPrintout"], CellMargins->{{16, 4}, {2, 4}}, Hyphenation->True, LineSpacing->{1, 1}, FontFamily->"Palatino", FontSize->10], Cell[StyleData["ItemizedText", "EnhancedPrintoutNonGray"], Hyphenation->True, LineSpacing->{1, 1}, ParagraphIndent->-18, FontFamily->"Palatino", FontSize->10] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["ItemizedTextNote"], CellMargins->{{88, 4}, {4, 0}}, LineSpacing->{1, 2}, CounterIncrements->"Text", StyleMenuListing->None], Cell[StyleData["ItemizedTextNote", "Presentation"], FontSize->18], Cell[StyleData["ItemizedTextNote", "Printout"], CellMargins->{{34, 4}, {4, 1}}, Hyphenation->True, FontSize->10], Cell[StyleData["ItemizedTextNote", "EnhancedPrintout"], CellMargins->{{39, 4}, {4, 1}}, Hyphenation->True, LineSpacing->{1, 1}, FontFamily->"Palatino", FontSize->10], Cell[StyleData["ItemizedTextNote", "EnhancedPrintoutNonGray"], CellMargins->{{39, 4}, {4, 1}}, Hyphenation->True, LineSpacing->{1, 1}, FontFamily->"Palatino", FontSize->10] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["IndentedText"], CellMargins->{{66, 4}, {0, 6}}, LineSpacing->{1, 3}, CounterIncrements->"Text", StyleMenuListing->None], Cell[StyleData["IndentedText", "Presentation"], FontSize->18], Cell[StyleData["IndentedText", "SlideShow"], CellMargins->{{80, 24}, {5, 5}}, Hyphenation->False, FontSize->13], Cell[StyleData["IndentedText", "Printout"], CellMargins->{{16, 4}, {2, 4}}, Hyphenation->True, FontSize->10], Cell[StyleData["IndentedText", "EnhancedPrintout"], CellMargins->{{39, Inherited}, {Inherited, Inherited}}, Hyphenation->True, LineSpacing->{1, 1}, FontFamily->"Palatino", FontSize->10], Cell[StyleData["IndentedText", "EnhancedPrintoutNonGray"], Hyphenation->True, LineSpacing->{1, 1}, FontFamily->"Palatino", FontSize->10] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["ItemizedList"], CellMargins->{{58, 4}, {4, 4}}, CellFrameLabels->{{Cell[ TextData[ { StyleBox[ CounterBox[ "ItemizedList"], "TB"], StyleBox[ ".", "TB"]}], CellBaseline -> Baseline, CellSize -> { 24, Inherited}, TextAlignment -> Right], Inherited}, { Inherited, Inherited}}, LineSpacing->{1, 3}, CounterIncrements->"ItemizedList", StyleMenuListing->None], Cell[StyleData["ItemizedList", "Presentation"], FontSize->18], Cell[StyleData["ItemizedList", "Printout"], CellMargins->{{9, 4}, {2, 4}}, Hyphenation->True, FontSize->10], Cell[StyleData["ItemizedList", "EnhancedPrintout"], CellMargins->{{9, 4}, {2, 4}}, Hyphenation->True, LineSpacing->{1, 1}, FontFamily->"Palatino", FontSize->10], Cell[StyleData["ItemizedList", "EnhancedPrintoutNonGray"], Hyphenation->True, LineSpacing->{1, 1}, FontFamily->"Palatino", FontSize->10] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["ItemizedSubList"], CellMargins->{{92, 4}, {4, 4}}, CellFrameLabels->{{Cell[ TextData[ { StyleBox[ CounterBox[ "ItemizedSubList"], "TB"], StyleBox[ ".", "TB"]}], CellBaseline -> Baseline, CellSize -> { 24, Inherited}, TextAlignment -> Right], Inherited}, { Inherited, Inherited}}, CounterIncrements->"ItemizedSubList", StyleMenuListing->None, CounterBoxOptions->{CounterFunction:>(Part[ CharacterRange[ "a", "z"], #]&)}], Cell[StyleData["ItemizedSubList", "Presentation"], FontSize->18], Cell[StyleData["ItemizedSubList", "Printout"], CellMargins->{{34, 4}, {4, 1}}, Hyphenation->True, FontSize->10], Cell[StyleData["ItemizedSubList", "EnhancedPrintout"], CellMargins->{{26, 4}, {2, 4}}, Hyphenation->True, FontFamily->"Palatino", FontSize->10], Cell[StyleData["ItemizedSubList", "EnhancedPrintoutNonGray"], Hyphenation->True, FontFamily->"Palatino", FontSize->10] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["ItemizedSubListNote"], CellMargins->{{110, 4}, {4, 4}}, CounterIncrements->"ItemizedSubList", StyleMenuListing->None, CounterBoxOptions->{CounterFunction:>(Part[ CharacterRange[ "a", "z"], #]&)}], Cell[StyleData["ItemizedSubListNote", "Presentation"], FontSize->18], Cell[StyleData["ItemizedSubListNote", "Printout"], CellMargins->{{34, 4}, {4, 1}}, Hyphenation->True, FontSize->10], Cell[StyleData["ItemizedSubListNote", "EnhancedPrintout"], CellMargins->{{56, 4}, {2, 4}}, Hyphenation->True, FontFamily->"Palatino", FontSize->10], Cell[StyleData["ItemizedSubListNote", "EnhancedPrintoutNonGray"], CellMargins->{{48, 4}, {2, 4}}, Hyphenation->True, FontFamily->"Palatino", FontSize->10] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["BulletedList"], CellMargins->{{76, 4}, {4, 4}}, CellFrameLabels->{{ Cell[ "\[Bullet]", "BulletedList", CellBaseline -> Baseline], Inherited}, {Inherited, Inherited}}, LineSpacing->{1, 3}, CounterIncrements->"BulletText", StyleMenuListing->None], Cell[StyleData["BulletedList", "Presentation"], FontSize->18], Cell[StyleData["BulletedList", "Printout"], CellMargins->{{16, 4}, {4, 1}}, Hyphenation->True, FontSize->10], Cell[StyleData["BulletedList", "EnhancedPrintout"], CellMargins->{{26, 4}, {2, 4}}, Hyphenation->True, LineSpacing->{1, 1}, FontFamily->"Palatino", FontSize->10], Cell[StyleData["BulletedList", "EnhancedPrintoutNonGray"], Hyphenation->True, LineSpacing->{1, 1}, FontFamily->"Palatino", FontSize->10] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["ListNote"], CellMargins->{{88, 4}, {4, 0}}, LineSpacing->{1, 2}, CounterIncrements->"ListNote", StyleMenuListing->None], Cell[StyleData["ListNote", "Presentation"], FontSize->18], Cell[StyleData["ListNote", "Printout"], CellMargins->{{34, 4}, {4, 1}}, Hyphenation->True, FontSize->10], Cell[StyleData["ListNote", "EnhancedPrintout"], CellMargins->{{39, 4}, {4, 1}}, Hyphenation->True, LineSpacing->{1, 1}, FontFamily->"Palatino", FontSize->10], Cell[StyleData["ListNote", "EnhancedPrintoutNonGray"], CellMargins->{{39, 4}, {4, 1}}, Hyphenation->True, LineSpacing->{1, 1}, FontFamily->"Palatino", FontSize->10] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["MathCaption"], CellFrame->{{0, 0}, {0, 0.5}}, CellMargins->{{66, 12}, {2, 20}}, PageBreakBelow->False, CellFrameMargins->{{8, 8}, {8, 2}}, CellFrameColor->GrayLevel[0.700008], CellFrameLabelMargins->4, LineSpacing->{1, 1}, ParagraphSpacing->{0, 8}, FontColor->GrayLevel[0.2]], Cell[StyleData["MathCaption", "Presentation"], FontSize->18], Cell[StyleData["MathCaption", "SlideShow"], ShowCellBracket->False, CellMargins->{{36, 36}, {6, 6}}], Cell[StyleData["MathCaption", "Printout"], CellMargins->{{9, 0}, {0, 14}}, Hyphenation->True, FontSize->9, FontColor->GrayLevel[0]], Cell[StyleData["MathCaption", "EnhancedPrintout"], CellMargins->{{9, 0}, {0, 14}}, Hyphenation->True, FontFamily->"Palatino", FontSize->9, FontColor->GrayLevel[0]], Cell[StyleData["MathCaption", "EnhancedPrintoutNonGray"], CellMargins->{{9, 0}, {0, 14}}, Hyphenation->True, FontFamily->"Palatino", FontSize->9, FontColor->GrayLevel[0]] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["SmallText"], CellMargins->{{27, 27}, {0, 8}}, LineSpacing->{1, 3}, ParagraphSpacing->{0.7, 0}, CounterIncrements->"SmallText", FontSize->9], Cell[StyleData["SmallText", "Presentation"], FontSize->14], Cell[StyleData["SmallText", "Printout"], CellMargins->{{2, 2}, {5, 5}}, TextJustification->1, Hyphenation->True, FontSize->7], Cell[StyleData["SmallText", "EnhancedPrintout"], CellMargins->{{2, 2}, {5, 5}}, TextJustification->1, Hyphenation->True, FontFamily->"Palatino", FontSize->7], Cell[StyleData["SmallText", "EnhancedPrintoutNonGray"], CellMargins->{{2, 2}, {5, 5}}, TextJustification->1, Hyphenation->True, FontFamily->"Palatino", FontSize->7] }, Closed]] }, Open ]], Cell[CellGroupData[{ Cell["Input/Output", "Section"], Cell["\<\ The cells in this section define styles used for input and output to the \ kernel. Be careful when modifying, renaming, or removing these styles, \ because the front end associates special meanings with these style names. \ \ \>", "Text"], Cell[CellGroupData[{ Cell[StyleData["Input"], ShowCellBracket->True, CellMargins->{{66, 4}, {3, 8}}, Evaluatable->True, CellGroupingRules->"InputGrouping", PageBreakWithin->False, GroupPageBreakWithin->False, CellLabelAutoDelete->False, CellLabelMargins->{{14, Inherited}, {Inherited, Inherited}}, DefaultFormatType->DefaultInputFormatType, ShowSpecialCharacters->Automatic, "TwoByteSyntaxCharacterAutoReplacement"->True, HyphenationOptions->{"HyphenationCharacter"->"\[Continuation]"}, LanguageCategory->"Mathematica", FormatType->StandardForm, ShowStringCharacters->True, NumberMarks->True, FontWeight->"Bold"], Cell[StyleData["Input", "Presentation"], FontSize->18], Cell[StyleData["Input", "SlideShow"], ShowCellBracket->True, CellMargins->{{100, 50}, {0, 6}}, PageBreakWithin->False, GroupPageBreakWithin->False, CellFrameMargins->{{8, 8}, {4, 8}}, Background->RGBColor[1, 1, 0.8]], Cell[StyleData["Input", "Printout"], ShowCellBracket->False, CellMargins->{{39, 0}, {4, 6}}, FontSize->9], Cell[StyleData["Input", "EnhancedPrintout"], ShowCellBracket->False, CellMargins->{{39, 0}, {4, 6}}, FontSize->9], Cell[StyleData["Input", "EnhancedPrintoutNonGray"], ShowCellBracket->False, CellMargins->{{39, 0}, {4, 6}}, FontSize->9] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["Output"], ShowCellBracket->True, CellMargins->{{66, 4}, {8, 2}}, CellEditDuplicate->True, CellGroupingRules->"OutputGrouping", CellHorizontalScrolling->True, PageBreakWithin->False, GroupPageBreakWithin->False, GeneratedCell->True, CellAutoOverwrite->True, CellLabelAutoDelete->False, CellLabelMargins->{{14, Inherited}, {Inherited, Inherited}}, DefaultFormatType->DefaultOutputFormatType, "TwoByteSyntaxCharacterAutoReplacement"->True, HyphenationOptions->{"HyphenationCharacter"->"\[Continuation]"}, AutoItalicWords->{}, LanguageCategory->None, FormatType->StandardForm], Cell[StyleData["Output", "Presentation"], FontSize->18], Cell[StyleData["Output", "SlideShow"], ShowCellBracket->True, CellMargins->{{100, 50}, {6, 0}}, PageBreakWithin->False, GroupPageBreakWithin->False, CellFrameMargins->{{8, 8}, {8, 4}}, Background->RGBColor[1, 1, 0.8]], Cell[StyleData["Output", "Printout"], ShowCellBracket->False, CellMargins->{{39, 0}, {6, 4}}, FontSize->9], Cell[StyleData["Output", "EnhancedPrintout"], ShowCellBracket->False, CellMargins->{{39, 0}, {6, 4}}, FontSize->9], Cell[StyleData["Output", "EnhancedPrintoutNonGray"], ShowCellBracket->False, CellMargins->{{39, 0}, {6, 4}}, FontSize->9] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["InputOnly"], ShowCellBracket->True, CellMargins->{{66, 4}, {8, 8}}, Evaluatable->True, CellGroupingRules->"InputGrouping", PageBreakWithin->False, GroupPageBreakWithin->False, CellLabelAutoDelete->False, CellLabelMargins->{{14, Inherited}, {Inherited, Inherited}}, DefaultFormatType->DefaultInputFormatType, ShowSpecialCharacters->Automatic, "TwoByteSyntaxCharacterAutoReplacement"->True, HyphenationOptions->{"HyphenationCharacter"->"\[Continuation]"}, LanguageCategory->"Mathematica", FormatType->StandardForm, ShowStringCharacters->True, NumberMarks->True, StyleMenuListing->None, FontWeight->"Bold"], Cell[StyleData["InputOnly", "Presentation"], FontSize->18], Cell[StyleData["InputOnly", "SlideShow"], ShowCellBracket->True, CellMargins->{{100, 50}, {6, 6}}, PageBreakWithin->False, GroupPageBreakWithin->False, Background->RGBColor[1, 1, 0.8]], Cell[StyleData["InputOnly", "Printout"], ShowCellBracket->False, CellMargins->{{39, 0}, {6, 6}}, FontSize->9], Cell[StyleData["InputOnly", "EnhancedPrintout"], ShowCellBracket->False, CellMargins->{{39, 0}, {6, 6}}, FontSize->9], Cell[StyleData["InputOnly", "EnhancedPrintoutNonGray"], ShowCellBracket->False, CellMargins->{{39, 0}, {6, 6}}, FontSize->9] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["Message"], ShowCellBracket->True, CellMargins->{{66, 4}, {4, 2}}, CellGroupingRules->"OutputGrouping", PageBreakWithin->False, GroupPageBreakWithin->False, GeneratedCell->True, CellAutoOverwrite->True, ShowCellLabel->False, CellLabelMargins->{{14, Inherited}, {Inherited, Inherited}}, DefaultFormatType->DefaultOutputFormatType, "TwoByteSyntaxCharacterAutoReplacement"->True, AutoStyleOptions->{"UnmatchedBracketStyle"->None}, HyphenationOptions->{"HyphenationCharacter"->"\[Continuation]"}, AutoItalicWords->{}, LanguageCategory->None, FormatType->InputForm, CounterIncrements->"Message", StyleMenuListing->None, FontFamily->"Helvetica", FontSize->10, FontColor->RGBColor[0.6, 0.100008, 0.100008]], Cell[StyleData["Message", "Presentation"], FontSize->18], Cell[StyleData["Message", "SlideShow"], CellMargins->{{100, 50}, {6, 6}}, FontSize->10, FontColor->RGBColor[0.699992, 0.4, 0]], Cell[StyleData["Message", "Printout"], ShowCellBracket->False, CellMargins->{{39, Inherited}, {Inherited, Inherited}}, FontSize->9, FontColor->GrayLevel[0]], Cell[StyleData["Message", "EnhancedPrintout"], ShowCellBracket->False, CellMargins->{{39, Inherited}, {Inherited, Inherited}}, FontFamily->"Courier", FontSize->9, FontColor->GrayLevel[0]], Cell[StyleData["Message", "EnhancedPrintoutNonGray"], ShowCellBracket->False, CellMargins->{{39, Inherited}, {Inherited, Inherited}}, FontFamily->"Courier", FontSize->9, FontColor->GrayLevel[0]] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["Print"], ShowCellBracket->True, CellMargins->{{66, 4}, {4, 2}}, CellGroupingRules->"OutputGrouping", PageBreakWithin->False, GroupPageBreakWithin->False, GeneratedCell->True, CellAutoOverwrite->True, ShowCellLabel->False, CellLabelMargins->{{14, Inherited}, {Inherited, Inherited}}, DefaultFormatType->DefaultOutputFormatType, "TwoByteSyntaxCharacterAutoReplacement"->True, HyphenationOptions->{"HyphenationCharacter"->"\[Continuation]"}, AutoItalicWords->{}, LanguageCategory->None, FormatType->InputForm, StyleMenuListing->None], Cell[StyleData["Print", "Presentation"], FontSize->18], Cell[StyleData["Print", "SlideShow"], CellMargins->{{100, 50}, {6, 6}}], Cell[StyleData["Print", "Printout"], ShowCellBracket->False, CellMargins->{{57, Inherited}, {Inherited, Inherited}}, FontSize->9], Cell[StyleData["Print", "EnhancedPrintout"], ShowCellBracket->False, CellMargins->{{57, Inherited}, {Inherited, Inherited}}, FontFamily->"Courier Std", FontSize->9], Cell[StyleData["Print", "EnhancedPrintoutNonGray"], ShowCellBracket->False, CellMargins->{{57, Inherited}, {Inherited, Inherited}}, FontFamily->"Courier Std", FontSize->9] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["Graphics"], ShowCellBracket->True, CellMargins->{{66, 4}, {4, 2}}, CellGroupingRules->"GraphicsGrouping", PageBreakWithin->False, GeneratedCell->True, CellAutoOverwrite->True, ShowCellLabel->False, DefaultFormatType->Utilities`Notation`Private`DefaultFormatTypeForOutput, LanguageCategory->None, FormatType->InputForm, StyleMenuListing->None, FontWeight->"Plain"], Cell[StyleData["Graphics", "Presentation"], FontSize->18], Cell[StyleData["Graphics", "SlideShow"], ShowCellBracket->True, CellMargins->{{100, 50}, {6, 0}}, PageBreakWithin->False, GroupPageBreakWithin->False, CellFrameMargins->{{8, 8}, {4, 4}}, Background->RGBColor[1, 1, 0.8]], Cell[StyleData["Graphics", "Printout"], ShowCellBracket->False, CellMargins->{{39, Inherited}, {Inherited, Inherited}}, ImageSize->{250, 250}, FontSize->9], Cell[StyleData["Graphics", "EnhancedPrintout"], ShowCellBracket->False, CellMargins->{{32, Inherited}, {Inherited, Inherited}}, ImageSize->{250, 250}, FontFamily->"Courier Std", FontSize->9], Cell[StyleData["Graphics", "EnhancedPrintoutNonGray"], ShowCellBracket->False, CellMargins->{{32, Inherited}, {Inherited, Inherited}}, ImageSize->{250, 250}, FontFamily->"Courier Std", FontSize->9] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["CellLabel"], LanguageCategory->None, StyleMenuListing->None, FontFamily->"Helvetica", FontSize->9, FontWeight->"Plain", FontColor->RGBColor[0.269993, 0.308507, 0.6]], Cell[StyleData["CellLabel", "Presentation"], FontSize->14], Cell[StyleData["CellLabel", "SlideShow"], FontColor->RGBColor[0.8, 0.6, 0.4]], Cell[StyleData["CellLabel", "Printout"], FontFamily->"Courier", FontSize->8, FontSlant->"Oblique", FontColor->GrayLevel[0]], Cell[StyleData["CellLabel", "EnhancedPrintout"], FontFamily->"Courier Std", FontSize->8, FontSlant->"Oblique", FontColor->GrayLevel[0]], Cell[StyleData["CellLabel", "EnhancedPrintoutNonGray"], FontFamily->"Courier Std", FontSize->8, FontSlant->"Oblique", FontColor->GrayLevel[0]] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["Name"], StyleMenuListing->None, FontFamily->"Helvetica", FontSize->9, FontWeight->"Plain", FontSlant->"Italic", FontColor->RGBColor[0.269993, 0.308507, 0.6]], Cell[StyleData["Name", "Presentation"], FontSize->14], Cell[StyleData["Name", "Printout"], FontSize->7, FontSlant->"Oblique", FontColor->GrayLevel[0]], Cell[StyleData["Name", "EnhancedPrintout"], FontFamily->"Frutiger 56 Italic", FontSize->7, FontSlant->"Plain", FontColor->GrayLevel[0]], Cell[StyleData["Name", "EnhancedPrintoutNonGray"], FontFamily->"Frutiger 56 Italic", FontSize->7, FontSlant->"Plain", FontColor->GrayLevel[0]] }, Closed]] }, Open ]], Cell[CellGroupData[{ Cell["Hyperlinks", "Section"], Cell["\<\ The cells below define styles useful for making hypertext ButtonBoxes. The \ \"Hyperlink\" style is for links within the same Notebook, or between \ Notebooks. The others point to the various sections of the help browser. \ These styles will modify individual words or letters in a cell exclusive of \ the cell tag.\ \>", "Text"], Cell[CellGroupData[{ Cell[StyleData["Hyperlink"], StyleMenuListing->None, ButtonStyleMenuListing->Automatic, FontColor->RGBColor[0.269993, 0.308507, 0.6], FontVariations->{"Underline"->True}, ButtonBoxOptions->{ButtonFunction:>(FrontEndExecute[ { FrontEnd`NotebookLocate[ #2]}]&), Active->True, ButtonNote->ButtonData}], Cell[StyleData["Hyperlink", "Printout"], FontColor->GrayLevel[0], FontVariations->{"Underline"->False}], Cell[StyleData["Hyperlink", "EnhancedPrintout"], FontFamily->"Palatino", FontColor->GrayLevel[0], FontVariations->{"Underline"->False}], Cell[StyleData["Hyperlink", "EnhancedPrintoutNonGray"], FontFamily->"Palatino", FontColor->GrayLevel[0], FontVariations->{"Underline"->False}] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["MainBookLink"], StyleMenuListing->None, ButtonStyleMenuListing->Automatic, FontColor->RGBColor[0.269993, 0.308507, 0.6], FontVariations->{"Underline"->True}, ButtonBoxOptions->{ButtonFunction:>(FrontEndExecute[ { FrontEnd`HelpBrowserLookup[ "MainBook", #]}]&), Active->True, ButtonFrame->"None"}], Cell[StyleData["MainBookLink", "Printout"], FontColor->GrayLevel[0], FontVariations->{"Underline"->False}], Cell[StyleData["MainBookLink", "EnhancedPrintout"], FontFamily->"Palatino", FontColor->GrayLevel[0], FontVariations->{"Underline"->False}], Cell[StyleData["MainBookLink", "EnhancedPrintoutNonGray"], FontFamily->"Palatino", FontColor->GrayLevel[0], FontVariations->{"Underline"->False}] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["MainBookLinkMR"], StyleMenuListing->None, ButtonStyleMenuListing->Automatic, FontFamily->"Courier", FontColor->RGBColor[0.269993, 0.308507, 0.6], FontVariations->{"Underline"->True}, ButtonBoxOptions->{ButtonFunction:>(FrontEndExecute[ { FrontEnd`HelpBrowserLookup[ "MainBook", #]}]&), Active->True, ButtonFrame->"None"}], Cell[StyleData["MainBookLinkMR", "Printout"], FontColor->GrayLevel[0], FontVariations->{"Underline"->False}], Cell[StyleData["MainBookLinkMR", "EnhancedPrintout"], FontColor->GrayLevel[0], FontVariations->{"Underline"->False}], Cell[StyleData["MainBookLinkMR", "EnhancedPrintoutNonGray"], FontColor->GrayLevel[0], FontVariations->{"Underline"->False}] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["AddOnsLink"], StyleMenuListing->None, ButtonStyleMenuListing->Automatic, FontFamily->"Courier", FontColor->RGBColor[0.269993, 0.308507, 0.6], FontVariations->{"Underline"->True}, ButtonBoxOptions->{ButtonFunction:>(FrontEndExecute[ { FrontEnd`HelpBrowserLookup[ "AddOns", #]}]&), Active->True, ButtonFrame->"None"}], Cell[StyleData["AddOnsLink", "Printout"], FontColor->GrayLevel[0], FontVariations->{"Underline"->False}], Cell[StyleData["AddOnsLink", "EnhancedPrintout"], FontFamily->"WRICourier", FontColor->GrayLevel[0], FontVariations->{"Underline"->False}], Cell[StyleData["AddOnsLink", "EnhancedPrintoutNonGray"], FontFamily->"WRICourier", FontColor->GrayLevel[0], FontVariations->{"Underline"->False}] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["AddOnsLinkText"], StyleMenuListing->None, ButtonStyleMenuListing->Automatic, FontFamily->"Times", FontColor->RGBColor[0.269993, 0.308507, 0.6], FontVariations->{"Underline"->True}, ButtonBoxOptions->{ButtonFunction:>(FrontEndExecute[ { FrontEnd`HelpBrowserLookup[ "AddOns", #]}]&), Active->True, ButtonFrame->"None"}], Cell[StyleData["AddOnsLinkText", "Printout"], FontColor->GrayLevel[0], FontVariations->{"Underline"->False}], Cell[StyleData["AddOnsLinkText", "EnhancedPrintout"], FontFamily->"Palatino", FontColor->GrayLevel[0], FontVariations->{"Underline"->False}], Cell[StyleData["AddOnsLinkText", "EnhancedPrintoutNonGray"], FontFamily->"Palatino", FontColor->GrayLevel[0], FontVariations->{"Underline"->False}] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["RefGuideLink"], StyleMenuListing->None, ButtonStyleMenuListing->Automatic, FontFamily->"Courier", FontColor->RGBColor[0.269993, 0.308507, 0.6], FontVariations->{"Underline"->True}, ButtonBoxOptions->{ButtonFunction:>(FrontEndExecute[ { FrontEnd`HelpBrowserLookup[ "RefGuide", #]}]&), Active->True, ButtonFrame->"None"}], Cell[StyleData["RefGuideLink", "Printout"], FontColor->GrayLevel[0], FontVariations->{"Underline"->False}], Cell[StyleData["RefGuideLink", "EnhancedPrintout"], FontFamily->"WRICourier", FontColor->GrayLevel[0], FontVariations->{"Underline"->False}], Cell[StyleData["RefGuideLink", "EnhancedPrintoutNonGray"], FontFamily->"WRICourier", FontColor->GrayLevel[0], FontVariations->{"Underline"->False}] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["GettingStartedLink"], StyleMenuListing->None, ButtonStyleMenuListing->Automatic, FontColor->RGBColor[0.269993, 0.308507, 0.6], FontVariations->{"Underline"->True}, ButtonBoxOptions->{ButtonFunction:>(FrontEndExecute[ { FrontEnd`HelpBrowserLookup[ "GettingStarted", #]}]&), Active->True, ButtonFrame->"None"}], Cell[StyleData["GettingStartedLink", "Printout"], FontColor->GrayLevel[0], FontVariations->{"Underline"->False}], Cell[StyleData["GettingStartedLink", "EnhancedPrintout"], FontFamily->"Palatino", FontColor->GrayLevel[0], FontVariations->{"Underline"->False}], Cell[StyleData["GettingStartedLink", "EnhancedPrintoutNonGray"], FontFamily->"Palatino", FontColor->GrayLevel[0], FontVariations->{"Underline"->False}] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["DemosLink"], StyleMenuListing->None, ButtonStyleMenuListing->Automatic, FontColor->RGBColor[0.269993, 0.308507, 0.6], FontVariations->{"Underline"->True}, ButtonBoxOptions->{ButtonFunction:>(FrontEndExecute[ { FrontEnd`HelpBrowserLookup[ "Demos", #]}]&), Active->True, ButtonFrame->"None"}], Cell[StyleData["DemosLink", "Printout"], FontColor->GrayLevel[0], FontVariations->{"Underline"->False}], Cell[StyleData["DemosLink", "EnhancedPrintout"], FontColor->GrayLevel[0], FontVariations->{"Underline"->False}], Cell[StyleData["DemosLink", "EnhancedPrintoutNonGray"], FontColor->GrayLevel[0], FontVariations->{"Underline"->False}] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["TourLink"], StyleMenuListing->None, ButtonStyleMenuListing->Automatic, FontColor->RGBColor[0.269993, 0.308507, 0.6], FontVariations->{"Underline"->True}, ButtonBoxOptions->{ButtonFunction:>(FrontEndExecute[ { FrontEnd`HelpBrowserLookup[ "Tour", #]}]&), Active->True, ButtonFrame->"None"}], Cell[StyleData["TourLink", "Printout"], FontColor->GrayLevel[0], FontVariations->{"Underline"->False}], Cell[StyleData["TourLink", "EnhancedPrintout"], FontColor->GrayLevel[0], FontVariations->{"Underline"->False}], Cell[StyleData["TourLink", "EnhancedPrintoutNonGray"], FontColor->GrayLevel[0], FontVariations->{"Underline"->False}] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["OtherInformationLink"], StyleMenuListing->None, ButtonStyleMenuListing->Automatic, FontColor->RGBColor[0.269993, 0.308507, 0.6], FontVariations->{"Underline"->True}, ButtonBoxOptions->{ButtonFunction:>(FrontEndExecute[ { FrontEnd`HelpBrowserLookup[ "OtherInformation", #]}]&), Active->True, ButtonFrame->"None"}], Cell[StyleData["OtherInformationLink", "Printout"], FontColor->GrayLevel[0], FontVariations->{"Underline"->False}], Cell[StyleData["OtherInformationLink", "EnhancedPrintout"], FontFamily->"Palatino", FontColor->GrayLevel[0], FontVariations->{"Underline"->False}], Cell[StyleData["OtherInformationLink", "EnhancedPrintoutNonGray"], FontFamily->"Palatino", FontColor->GrayLevel[0], FontVariations->{"Underline"->False}] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["OtherInformationLinkMR"], StyleMenuListing->None, FontFamily->"Courier", FontColor->RGBColor[0.269993, 0.308507, 0.6], FontVariations->{"Underline"->True}, ButtonBoxOptions->{ButtonFunction:>(FrontEndExecute[ { FrontEnd`HelpBrowserLookup[ "OtherInformation", #]}]&), Active->True, ButtonFrame->"None"}], Cell[StyleData["OtherInformationLinkMR", "Printout"], FontColor->GrayLevel[0], FontVariations->{"Underline"->False}], Cell[StyleData["OtherInformationLinkMR", "EnhancedPrintout"], FontColor->GrayLevel[0], FontVariations->{"Underline"->False}], Cell[StyleData["OtherInformationLinkMR", "EnhancedPrintoutNonGray"], FontColor->GrayLevel[0], FontVariations->{"Underline"->False}] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["MasterIndexLink"], StyleMenuListing->None, ButtonStyleMenuListing->Automatic, FontColor->RGBColor[0.269993, 0.308507, 0.6], FontVariations->{"Underline"->True}, ButtonBoxOptions->{ButtonFunction:>(FrontEndExecute[ { FrontEnd`HelpBrowserLookup[ "MasterIndex", #]}]&), Active->True, ButtonFrame->"None"}], Cell[StyleData["MasterIndexLink", "Printout"], FontColor->GrayLevel[0], FontVariations->{"Underline"->False}], Cell[StyleData["MasterIndexLink", "EnhancedPrintout"], FontColor->GrayLevel[0], FontVariations->{"Underline"->False}], Cell[StyleData["MasterIndexLink", "EnhancedPrintoutNonGray"], FontColor->GrayLevel[0], FontVariations->{"Underline"->False}] }, Closed]] }, Open ]], Cell[CellGroupData[{ Cell["Palette Styles", "Section"], Cell["\<\ The cells below define styles that define standard ButtonFunctions, for use \ in palette buttons.\ \>", "Text"], Cell[StyleData["Paste"], StyleMenuListing->None, ButtonStyleMenuListing->Automatic, ButtonBoxOptions->{ButtonFunction:>(FrontEndExecute[ { FrontEnd`NotebookApply[ FrontEnd`InputNotebook[ ], #, After]}]&)}], Cell[StyleData["Evaluate"], StyleMenuListing->None, ButtonStyleMenuListing->Automatic, ButtonBoxOptions->{ButtonFunction:>(FrontEndExecute[ { FrontEnd`NotebookApply[ FrontEnd`InputNotebook[ ], #, All], SelectionEvaluate[ FrontEnd`InputNotebook[ ], All]}]&)}], Cell[StyleData["EvaluateCell"], StyleMenuListing->None, ButtonStyleMenuListing->Automatic, ButtonBoxOptions->{ButtonFunction:>(FrontEndExecute[ { FrontEnd`NotebookApply[ FrontEnd`InputNotebook[ ], #, All], FrontEnd`SelectionMove[ FrontEnd`InputNotebook[ ], All, Cell, 1], FrontEnd`SelectionEvaluateCreateCell[ FrontEnd`InputNotebook[ ], All]}]&)}], Cell[StyleData["CopyEvaluate"], StyleMenuListing->None, ButtonStyleMenuListing->Automatic, ButtonBoxOptions->{ButtonFunction:>(FrontEndExecute[ { FrontEnd`SelectionCreateCell[ FrontEnd`InputNotebook[ ], All], FrontEnd`NotebookApply[ FrontEnd`InputNotebook[ ], #, All], FrontEnd`SelectionEvaluate[ FrontEnd`InputNotebook[ ], All]}]&)}], Cell[StyleData["CopyEvaluateCell"], StyleMenuListing->None, ButtonStyleMenuListing->Automatic, ButtonBoxOptions->{ButtonFunction:>(FrontEndExecute[ { FrontEnd`SelectionCreateCell[ FrontEnd`InputNotebook[ ], All], FrontEnd`NotebookApply[ FrontEnd`InputNotebook[ ], #, All], FrontEnd`SelectionEvaluateCreateCell[ FrontEnd`InputNotebook[ ], All]}]&)}] }, Open ]], Cell[CellGroupData[{ Cell["Inline Formatting", "Section"], Cell["\<\ These styles are for modifying individual words or letters in a cell \ exclusive of the cell tag.\ \>", "Text"], Cell[CellGroupData[{ Cell[StyleData["JT"], StyleMenuListing->None, FontFamily->"JFontText"], Cell[StyleData["JT", "Printout"]], Cell[StyleData["JT", "EnhancedPrintout"]], Cell[StyleData["JT", "EnhancedPrintoutNonGray"]] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["JS"], StyleMenuListing->None, FontFamily->"JFontSans"], Cell[StyleData["JS", "Printout"]], Cell[StyleData["JS", "EnhancedPrintout"]], Cell[StyleData["JS", "EnhancedPrintoutNonGray"]] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["JSB"], StyleMenuListing->None, FontFamily->"JFontSansBold"], Cell[StyleData["JSB", "Printout"]], Cell[StyleData["JSB", "EnhancedPrintout"]], Cell[StyleData["JSB", "EnhancedPrintoutNonGray"]] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["RM"], StyleMenuListing->None, FontWeight->"Plain", FontSlant->"Plain"], Cell[StyleData["RM", "Printout"]], Cell[StyleData["RM", "EnhancedPrintout"]], Cell[StyleData["RM", "EnhancedPrintoutNonGray"]] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["BF"], StyleMenuListing->None, FontWeight->"Bold"], Cell[StyleData["BF", "Printout"]], Cell[StyleData["BF", "EnhancedPrintout"]], Cell[StyleData["BF", "EnhancedPrintoutNonGray"]] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["IT"], StyleMenuListing->None, FontSlant->"Italic"], Cell[StyleData["IT", "Printout"]], Cell[StyleData["IT", "EnhancedPrintout"]], Cell[StyleData["IT", "EnhancedPrintoutNonGray"]] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["TR"], StyleMenuListing->None, FontFamily->"Times", FontWeight->"Plain", FontSlant->"Plain"], Cell[StyleData["TR", "Printout"]], Cell[StyleData["TR", "EnhancedPrintout"], FontFamily->"Palatino"], Cell[StyleData["TR", "EnhancedPrintoutNonGray"], FontFamily->"Palatino"] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["TI"], StyleMenuListing->None, FontFamily->"Times", FontSlant->"Italic"], Cell[StyleData["TI", "Printout"]], Cell[StyleData["TI", "EnhancedPrintout"], FontFamily->"Palatino"], Cell[StyleData["TI", "EnhancedPrintoutNonGray"], FontFamily->"Palatino"] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["TB"], StyleMenuListing->None, FontFamily->"Times", FontWeight->"Bold", FontSlant->"Plain"], Cell[StyleData["TB", "Printout"]], Cell[StyleData["TB", "EnhancedPrintout"], FontFamily->"Palatino"], Cell[StyleData["TB", "EnhancedPrintoutNonGray"], FontFamily->"Palatino"] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["TBI"], StyleMenuListing->None, FontFamily->"Times", FontWeight->"Bold", FontSlant->"Italic"], Cell[StyleData["TBI", "Printout"]], Cell[StyleData["TBI", "EnhancedPrintout"], FontFamily->"Palatino"], Cell[StyleData["TBI", "EnhancedPrintoutNonGray"], FontFamily->"Palatino"] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["MR"], Hyphenation->True, HyphenationOptions->{"HyphenationCharacter"->"\[Continuation]"}, AutoItalicWords->{}, StyleMenuListing->None, FontFamily->"Courier", FontWeight->"Plain", FontSlant->"Plain"], Cell[StyleData["MR", "Printout"]], Cell[StyleData["MR", "EnhancedPrintout"], FontFamily->"Courier Std"], Cell[StyleData["MR", "EnhancedPrintoutNonGray"], FontFamily->"Courier Std"] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["MO"], HyphenationOptions->{"HyphenationCharacter"->"\[Continuation]"}, StyleMenuListing->None, FontFamily->"Courier", FontWeight->"Plain", FontSlant->"Italic"], Cell[StyleData["MO", "Printout"], FontSlant->"Oblique"], Cell[StyleData["MO", "EnhancedPrintout"], FontFamily->"Courier Std", FontSlant->"Oblique"], Cell[StyleData["MO", "EnhancedPrintoutNonGray"], FontFamily->"Courier Std", FontSlant->"Oblique"] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["MB"], HyphenationOptions->{"HyphenationCharacter"->"\[Continuation]"}, StyleMenuListing->None, FontFamily->"Courier", FontWeight->"Bold", FontSlant->"Plain"], Cell[StyleData["MB", "Printout"]], Cell[StyleData["MB", "EnhancedPrintout"], FontFamily->"Courier Std"], Cell[StyleData["MB", "EnhancedPrintoutNonGray"], FontFamily->"Courier Std"] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["MBO"], HyphenationOptions->{"HyphenationCharacter"->"\[Continuation]"}, StyleMenuListing->None, FontFamily->"Courier", FontWeight->"Bold", FontSlant->"Italic"], Cell[StyleData["MBO", "Printout"], FontSlant->"Oblique"], Cell[StyleData["MBO", "EnhancedPrintout"], FontFamily->"Courier Std", FontSlant->"Oblique"], Cell[StyleData["MBO", "EnhancedPrintoutNonGray"], FontFamily->"Courier Std", FontSlant->"Oblique"] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["SR"], StyleMenuListing->None, FontFamily->"Helvetica", FontWeight->"Plain", FontSlant->"Plain"], Cell[StyleData["SR", "Printout"]], Cell[StyleData["SR", "EnhancedPrintout"], FontFamily->"Frutiger 55 Roman"], Cell[StyleData["SR", "EnhancedPrintoutNonGray"], FontFamily->"Frutiger 55 Roman"] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["SO"], StyleMenuListing->None, FontFamily->"Helvetica", FontWeight->"Plain", FontSlant->"Italic"], Cell[StyleData["SO", "Printout"], StyleMenuListing->None, FontFamily->"Helvetica", FontWeight->"Plain", FontSlant->"Italic"], Cell[StyleData["SO", "EnhancedPrintout"], FontFamily->"Frutiger 56 Italic", FontSlant->"Plain"], Cell[StyleData["SO", "EnhancedPrintoutNonGray"], FontFamily->"Frutiger 56 Italic", FontSlant->"Plain"] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["SB"], StyleMenuListing->None, FontFamily->"Helvetica", FontWeight->"Bold", FontSlant->"Plain"], Cell[StyleData["SB", "Printout"], StyleMenuListing->None], Cell[StyleData["SB", "EnhancedPrintout"], FontFamily->"Frutiger 65 Bold", FontWeight->"Plain"], Cell[StyleData["SB", "EnhancedPrintoutNonGray"], FontFamily->"Frutiger 65 Bold", FontWeight->"Plain"] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["SBColor"], StyleMenuListing->None, FontFamily->"Helvetica", FontWeight->"Bold", FontSlant->"Plain"], Cell[StyleData["SBColor", "Printout"], StyleMenuListing->None], Cell[StyleData["SBColor", "EnhancedPrintout"], FontFamily->"Frutiger 65 Bold", FontWeight->"Plain"], Cell[StyleData["SBColor", "EnhancedPrintoutNonGray"], FontFamily->"Frutiger 65 Bold", FontWeight->"Plain"] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["SBO"], StyleMenuListing->None, FontFamily->"Helvetica", FontWeight->"Bold", FontSlant->"Italic"], Cell[StyleData["SBO", "Printout"], StyleMenuListing->None, FontFamily->"Helvetica", FontWeight->"Bold", FontSlant->"Italic"], Cell[StyleData["SBO", "EnhancedPrintout"], FontFamily->"Frutiger 66 BoldItalic", FontWeight->"Plain", FontSlant->"Plain"], Cell[StyleData["SBO", "EnhancedPrintoutNonGray"], FontFamily->"Frutiger 66 BoldItalic", FontWeight->"Plain", FontSlant->"Plain"] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["M4"], ShowCellBracket->True, StyleMenuListing->None, FontFamily->"Mathematica4", CharacterEncoding->"Mathematica4"], Cell[StyleData["M4", "Printout"], ShowCellBracket->True, StyleMenuListing->None, FontFamily->"Mathematica4", CharacterEncoding->"Mathematica4"], Cell[StyleData["M4", "EnhancedPrintout"], ShowCellBracket->True, StyleMenuListing->None, FontFamily->"Mathematica4", CharacterEncoding->"Mathematica4"], Cell[StyleData["M4", "EnhancedPrintoutNonGray"], ShowCellBracket->True, StyleMenuListing->None, FontFamily->"Mathematica4", CharacterEncoding->"Mathematica4"] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["SO10"], StyleMenuListing->None, FontFamily->"Helvetica", FontSize->10, FontWeight->"Plain", FontSlant->"Italic"], Cell[StyleData["SO10", "Printout"], StyleMenuListing->None, FontFamily->"Helvetica", FontSize->8, FontWeight->"Plain", FontSlant->"Italic"], Cell[StyleData["SO10", "EnhancedPrintout"], StyleMenuListing->None, FontFamily->"Frutiger 56 Italic", FontSize->8, FontWeight->"Plain", FontSlant->"Plain"], Cell[StyleData["SO10", "EnhancedPrintoutNonGray"], StyleMenuListing->None, FontFamily->"Frutiger 56 Italic", FontSize->8, FontWeight->"Plain", FontSlant->"Plain"] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["S9"], StyleMenuListing->None, FontFamily->"Helvetica", FontSize->9, FontWeight->"Plain"], Cell[StyleData["S9", "Printout"], FontSize->9, FontWeight->"Plain"], Cell[StyleData["S9", "EnhancedPrintout"], FontFamily->"Frutiger 55 Roman", FontSize->9, FontWeight->"Plain"], Cell[StyleData["S9", "EnhancedPrintoutNonGray"], FontFamily->"Frutiger 55 Roman", FontSize->9, FontWeight->"Plain"] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["S10"], StyleMenuListing->None, FontFamily->"Helvetica", FontSize->10, FontWeight->"Plain"], Cell[StyleData["S10", "Printout"], FontSize->10, FontWeight->"Plain"], Cell[StyleData["S10", "EnhancedPrintout"], FontFamily->"Frutiger 55 Roman", FontSize->10, FontWeight->"Plain"], Cell[StyleData["S10", "EnhancedPrintoutNonGray"], FontFamily->"Frutiger 55 Roman", FontSize->10, FontWeight->"Plain"] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["SB9"], StyleMenuListing->None, FontFamily->"Helvetica", FontSize->9, FontWeight->"Bold", PrivateFontOptions->{"OperatorSubstitution"->False}], Cell[StyleData["SB9", "Printout"], FontSize->7], Cell[StyleData["SB9", "EnhancedPrintout"], FontFamily->"Frutiger 65 Bold", FontSize->7, FontWeight->"Plain"], Cell[StyleData["SB9", "EnhancedPrintoutNonGray"], FontFamily->"Frutiger 65 Bold", FontSize->7, FontWeight->"Plain"] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["SB10"], StyleMenuListing->None, FontFamily->"Helvetica", FontSize->10, FontWeight->"Bold"], Cell[StyleData["SB10", "Printout"], FontSize->8], Cell[StyleData["SB10", "EnhancedPrintout"], FontFamily->"Frutiger 65 Bold", FontSize->8, FontWeight->"Plain"], Cell[StyleData["SB10", "EnhancedPrintoutNonGray"], FontFamily->"Frutiger 65 Bold", FontSize->8, FontWeight->"Plain"] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["MR10"], Hyphenation->True, HyphenationOptions->{"HyphenationCharacter"->"\[Continuation]"}, SingleLetterItalics->False, StyleMenuListing->None, FontFamily->"Courier", FontSize->10, FontWeight->"Plain", FontSlant->"Plain"], Cell[StyleData["MR10", "Printout"], FontSize->7], Cell[StyleData["MR10", "EnhancedPrintout"], FontFamily->"Courier Std", FontSize->7], Cell[StyleData["MR10", "EnhancedPrintoutNonGray"], FontFamily->"Courier Std", FontSize->7] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["C1"], StyleMenuListing->None, FontColor->RGBColor[0.4, 0, 1]], Cell[StyleData["C1", "Printout"], FontSize->10, FontColor->GrayLevel[0]], Cell[StyleData["C1", "EnhancedPrintout"], FontFamily->"Palatino", FontSize->10, FontColor->GrayLevel[0]], Cell[StyleData["C1", "EnhancedPrintoutNonGray"], FontFamily->"Palatino", FontSize->10, FontColor->GrayLevel[0]] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["C1MR"], StyleMenuListing->None, FontFamily->"Courier", FontColor->RGBColor[0.4, 0, 1]], Cell[StyleData["C1MR", "Printout"], FontSize->10, FontColor->GrayLevel[0]], Cell[StyleData["C1MR", "EnhancedPrintout"], FontFamily->"Courier Std", FontSize->10, FontColor->GrayLevel[0]], Cell[StyleData["C1MR", "EnhancedPrintoutNonGray"], FontFamily->"Courier Std", FontSize->10, FontColor->GrayLevel[0]] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["SmallCaps"], StyleMenuListing->None, Magnification->0.8], Cell[StyleData["SmallCaps", "Printout"]], Cell[StyleData["SmallCaps", "EnhancedPrintout"], FontFamily->"Palatino"], Cell[StyleData["SmallCaps", "EnhancedPrintoutNonGray"], FontFamily->"Palatino"] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["KeyboardChars"], StyleMenuListing->None, FontSize->12], Cell[StyleData["KeyboardChars", "Printout"], FontSize->10], Cell[StyleData["KeyboardChars", "EnhancedPrintout"], FontFamily->"Palatino", FontSize->10], Cell[StyleData["KeyboardChars", "EnhancedPrintoutNonGray"], FontFamily->"Palatino", FontSize->10] }, Closed]] }, Open ]], Cell[CellGroupData[{ Cell["Emphasis Boxes and Pictures", "Section"], Cell[CellGroupData[{ Cell[StyleData["Box"], CellFrame->0.5, CellMargins->{{27, 12}, {0, 8}}, CellHorizontalScrolling->True, CellFrameColor->RGBColor[0.74902, 0.694118, 0.552941], StyleMenuListing->None, Background->RGBColor[0.964706, 0.929412, 0.839216], FrameBoxOptions->{BoxFrame->0.5, BoxMargins->True}, GridBoxOptions->{ColumnSpacings->1}], Cell[StyleData["Box", "Presentation"], FontSize->18], Cell[StyleData["Box", "Printout"], CellMargins->{{2, 0}, {0, 8}}, CellFrameColor->GrayLevel[0], FontSize->10, Background->GrayLevel[0.900008]], Cell[StyleData["Box", "EnhancedPrintout"], CellMargins->{{2, 0}, {0, 8}}, CellFrameColor->GrayLevel[0], FontSize->10, Background->GrayLevel[0.900008]], Cell[StyleData["Box", "EnhancedPrintoutNonGray"], CellMargins->{{2, 0}, {0, 8}}, CellFrameColor->GrayLevel[0], FontSize->10, Background->GrayLevel[1]] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["DoubleBox"], CellFrame->0.5, CellMargins->{{27, 12}, {0, 8}}, CellHorizontalScrolling->True, CellFrameColor->RGBColor[0.74902, 0.694118, 0.552941], StyleMenuListing->None, Background->RGBColor[0.964706, 0.929412, 0.839216], FrameBoxOptions->{BoxFrame->0.5, BoxMargins->True}, GridBoxOptions->{ColumnSpacings->2, RowAlignments->Top}], Cell[StyleData["DoubleBox", "Presentation"], FontSize->18], Cell[StyleData["DoubleBox", "Printout"], CellMargins->{{2, 0}, {0, 8}}, CellFrameColor->GrayLevel[0], FontSize->10, Background->GrayLevel[0.900008]], Cell[StyleData["DoubleBox", "EnhancedPrintout"], CellMargins->{{2, 0}, {0, 8}}, CellFrameColor->GrayLevel[0], FontSize->10, Background->GrayLevel[0.900008]], Cell[StyleData["DoubleBox", "EnhancedPrintoutNonGray"], CellMargins->{{2, 0}, {0, 8}}, CellFrameColor->GrayLevel[0], FontSize->10, Background->GrayLevel[1]] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["1ColumnBox"], CellFrame->0.5, CellMargins->{{27, 12}, {0, 8}}, CellHorizontalScrolling->True, CellFrameColor->RGBColor[0.74902, 0.694118, 0.552941], LineIndent->0, StyleMenuListing->None, Background->RGBColor[0.964706, 0.929412, 0.839216], FrameBoxOptions->{BoxFrame->0.5, BoxMargins->True}, GridBoxOptions->{ColumnSpacings->1}], Cell[StyleData["1ColumnBox", "Presentation"], FontSize->18], Cell[StyleData["1ColumnBox", "Printout"], CellMargins->{{2, 0}, {0, 8}}, CellFrameColor->GrayLevel[0], FontSize->10, Background->GrayLevel[0.900008]], Cell[StyleData["1ColumnBox", "EnhancedPrintout"], CellMargins->{{2, 0}, {0, 8}}, CellFrameColor->GrayLevel[0], FontSize->10, Background->GrayLevel[0.900008]], Cell[StyleData["1ColumnBox", "EnhancedPrintoutNonGray"], CellMargins->{{2, 0}, {0, 8}}, CellFrameColor->GrayLevel[0], FontSize->10, Background->GrayLevel[1]] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["2ColumnBox"], CellFrame->0.5, CellMargins->{{27, 12}, {0, 8}}, CellHorizontalScrolling->True, CellFrameColor->RGBColor[0.74902, 0.694118, 0.552941], SingleLetterItalics->False, LineIndent->0, StyleMenuListing->None, Background->RGBColor[0.964706, 0.929412, 0.839216], FrameBoxOptions->{BoxFrame->0.5, BoxMargins->True}, GridBoxOptions->{ColumnWidths->{0.31, 0.67}}], Cell[StyleData["2ColumnBox", "Presentation"], FontSize->18], Cell[StyleData["2ColumnBox", "Printout"], CellMargins->{{2, 0}, {0, 8}}, CellFrameColor->GrayLevel[0], FontSize->9, Background->GrayLevel[0.900008]], Cell[StyleData["2ColumnBox", "EnhancedPrintout"], CellMargins->{{2, 0}, {0, 8}}, CellFrameColor->GrayLevel[0], FontSize->9, Background->GrayLevel[0.900008]], Cell[StyleData["2ColumnBox", "EnhancedPrintoutNonGray"], CellMargins->{{2, 0}, {0, 8}}, CellFrameColor->GrayLevel[0], FontSize->9, Background->GrayLevel[1]] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["2ColumnEvenBox"], CellFrame->0.5, CellMargins->{{27, 12}, {0, 8}}, CellHorizontalScrolling->True, CellFrameColor->RGBColor[0.74902, 0.694118, 0.552941], LineIndent->0, StyleMenuListing->None, Background->RGBColor[0.964706, 0.929412, 0.839216], FrameBoxOptions->{BoxFrame->0.5, BoxMargins->True}, GridBoxOptions->{ColumnWidths->0.46}], Cell[StyleData["2ColumnEvenBox", "Presentation"], FontSize->18], Cell[StyleData["2ColumnEvenBox", "Printout"], CellMargins->{{2, 0}, {0, 8}}, CellFrameColor->GrayLevel[0], FontSize->10, Background->GrayLevel[0.900008]], Cell[StyleData["2ColumnEvenBox", "EnhancedPrintout"], CellMargins->{{2, 0}, {0, 8}}, CellFrameColor->GrayLevel[0], FontSize->10, Background->GrayLevel[0.900008]], Cell[StyleData["2ColumnEvenBox", "EnhancedPrintoutNonGray"], CellMargins->{{2, 0}, {0, 8}}, CellFrameColor->GrayLevel[0], FontSize->10, Background->GrayLevel[1]] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["2ColumnSmallBox"], CellFrame->0.5, CellMargins->{{27, 12}, {0, 8}}, CellHorizontalScrolling->True, CellFrameColor->RGBColor[0.74902, 0.694118, 0.552941], LineIndent->0, StyleMenuListing->None, Background->RGBColor[0.964706, 0.929412, 0.839216], FrameBoxOptions->{BoxFrame->0.5, BoxMargins->True}, GridBoxOptions->{ColumnSpacings->1.5, ColumnWidths->0.35, ColumnAlignments->{Right, Left}}], Cell[StyleData["2ColumnSmallBox", "Presentation"], FontSize->18], Cell[StyleData["2ColumnSmallBox", "Printout"], CellMargins->{{2, 0}, {0, 8}}, CellFrameColor->GrayLevel[0], FontSize->10, Background->GrayLevel[0.900008]], Cell[StyleData["2ColumnSmallBox", "EnhancedPrintout"], CellMargins->{{2, 0}, {0, 8}}, CellFrameColor->GrayLevel[0], FontSize->10, Background->GrayLevel[0.900008]], Cell[StyleData["2ColumnSmallBox", "EnhancedPrintoutNonGray"], CellMargins->{{2, 0}, {0, 8}}, CellFrameColor->GrayLevel[0], FontSize->10, Background->GrayLevel[1]] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["3ColumnBox"], CellFrame->0.5, CellMargins->{{27, 12}, {0, 8}}, CellHorizontalScrolling->True, CellFrameColor->RGBColor[0.74902, 0.694118, 0.552941], LineIndent->0, StyleMenuListing->None, Background->RGBColor[0.964706, 0.929412, 0.839216], FrameBoxOptions->{BoxFrame->0.5, BoxMargins->True}, GridBoxOptions->{ColumnWidths->0.32}], Cell[StyleData["3ColumnBox", "Presentation"], FontSize->18], Cell[StyleData["3ColumnBox", "Printout"], CellMargins->{{2, 0}, {0, 8}}, CellFrameColor->GrayLevel[0], FontSize->10, Background->GrayLevel[0.900008]], Cell[StyleData["3ColumnBox", "EnhancedPrintout"], CellMargins->{{2, 0}, {0, 8}}, CellFrameColor->GrayLevel[0], FontSize->10, Background->GrayLevel[0.900008]], Cell[StyleData["3ColumnBox", "EnhancedPrintoutNonGray"], CellMargins->{{2, 0}, {0, 8}}, CellFrameColor->GrayLevel[0], FontSize->10, Background->GrayLevel[1]] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["3ColumnSmallBox"], CellFrame->0.5, CellMargins->{{27, 12}, {0, 8}}, CellHorizontalScrolling->True, CellFrameColor->RGBColor[0.74902, 0.694118, 0.552941], LineIndent->0, StyleMenuListing->None, Background->RGBColor[0.964706, 0.929412, 0.839216], FrameBoxOptions->{BoxFrame->0.5, BoxMargins->True}, GridBoxOptions->{ColumnSpacings->1.5, ColumnWidths->0.24, ColumnAlignments->{Right, Center, Left}}], Cell[StyleData["3ColumnSmallBox", "Presentation"], FontSize->18], Cell[StyleData["3ColumnSmallBox", "Printout"], CellMargins->{{2, 0}, {0, 8}}, CellFrameColor->GrayLevel[0], FontSize->10, Background->GrayLevel[0.900008]], Cell[StyleData["3ColumnSmallBox", "EnhancedPrintout"], CellMargins->{{2, 0}, {0, 8}}, CellFrameColor->GrayLevel[0], FontSize->10, Background->GrayLevel[0.900008]], Cell[StyleData["3ColumnSmallBox", "EnhancedPrintoutNonGray"], CellFrame->0.5, CellMargins->{{2, 0}, {0, 8}}, CellFrameColor->GrayLevel[0], FontSize->10, Background->GrayLevel[1]] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["4ColumnBox"], CellFrame->0.5, CellMargins->{{27, 12}, {0, 8}}, CellHorizontalScrolling->True, CellFrameColor->RGBColor[0.74902, 0.694118, 0.552941], SingleLetterItalics->False, LineIndent->0, StyleMenuListing->None, Background->RGBColor[0.964706, 0.929412, 0.839216], FrameBoxOptions->{BoxFrame->0.5, BoxMargins->True}, GridBoxOptions->{ColumnWidths->{0.13, 0.35, 0.13, 0.35}}], Cell[StyleData["4ColumnBox", "Presentation"], FontSize->18], Cell[StyleData["4ColumnBox", "Printout"], CellMargins->{{2, 0}, {0, 8}}, CellFrameColor->GrayLevel[0], FontSize->10, Background->GrayLevel[0.900008]], Cell[StyleData["4ColumnBox", "EnhancedPrintout"], CellMargins->{{2, 0}, {0, 8}}, CellFrameColor->GrayLevel[0], FontSize->10, Background->GrayLevel[0.900008]], Cell[StyleData["4ColumnBox", "EnhancedPrintoutNonGray"], CellMargins->{{2, 0}, {0, 8}}, CellFrameColor->GrayLevel[0], FontSize->10, Background->GrayLevel[1]] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["5ColumnBox"], CellFrame->0.5, CellMargins->{{27, 12}, {0, 8}}, CellHorizontalScrolling->True, CellFrameColor->RGBColor[0.74902, 0.694118, 0.552941], LineIndent->0, StyleMenuListing->None, Background->RGBColor[0.964706, 0.929412, 0.839216], FrameBoxOptions->{BoxFrame->0.5, BoxMargins->True}, GridBoxOptions->{ColumnWidths->0.202}], Cell[StyleData["5ColumnBox", "Presentation"], FontSize->18], Cell[StyleData["5ColumnBox", "Printout"], CellMargins->{{2, 0}, {0, 8}}, CellFrameColor->GrayLevel[0], FontSize->9, Background->GrayLevel[0.900008]], Cell[StyleData["5ColumnBox", "EnhancedPrintout"], CellMargins->{{2, 0}, {0, 8}}, CellFrameColor->GrayLevel[0], FontSize->9, Background->GrayLevel[0.900008]], Cell[StyleData["5ColumnBox", "EnhancedPrintoutNonGray"], CellMargins->{{2, 0}, {0, 8}}, CellFrameColor->GrayLevel[0], FontSize->9, Background->GrayLevel[1]] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["6ColumnBox"], CellFrame->0.5, CellMargins->{{27, 12}, {0, 8}}, CellHorizontalScrolling->True, CellFrameColor->RGBColor[0.74902, 0.694118, 0.552941], LineIndent->0, StyleMenuListing->None, Background->RGBColor[0.964706, 0.929412, 0.839216], FrameBoxOptions->{BoxFrame->0.5, BoxMargins->True}, GridBoxOptions->{ColumnWidths->{0.12, 0.22, 0.12, 0.12, 0.22, 0.12}}], Cell[StyleData["6ColumnBox", "Presentation"], FontSize->18], Cell[StyleData["6ColumnBox", "Printout"], CellMargins->{{2, 0}, {0, 8}}, CellFrameColor->GrayLevel[0], FontSize->10, Background->GrayLevel[0.900008]], Cell[StyleData["6ColumnBox", "EnhancedPrintout"], CellMargins->{{2, 0}, {0, 8}}, CellFrameColor->GrayLevel[0], FontSize->10, Background->GrayLevel[0.900008]], Cell[StyleData["6ColumnBox", "EnhancedPrintoutNonGray"], CellMargins->{{2, 0}, {0, 8}}, CellFrameColor->GrayLevel[0], FontSize->10, Background->GrayLevel[1]] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["FramedBox"], CellFrame->0.5, CellMargins->{{27, 12}, {0, 8}}, CellHorizontalScrolling->True, PageBreakWithin->False, CellFrameColor->RGBColor[0.74902, 0.694118, 0.552941], AutoIndent->False, AutoSpacing->False, LineIndent->0, FontWeight->"Plain", Background->RGBColor[0.964706, 0.929412, 0.839216], GridBoxOptions->{RowSpacings->1.5, ColumnAlignments->{Left}}], Cell[StyleData["FramedBox", "Presentation"], FontSize->18], Cell[StyleData["FramedBox", "Printout"], CellMargins->{{2, 4}, {0, 8}}, CellFrameColor->GrayLevel[0], FontSize->10, Background->GrayLevel[1]], Cell[StyleData["FramedBox", "EnhancedPrintout"], CellMargins->{{2, 4}, {0, 8}}, CellFrameColor->GrayLevel[0], FontFamily->"Palatino", FontSize->10, Background->GrayLevel[1]], Cell[StyleData["FramedBox", "EnhancedPrintoutNonGray"], CellMargins->{{2, 4}, {0, 8}}, CellFrameColor->GrayLevel[0], FontFamily->"Palatino", FontSize->10, Background->GrayLevel[1]] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["DefinitionBox"], CellFrame->0.5, CellMargins->{{27, 12}, {0, 8}}, CellHorizontalScrolling->True, PageBreakWithin->False, CellFrameColor->RGBColor[0.74902, 0.694118, 0.552941], AutoIndent->False, AutoSpacing->False, LineIndent->0, FontWeight->"Plain", Background->RGBColor[0.964706, 0.929412, 0.839216], GridBoxOptions->{RowSpacings->1.5, ColumnSpacings->1, ColumnWidths->{0.4, 0.6}, ColumnAlignments->{Left}}], Cell[StyleData["DefinitionBox", "Presentation"], FontSize->18], Cell[StyleData["DefinitionBox", "Printout"], CellMargins->{{2, 4}, {0, 8}}, CellFrameColor->GrayLevel[0], FontSize->10, Background->GrayLevel[1]], Cell[StyleData["DefinitionBox", "EnhancedPrintout"], CellMargins->{{2, 4}, {0, 8}}, CellFrameColor->GrayLevel[0], FontFamily->"Palatino", FontSize->10, Background->GrayLevel[1]], Cell[StyleData["DefinitionBox", "EnhancedPrintoutNonGray"], CellMargins->{{2, 4}, {0, 8}}, CellFrameColor->GrayLevel[0], FontFamily->"Palatino", FontSize->10, Background->GrayLevel[1]] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["DefinitionBox3Col"], CellFrame->0.5, CellMargins->{{27, 12}, {0, 8}}, CellHorizontalScrolling->True, PageBreakWithin->False, CellFrameColor->RGBColor[0.74902, 0.694118, 0.552941], AutoIndent->False, AutoSpacing->False, LineIndent->0, FontWeight->"Plain", Background->RGBColor[0.964706, 0.929412, 0.839216], GridBoxOptions->{RowSpacings->1.5, ColumnSpacings->1, ColumnWidths->{0.35, 0.2, 0.45}, ColumnAlignments->{Left}}], Cell[StyleData["DefinitionBox3Col", "Presentation"], FontSize->18], Cell[StyleData["DefinitionBox3Col", "Printout"], CellMargins->{{2, 4}, {0, 8}}, CellFrameColor->GrayLevel[0], FontSize->10, Background->GrayLevel[1]], Cell[StyleData["DefinitionBox3Col", "EnhancedPrintout"], CellMargins->{{2, 4}, {0, 8}}, CellFrameColor->GrayLevel[0], FontFamily->"Palatino", FontSize->10, Background->GrayLevel[1]], Cell[StyleData["DefinitionBox3Col", "EnhancedPrintoutNonGray"], CellMargins->{{2, 4}, {0, 8}}, CellFrameColor->GrayLevel[0], FontFamily->"Palatino", FontSize->10, Background->GrayLevel[1]] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["DefinitionBox4Col"], CellFrame->0.5, CellMargins->{{27, 12}, {0, 8}}, CellHorizontalScrolling->True, PageBreakWithin->False, CellFrameColor->RGBColor[0.74902, 0.694118, 0.552941], AutoIndent->False, AutoSpacing->False, LineIndent->0, FontWeight->"Plain", Background->RGBColor[0.964706, 0.929412, 0.839216], GridBoxOptions->{RowSpacings->1.5, ColumnSpacings->1, ColumnWidths->{0.15, 0.35, 0.15, 0.35}, ColumnAlignments->{Left}}], Cell[StyleData["DefinitionBox4Col", "Presentation"], FontSize->18], Cell[StyleData["DefinitionBox4Col", "Printout"], CellMargins->{{2, 4}, {0, 8}}, CellFrameColor->GrayLevel[0], FontSize->10, Background->GrayLevel[1]], Cell[StyleData["DefinitionBox4Col", "EnhancedPrintout"], CellMargins->{{2, 4}, {0, 8}}, CellFrameColor->GrayLevel[0], FontFamily->"Palatino", FontSize->10, Background->GrayLevel[1]], Cell[StyleData["DefinitionBox4Col", "EnhancedPrintoutNonGray"], CellMargins->{{2, 4}, {0, 8}}, CellFrameColor->GrayLevel[0], FontFamily->"Palatino", FontSize->10, Background->GrayLevel[1]] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["DefinitionBox5Col"], CellFrame->0.5, CellMargins->{{27, 12}, {0, 8}}, CellHorizontalScrolling->True, PageBreakWithin->False, CellFrameColor->RGBColor[0.74902, 0.694118, 0.552941], AutoIndent->False, AutoSpacing->False, LineIndent->0, FontWeight->"Plain", Background->RGBColor[0.964706, 0.929412, 0.839216], GridBoxOptions->{RowSpacings->1.5, ColumnSpacings->1, ColumnWidths->0.2, ColumnAlignments->{Left}}], Cell[StyleData["DefinitionBox5Col", "Presentation"], FontSize->18], Cell[StyleData["DefinitionBox5Col", "Printout"], CellMargins->{{2, 4}, {0, 8}}, CellFrameColor->GrayLevel[0], FontSize->10, Background->GrayLevel[1]], Cell[StyleData["DefinitionBox5Col", "EnhancedPrintout"], CellMargins->{{2, 4}, {0, 8}}, CellFrameColor->GrayLevel[0], FontFamily->"Palatino", FontSize->10, Background->GrayLevel[1]], Cell[StyleData["DefinitionBox5Col", "EnhancedPrintoutNonGray"], CellMargins->{{2, 4}, {0, 8}}, CellFrameColor->GrayLevel[0], FontFamily->"Palatino", FontSize->10, Background->GrayLevel[1]] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["DefinitionBox6Col"], CellFrame->0.5, CellMargins->{{27, 12}, {0, 8}}, CellHorizontalScrolling->True, PageBreakWithin->False, CellFrameColor->RGBColor[0.74902, 0.694118, 0.552941], AutoIndent->False, AutoSpacing->False, LineIndent->0, FontWeight->"Plain", Background->RGBColor[0.964706, 0.929412, 0.839216], GridBoxOptions->{RowSpacings->1.5, ColumnSpacings->1, ColumnWidths->{0.13, 0.24, 0.13, 0.13, 0.24, 0.13}, ColumnAlignments->{Left}}], Cell[StyleData["DefinitionBox6Col", "Presentation"], FontSize->18], Cell[StyleData["DefinitionBox6Col", "Printout"], CellMargins->{{2, 4}, {0, 8}}, CellFrameColor->GrayLevel[0], FontSize->10, Background->GrayLevel[1]], Cell[StyleData["DefinitionBox6Col", "EnhancedPrintout"], CellMargins->{{2, 4}, {0, 8}}, CellFrameColor->GrayLevel[0], FontFamily->"Palatino", FontSize->10, Background->GrayLevel[1]], Cell[StyleData["DefinitionBox6Col", "EnhancedPrintoutNonGray"], CellMargins->{{2, 4}, {0, 8}}, CellFrameColor->GrayLevel[0], FontFamily->"Palatino", FontSize->10, Background->GrayLevel[1]] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["TopBox"], CellFrame->{{0.5, 0.5}, {0, 0.5}}, CellMargins->{{27, 12}, {0, 8}}, CellHorizontalScrolling->True, PageBreakBelow->False, CellFrameColor->RGBColor[0.74902, 0.694118, 0.552941], AutoIndent->False, AutoSpacing->False, LineIndent->0, StyleMenuListing->None, FontWeight->"Plain", Background->RGBColor[0.964706, 0.929412, 0.839216], GridBoxOptions->{RowSpacings->1.5, ColumnSpacings->1, ColumnWidths->{0.31, 0.62}, ColumnAlignments->{Left}}], Cell[StyleData["TopBox", "Presentation"], FontSize->18], Cell[StyleData["TopBox", "Printout"], CellMargins->{{2, 0}, {0, 8}}, CellFrameColor->GrayLevel[0], Background->GrayLevel[1]], Cell[StyleData["TopBox", "EnhancedPrintout"], CellMargins->{{2, 0}, {0, 8}}, CellFrameColor->GrayLevel[0], FontFamily->"Palatino", Background->GrayLevel[1]], Cell[StyleData["TopBox", "EnhancedPrintoutNonGray"], CellMargins->{{2, 0}, {0, 8}}, CellFrameColor->GrayLevel[0], FontFamily->"Palatino", Background->GrayLevel[1]] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["MiddleBox"], CellFrame->{{0.5, 0.5}, {0, 0}}, CellMargins->{{27, 12}, {0, -7}}, CellHorizontalScrolling->True, PageBreakAbove->False, PageBreakBelow->False, CellFrameColor->RGBColor[0.74902, 0.694118, 0.552941], AutoIndent->False, AutoSpacing->False, LineIndent->0, StyleMenuListing->None, FontWeight->"Plain", Background->RGBColor[0.964706, 0.929412, 0.839216], GridBoxOptions->{RowSpacings->1.5, ColumnSpacings->1, ColumnWidths->{0.31, 0.62}, ColumnAlignments->{Left}}], Cell[StyleData["MiddleBox", "Presentation"], FontSize->18], Cell[StyleData["MiddleBox", "Printout"], CellMargins->{{2, 0}, {0, 2}}, CellFrameColor->GrayLevel[0], Background->GrayLevel[1]], Cell[StyleData["MiddleBox", "EnhancedPrintout"], CellMargins->{{2, 0}, {0, 4}}, CellFrameColor->GrayLevel[0], FontFamily->"Palatino", Background->GrayLevel[1]], Cell[StyleData["MiddleBox", "EnhancedPrintoutNonGray"], CellMargins->{{2, 0}, {0, 4}}, CellFrameColor->GrayLevel[0], FontFamily->"Palatino", Background->GrayLevel[1]] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["BottomBox"], CellFrame->{{0.5, 0.5}, {0.5, 0}}, CellMargins->{{27, 12}, {0, -7}}, CellHorizontalScrolling->True, PageBreakAbove->False, PageBreakBelow->False, CellFrameColor->RGBColor[0.74902, 0.694118, 0.552941], AutoIndent->False, AutoSpacing->False, LineIndent->0, StyleMenuListing->None, FontWeight->"Plain", Background->RGBColor[0.964706, 0.929412, 0.839216], GridBoxOptions->{RowSpacings->1.5, ColumnSpacings->1, ColumnWidths->{0.31, 0.62}, ColumnAlignments->{Left}}], Cell[StyleData["BottomBox", "Presentation"], FontSize->18], Cell[StyleData["BottomBox", "Printout"], CellMargins->{{2, 0}, {0, -5}}, CellFrameColor->GrayLevel[0], FontSize->10, Background->GrayLevel[1], GridBoxOptions->{RowMinHeight->2.2}], Cell[StyleData["BottomBox", "EnhancedPrintout"], CellMargins->{{2, 0}, {0, -5}}, CellFrameColor->GrayLevel[0], FontFamily->"Palatino", FontSize->10, Background->GrayLevel[1], GridBoxOptions->{RowMinHeight->2.2}], Cell[StyleData["BottomBox", "EnhancedPrintoutNonGray"], CellMargins->{{2, 0}, {0, -5}}, CellFrameColor->GrayLevel[0], FontFamily->"Palatino", FontSize->10, Background->GrayLevel[1], GridBoxOptions->{RowMinHeight->2.2}] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["TopSpanBox"], CellFrame->{{0.5, 0.5}, {0, 0.5}}, CellMargins->{{27, 12}, {-2, 8}}, CellHorizontalScrolling->True, PageBreakBelow->False, CellFrameColor->RGBColor[0.74902, 0.694118, 0.552941], AutoIndent->False, AutoSpacing->False, LineIndent->0, StyleMenuListing->None, FontWeight->"Plain", Background->RGBColor[0.964706, 0.929412, 0.839216], GridBoxOptions->{RowSpacings->1.5, ColumnSpacings->1, ColumnWidths->{0.9, 0.03}, ColumnAlignments->{Left}}], Cell[StyleData["TopSpanBox", "Presentation"], FontSize->18], Cell[StyleData["TopSpanBox", "Printout"], CellMargins->{{2, 0}, {-2, 8}}, CellFrameColor->GrayLevel[0], FontSize->10, Background->GrayLevel[1]], Cell[StyleData["TopSpanBox", "EnhancedPrintout"], CellMargins->{{2, 0}, {-4, 8}}, CellFrameColor->GrayLevel[0], FontFamily->"Palatino", FontSize->10, Background->GrayLevel[1]], Cell[StyleData["TopSpanBox", "EnhancedPrintoutNonGray"], CellMargins->{{2, 0}, {-4, 8}}, CellFrameColor->GrayLevel[0], FontFamily->"Palatino", FontSize->10, Background->GrayLevel[1]] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["MiddleSpanBox"], CellFrame->{{0.5, 0.5}, {0, 0}}, CellMargins->{{27, 12}, {0, 0}}, CellHorizontalScrolling->True, PageBreakAbove->False, PageBreakBelow->False, CellFrameColor->RGBColor[0.74902, 0.694118, 0.552941], AutoIndent->False, AutoSpacing->False, LineIndent->0, StyleMenuListing->None, FontWeight->"Plain", Background->RGBColor[0.964706, 0.929412, 0.839216], GridBoxOptions->{RowSpacings->1.5, ColumnSpacings->1, ColumnWidths->{0.9, 0.03}, ColumnAlignments->{Left}}], Cell[StyleData["MiddleSpanBox", "Presentation"], FontSize->18], Cell[StyleData["MiddleSpanBox", "Printout"], CellMargins->{{2, 0}, {-5, 0}}, CellFrameColor->GrayLevel[0], FontSize->10, Background->GrayLevel[1], GridBoxOptions->{RowMinHeight->1.8}], Cell[StyleData["MiddleSpanBox", "EnhancedPrintout"], CellMargins->{{2, 0}, {-7, 0}}, CellFrameColor->GrayLevel[0], FontFamily->"Palatino", FontSize->10, Background->GrayLevel[1], GridBoxOptions->{RowMinHeight->1.8}], Cell[StyleData["MiddleSpanBox", "EnhancedPrintoutNonGray"], CellMargins->{{2, 0}, {-7, 0}}, CellFrameColor->GrayLevel[0], FontFamily->"Palatino", FontSize->10, Background->GrayLevel[1], GridBoxOptions->{RowMinHeight->1.8}] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["Picture"], CellMargins->{{27, Inherited}, {4, 4}}, CellGroupingRules->"GraphicsGrouping", CellHorizontalScrolling->True, StyleMenuListing->None], Cell[StyleData["Picture", "Presentation"], FontSize->18], Cell[StyleData["Picture", "Printout"], CellMargins->{{2, Inherited}, {4, 4}}, Magnification->0.65], Cell[StyleData["Picture", "EnhancedPrintout"], CellMargins->{{2, Inherited}, {4, 2}}, Magnification->0.65], Cell[StyleData["Picture", "EnhancedPrintoutNonGray"], CellMargins->{{2, Inherited}, {4, 2}}, Magnification->0.65] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["OpenCloseItemizedPicture"], CellMargins->{{88, 4}, {4, 4}}, PrivateCellOptions->{"DefaultCellGroupOpen"->False}, CellGroupingRules->"GraphicsGrouping", CellHorizontalScrolling->True, StyleMenuListing->None], Cell[StyleData["OpenCloseItemizedPicture", "Presentation"], FontSize->18], Cell[StyleData["OpenCloseItemizedPicture", "Printout"], CellMargins->{{76, 2}, {0, 0}}, CellElementSpacings->{"CellMinHeight"->1, "ClosedCellHeight"->0}, CellOpen->False], Cell[StyleData["OpenCloseItemizedPicture", "EnhancedPrintout"], CellMargins->{{76, 2}, {0, 0}}, CellElementSpacings->{"CellMinHeight"->1, "ClosedCellHeight"->0}, CellOpen->False], Cell[StyleData["OpenCloseItemizedPicture", "EnhancedPrintoutNonGray"], CellMargins->{{76, 2}, {0, 0}}, CellElementSpacings->{"CellMinHeight"->1, "ClosedCellHeight"->0}, CellOpen->False] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["ItemizedPicture"], CellMargins->{{88, 4}, {4, 4}}, CellGroupingRules->"GraphicsGrouping", CellHorizontalScrolling->True, StyleMenuListing->None], Cell[StyleData["ItemizedPicture", "Presentation"], FontSize->18], Cell[StyleData["ItemizedPicture", "Printout"], CellMargins->{{77, 2}, {4, -4}}, Magnification->0.5], Cell[StyleData["ItemizedPicture", "EnhancedPrintout"], CellMargins->{{78, 2}, {12, -6}}, Magnification->0.5], Cell[StyleData["ItemizedPicture", "EnhancedPrintoutNonGray"], CellMargins->{{75, 2}, {4, -6}}, Magnification->0.5] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["ListGraphic"], CellMargins->{{88, 4}, {4, 4}}, CellGroupingRules->"GraphicsGrouping", CellHorizontalScrolling->True, StyleMenuListing->None], Cell[StyleData["ListGraphic", "Presentation"], FontSize->18], Cell[StyleData["ListGraphic", "Printout"], CellMargins->{{77, 2}, {4, -4}}, Magnification->0.5], Cell[StyleData["ListGraphic", "EnhancedPrintout"], CellMargins->{{78, 2}, {12, -6}}, Magnification->0.5], Cell[StyleData["ListGraphic", "EnhancedPrintoutNonGray"], CellMargins->{{75, 2}, {4, -6}}, Magnification->0.5] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["ListNoteBox"], CellFrame->0.5, CellMargins->{{88, 12}, {8, 8}}, CellHorizontalScrolling->True, CellFrameColor->RGBColor[0.74902, 0.694118, 0.552941], LineIndent->0, StyleMenuListing->None, Background->RGBColor[0.964706, 0.929412, 0.839216], FrameBoxOptions->{BoxMargins->{{1, 1}, {1.5, 1.5}}}, GridBoxOptions->{ColumnSpacings->1}], Cell[StyleData["ListNoteBox", "Presentation"], FontSize->18], Cell[StyleData["ListNoteBox", "Printout"], CellMargins->{{77, 4}, {6, 2}}, FontSize->10, Background->GrayLevel[0.900008]], Cell[StyleData["ListNoteBox", "EnhancedPrintout"], CellMargins->{{39, 4}, {6, 2}}, CellFrameColor->GrayLevel[0], FontSize->10, Background->GrayLevel[0.900008]], Cell[StyleData["ListNoteBox", "EnhancedPrintoutNonGray"], CellMargins->{{77, 4}, {6, 2}}, CellFrameColor->GrayLevel[0], FontSize->10, Background->GrayLevel[1]] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["PictureGroup"], CellMargins->{{41, 4}, {0, 4}}, CellGroupingRules->"GraphicsGrouping", CellHorizontalScrolling->True, StyleMenuListing->None], Cell[StyleData["PictureGroup", "Presentation"], FontSize->18], Cell[StyleData["PictureGroup", "Printout"], CellMargins->{{76, 2}, {0, 0}}, CellElementSpacings->{"CellMinHeight"->1, "ClosedCellHeight"->0}, CellOpen->False], Cell[StyleData["PictureGroup", "EnhancedPrintout"], CellMargins->{{76, 2}, {0, 0}}, CellElementSpacings->{"CellMinHeight"->1, "ClosedCellHeight"->0}, CellOpen->False], Cell[StyleData["PictureGroup", "EnhancedPrintoutNonGray"], CellMargins->{{76, 2}, {0, 0}}, CellElementSpacings->{"CellMinHeight"->1, "ClosedCellHeight"->0}, CellOpen->False] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["Sound"], ShowCellBracket->True, CellMargins->{{27, Inherited}, {0, 8}}, StyleMenuListing->None], Cell[StyleData["Sound", "Presentation"], FontSize->18], Cell[StyleData["Sound", "Printout"], CellMargins->{{2, 0}, {0, 8}}, FontSize->10], Cell[StyleData["Sound", "EnhancedPrintout"], CellMargins->{{2, 0}, {0, 8}}, FontSize->10], Cell[StyleData["Sound", "EnhancedPrintoutNonGray"], CellMargins->{{2, 0}, {0, 8}}, FontSize->10] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["Caption"], CellMargins->{{27, 4}, {0, 3}}, PageBreakAbove->False, StyleMenuListing->None, FontFamily->"Helvetica", FontSize->9], Cell[StyleData["Caption", "Presentation"], FontSize->14], Cell[StyleData["Caption", "Printout"], CellMargins->{{2, 4}, {2, 0}}, FontSize->7], Cell[StyleData["Caption", "EnhancedPrintout"], CellMargins->{{2, 4}, {2, 2}}, FontFamily->"Frutiger 55 Roman", FontSize->7], Cell[StyleData["Caption", "EnhancedPrintoutNonGray"], CellMargins->{{2, 4}, {2, -2}}, FontFamily->"Frutiger 55 Roman", FontSize->7] }, Closed]] }, Open ]], Cell[CellGroupData[{ Cell["Tables", "Section"], Cell[CellGroupData[{ Cell[StyleData["2ColumnTable"], CellMargins->{{35, 4}, {0, 8}}, CellHorizontalScrolling->True, LineIndent->0, StyleMenuListing->None, GridBoxOptions->{ColumnWidths->{0.34, 0.64}, ColumnAlignments->{Left}}], Cell[StyleData["2ColumnTable", "Presentation"], FontSize->18], Cell[StyleData["2ColumnTable", "Printout"], CellMargins->{{2, 0}, {0, 8}}, FontSize->9], Cell[StyleData["2ColumnTable", "EnhancedPrintout"], CellMargins->{{2, 0}, {0, 8}}, FontSize->9], Cell[StyleData["2ColumnTable", "EnhancedPrintoutNonGray"], CellMargins->{{2, 0}, {0, 8}}, FontSize->9] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["2ColumnEvenTable"], CellMargins->{{35, 4}, {0, 8}}, CellHorizontalScrolling->True, LineIndent->0, StyleMenuListing->None, GridBoxOptions->{ColumnWidths->0.49, ColumnAlignments->{Left}}], Cell[StyleData["2ColumnEvenTable", "Presentation"], FontSize->18], Cell[StyleData["2ColumnEvenTable", "Printout"], CellMargins->{{2, 0}, {0, 8}}, FontSize->9], Cell[StyleData["2ColumnEvenTable", "EnhancedPrintout"], CellMargins->{{2, 0}, {0, 8}}, FontSize->9], Cell[StyleData["2ColumnEvenTable", "EnhancedPrintoutNonGray"], CellMargins->{{2, 0}, {0, 8}}, FontSize->9] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["3ColumnTable"], CellMargins->{{35, 4}, {0, 8}}, CellHorizontalScrolling->True, LineIndent->0, StyleMenuListing->None, GridBoxOptions->{ColumnWidths->{0.28, 0.28, 0.43}, ColumnAlignments->{Left}}], Cell[StyleData["3ColumnTable", "Presentation"], FontSize->18], Cell[StyleData["3ColumnTable", "Printout"], CellMargins->{{2, 0}, {0, 8}}, FontSize->9], Cell[StyleData["3ColumnTable", "EnhancedPrintout"], CellMargins->{{2, 0}, {0, 8}}, FontSize->9], Cell[StyleData["3ColumnTable", "EnhancedPrintoutNonGray"], CellMargins->{{2, 0}, {0, 8}}, FontSize->9] }, Closed]] }, Open ]], Cell[CellGroupData[{ Cell["Formulas and Programming", "Section"], Cell[CellGroupData[{ Cell[StyleData["InlineFormula"], CellMargins->{{27, 4}, {0, 8}}, CellHorizontalScrolling->True, "TwoByteSyntaxCharacterAutoReplacement"->True, HyphenationOptions->{"HyphenationCharacter"->"\[Continuation]"}, LanguageCategory->"Formula", AutoSpacing->True, ScriptLevel->1, SingleLetterItalics->True, SpanMaxSize->Infinity, StyleMenuListing->None, GridBoxOptions->{ColumnWidths->Automatic}], Cell[StyleData["InlineFormula", "Printout"], CellMargins->{{2, 0}, {0, 8}}, FontSize->10], Cell[StyleData["InlineFormula", "EnhancedPrintout"], CellMargins->{{2, 0}, {0, 8}}, FontSize->10], Cell[StyleData["InlineFormula", "EnhancedPrintoutNonGray"], CellMargins->{{2, 0}, {0, 8}}, FontSize->10] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["InlineOutput"], CellMargins->{{27, 4}, {0, 8}}, CellHorizontalScrolling->True, "TwoByteSyntaxCharacterAutoReplacement"->True, HyphenationOptions->{"HyphenationCharacter"->"\[Continuation]"}, LanguageCategory->None, StyleMenuListing->None, FontFamily->"Courier"], Cell[StyleData["InlineOutput", "Printout"], CellMargins->{{2, 0}, {0, 8}}, FontSize->9.5], Cell[StyleData["InlineOutput", "EnhancedPrintout"], CellMargins->{{2, 0}, {0, 8}}, FontSize->9.5], Cell[StyleData["InlineOutput", "EnhancedPrintoutNonGray"], CellMargins->{{2, 0}, {0, 8}}, FontSize->9.5] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["DisplayFormula"], CellMargins->{{66, Inherited}, {Inherited, 10}}, CellHorizontalScrolling->True, "TwoByteSyntaxCharacterAutoReplacement"->True, HyphenationOptions->{"HyphenationCharacter"->"\[Continuation]"}, LanguageCategory->"Formula", ScriptLevel->0, SingleLetterItalics->True, SpanMaxSize->Infinity, StyleMenuListing->None, UnderoverscriptBoxOptions->{LimitsPositioning->True}, GridBoxOptions->{ColumnWidths->Automatic}], Cell[StyleData["DisplayFormula", "Presentation"], FontSize->18], Cell[StyleData["DisplayFormula", "Printout"]], Cell[StyleData["DisplayFormula", "EnhancedPrintout"], FontFamily->"Palatino"], Cell[StyleData["DisplayFormula", "EnhancedPrintoutNonGray"], FontFamily->"Palatino"] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["DisplayMath"], CellMargins->{{66, 10}, {7, 7}}, Evaluatable->False, CellGroupingRules->"InputGrouping", CellHorizontalScrolling->True, PageBreakWithin->False, GroupPageBreakWithin->False, DefaultFormatType->DefaultInputFormatType, "TwoByteSyntaxCharacterAutoReplacement"->True, HyphenationOptions->{"HyphenationCharacter"->"\[Continuation]"}, AutoItalicWords->{}, LanguageCategory->"Formula", FormatType->InputForm, ShowStringCharacters->True, NumberMarks->True, CounterIncrements->"Input"], Cell[StyleData["DisplayMath", "Presentation"], FontSize->18], Cell[StyleData["DisplayMath", "Printout"], CellMargins->{{39, 0}, {6, 6}}, FontSize->9], Cell[StyleData["DisplayMath", "EnhancedPrintout"], CellMargins->{{39, 0}, {4, 6}}, FontFamily->"WRICourier", FontSize->9], Cell[StyleData["DisplayMath", "EnhancedPrintoutNonGray"], CellMargins->{{39, 0}, {4, 6}}, FontFamily->"WRICourier", FontSize->9] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["NumberedEquation"], CellMargins->{{66, 27}, {7, 7}}, CellFrameLabels->{{None, Cell[ TextData[ {"(", CounterBox[ "NumberedEquation"], ")"}]]}, {None, None}}, DefaultFormatType->DefaultInputFormatType, "TwoByteSyntaxCharacterAutoReplacement"->True, LanguageCategory->"Formula", CounterIncrements->"NumberedEquation", FormatTypeAutoConvert->False], Cell[StyleData["NumberedEquation", "Presentation"], FontSize->18], Cell[StyleData["NumberedEquation", "Printout"], CellMargins->{{39, 55}, {0, 10}}, FontSize->10], Cell[StyleData["NumberedEquation", "EnhancedPrintout"], CellMargins->{{39, 55}, {0, 10}}, FontFamily->"Palatino", FontSize->10], Cell[StyleData["NumberedEquation", "EnhancedPrintoutNonGray"], CellMargins->{{39, 55}, {0, 10}}, FontFamily->"Palatino", FontSize->10] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["EquationNumber"], CellMargins->{{66, Inherited}, {Inherited, Inherited}}, LineSpacing->{1.83, 0}, LanguageCategory->"Formula"], Cell[StyleData["EquationNumber", "Presentation"], FontSize->18], Cell[StyleData["EquationNumber", "Printout"], LineSpacing->{1.7, 0}], Cell[StyleData["EquationNumber", "EnhancedPrintout"], LineSpacing->{1.7, 0}, FontFamily->"Palatino"], Cell[StyleData["EquationNumber", "EnhancedPrintoutNonGray"], LineSpacing->{1.7, 0}, FontFamily->"Palatino"] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["Program"], CellMargins->{{66, Inherited}, {Inherited, 10}}, CellHorizontalScrolling->True, ShowSpecialCharacters->Automatic, AutoItalicWords->{}, LanguageCategory->"Formula", FontFamily->"Courier"], Cell[StyleData["Program", "Presentation"], FontSize->18], Cell[StyleData["Program", "Printout"], CellMargins->{{42, 30}, {Inherited, 4}}, FontSize->9.5], Cell[StyleData["Program", "EnhancedPrintout"], CellMargins->{{42, 30}, {Inherited, 4}}, FontFamily->"WRICourier", FontSize->9.5], Cell[StyleData["Program", "EnhancedPrintoutNonGray"], CellMargins->{{42, 30}, {Inherited, 4}}, FontFamily->"WRICourier", FontSize->9.5] }, Closed]] }, Open ]], Cell[CellGroupData[{ Cell["Unique Help Browser Styles", "Section"], Cell[CellGroupData[{ Cell["\<\ Standard Styles \ \>", "Subsection"], Cell[CellGroupData[{ Cell[StyleData["InspectorLevel1"], ShowGroupOpenCloseIcon->True, CellMargins->{{27, 10}, {2, 7}}, CellGroupingRules->{"SectionGrouping", 60}, HyphenationOptions->{"HyphenationCharacter"->"-"}, ParagraphIndent->-38, StyleMenuListing->None, FontFamily->"Helvetica", FontSize->16, FontWeight->"Bold"], Cell[StyleData["InspectorLevel1", "Presentation"], FontSize->24], Cell[StyleData["InspectorLevel1", "SlideShow"], HyphenationOptions->{"HyphenationCharacter"->"-"}], Cell[StyleData["InspectorLevel1", "Printout"], HyphenationOptions->{"HyphenationCharacter"->"-"}, FontSize->14] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["InspectorLevel2"], ShowGroupOpenCloseIcon->True, CellMargins->{{27, 4}, {0, 14}}, HyphenationOptions->{"HyphenationCharacter"->"-"}, StyleMenuListing->None, FontFamily->"Helvetica", FontSize->14, FontWeight->"Bold"], Cell[StyleData["InspectorLevel2", "Presentation"], FontSize->21], Cell[StyleData["InspectorLevel2", "SlideShow"], ShowGroupOpenCloseIcon->True, CellMargins->{{48, 10}, {2, 12}}, CellGroupingRules->{"SectionGrouping", 70}, HyphenationOptions->{"HyphenationCharacter"->"-"}, ParagraphIndent->-27, FontFamily->"Helvetica", FontSize->14, FontWeight->"Bold"], Cell[StyleData["InspectorLevel2", "Printout"], HyphenationOptions->{"HyphenationCharacter"->"-"}, FontSize->12] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["ObjectName"], CellFrame->{{0, 0}, {0.5, 0}}, CellMargins->{{0, 0}, {0, 0}}, CellGroupingRules->{"SectionGrouping", 50}, CellFrameMargins->{{27, 12}, {3, 15}}, CellFrameColor->RGBColor[0.74902, 0.694118, 0.552941], HyphenationOptions->{"HyphenationCharacter"->"-"}, StyleMenuListing->None, FontFamily->"Courier", FontSize->18, FontWeight->"Bold", Background->RGBColor[0.960784, 0.878431, 0.666667]], Cell[StyleData["ObjectName", "Presentation"], FontSize->24], Cell[StyleData["ObjectName", "SlideShow"], CellMargins->{{72, 4}, {1, 14}}, CellGroupingRules->{"SectionGrouping", 90}, HyphenationOptions->{"HyphenationCharacter"->"-"}, StyleMenuListing->None, FontFamily->"Courier", FontSize->12, FontWeight->"Bold"], Cell[StyleData["ObjectName", "Printout"], CellMargins->{{2, 0}, {1, 10}}, HyphenationOptions->{"HyphenationCharacter"->"-"}, FontSize->12] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["SubObjectNameClosed"], ShowGroupOpenCloseIcon->True, CellMargins->{{27, 4}, {1, 10}}, PrivateCellOptions->{"DefaultCellGroupOpen"->False}, CellGroupingRules->{"SectionGrouping", 90}, HyphenationOptions->{"HyphenationCharacter"->"-"}, StyleMenuListing->None, FontFamily->"Courier", FontSize->14, FontWeight->"Bold"], Cell[StyleData["SubObjectNameClosed", "Presentation"], FontSize->21], Cell[StyleData["SubObjectNameClosed", "SlideShow"], CellMargins->{{72, 4}, {1, 14}}, HyphenationOptions->{"HyphenationCharacter"->"-"}, StyleMenuListing->None, FontFamily->"Courier", FontSize->12, FontWeight->"Bold"], Cell[StyleData["SubObjectNameClosed", "Printout"], CellMargins->{{2, 0}, {1, 10}}, HyphenationOptions->{"HyphenationCharacter"->"-"}, FontSize->12] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["SubObjectName"], ShowGroupOpenCloseIcon->True, CellMargins->{{27, 4}, {1, 10}}, HyphenationOptions->{"HyphenationCharacter"->"-"}, StyleMenuListing->None, FontFamily->"Courier", FontSize->18, FontWeight->"Bold"], Cell[StyleData["SubObjectName", "Presentation"], FontSize->24], Cell[StyleData["SubObjectName", "SlideShow"], ShowGroupOpenCloseIcon->True, CellMargins->{{90, 4}, {1, 14}}, HyphenationOptions->{"HyphenationCharacter"->"-"}, FontFamily->"Courier", FontSize->12], Cell[StyleData["SubObjectName", "Printout"], CellMargins->{{2, 0}, {1, 10}}, HyphenationOptions->{"HyphenationCharacter"->"-"}, FontFamily->"Courier", FontSize->12] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["GroupObjectName"], ShowGroupOpenCloseIcon->True, CellMargins->{{27, 4}, {0, 14}}, HyphenationOptions->{"HyphenationCharacter"->"-"}, StyleMenuListing->None, FontFamily->"Courier", FontSize->18, FontWeight->"Bold"], Cell[StyleData["GroupObjectName", "Presentation"], FontSize->24], Cell[StyleData["GroupObjectName", "SlideShow"], ShowGroupOpenCloseIcon->True, CellMargins->{{72, 10}, {2, 12}}, CellGroupingRules->{"SectionGrouping", 70}, HyphenationOptions->{"HyphenationCharacter"->"-"}, ParagraphIndent->-27, CounterIncrements->"Outline2", FontFamily->"Courier", FontSize->12, FontWeight->"Bold"], Cell[StyleData["GroupObjectName", "Printout"], HyphenationOptions->{"HyphenationCharacter"->"-"}, FontSize->14] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["GroupObjectNameClosed"], ShowGroupOpenCloseIcon->True, CellMargins->{{27, 4}, {0, 14}}, PrivateCellOptions->{"DefaultCellGroupOpen"->False}, CellGroupingRules->{"SectionGrouping", 80}, HyphenationOptions->{"HyphenationCharacter"->"-"}, StyleMenuListing->None, FontFamily->"Courier", FontSize->18, FontWeight->"Bold"], Cell[StyleData["GroupObjectNameClosed", "Presentation"], FontSize->24], Cell[StyleData["GroupObjectNameClosed", "SlideShow"], ShowGroupOpenCloseIcon->True, CellMargins->{{72, 10}, {2, 12}}, CellGroupingRules->{"SectionGrouping", 70}, HyphenationOptions->{"HyphenationCharacter"->"-"}, ParagraphIndent->-27, CounterIncrements->"Outline2", FontFamily->"Courier", FontSize->12, FontWeight->"Bold"], Cell[StyleData["GroupObjectNameClosed", "Printout"], HyphenationOptions->{"HyphenationCharacter"->"-"}, FontSize->14] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["ObjectNameWarningMessages"], CellMargins->{{27, 4}, {1, 10}}, CellGroupingRules->{"SectionGrouping", 65}, HyphenationOptions->{"HyphenationCharacter"->"-"}, StyleMenuListing->None, FontFamily->"Courier", FontSize->18, FontWeight->"Bold"], Cell[StyleData["ObjectNameWarningMessages", "Presentation"], FontSize->24], Cell[StyleData["ObjectNameWarningMessages", "SlideShow"], CellMargins->{{10, 4}, {1, 10}}, CellGroupingRules->{"SectionGrouping", 65}, HyphenationOptions->{"HyphenationCharacter"->"-"}, FontFamily->"Courier", FontSize->16, FontWeight->"Bold"], Cell[StyleData["ObjectNameWarningMessages", "Printout"], CellMargins->{{2, 0}, {1, 10}}, HyphenationOptions->{"HyphenationCharacter"->"-"}, FontSize->12] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["Command"], CellFrame->{{0, 0}, {0.5, 0}}, CellMargins->{{0, 0}, {0, 0}}, CellFrameMargins->{{27, 12}, {3, 15}}, CellFrameColor->RGBColor[0.74902, 0.694118, 0.552941], HyphenationOptions->{"HyphenationCharacter"->"-"}, CounterIncrements->"Section", StyleMenuListing->None, FontFamily->"Helvetica", FontSize->18, FontWeight->"Bold", Background->RGBColor[0.960784, 0.878431, 0.666667]], Cell[StyleData["Command", "Presentation"], FontSize->24], Cell[StyleData["Command", "Printout"], CellMargins->{{2, 0}, {0, 14}}, PageBreakBelow->False, HyphenationOptions->{"HyphenationCharacter"->"-"}, FontSize->14] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["CharacterName"], CellFrame->{{0, 0}, {0.5, 0}}, CellMargins->{{0, 0}, {0, 0}}, CellFrameMargins->{{27, 27}, {8, 8}}, CellFrameColor->RGBColor[0.74902, 0.694118, 0.552941], HyphenationOptions->{"HyphenationCharacter"->"-"}, StyleMenuListing->None, Background->RGBColor[0.964706, 0.929412, 0.839216]], Cell[StyleData["CharacterName", "Presentation"], FontSize->18], Cell[StyleData["CharacterName", "SlideShow"], CellMargins->{{72, 4}, {1, 14}}, CellGroupingRules->{"SectionGrouping", 90}, HyphenationOptions->{"HyphenationCharacter"->"-"}, StyleMenuListing->None, FontFamily->"Courier", FontSize->12, FontWeight->"Bold"], Cell[StyleData["CharacterName", "Printout"], CellMargins->{{2, 0}, {0, 4}}, HyphenationOptions->{"HyphenationCharacter"->"-"}, FontSize->10] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["Usage"], CellFrame->{{0, 0}, {0.5, 0}}, CellMargins->{{0, 0}, {0, 0}}, CellFrameMargins->{{27, 27}, {8, 8}}, CellFrameColor->RGBColor[0.74902, 0.694118, 0.552941], Hyphenation->False, HyphenationOptions->{"HyphenationCharacter"->"-"}, ParagraphSpacing->{0, 6}, ParagraphIndent->-10, StyleMenuListing->None, Background->RGBColor[0.964706, 0.929412, 0.839216]], Cell[StyleData["Usage", "Presentation"], FontSize->18], Cell[StyleData["Usage", "SlideShow"], CellFrame->{{0, 0}, {0.5, 0.5}}, CellMargins->{{72, 4}, {0, 4}}, CellFrameMargins->5, HyphenationOptions->{"HyphenationCharacter"->"-"}, ParagraphSpacing->{0, 6}, ParagraphIndent->-10, StyleMenuListing->None], Cell[StyleData["Usage", "Printout"], CellMargins->{{2, 0}, {0, 4}}, HyphenationOptions->{"HyphenationCharacter"->"-"}, StyleMenuListing->None, FontSize->10, FontWeight->"Plain"] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["ErrorMessage"], CellFrame->{{0, 0}, {0.5, 0.5}}, ShowCellBracket->True, CellMargins->{{27, 4}, {0, 4}}, CellGroupingRules->"OutputGrouping", PageBreakWithin->False, GroupPageBreakWithin->False, GeneratedCell->True, CellAutoOverwrite->True, ShowCellLabel->False, CellLabelMargins->{{14, Inherited}, {Inherited, Inherited}}, CellFrameMargins->5, DefaultFormatType->DefaultOutputFormatType, HyphenationOptions->{"HyphenationCharacter"->"-"}, FormatType->InputForm, StyleMenuListing->None, FontColor->RGBColor[0, 0, 1]], Cell[StyleData["ErrorMessage", "Presentation"], FontSize->18], Cell[StyleData["ErrorMessage", "SlideShow"], CellMargins->{{72, 4}, {0, 8}}, CellHorizontalScrolling->True, HyphenationOptions->{"HyphenationCharacter"->"-"}, StyleMenuListing->None], Cell[StyleData["ErrorMessage", "Printout"], HyphenationOptions->{"HyphenationCharacter"->"-"}, FontSize->9, FontColor->GrayLevel[0]] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["Notes"], CellMargins->{{27, 27}, {0, 8}}, CellHorizontalScrolling->True, HyphenationOptions->{"HyphenationCharacter"->"-"}, ParagraphSpacing->{0, 6}, ParagraphIndent->-10, StyleMenuListing->None, FontFamily->"Times"], Cell[StyleData["Notes", "Presentation"], FontSize->18], Cell[StyleData["Notes", "SlideShow"], CellMargins->{{72, 4}, {0, 8}}, CellHorizontalScrolling->True, HyphenationOptions->{"HyphenationCharacter"->"-"}, ParagraphSpacing->{0, 6}, ParagraphIndent->-10, StyleMenuListing->None, FontFamily->"Times"], Cell[StyleData["Notes", "Printout"], CellMargins->{{2, 0}, {0, 8}}, Hyphenation->True, HyphenationOptions->{"HyphenationCharacter"->"-"}, FontSize->9] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["NotesList"], CellMargins->{{20, 4}, {2, 8}}, CellHorizontalScrolling->True, ScriptLevel->1, SingleLetterItalics->True, StyleMenuListing->None, FontFamily->"Times"], Cell[StyleData["NotesList", "Presentation"], FontSize->18], Cell[StyleData["NotesList", "SlideShow"], CellMargins->{{82, 4}, {2, 8}}, CellHorizontalScrolling->True, HyphenationOptions->{"HyphenationCharacter"->"-"}, ScriptLevel->1, SingleLetterItalics->True, StyleMenuListing->None, FontFamily->"Times"], Cell[StyleData["NotesList", "Printout"], CellMargins->{{12, 0}, {2, 8}}, Hyphenation->True, HyphenationOptions->{"HyphenationCharacter"->"-"}, FontSize->9] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["ReferenceSection"], CellFrame->{{0, 0}, {0, 0.5}}, ShowGroupOpenCloseIcon->True, CellMargins->{{27, 4}, {0, 10}}, CellGroupingRules->{"SectionGrouping", 30}, CellFrameMargins->12, HyphenationOptions->{"HyphenationCharacter"->"-"}, StyleMenuListing->None, FontFamily->"Helvetica", FontWeight->"Bold"], Cell[StyleData["ReferenceSection", "Presentation"], FontSize->20], Cell[StyleData["ReferenceSection", "Printout"], CellMargins->{{3, 0}, {0, 10}}, PageBreakBelow->False, HyphenationOptions->{"HyphenationCharacter"->"-"}, FontSize->9, FontColor->GrayLevel[0]] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["Reference"], CellMargins->{{27, 27}, {0, 8}}, InputAutoReplacements->{"TeX"->StyleBox[ RowBox[ {"T", AdjustmentBox[ "E", BoxMargins -> {{-.074999999999999997, \ -.085000000000000006}, {0, 0}}, BoxBaselineShift -> .5], "X"}]], "LaTeX"->StyleBox[ RowBox[ {"L", StyleBox[ AdjustmentBox[ "A", BoxMargins -> {{-.35999999999999999, \ -.10000000000000001}, {0, 0}}, BoxBaselineShift -> -.20000000000000001], FontSize -> Smaller], "T", AdjustmentBox[ "E", BoxMargins -> {{-.074999999999999997, \ -.085000000000000006}, {0, 0}}, BoxBaselineShift -> .5], "X"}]], "mma"->"Mathematica", "Mma"->"Mathematica", "MMA"->"Mathematica", "gridMathematica"->FormBox[ RowBox[ {"grid", AdjustmentBox[ StyleBox[ "Mathematica", FontSlant -> "Italic"], BoxMargins -> {{-.17499999999999999, 0}, {0, 0}}]}], TextForm], "webMathematica"->FormBox[ RowBox[ {"web", AdjustmentBox[ StyleBox[ "Mathematica", FontSlant -> "Italic"], BoxMargins -> {{-.17499999999999999, 0}, {0, 0}}]}], TextForm]}, ParagraphSpacing->{0, 8}, FontSize->12], Cell[StyleData["Reference", "Presentation"], FontSize->18], Cell[StyleData["Reference", "SlideShow"], CellMargins->{{27, 27}, {4, 4}}, Hyphenation->False, FontSize->14], Cell[StyleData["Reference", "Printout"], CellMargins->{{2, 2}, {6, 6}}, TextJustification->1, Hyphenation->True, FontSize->10], Cell[StyleData["Reference", "EnhancedPrintout"], CellMargins->{{2, 2}, {6, 6}}, TextJustification->1, Hyphenation->True, FontFamily->"Palatino", FontSize->10], Cell[StyleData["Reference", "EnhancedPrintoutNonGray"], CellMargins->{{2, 2}, {6, 6}}, TextJustification->1, Hyphenation->True, FontFamily->"Palatino", FontSize->10] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["ExampleSection"], CellFrame->{{0, 0}, {0, 0.5}}, ShowGroupOpenCloseIcon->True, CellMargins->{{27, 4}, {0, 10}}, CellGroupingRules->{"SectionGrouping", 70}, CellFrameMargins->12, HyphenationOptions->{"HyphenationCharacter"->"-"}, StyleMenuListing->None, FontFamily->"Helvetica", FontWeight->"Bold"], Cell[StyleData["ExampleSection", "Presentation"], FontSize->20], Cell[StyleData["ExampleSection", "Printout"], CellMargins->{{3, 0}, {0, 10}}, PageBreakBelow->False, HyphenationOptions->{"HyphenationCharacter"->"-"}, FontSize->9, FontColor->GrayLevel[0]] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["ExampleText"], CellMargins->{{27, 40}, {0, 18}}, HyphenationOptions->{"HyphenationCharacter"->"-"}, ParagraphSpacing->{0, 6}, StyleMenuListing->None, FontColor->RGBColor[0, 0, 0.4]], Cell[StyleData["ExampleText", "Presentation"], FontSize->18], Cell[StyleData["ExampleText", "Printout"], CellMargins->{{2, 80}, {0, 8}}, PageBreakBelow->False, Hyphenation->True, HyphenationOptions->{"HyphenationCharacter"->"-"}, FontSize->8, FontColor->GrayLevel[0]] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["ExampleSubsection"], ShowCellBracket->True, CellMargins->{{27, 4}, {0, 16}}, CellGroupingRules->{"SectionGrouping", 80}, HyphenationOptions->{"HyphenationCharacter"->"-"}, StyleMenuListing->None, FontFamily->"Helvetica", FontSize->10, FontWeight->"Bold"], Cell[StyleData["ExampleSubsection", "Presentation"], FontSize->15], Cell[StyleData["ExampleSubsection", "Printout"], CellMargins->{{12, 0}, {0, 16}}, PageBreakBelow->False, HyphenationOptions->{"HyphenationCharacter"->"-"}, FontSize->7] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["MessagesSection"], CellFrame->{{0, 0}, {0, 0.5}}, ShowGroupOpenCloseIcon->True, CellMargins->{{27, 4}, {0, 10}}, CellGroupingRules->{"SectionGrouping", 70}, CellFrameMargins->12, HyphenationOptions->{"HyphenationCharacter"->"-"}, StyleMenuListing->None, FontFamily->"Helvetica", FontWeight->"Bold"], Cell[StyleData["MessagesSection", "Presentation"], FontSize->20], Cell[StyleData["MessagesSection", "Printout"], CellMargins->{{3, 0}, {0, 10}}, PageBreakBelow->False, HyphenationOptions->{"HyphenationCharacter"->"-"}, FontSize->9, FontColor->GrayLevel[0]] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["TemplateSection"], CellFrame->{{0, 0}, {0, 0.5}}, CellMargins->{{27, 4}, {0, 10}}, PrivateCellOptions->{"DefaultCellGroupOpen"->True}, CellGroupingRules->{"SectionGrouping", 70}, CellFrameMargins->12, HyphenationOptions->{"HyphenationCharacter"->"-"}, StyleMenuListing->None, FontFamily->"Helvetica", FontWeight->"Bold"], Cell[StyleData["TemplateSection", "Presentation"], FontSize->20], Cell[StyleData["TemplateSection", "Printout"], CellMargins->{{3, 0}, {0, 10}}, PageBreakBelow->False, HyphenationOptions->{"HyphenationCharacter"->"-"}, FontSize->9, FontColor->GrayLevel[0]] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["LineHead"], CellFrame->{{0, 0}, {0.5, 0}}, CellMargins->{{27, 4}, {8, 18}}, HyphenationOptions->{"HyphenationCharacter"->"-"}, CounterIncrements->"Subsection", CounterAssignments->{{"Subsubsection", 0}}, StyleMenuListing->None, FontFamily->"Helvetica", FontSize->12, FontWeight->"Bold"], Cell[StyleData["LineHead", "Presentation"], FontSize->18], Cell[StyleData["LineHead", "Printout"], CellMargins->{{2, 0}, {8, 18}}, PageBreakBelow->False, HyphenationOptions->{"HyphenationCharacter"->"-"}, FontSize->10] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["FlushInput"], CellMargins->{{27, 4}, {1, 4}}, Evaluatable->True, CellGroupingRules->"InputGrouping", CellHorizontalScrolling->True, PageBreakWithin->False, GroupPageBreakWithin->False, CellLabelAutoDelete->False, CellLabelMargins->{{23, Inherited}, {Inherited, Inherited}}, DefaultFormatType->DefaultInputFormatType, ShowSpecialCharacters->Automatic, HyphenationOptions->{"HyphenationCharacter"->"-"}, FormatType->StandardForm, ShowStringCharacters->True, NumberMarks->True, StyleMenuListing->None, FontWeight->"Bold"], Cell[StyleData["FlushInput", "Presentation"], FontSize->18], Cell[StyleData["FlushInput", "Printout"], CellMargins->{{2, 0}, {1, 4}}, HyphenationOptions->{"HyphenationCharacter"->"-"}, FontSize->10] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["FlushOutput"], CellMargins->{{27, Inherited}, {Inherited, Inherited}}, CellEditDuplicate->True, CellGroupingRules->"OutputGrouping", CellHorizontalScrolling->True, PageBreakWithin->False, GroupPageBreakWithin->False, GeneratedCell->True, CellAutoOverwrite->True, CellLabelAutoDelete->False, CellLabelMargins->{{23, Inherited}, {Inherited, Inherited}}, DefaultFormatType->DefaultOutputFormatType, HyphenationOptions->{"HyphenationCharacter"->"-"}, FormatType->StandardForm, StyleMenuListing->None], Cell[StyleData["FlushOutput", "Presentation"], FontSize->18], Cell[StyleData["FlushOutput", "Printout"], CellMargins->{{2, Inherited}, {Inherited, Inherited}}, HyphenationOptions->{"HyphenationCharacter"->"-"}, FontSize->10] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["DialogItem"], CellDingbat->"\[EmptyDiamond]", CellMargins->{{27, 4}, {0, 12}}, CellGroupingRules->{"SectionGrouping", 70}, HyphenationOptions->{"HyphenationCharacter"->"-"}, StyleMenuListing->None, FontFamily->"Helvetica", FontSize->10, FontWeight->"Bold"], Cell[StyleData["DialogItem", "Presentation"], FontSize->15], Cell[StyleData["DialogItem", "Printout"], CellMargins->{{12, 0}, {0, 12}}, PageBreakBelow->False, HyphenationOptions->{"HyphenationCharacter"->"-"}, FontSize->8] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["GroupDivider"], CellMargins->{{27, Inherited}, {Inherited, Inherited}}, CellEditDuplicate->True, CellGroupingRules->{"TitleGrouping", 0}, HyphenationOptions->{"HyphenationCharacter"->"-"}, StyleMenuListing->None], Cell[StyleData["GroupDivider", "Presentation"], FontSize->18] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["Highlight"], CellFrame->0.5, CellMargins->{{27, 4}, {0, 18}}, CellFrameColor->GrayLevel[0.800015], HyphenationOptions->{"HyphenationCharacter"->"-"}, StyleMenuListing->None, FontFamily->"Helvetica", FontSize->12, Background->GrayLevel[0.950011]], Cell[StyleData["Highlight", "Presentation"], FontSize->18], Cell[StyleData["Highlight", "Printout"], CellMargins->{{2, 0}, {0, 18}}, Hyphenation->True, HyphenationOptions->{"HyphenationCharacter"->"-"}, LineSpacing->{1, 3}, FontSize->8] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["UserNotes"], CellFrame->{{3, 0}, {0, 0}}, CellMargins->{{27, 4}, {0, 8}}, CellFrameColor->RGBColor[0.74902, 0.694118, 0.552941], ParagraphIndent->-7, StyleMenuListing->None, FontFamily->"Helvetica", FontSize->10], Cell[StyleData["UserNotes", "Presentation"], FontSize->15], Cell[StyleData["UserNotes", "Printout"], CellMargins->{{2, 0}, {0, 4}}, Hyphenation->True, HyphenationOptions->{"HyphenationCharacter"->"-"}, LineSpacing->{1, 3}, FontSize->8], Cell[StyleData["UserNotes", "EnhancedPrintout"], CellMargins->{{0, 0}, {0, 4}}, Hyphenation->True, LineSpacing->{1, 3}, FontFamily->"Frutiger 55 Roman", FontSize->8], Cell[StyleData["UserNotes", "EnhancedPrintoutNonGray"], CellMargins->{{0, 0}, {0, 4}}, Hyphenation->True, LineSpacing->{1, 3}, FontFamily->"Frutiger 55 Roman", FontSize->8] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["MoreInfo"], CellFrame->0.5, CellMargins->{{27, 12}, {0, 8}}, CellFrameColor->RGBColor[0.74902, 0.694118, 0.552941], ParagraphIndent->-7, StyleMenuListing->None, FontFamily->"Helvetica", FontSize->10, Background->RGBColor[0.964706, 0.929412, 0.839216]], Cell[StyleData["MoreInfo", "Presentation"], FontSize->15], Cell[StyleData["MoreInfo", "Printout"], CellMargins->{{2, 0}, {0, 4}}, Hyphenation->True, HyphenationOptions->{"HyphenationCharacter"->"-"}, LineSpacing->{1, 3}, FontSize->8] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["UserTips"], CellFrame->0.5, CellMargins->{{27, 12}, {0, 8}}, CellFrameColor->RGBColor[0.74902, 0.694118, 0.552941], ParagraphIndent->-7, StyleMenuListing->None, FontFamily->"Helvetica", FontSize->10, Background->RGBColor[0.964706, 0.929412, 0.839216]], Cell[StyleData["UserTips", "Presentation"], FontSize->15], Cell[StyleData["UserTips", "Printout"], CellMargins->{{2, 0}, {0, 4}}, CellFrameColor->GrayLevel[0.800015], Hyphenation->True, HyphenationOptions->{"HyphenationCharacter"->"-"}, LineSpacing->{1, 3}, FontSize->8, Background->GrayLevel[0.900008]], Cell[StyleData["UserTips", "EnhancedPrintout"], CellMargins->{{0, 0}, {0, 4}}, CellFrameColor->GrayLevel[0], Hyphenation->True, HyphenationOptions->{"HyphenationCharacter"->"-"}, LineSpacing->{1, 3}, FontFamily->"Frutiger 55 Roman", FontSize->8, Background->GrayLevel[0.700008]] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["Theorem"], CellFrame->{{4, 0}, {0, 0}}, CellMargins->{{27, 62}, {0, 14}}, CellFrameMargins->4, CellFrameColor->RGBColor[0, 0, 0.8], HyphenationOptions->{"HyphenationCharacter"->"-"}, LineSpacing->{1, 1}, ParagraphSpacing->{0, 8}], Cell[StyleData["Theorem", "Presentation"], FontSize->18], Cell[StyleData["Theorem", "Printout"], CellMargins->{{2, 0}, {0, 14}}, CellFrameMargins->3, CellFrameColor->GrayLevel[0.8], HyphenationOptions->{"HyphenationCharacter"->"-"}, FontSize->9, FontColor->GrayLevel[0]] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["Commentary"], CellFrame->{{2, 0}, {0, 0}}, CellMargins->{{36, 10}, {7, 7}}, PageBreakBelow->False, CellFrameMargins->8, CellFrameColor->RGBColor[0, 0.2, 1], LineSpacing->{1, 3}, FontSlant->"Italic"], Cell[StyleData["Commentary", "Presentation"], FontSize->18], Cell[StyleData["Commentary", "Printout"], CellMargins->{{36, 0}, {6, 6}}, CellFrameColor->GrayLevel[0.8], FontSize->10], Cell[StyleData["Commentary", "EnhancedPrintout"], CellMargins->{{36, 0}, {6, 6}}, CellFrameColor->GrayLevel[0.8], FontFamily->"Palatino", FontSize->10], Cell[StyleData["Commentary", "EnhancedPrintoutNonGray"], CellMargins->{{36, 0}, {6, 6}}, CellFrameColor->GrayLevel[0.8], FontFamily->"Palatino", FontSize->10] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["Level1Icon"], ShowGroupOpenCloseIcon->True, CellMargins->{{48, 4}, {0, 8}}, CellHorizontalScrolling->True, HyphenationOptions->{"HyphenationCharacter"->"-"}, ParagraphSpacing->{0, 8}, StyleMenuListing->None], Cell[StyleData["Level1Icon", "Presentation"], FontSize->18], Cell[StyleData["Level1Icon", "Printout"], CellMargins->{{2, 0}, {0, 8}}, HyphenationOptions->{"HyphenationCharacter"->"-"}, FontSize->10] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["Level2Icon"], ShowGroupOpenCloseIcon->True, CellMargins->{{48, 4}, {0, 8}}, CellHorizontalScrolling->True, HyphenationOptions->{"HyphenationCharacter"->"-"}, ParagraphSpacing->{0, 8}, StyleMenuListing->None], Cell[StyleData["Level2Icon", "Presentation"], FontSize->18], Cell[StyleData["Level2Icon", "Printout"], CellMargins->{{2, 0}, {0, 8}}, HyphenationOptions->{"HyphenationCharacter"->"-"}, FontSize->10] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["CopyrightHead"], CellMargins->{{27, 4}, {0, 8}}, PageBreakAbove->False, StyleMenuListing->None, FontFamily->"Helvetica", FontSize->12, FontWeight->"Bold"], Cell[StyleData["CopyrightHead", "Presentation"], FontSize->18], Cell[StyleData["CopyrightHead", "Printout"], CellMargins->{{2, 2}, {6, 6}}, TextJustification->1, FontSize->10] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["Copyright"], CellMargins->{{27, 4}, {0, 8}}, PageBreakAbove->False, StyleMenuListing->None, FontFamily->"Helvetica", FontSize->10], Cell[StyleData["Copyright", "Presentation"], FontSize->15], Cell[StyleData["Copyright", "Printout"], CellMargins->{{2, 2}, {6, 6}}, TextJustification->1, FontSize->8], Cell[StyleData["Copyright", "EnhancedPrintout"], CellMargins->{{2, 2}, {6, 6}}, TextJustification->1, FontFamily->"Frutiger 55 Roman", FontSize->7] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["RegisterSubsection"], CellDingbat->None, CellMargins->{{27, 27}, {0, 18}}, CellElementSpacings->{"ClosedGroupTopMargin"->18}, CellGroupingRules->{"SectionGrouping", 45}, CellFrameLabelMargins->6, InputAutoReplacements->{"TeX"->StyleBox[ RowBox[ {"T", AdjustmentBox[ "E", BoxMargins -> {{-.074999999999999997, \ -.085000000000000006}, {0, 0}}, BoxBaselineShift -> .5], "X"}]], "LaTeX"->StyleBox[ RowBox[ {"L", StyleBox[ AdjustmentBox[ "A", BoxMargins -> {{-.35999999999999999, \ -.10000000000000001}, {0, 0}}, BoxBaselineShift -> -.20000000000000001], FontSize -> Smaller], "T", AdjustmentBox[ "E", BoxMargins -> {{-.074999999999999997, \ -.085000000000000006}, {0, 0}}, BoxBaselineShift -> .5], "X"}]], "mma"->"Mathematica", "Mma"->"Mathematica", "MMA"->"Mathematica", "gridMathematica"->FormBox[ RowBox[ {"grid", AdjustmentBox[ StyleBox[ "Mathematica", FontSlant -> "Italic"], BoxMargins -> {{-.17499999999999999, 0}, {0, 0}}]}], TextForm], "webMathematica"->FormBox[ RowBox[ {"web", AdjustmentBox[ StyleBox[ "Mathematica", FontSlant -> "Italic"], BoxMargins -> {{-.17499999999999999, 0}, {0, 0}}]}], TextForm]}, FontFamily->"Helvetica", FontSize->16], Cell[StyleData["RegisterSubsection", "Presentation"], FontSize->24], Cell[StyleData["RegisterSubsection", "SlideShow"], CellDingbat->None, CellMargins->{{70, 0}, {4, 12}}, FontSize->12], Cell[StyleData["RegisterSubsection", "Printout"], CellMargins->{{9, 0}, {5, 24}}, FontSize->12], Cell[StyleData["RegisterSubsection", "EnhancedPrintout"], CellMargins->{{9, 0}, {5, 20}}, FontFamily->"Frutiger 55 Roman", FontSize->12], Cell[StyleData["RegisterSubsection", "EnhancedPrintoutNonGray"], CellMargins->{{9, 0}, {5, 20}}, FontFamily->"Frutiger 55 Roman", FontSize->12] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["RegisterSubsubsection"], CellMargins->{{27, 27}, {0, 18}}, CellElementSpacings->{"ClosedGroupTopMargin"->18}, CellGroupingRules->{"SectionGrouping", 50}, InputAutoReplacements->{"TeX"->StyleBox[ RowBox[ {"T", AdjustmentBox[ "E", BoxMargins -> {{-.074999999999999997, \ -.085000000000000006}, {0, 0}}, BoxBaselineShift -> .5], "X"}]], "LaTeX"->StyleBox[ RowBox[ {"L", StyleBox[ AdjustmentBox[ "A", BoxMargins -> {{-.35999999999999999, \ -.10000000000000001}, {0, 0}}, BoxBaselineShift -> -.20000000000000001], FontSize -> Smaller], "T", AdjustmentBox[ "E", BoxMargins -> {{-.074999999999999997, \ -.085000000000000006}, {0, 0}}, BoxBaselineShift -> .5], "X"}]], "mma"->"Mathematica", "Mma"->"Mathematica", "MMA"->"Mathematica", "gridMathematica"->FormBox[ RowBox[ {"grid", AdjustmentBox[ StyleBox[ "Mathematica", FontSlant -> "Italic"], BoxMargins -> {{-.17499999999999999, 0}, {0, 0}}]}], TextForm], "webMathematica"->FormBox[ RowBox[ {"web", AdjustmentBox[ StyleBox[ "Mathematica", FontSlant -> "Italic"], BoxMargins -> {{-.17499999999999999, 0}, {0, 0}}]}], TextForm]}, FontFamily->"Helvetica", FontWeight->"Bold", FontColor->RGBColor[0.592157, 0.313726, 0.313726]], Cell[StyleData["RegisterSubsubsection", "Presentation"], FontSize->18], Cell[StyleData["RegisterSubsubsection", "Printout"], CellMargins->{{2, 0}, {3, 8}}, FontSize->10], Cell[StyleData["RegisterSubsubsection", "EnhancedPrintout"], CellMargins->{{2, 0}, {3, 8}}, FontFamily->"Frutiger 65 Bold", FontSize->10, FontWeight->"Plain", FontColor->GrayLevel[0]], Cell[StyleData["RegisterSubsubsection", "EnhancedPrintoutNonGray"], CellMargins->{{2, 0}, {3, 8}}, FontFamily->"Frutiger 65 Bold", FontSize->10, FontWeight->"Plain", FontColor->GrayLevel[0]] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["RegisterText"], CellMargins->{{27, 4}, {0, 8}}, PageBreakAbove->False, StyleMenuListing->None, FontSize->10], Cell[StyleData["RegisterText", "Presentation"], FontSize->15], Cell[StyleData["RegisterText", "Printout"], CellMargins->{{2, 2}, {6, 6}}, TextJustification->1, FontSize->8], Cell[StyleData["RegisterText", "EnhancedPrintout"], CellMargins->{{2, 2}, {6, 6}}, TextJustification->1, FontFamily->"Palatino", FontSize->7] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["CaptionHead"], CellMargins->{{27, 4}, {0, 8}}, PageBreakAbove->False, StyleMenuListing->None, FontFamily->"Helvetica", FontSize->12, FontWeight->"Bold"], Cell[StyleData["CaptionHead", "Presentation"], FontSize->15], Cell[StyleData["CaptionHead", "Printout"], CellMargins->{{2, 2}, {6, 6}}, TextJustification->1, FontSize->8], Cell[StyleData["CaptionHead", "EnhancedPrintout"], CellMargins->{{2, 2}, {6, 6}}, TextJustification->1, FontFamily->"Palatino", FontSize->7] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["CaptionText"], CellMargins->{{66, 4}, {0, 8}}, PageBreakAbove->False, StyleMenuListing->None], Cell[StyleData["CaptionText", "Presentation"], FontSize->15], Cell[StyleData["CaptionText", "Printout"], CellMargins->{{2, 2}, {6, 6}}, TextJustification->1, FontSize->8], Cell[StyleData["CaptionText", "EnhancedPrintout"], CellMargins->{{2, 2}, {6, 6}}, TextJustification->1, FontFamily->"Palatino", FontSize->7] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["BulletText"], CellMargins->{{76, 4}, {4, 4}}, CellFrameLabels->{{ Cell[ "\[Bullet]", "BulletText", CellBaseline -> Baseline], Inherited}, {Inherited, Inherited}}, Hyphenation->False, LineSpacing->{1, 3}, CounterIncrements->"BulletText", StyleMenuListing->None], Cell[StyleData["BulletText", "Presentation"], FontSize->18], Cell[StyleData["BulletText", "Printout"], FontSize->10], Cell[StyleData["BulletText", "EnhancedPrintout"], CellMargins->{{16, 4}, {2, 4}}, FontFamily->"Palatino", FontSize->10], Cell[StyleData["BulletText", "EnhancedPrintoutNonGray"], FontFamily->"Palatino", FontSize->10] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["HelpLabels"], CellMargins->{{88, 4}, {0, 8}}, StyleMenuListing->None], Cell[StyleData["HelpLabels", "Presentation"], FontSize->15], Cell[StyleData["HelpLabels", "Printout"], CellMargins->{{34, 2}, {6, 6}}, FontSize->10], Cell[StyleData["HelpLabels", "EnhancedPrintout"], CellMargins->{{34, 2}, {6, 6}}, FontFamily->"Palatino", FontSize->10] }, Closed]] }, Open ]], Cell[CellGroupData[{ Cell["Manual.nb Merge", "Subsection"], Cell[CellGroupData[{ Cell["Function List", "Subsubsection"], Cell[CellGroupData[{ Cell[StyleData["FunctionName"], CellDingbat->"\[FilledSquare]", CellMargins->{{24, 10}, {10, 12}}, CellGroupingRules->{"SectionGrouping", 40}, PageBreakBelow->False, StyleMenuListing->None, FontFamily->"Courier", FontSize->14, FontWeight->"Bold", CellTags->"FunctionName"], Cell[StyleData["FunctionName", "Presentation"], FontSize->21], Cell[StyleData["FunctionName", "Printout"], CellMargins->{{9, 0}, {10, 10}}, FontSize->12], Cell[StyleData["FunctionName", "EnhancedPrintout"], CellMargins->{{9, 0}, {10, 10}}, FontFamily->"Courier", FontSize->12], Cell[StyleData["FunctionName", "EnhancedPrintoutNonGray"], CellMargins->{{9, 0}, {10, 10}}, FontFamily->"Courier", FontSize->12] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["FunctionSubsection"], CellDingbat->"\[FilledSquare]", CellMargins->{{36, 10}, {0, 6}}, CellGroupingRules->{"SectionGrouping", 60}, PageBreakBelow->False, StyleMenuListing->None, FontWeight->"Bold", CellTags->"FunctionSubsection"], Cell[StyleData["FunctionSubsection", "Presentation"], FontSize->18], Cell[StyleData["FunctionSubsection", "Printout"], CellMargins->{{30, 0}, {0, 6}}], Cell[StyleData["FunctionSubsection", "EnhancedPrintout"], CellMargins->{{30, 0}, {0, 6}}, FontFamily->"Palatino", FontSize->11], Cell[StyleData["FunctionSubsection", "EnhancedPrintoutNonGray"], CellMargins->{{30, 0}, {0, 6}}, FontFamily->"Palatino", FontSize->11] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["FunctionDescription"], CellMargins->{{36, 10}, {4, 0}}, LineSpacing->{1, 3}, ParagraphSpacing->{0.7, 0}, CounterIncrements->"Text", StyleMenuListing->None, FontWeight->"Plain"], Cell[StyleData["FunctionDescription", "Presentation"], FontSize->18], Cell[StyleData["FunctionDescription", "Printout"], CellMargins->{{30, 0}, {4, 0}}, FontSize->11], Cell[StyleData["FunctionDescription", "EnhancedPrintout"], CellMargins->{{30, 0}, {4, 0}}, TextJustification->0, FontFamily->"Palatino", FontSize->10], Cell[StyleData["FunctionDescription", "EnhancedPrintoutNonGray"], CellMargins->{{30, 0}, {4, 0}}, TextJustification->0, FontFamily->"Palatino", FontSize->10] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["FunctionDescriptionRuled"], CellFrame->{{0, 0}, {0.25, 0.25}}, CellMargins->{{36, 10}, {4, 0}}, LineSpacing->{1, 3}, ParagraphSpacing->{0.7, 0}, CounterIncrements->"Text", StyleMenuListing->None], Cell[StyleData["FunctionDescriptionRuled", "Presentation"], FontSize->18], Cell[StyleData["FunctionDescriptionRuled", "Printout"], CellMargins->{{30, 0}, {4, 0}}, FontSize->11], Cell[StyleData["FunctionDescriptionRuled", "EnhancedPrintout"], CellMargins->{{30, 0}, {4, 0}}, TextJustification->0, FontFamily->"Palatino", FontSize->10], Cell[StyleData["FunctionDescriptionRuled", "EnhancedPrintoutNonGray"], CellMargins->{{30, 0}, {4, 0}}, TextJustification->0, FontFamily->"Palatino", FontSize->10] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["FunctionDescriptionRuleTop"], CellFrame->{{0, 0}, {0, 0.25}}, CellMargins->{{36, 10}, {4, 0}}, LineSpacing->{1, 3}, ParagraphSpacing->{0.7, 0}, CounterIncrements->"Text", StyleMenuListing->None], Cell[StyleData["FunctionDescriptionRuleTop", "Presentation"], FontSize->18], Cell[StyleData["FunctionDescriptionRuleTop", "Printout"], CellMargins->{{30, 0}, {4, 0}}, FontSize->11], Cell[StyleData["FunctionDescriptionRuleTop", "EnhancedPrintout"], CellMargins->{{30, 0}, {4, 0}}, TextJustification->0, FontFamily->"Palatino", FontSize->10], Cell[StyleData["FunctionDescriptionRuleTop", "EnhancedPrintoutNonGray"], CellMargins->{{30, 0}, {4, 0}}, TextJustification->0, FontFamily->"Palatino", FontSize->10] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["FunctionDescriptionRuleBottom"], CellFrame->{{0, 0}, {0.25, 0}}, CellMargins->{{36, 10}, {4, 0}}, LineSpacing->{1, 3}, ParagraphSpacing->{0.7, 0}, CounterIncrements->"Text", StyleMenuListing->None], Cell[StyleData["FunctionDescriptionRuleBottom", "Presentation"], FontSize->18], Cell[StyleData["FunctionDescriptionRuleBottom", "Printout"], CellMargins->{{30, 0}, {4, 0}}, FontSize->11], Cell[StyleData["FunctionDescriptionRuleBottom", "EnhancedPrintout"], CellMargins->{{30, 0}, {4, 0}}, TextJustification->0, FontFamily->"Palatino", FontSize->10], Cell[StyleData["FunctionDescriptionRuleBottom", "EnhancedPrintoutNonGray"], CellMargins->{{30, 0}, {4, 0}}, TextJustification->0, FontFamily->"Palatino", FontSize->10] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["FunctionExample"], CellMargins->{{36, 10}, {4, 0}}, StyleMenuListing->None, FontSize->10], Cell[StyleData["FunctionExample", "Presentation"], FontSize->15], Cell[StyleData["FunctionExample", "Printout"], CellMargins->{{30, 0}, {4, 0}}, FontSize->9], Cell[StyleData["FunctionExample", "EnhancedPrintout"], CellMargins->{{30, 0}, {4, 0}}, FontFamily->"Palatino", FontSize->9], Cell[StyleData["FunctionExample", "EnhancedPrintoutNonGray"], CellMargins->{{30, 0}, {4, 0}}, FontFamily->"Palatino", FontSize->9] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["FunctionTextNote"], CellMargins->{{36, 4}, {0, 4}}, LineSpacing->{1, 3}, ParagraphSpacing->{0, 4}, LineIndent->0, StyleMenuListing->None], Cell[StyleData["FunctionTextNote", "Presentation"], FontSize->18], Cell[StyleData["FunctionTextNote", "Printout"], CellMargins->{{36, 4}, {0, 4}}, FontSize->9], Cell[StyleData["FunctionTextNote", "EnhancedPrintout"], CellMargins->{{36, 4}, {0, 4}}, FontFamily->"Palatino", FontSize->8], Cell[StyleData["FunctionTextNote", "EnhancedPrintoutNonGray"], CellMargins->{{36, 4}, {0, 4}}, FontFamily->"Palatino", FontSize->8] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["3ColumnFunctionTable"], CellMargins->{{36, 4}, {0, 8}}, CellHorizontalScrolling->True, PageBreakWithin->False, AutoIndent->False, AutoSpacing->False, LineIndent->0, StyleMenuListing->None, GridBoxOptions->{RowSpacings->1.5, ColumnSpacings->2, ColumnWidths->{0.28, 0.28, 0.43}, ColumnAlignments->{Left}}], Cell[StyleData["3ColumnFunctionTable", "Presentation"], FontSize->18], Cell[StyleData["3ColumnFunctionTable", "Printout"], CellMargins->{{30, 0}, {0, 8}}, FontSize->10], Cell[StyleData["3ColumnFunctionTable", "EnhancedPrintout"], CellMargins->{{30, 0}, {0, 8}}, FontSize->10], Cell[StyleData["3ColumnFunctionTable", "EnhancedPrintoutNonGray"], CellMargins->{{30, 0}, {0, 8}}, FontSize->10] }, Closed]] }, Open ]], Cell[CellGroupData[{ Cell["Browser Emulation", "Subsubsection"], Cell[CellGroupData[{ Cell[StyleData["TextNormal"], CellMargins->{{12, 10}, {7, 7}}, LineSpacing->{1, 3}, CounterIncrements->"Text", StyleMenuListing->None, FontFamily->"Times", FontSize->12], Cell[StyleData["TextNormal", "Presentation"], FontSize->18], Cell[StyleData["TextNormal", "Printout"], CellMargins->{{2, 2}, {6, 6}}, FontSize->10] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["BrowserEmulation"], CellMargins->{{12, 1}, {7, 24}}, CellGroupingRules->{"SectionGrouping", 70}, LineSpacing->{1, 3}, StyleMenuListing->None, FontFamily->"Helvetica", GridBoxOptions->{ColumnWidths->0.25, ColumnAlignments->{Left}, GridFrame->True, GridFrameMargins->0.5, ColumnLines->True}], Cell[StyleData["BrowserEmulation", "Presentation"], FontSize->18], Cell[StyleData["BrowserEmulation", "Printout"], CellMargins->{{2, 2}, {6, 6}}, FontSize->10] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["CategoryDefs"], CellMargins->{{300, 10}, {7, 7}}, LineSpacing->{1, 3}, StyleMenuListing->None, FontFamily->"Helvetica", Background->RGBColor[1, 0.8, 0.6], GridBoxOptions->{ColumnAlignments->{Left}, GridFrame->False, RowLines->True, ColumnLines->True}], Cell[StyleData["CategoryDefs", "Presentation"], FontSize->18], Cell[StyleData["CategoryDefs", "Printout"], CellMargins->{{2, 2}, {6, 6}}, FontSize->10] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["Category1"], ShowCellBracket->False, ShowGroupOpenCloseIcon->True, CellMargins->{{12, 10}, {7, 7}}, CellGroupingRules->{"SectionGrouping", 50}, StyleMenuListing->None, FontSize->16, FontWeight->"Bold"], Cell[StyleData["Category1", "Presentation"], FontSize->24], Cell[StyleData["Category1", "Printout"], CellMargins->{{2, 2}, {6, 6}}] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["Category2"], ShowCellBracket->False, ShowGroupOpenCloseIcon->True, CellMargins->{{85, 10}, {7, 7}}, CellGroupingRules->{"SectionGrouping", 60}, StyleMenuListing->None, FontSize->14, FontWeight->"Bold", FontColor->RGBColor[0, 0, 0.500008]], Cell[StyleData["Category2", "Presentation"], FontSize->21], Cell[StyleData["Category2", "Printout"], CellMargins->{{2, 2}, {6, 6}}] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["Category3"], ShowCellBracket->False, ShowGroupOpenCloseIcon->True, CellMargins->{{157, 10}, {7, 7}}, CellGroupingRules->{"SectionGrouping", 70}, StyleMenuListing->None, FontSize->12, FontWeight->"Bold", FontColor->RGBColor[0.2, 0, 0.4]], Cell[StyleData["Category3", "Presentation"], FontSize->18], Cell[StyleData["Category3", "Printout"], CellMargins->{{2, 2}, {6, 6}}] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["Category4"], ShowCellBracket->False, ShowGroupOpenCloseIcon->True, CellMargins->{{230, 10}, {7, 7}}, CellGroupingRules->{"SectionGrouping", 80}, StyleMenuListing->None, FontWeight->"Bold", FontColor->RGBColor[0, 0.300008, 0.4]], Cell[StyleData["Category4", "Presentation"], FontSize->18], Cell[StyleData["Category4", "Printout"], CellMargins->{{2, 2}, {6, 6}}] }, Closed]] }, Open ]], Cell[CellGroupData[{ Cell["Misc", "Subsubsection"], Cell[CellGroupData[{ Cell[StyleData["4ColumnTable"], CellMargins->{{10, 4}, {0, 8}}, CellHorizontalScrolling->True, PageBreakWithin->False, AutoIndent->False, AutoSpacing->False, LineIndent->0, StyleMenuListing->None, GridBoxOptions->{RowSpacings->1.5, ColumnSpacings->2, ColumnWidths->0.25, ColumnAlignments->{Left, Center}}], Cell[StyleData["4ColumnTable", "Presentation"], FontSize->18], Cell[StyleData["4ColumnTable", "Printout"], CellMargins->{{2, 0}, {0, 8}}], Cell[StyleData["4ColumnTable", "EnhancedPrintout"], CellMargins->{{2, 0}, {0, 8}}], Cell[StyleData["4ColumnTable", "EnhancedPrintoutNonGray"], CellMargins->{{2, 0}, {0, 8}}] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["5ColumnTable"], CellMargins->{{10, 4}, {0, 8}}, CellHorizontalScrolling->True, PageBreakWithin->False, AutoIndent->False, AutoSpacing->False, LineIndent->0, StyleMenuListing->None, GridBoxOptions->{RowSpacings->1.5, ColumnSpacings->2, ColumnWidths->0.2, ColumnAlignments->{Left, Center}}], Cell[StyleData["5ColumnTable", "Presentation"], FontSize->18], Cell[StyleData["5ColumnTable", "Printout"], CellMargins->{{2, 0}, {0, 8}}], Cell[StyleData["5ColumnTable", "EnhancedPrintout"], CellMargins->{{2, 0}, {0, 8}}], Cell[StyleData["5ColumnTable", "EnhancedPrintoutNonGray"], CellMargins->{{2, 0}, {0, 8}}] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["6ColumnTable"], CellMargins->{{10, 4}, {0, 8}}, CellHorizontalScrolling->True, PageBreakWithin->False, AutoIndent->False, AutoSpacing->False, LineIndent->0, StyleMenuListing->None, GridBoxOptions->{RowSpacings->1.5, ColumnSpacings->2, ColumnWidths->0.16, ColumnAlignments->{Left, Center}}], Cell[StyleData["6ColumnTable", "Presentation"], FontSize->18], Cell[StyleData["6ColumnTable", "Printout"], CellMargins->{{2, 0}, {0, 8}}], Cell[StyleData["6ColumnTable", "EnhancedPrintout"], CellMargins->{{2, 0}, {0, 8}}], Cell[StyleData["6ColumnTable", "EnhancedPrintoutNonGray"], CellMargins->{{2, 0}, {0, 8}}] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["7ColumnTable"], CellMargins->{{10, 4}, {0, 8}}, CellHorizontalScrolling->True, PageBreakWithin->False, AutoIndent->False, AutoSpacing->False, LineIndent->0, StyleMenuListing->None, GridBoxOptions->{RowSpacings->1.5, ColumnSpacings->2, ColumnWidths->0.14, ColumnAlignments->{Left, Center}}], Cell[StyleData["7ColumnTable", "Presentation"], FontSize->18], Cell[StyleData["7ColumnTable", "Printout"], CellMargins->{{2, 0}, {0, 8}}], Cell[StyleData["7ColumnTable", "EnhancedPrintout"], CellMargins->{{2, 0}, {0, 8}}], Cell[StyleData["7ColumnTable", "EnhancedPrintoutNonGray"], CellMargins->{{2, 0}, {0, 8}}] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["8ColumnTable"], CellMargins->{{10, 4}, {0, 8}}, CellHorizontalScrolling->True, PageBreakWithin->False, AutoIndent->False, AutoSpacing->False, LineIndent->0, StyleMenuListing->None, GridBoxOptions->{RowSpacings->1.5, ColumnSpacings->2, ColumnWidths->0.12, ColumnAlignments->{Left, Center}}], Cell[StyleData["8ColumnTable", "Presentation"], FontSize->18], Cell[StyleData["8ColumnTable", "Printout"], CellMargins->{{2, 0}, {0, 8}}], Cell[StyleData["8ColumnTable", "EnhancedPrintout"], CellMargins->{{2, 0}, {0, 8}}], Cell[StyleData["8ColumnTable", "EnhancedPrintoutNonGray"], CellMargins->{{2, 0}, {0, 8}}] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["ABItemizedText"], CellMargins->{{20, 4}, {0, 5}}, LineSpacing->{1, 3}, ParagraphIndent->-21, CounterIncrements->"ItemizedText", StyleMenuListing->None], Cell[StyleData["ABItemizedText", "Presentation"], FontSize->18], Cell[StyleData["ABItemizedText", "Printout"], Hyphenation->True, ParagraphIndent->-21, FontSize->11], Cell[StyleData["ABItemizedText", "EnhancedPrintout"], Hyphenation->True, ParagraphIndent->-21, FontFamily->"Palatino", FontSize->10], Cell[StyleData["ABItemizedText", "EnhancedPrintoutNonGray"], Hyphenation->True, ParagraphIndent->-21, FontFamily->"Palatino", FontSize->10] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["ChapNumber"], CellMargins->{{27, Inherited}, {20, 40}}, CellGroupingRules->{"TitleGrouping", 0}, PageBreakBelow->False, DefaultNewInlineCellStyle->"None", InputAutoReplacements->{"TeX"->StyleBox[ RowBox[ {"T", AdjustmentBox[ "E", BoxMargins -> {{-.074999999999999997, \ -.085000000000000006}, {0, 0}}, BoxBaselineShift -> .5], "X"}]], "LaTeX"->StyleBox[ RowBox[ {"L", StyleBox[ AdjustmentBox[ "A", BoxMargins -> {{-.35999999999999999, \ -.10000000000000001}, {0, 0}}, BoxBaselineShift -> -.20000000000000001], FontSize -> Smaller], "T", AdjustmentBox[ "E", BoxMargins -> {{-.074999999999999997, \ -.085000000000000006}, {0, 0}}, BoxBaselineShift -> .5], "X"}]], "mma"->"Mathematica", "Mma"->"Mathematica", "MMA"->"Mathematica", "gridMathematica"->FormBox[ RowBox[ {"grid", AdjustmentBox[ StyleBox[ "Mathematica", FontSlant -> "Italic"], BoxMargins -> {{-.17499999999999999, 0}, {0, 0}}]}], TextForm], "webMathematica"->FormBox[ RowBox[ {"web", AdjustmentBox[ StyleBox[ "Mathematica", FontSlant -> "Italic"], BoxMargins -> {{-.17499999999999999, 0}, {0, 0}}]}], TextForm]}, LanguageCategory->"NaturalLanguage", CounterIncrements->"Title", CounterAssignments->{{"Section", 0}, {"Equation", 0}, {"Figure", 0}, { "Subtitle", 0}, {"Subsubtitle", 0}}, StyleMenuListing->None, FontFamily->"Helvetica", FontSize->42, FontWeight->"Plain", FontColor->RGBColor[0.592157, 0.313726, 0.313726]], Cell[StyleData["ChapNumber", "Presentation"], FontSize->63], Cell[StyleData["ChapNumber", "Printout"], CellMargins->{{2, 10}, {15, 30}}, FontSize->36], Cell[StyleData["ChapNumber", "EnhancedPrintout"], CellMargins->{{2, 10}, {15, 30}}, FontFamily->"Frutiger 55 Roman", FontSize->36, FontColor->GrayLevel[0]], Cell[StyleData["ChapNumber", "EnhancedPrintoutNonGray"], CellMargins->{{2, 10}, {15, 30}}, FontFamily->"Frutiger 55 Roman", FontSize->36, FontColor->GrayLevel[0]] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["ChapTitle"], CellMargins->{{27, Inherited}, {80, 10}}, CellGroupingRules->{"TitleGrouping", 0}, PageBreakBelow->False, DefaultNewInlineCellStyle->"None", InputAutoReplacements->{"TeX"->StyleBox[ RowBox[ {"T", AdjustmentBox[ "E", BoxMargins -> {{-.074999999999999997, \ -.085000000000000006}, {0, 0}}, BoxBaselineShift -> .5], "X"}]], "LaTeX"->StyleBox[ RowBox[ {"L", StyleBox[ AdjustmentBox[ "A", BoxMargins -> {{-.35999999999999999, \ -.10000000000000001}, {0, 0}}, BoxBaselineShift -> -.20000000000000001], FontSize -> Smaller], "T", AdjustmentBox[ "E", BoxMargins -> {{-.074999999999999997, \ -.085000000000000006}, {0, 0}}, BoxBaselineShift -> .5], "X"}]], "mma"->"Mathematica", "Mma"->"Mathematica", "MMA"->"Mathematica", "gridMathematica"->FormBox[ RowBox[ {"grid", AdjustmentBox[ StyleBox[ "Mathematica", FontSlant -> "Italic"], BoxMargins -> {{-.17499999999999999, 0}, {0, 0}}]}], TextForm], "webMathematica"->FormBox[ RowBox[ {"web", AdjustmentBox[ StyleBox[ "Mathematica", FontSlant -> "Italic"], BoxMargins -> {{-.17499999999999999, 0}, {0, 0}}]}], TextForm]}, LanguageCategory->"NaturalLanguage", CounterIncrements->"Title", CounterAssignments->{{"Section", 0}, {"Equation", 0}, {"Figure", 0}, { "Subtitle", 0}, {"Subsubtitle", 0}}, StyleMenuListing->None, FontFamily->"Helvetica", FontSize->36, FontWeight->"Bold", FontColor->RGBColor[0.592157, 0.313726, 0.313726]], Cell[StyleData["ChapTitle", "Presentation"], FontSize->54], Cell[StyleData["ChapTitle", "Printout"], CellMargins->{{2, 10}, {80, 6}}, FontSize->30], Cell[StyleData["ChapTitle", "EnhancedPrintout"], CellMargins->{{2, 10}, {80, 6}}, FontFamily->"Frutiger 65 Bold", FontSize->30, FontWeight->"Plain", FontColor->GrayLevel[0]], Cell[StyleData["ChapTitle", "EnhancedPrintoutNonGray"], CellMargins->{{2, 10}, {80, 6}}, FontFamily->"Frutiger 65 Bold", FontSize->30, FontWeight->"Plain"] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["ItemDingbat"], CellSize->{22, 14}, TextAlignment->Right, StyleMenuListing->None, FontWeight->"Bold"], Cell[StyleData["ItemDingbat", "Presentation"], FontSize->18], Cell[StyleData["ItemDingbat", "Printout"], CellSize->{22, 13.125}], Cell[StyleData["ItemDingbat", "EnhancedPrintout"], CellSize->{22, 11}], Cell[StyleData["ItemDingbat", "EnhancedPrintoutNonGray"], CellSize->{22, 11}] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["Item1"], CellMargins->{{19, 4}, {4, 4}}, ParagraphIndent->-22, CounterIncrements->"Item1", StyleMenuListing->None], Cell[StyleData["Item1", "Presentation"], FontSize->18], Cell[StyleData["Item1", "Printout"], CellMargins->{{12, 0}, {2, 4}}, FontSize->10], Cell[StyleData["Item1", "EnhancedPrintout"], CellMargins->{{16, 0}, {2, 4}}, FontSize->10], Cell[StyleData["Item1", "EnhancedPrintoutNonGray"], CellMargins->{{16, 0}, {2, 4}}, FontSize->10] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["Item1Continued"], CellMargins->{{41, 4}, {4, 1}}, CounterIncrements->"Item1Continued", StyleMenuListing->None], Cell[StyleData["Item1Continued", "Presentation"], FontSize->18], Cell[StyleData["Item1Continued", "Printout"], CellMargins->{{34, 0}, {4, 1}}, FontSize->10], Cell[StyleData["Item1Continued", "EnhancedPrintout"], CellMargins->{{39, 0}, {4, 1}}, FontSize->10], Cell[StyleData["Item1Continued", "EnhancedPrintoutNonGray"], CellMargins->{{39, 0}, {4, 1}}, FontSize->10] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["Item2"], CellMargins->{{32, 4}, {4, 4}}, ParagraphIndent->-22, CounterIncrements->"Item2", StyleMenuListing->None], Cell[StyleData["Item2", "Presentation"], FontSize->18], Cell[StyleData["Item2", "Printout"], CellMargins->{{26, 0}, {4, 4}}, ParagraphIndent->-22, FontSize->10], Cell[StyleData["Item2", "EnhancedPrintout"], CellMargins->{{29, 0}, {2, 4}}, ParagraphIndent->-22, FontSize->10], Cell[StyleData["Item2", "EnhancedPrintoutNonGray"], CellMargins->{{29, 0}, {2, 4}}, ParagraphIndent->-22, FontSize->10] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["Item2Continued"], CellMargins->{{54, 4}, {4, 1}}, CounterIncrements->"Item2Continued", StyleMenuListing->None], Cell[StyleData["Item2Continued", "Presentation"], FontSize->18], Cell[StyleData["Item2Continued", "Printout"], CellMargins->{{27, 0}, {4, 1}}], Cell[StyleData["Item2Continued", "EnhancedPrintout"], CellMargins->{{52, 0}, {4, 1}}, FontSize->10], Cell[StyleData["Item2Continued", "EnhancedPrintoutNonGray"], CellMargins->{{52, 0}, {4, 1}}] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["Item3"], CellMargins->{{45, 4}, {4, 4}}, ParagraphIndent->-23, CounterIncrements->"Item3", StyleMenuListing->None], Cell[StyleData["Item3", "Presentation"], FontSize->18], Cell[StyleData["Item3", "Printout"], CellMargins->{{27, 0}, {2, 4}}], Cell[StyleData["Item3", "EnhancedPrintout"], CellMargins->{{42, 0}, {2, 4}}, FontSize->10], Cell[StyleData["Item3", "EnhancedPrintoutNonGray"], CellMargins->{{42, 0}, {2, 4}}, StyleMenuListing->None] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["Item3Continued"], CellMargins->{{67, 4}, {4, 1}}, CounterIncrements->"Item3Continued", StyleMenuListing->None], Cell[StyleData["Item3Continued", "Presentation"], FontSize->18], Cell[StyleData["Item3Continued", "Printout"], CellMargins->{{27, 0}, {4, 1}}], Cell[StyleData["Item3Continued", "EnhancedPrintout"], CellMargins->{{65, 0}, {4, 1}}, FontSize->10], Cell[StyleData["Item3Continued", "EnhancedPrintoutNonGray"], CellMargins->{{65, 0}, {4, 1}}] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["ItemizedBulletText"], CellMargins->{{19, 4}, {0, 5}}, LineSpacing->{1, 3}, ParagraphIndent->-22, CounterIncrements->"ItemizedBulletText", StyleMenuListing->None], Cell[StyleData["ItemizedBulletText", "Presentation"], FontSize->18], Cell[StyleData["ItemizedBulletText", "Printout"], Hyphenation->True, ParagraphIndent->-20, FontSize->11], Cell[StyleData["ItemizedBulletText", "EnhancedPrintout"], Hyphenation->True, ParagraphIndent->-19, FontFamily->"Palatino", FontSize->10], Cell[StyleData["ItemizedBulletText", "EnhancedPrintoutNonGray"], Hyphenation->True, ParagraphIndent->-19, FontFamily->"Palatino", FontSize->10] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["NoteBox"], CellFrame->0.5, CellMargins->{{27, 12}, {8, 8}}, CellHorizontalScrolling->True, CellFrameColor->RGBColor[0.74902, 0.694118, 0.552941], LineIndent->0, StyleMenuListing->None, Background->RGBColor[0.964706, 0.929412, 0.839216], FrameBoxOptions->{BoxMargins->{{1, 1}, {1.5, 1.5}}}, GridBoxOptions->{ColumnSpacings->1}], Cell[StyleData["NoteBox", "Presentation"], FontSize->18], Cell[StyleData["NoteBox", "Printout"], CellMargins->{{2, 4}, {6, 2}}, FontSize->10, Background->GrayLevel[0.900008]], Cell[StyleData["NoteBox", "EnhancedPrintout"], CellMargins->{{2, 2}, {6, 2}}, CellFrameColor->GrayLevel[0], FontSize->10, Background->GrayLevel[0.900008]], Cell[StyleData["NoteBox", "EnhancedPrintoutNonGray"], CellMargins->{{2, 4}, {6, 2}}, CellFrameColor->GrayLevel[0], FontSize->10, Background->GrayLevel[1]] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["ItemizedNoteBox"], CellFrame->0.5, CellMargins->{{41, 4}, {8, 2}}, CellHorizontalScrolling->True, CellFrameColor->RGBColor[0.74902, 0.694118, 0.552941], LineIndent->0, StyleMenuListing->None, Background->RGBColor[0.964706, 0.929412, 0.839216], FrameBoxOptions->{BoxMargins->{{1, 1}, {1.5, 1.5}}}, GridBoxOptions->{ColumnSpacings->1}], Cell[StyleData["ItemizedNoteBox", "Presentation"], FontSize->18], Cell[StyleData["ItemizedNoteBox", "Printout"], CellMargins->{{39, 4}, {6, 2}}, FontSize->10, Background->GrayLevel[0.900008]], Cell[StyleData["ItemizedNoteBox", "EnhancedPrintout"], CellMargins->{{39, 4}, {6, 2}}, CellFrameColor->GrayLevel[0], FontSize->10, Background->GrayLevel[0.900008]], Cell[StyleData["ItemizedNoteBox", "EnhancedPrintoutNonGray"], CellMargins->{{39, 4}, {6, 2}}, CellFrameColor->GrayLevel[0], FontSize->10, Background->GrayLevel[1]] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["ItemizedTopBox"], CellFrame->{{0.5, 0.5}, {0, 0.5}}, CellMargins->{{37, 4}, {0, 8}}, CellHorizontalScrolling->True, CellFrameMargins->{{8, 8}, {0, 8}}, CellFrameColor->RGBColor[0.74902, 0.694118, 0.552941], LineIndent->0, StyleMenuListing->None, Background->RGBColor[0.964706, 0.929412, 0.839216], GridBoxOptions->{RowSpacings->1.5, ColumnSpacings->1, ColumnWidths->{0.31, 0.62}, ColumnAlignments->{Left}}], Cell[StyleData["ItemizedTopBox", "Presentation"], FontSize->18], Cell[StyleData["ItemizedTopBox", "Printout"], FontSize->10, Background->GrayLevel[0.900008]], Cell[StyleData["ItemizedTopBox", "EnhancedPrintout"], CellMargins->{{39, 4}, {0, 6}}, CellFrameColor->GrayLevel[0], FontSize->10, Background->GrayLevel[0.900008]], Cell[StyleData["ItemizedTopBox", "EnhancedPrintoutNonGray"], CellMargins->{{39, 4}, {0, 6}}, CellFrameColor->GrayLevel[0], FontSize->10, Background->GrayLevel[1]] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["ItemizedBottomBox"], CellFrame->{{0.5, 0.5}, {0.5, 0}}, CellMargins->{{37, 4}, {4, 0}}, CellHorizontalScrolling->True, CellFrameMargins->{{8, 8}, {8, 0}}, CellFrameColor->RGBColor[0.74902, 0.694118, 0.552941], LineIndent->0, StyleMenuListing->None, Background->RGBColor[0.964706, 0.929412, 0.839216], GridBoxOptions->{RowSpacings->1.5, ColumnSpacings->1, ColumnWidths->{0.31, 0.62}, ColumnAlignments->{Left}}], Cell[StyleData["ItemizedBottomBox", "Presentation"], FontSize->18], Cell[StyleData["ItemizedBottomBox", "Printout"], FontSize->10, Background->GrayLevel[0.900008]], Cell[StyleData["ItemizedBottomBox", "EnhancedPrintout"], CellMargins->{{39, 4}, {6, 0}}, CellFrameColor->GrayLevel[0], FontSize->10, Background->GrayLevel[0.900008]], Cell[StyleData["ItemizedBottomBox", "EnhancedPrintoutNonGray"], CellMargins->{{39, 4}, {6, 0}}, CellFrameColor->GrayLevel[0], FontSize->10, Background->GrayLevel[1]] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["MiddleSpacedBox"], CellFrame->{{0.5, 0.5}, {0, 0}}, CellMargins->{{27, 12}, {0, -7}}, CellHorizontalScrolling->True, PageBreakAbove->False, PageBreakBelow->False, CellFrameColor->RGBColor[0.74902, 0.694118, 0.552941], AutoIndent->False, AutoSpacing->False, LineIndent->0, StyleMenuListing->None, FontWeight->"Plain", Background->RGBColor[0.964706, 0.929412, 0.839216], GridBoxOptions->{RowSpacings->1.5, ColumnSpacings->1, ColumnWidths->{0.31, 0.62}, ColumnAlignments->{Left}}], Cell[StyleData["MiddleSpacedBox", "Presentation"], FontSize->18], Cell[StyleData["MiddleSpacedBox", "Printout"], CellMargins->{{2, 0}, {0, 0}}, Background->GrayLevel[1], GridBoxOptions->{RowMinHeight->1.8}], Cell[StyleData["MiddleSpacedBox", "EnhancedPrintout"], CellMargins->{{2, 0}, {0, 0}}, CellFrameColor->GrayLevel[0], FontFamily->"Palatino", Background->GrayLevel[1], GridBoxOptions->{RowMinHeight->1.8}], Cell[StyleData["MiddleSpacedBox", "EnhancedPrintoutNonGray"], CellMargins->{{2, 0}, {0, 0}}, CellFrameColor->GrayLevel[0], FontFamily->"Palatino", Background->GrayLevel[1], GridBoxOptions->{RowMinHeight->1.8}] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["ItemizedNote"], CellMargins->{{41, 4}, {0, 12}}, LineSpacing->{1, 2}, CounterIncrements->"Text", StyleMenuListing->None], Cell[StyleData["ItemizedNote", "Presentation"], FontSize->18], Cell[StyleData["ItemizedNote", "Printout"], CellMargins->{{38, 4}, {0, 9}}, Hyphenation->True, FontSize->11], Cell[StyleData["ItemizedNote", "EnhancedPrintout"], CellMargins->{{38, 4}, {0, 0}}, TextJustification->1, Hyphenation->True, FontFamily->"Palatino", FontSize->10], Cell[StyleData["ItemizedNote", "EnhancedPrintoutNonGray"], CellMargins->{{38, 4}, {0, 0}}, TextJustification->1, Hyphenation->True, FontFamily->"Palatino", FontSize->10] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["ItemizedNoteBelow"], CellMargins->{{41, 4}, {0, 8}}, LineSpacing->{1, 2}, CounterIncrements->"Text", StyleMenuListing->None], Cell[StyleData["ItemizedNoteBelow", "Presentation"], FontSize->18], Cell[StyleData["ItemizedNoteBelow", "Printout"], CellMargins->{{38, 4}, {0, 12}}, Hyphenation->True, FontSize->11], Cell[StyleData["ItemizedNoteBelow", "EnhancedPrintout"], CellMargins->{{38, 4}, {0, 8}}, TextJustification->1, Hyphenation->True, FontFamily->"Palatino", FontSize->10], Cell[StyleData["ItemizedNoteBelow", "EnhancedPrintoutNonGray"], CellMargins->{{38, 4}, {0, 8}}, TextJustification->1, Hyphenation->True, FontFamily->"Palatino", FontSize->10] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["ItemizedTextBelowPic"], CellMargins->{{19, 4}, {0, 8}}, LineSpacing->{1, 3}, ParagraphIndent->-22, CounterIncrements->"ItemizedText", StyleMenuListing->None], Cell[StyleData["ItemizedTextBelowPic", "Presentation"], FontSize->18], Cell[StyleData["ItemizedTextBelowPic", "Printout"], CellMargins->{{20, 4}, {2, 12}}, Hyphenation->True, ParagraphIndent->-18, FontSize->11], Cell[StyleData["ItemizedTextBelowPic", "EnhancedPrintout"], CellMargins->{{20, 4}, {2, 12}}, Hyphenation->True, ParagraphIndent->-17, FontFamily->"Palatino", FontSize->10], Cell[StyleData["ItemizedTextBelowPic", "EnhancedPrintoutNonGray"], CellMargins->{{20, 4}, {2, 12}}, Hyphenation->True, ParagraphIndent->-17, FontFamily->"Palatino", FontSize->10] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["ItemizedTextNote2"], CellMargins->{{41, 4}, {0, 4}}, LineSpacing->{1, 2}, CounterIncrements->"Text", StyleMenuListing->None], Cell[StyleData["ItemizedTextNote2", "Presentation"], FontSize->18], Cell[StyleData["ItemizedTextNote2", "Printout"], CellMargins->{{38, 4}, {0, 2}}, Hyphenation->True, FontSize->11], Cell[StyleData["ItemizedTextNote2", "EnhancedPrintout"], CellMargins->{{38, 4}, {0, 2}}, Hyphenation->True, FontFamily->"Palatino", FontSize->10], Cell[StyleData["ItemizedTextNote2", "EnhancedPrintoutNonGray"], CellMargins->{{38, 4}, {0, 2}}, Hyphenation->True, FontFamily->"Palatino", FontSize->10] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["NumberedItem1"], CellMargins->{{48, 4}, {4, 4}}, CellGroupingRules->{"SectionGrouping", 15}, ParagraphIndent->-23, CounterIncrements->"NumberedItem1", StyleMenuListing->None], Cell[StyleData["NumberedItem1", "Presentation"], FontSize->18], Cell[StyleData["NumberedItem1", "Printout"], CellMargins->{{12, 0}, {0, 8}}], Cell[StyleData["NumberedItem1", "EnhancedPrintout"], CellMargins->{{12, 0}, {0, 8}}], Cell[StyleData["NumberedItem1", "EnhancedPrintoutNonGray"], CellMargins->{{12, 0}, {0, 8}}] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["NumberedItem2"], CellMargins->{{71, 4}, {3, 3}}, CellGroupingRules->{"SectionGrouping", 15}, ParagraphIndent->-21, CounterIncrements->"NumberedItem2", StyleMenuListing->None], Cell[StyleData["NumberedItem2", "Presentation"], FontSize->18], Cell[StyleData["NumberedItem2", "Printout"], CellMargins->{{27, 0}, {0, 4}}], Cell[StyleData["NumberedItem2", "EnhancedPrintout"], CellMargins->{{27, 0}, {0, 4}}], Cell[StyleData["NumberedItem2", "EnhancedPrintoutNonGray"], CellMargins->{{27, 0}, {0, 4}}] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["NumberedItem3"], CellMargins->{{94, 4}, {2, 2}}, CellGroupingRules->{"SectionGrouping", 15}, ParagraphIndent->-23, CounterIncrements->"NumberedItem3", StyleMenuListing->None], Cell[StyleData["NumberedItem3", "Presentation"], FontSize->18], Cell[StyleData["NumberedItem3", "Printout"], CellMargins->{{27, 0}, {0, 4}}], Cell[StyleData["NumberedItem3", "EnhancedPrintout"], CellMargins->{{27, 0}, {0, 4}}], Cell[StyleData["NumberedItem3", "EnhancedPrintoutNonGray"], CellMargins->{{27, 0}, {0, 4}}, StyleMenuListing->None] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["PageHeaderBold"], CellMargins->{{0, 0}, {2, 0}}, StyleMenuListing->None, FontSize->8, FontWeight->"Bold", FontSlant->"Italic"], Cell[StyleData["PageHeaderBold", "Printout"]], Cell[StyleData["PageHeaderBold", "EnhancedPrintout"], FontFamily->"Frutiger"], Cell[StyleData["PageHeaderBold", "EnhancedPrintoutNonGray"], FontFamily->"Frutiger"] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["SingleRowTable"], CellMargins->{{10, 4}, {0, 8}}, CellHorizontalScrolling->True, PageBreakWithin->False, AutoIndent->False, AutoSpacing->False, LineIndent->0, StyleMenuListing->None, GridBoxOptions->{RowSpacings->1.5, ColumnSpacings->2, ColumnAlignments->{Left}}], Cell[StyleData["SingleRowTable", "Presentation"], FontSize->18], Cell[StyleData["SingleRowTable", "Printout"], CellMargins->{{2, 0}, {0, 8}}], Cell[StyleData["SingleRowTable", "EnhancedPrintout"], CellMargins->{{2, 0}, {0, 8}}], Cell[StyleData["SingleRowTable", "EnhancedPrintoutNonGray"], CellMargins->{{2, 0}, {0, 8}}] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["Subsubsubsection"], CellMargins->{{27, 4}, {0, 18}}, CellElementSpacings->{"ClosedGroupTopMargin"->18}, StyleMenuListing->None, FontSize->12, FontWeight->"Bold"], Cell[StyleData["Subsubsubsection", "Presentation"], FontSize->18], Cell[StyleData["Subsubsubsection", "Printout"], CellMargins->{{2, 0}, {3, 8}}, FontSize->10], Cell[StyleData["Subsubsubsection", "EnhancedPrintout"], CellMargins->{{2, 0}, {3, 8}}, FontFamily->"Palatino", FontSize->10], Cell[StyleData["Subsubsubsection", "EnhancedPrintoutNonGray"], CellMargins->{{2, 0}, {3, 8}}, FontFamily->"Palatino", FontSize->10] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["Subsubtitle"], CellMargins->{{27, Inherited}, {20, 15}}, CellGroupingRules->{"TitleGrouping", 20}, PageBreakBelow->False, DefaultNewInlineCellStyle->"None", InputAutoReplacements->{"TeX"->StyleBox[ RowBox[ {"T", AdjustmentBox[ "E", BoxMargins -> {{-.074999999999999997, \ -.085000000000000006}, {0, 0}}, BoxBaselineShift -> .5], "X"}]], "LaTeX"->StyleBox[ RowBox[ {"L", StyleBox[ AdjustmentBox[ "A", BoxMargins -> {{-.35999999999999999, \ -.10000000000000001}, {0, 0}}, BoxBaselineShift -> -.20000000000000001], FontSize -> Smaller], "T", AdjustmentBox[ "E", BoxMargins -> {{-.074999999999999997, \ -.085000000000000006}, {0, 0}}, BoxBaselineShift -> .5], "X"}]], "mma"->"Mathematica", "Mma"->"Mathematica", "MMA"->"Mathematica", "gridMathematica"->FormBox[ RowBox[ {"grid", AdjustmentBox[ StyleBox[ "Mathematica", FontSlant -> "Italic"], BoxMargins -> {{-.17499999999999999, 0}, {0, 0}}]}], TextForm], "webMathematica"->FormBox[ RowBox[ {"web", AdjustmentBox[ StyleBox[ "Mathematica", FontSlant -> "Italic"], BoxMargins -> {{-.17499999999999999, 0}, {0, 0}}]}], TextForm]}, LanguageCategory->"NaturalLanguage", CounterIncrements->"Subsubtitle", CounterAssignments->{{"Section", 0}, {"Equation", 0}, {"Figure", 0}}, StyleMenuListing->None, FontFamily->"Helvetica", FontSize->14, FontSlant->"Italic"], Cell[StyleData["Subsubtitle", "Presentation"], FontSize->21], Cell[StyleData["Subsubtitle", "Printout"], CellMargins->{{2, 10}, {8, 10}}, FontSize->12], Cell[StyleData["Subsubtitle", "EnhancedPrintout"], CellMargins->{{2, 10}, {8, 10}}, FontFamily->"Frutiger 55 Roman", FontSize->12], Cell[StyleData["Subsubtitle", "EnhancedPrintoutNonGray"], CellMargins->{{2, 10}, {8, 10}}, FontFamily->"Frutiger 55 Roman", FontSize->12] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["Subtitle"], CellMargins->{{27, Inherited}, {20, 15}}, CellGroupingRules->{"TitleGrouping", 10}, PageBreakBelow->False, DefaultNewInlineCellStyle->"None", InputAutoReplacements->{"TeX"->StyleBox[ RowBox[ {"T", AdjustmentBox[ "E", BoxMargins -> {{-.074999999999999997, \ -.085000000000000006}, {0, 0}}, BoxBaselineShift -> .5], "X"}]], "LaTeX"->StyleBox[ RowBox[ {"L", StyleBox[ AdjustmentBox[ "A", BoxMargins -> {{-.35999999999999999, \ -.10000000000000001}, {0, 0}}, BoxBaselineShift -> -.20000000000000001], FontSize -> Smaller], "T", AdjustmentBox[ "E", BoxMargins -> {{-.074999999999999997, \ -.085000000000000006}, {0, 0}}, BoxBaselineShift -> .5], "X"}]], "mma"->"Mathematica", "Mma"->"Mathematica", "MMA"->"Mathematica", "gridMathematica"->FormBox[ RowBox[ {"grid", AdjustmentBox[ StyleBox[ "Mathematica", FontSlant -> "Italic"], BoxMargins -> {{-.17499999999999999, 0}, {0, 0}}]}], TextForm], "webMathematica"->FormBox[ RowBox[ {"web", AdjustmentBox[ StyleBox[ "Mathematica", FontSlant -> "Italic"], BoxMargins -> {{-.17499999999999999, 0}, {0, 0}}]}], TextForm]}, LanguageCategory->"NaturalLanguage", CounterIncrements->"Subtitle", CounterAssignments->{{"Section", 0}, {"Equation", 0}, {"Figure", 0}, { "Subsubtitle", 0}}, StyleMenuListing->None, FontFamily->"Helvetica", FontSize->24], Cell[StyleData["Subtitle", "Presentation"], FontSize->36], Cell[StyleData["Subtitle", "Printout"], CellMargins->{{2, 10}, {10, 15}}, FontSize->24], Cell[StyleData["Subtitle", "EnhancedPrintout"], CellMargins->{{2, 10}, {10, 15}}, FontFamily->"Frutiger 55 Roman", FontSize->24], Cell[StyleData["Subtitle", "EnhancedPrintoutNonGray"], CellMargins->{{2, 10}, {10, 15}}, FontFamily->"Frutiger 55 Roman", FontSize->24] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["TextBelow"], CellMargins->{{27, 4}, {0, 14}}, InputAutoReplacements->{"TeX"->StyleBox[ RowBox[ {"T", AdjustmentBox[ "E", BoxMargins -> {{-.074999999999999997, \ -.085000000000000006}, {0, 0}}, BoxBaselineShift -> .5], "X"}]], "LaTeX"->StyleBox[ RowBox[ {"L", StyleBox[ AdjustmentBox[ "A", BoxMargins -> {{-.35999999999999999, \ -.10000000000000001}, {0, 0}}, BoxBaselineShift -> -.20000000000000001], FontSize -> Smaller], "T", AdjustmentBox[ "E", BoxMargins -> {{-.074999999999999997, \ -.085000000000000006}, {0, 0}}, BoxBaselineShift -> .5], "X"}]], "mma"->"Mathematica", "Mma"->"Mathematica", "MMA"->"Mathematica", "gridMathematica"->FormBox[ RowBox[ {"grid", AdjustmentBox[ StyleBox[ "Mathematica", FontSlant -> "Italic"], BoxMargins -> {{-.17499999999999999, 0}, {0, 0}}]}], TextForm], "webMathematica"->FormBox[ RowBox[ {"web", AdjustmentBox[ StyleBox[ "Mathematica", FontSlant -> "Italic"], BoxMargins -> {{-.17499999999999999, 0}, {0, 0}}]}], TextForm]}, ParagraphSpacing->{0, 8}, StyleMenuListing->None, FontSize->12], Cell[StyleData["TextBelow", "Presentation"], FontSize->18], Cell[StyleData["TextBelow", "Printout"], CellMargins->{{2, 2}, {6, 12}}, TextJustification->1, Hyphenation->True, FontSize->10], Cell[StyleData["TextBelow", "EnhancedPrintout"], CellMargins->{{2, 2}, {6, 12}}, TextJustification->1, Hyphenation->True, FontFamily->"Palatino", FontSize->10], Cell[StyleData["TextBelow", "EnhancedPrintoutNonGray"], CellMargins->{{2, 2}, {6, 12}}, TextJustification->1, Hyphenation->True, FontFamily->"Palatino", FontSize->10] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["Title"], CellMargins->{{27, Inherited}, {20, 40}}, CellGroupingRules->{"TitleGrouping", 0}, PageBreakBelow->False, DefaultNewInlineCellStyle->"None", InputAutoReplacements->{"TeX"->StyleBox[ RowBox[ {"T", AdjustmentBox[ "E", BoxMargins -> {{-.074999999999999997, \ -.085000000000000006}, {0, 0}}, BoxBaselineShift -> .5], "X"}]], "LaTeX"->StyleBox[ RowBox[ {"L", StyleBox[ AdjustmentBox[ "A", BoxMargins -> {{-.35999999999999999, \ -.10000000000000001}, {0, 0}}, BoxBaselineShift -> -.20000000000000001], FontSize -> Smaller], "T", AdjustmentBox[ "E", BoxMargins -> {{-.074999999999999997, \ -.085000000000000006}, {0, 0}}, BoxBaselineShift -> .5], "X"}]], "mma"->"Mathematica", "Mma"->"Mathematica", "MMA"->"Mathematica", "gridMathematica"->FormBox[ RowBox[ {"grid", AdjustmentBox[ StyleBox[ "Mathematica", FontSlant -> "Italic"], BoxMargins -> {{-.17499999999999999, 0}, {0, 0}}]}], TextForm], "webMathematica"->FormBox[ RowBox[ {"web", AdjustmentBox[ StyleBox[ "Mathematica", FontSlant -> "Italic"], BoxMargins -> {{-.17499999999999999, 0}, {0, 0}}]}], TextForm]}, LanguageCategory->"NaturalLanguage", CounterIncrements->"Title", CounterAssignments->{{"Section", 0}, {"Equation", 0}, {"Figure", 0}, { "Subtitle", 0}, {"Subsubtitle", 0}}, StyleMenuListing->None, FontFamily->"Helvetica", FontSize->36, FontWeight->"Bold"], Cell[StyleData["Title", "Presentation"], FontSize->54], Cell[StyleData["Title", "Printout"], CellMargins->{{2, 10}, {15, 30}}, FontSize->30], Cell[StyleData["Title", "EnhancedPrintout"], CellMargins->{{2, 10}, {15, 30}}, FontFamily->"Frutiger 65 Bold", FontSize->30.5, FontWeight->"Plain"], Cell[StyleData["Title", "EnhancedPrintoutNonGray"], CellMargins->{{2, 10}, {15, 30}}, FontFamily->"Frutiger 65 Bold", FontSize->30.5, FontWeight->"Plain"] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["Undersubsection"], CellMargins->{{10, 4}, {0, 18}}, CellElementSpacings->{"ClosedGroupTopMargin"->18}, InputAutoReplacements->{"TeX"->StyleBox[ RowBox[ {"T", AdjustmentBox[ "E", BoxMargins -> {{-.074999999999999997, \ -.085000000000000006}, {0, 0}}, BoxBaselineShift -> .5], "X"}]], "LaTeX"->StyleBox[ RowBox[ {"L", StyleBox[ AdjustmentBox[ "A", BoxMargins -> {{-.35999999999999999, \ -.10000000000000001}, {0, 0}}, BoxBaselineShift -> -.20000000000000001], FontSize -> Smaller], "T", AdjustmentBox[ "E", BoxMargins -> {{-.074999999999999997, \ -.085000000000000006}, {0, 0}}, BoxBaselineShift -> .5], "X"}]], "mma"->"Mathematica", "Mma"->"Mathematica", "MMA"->"Mathematica", "gridMathematica"->FormBox[ RowBox[ {"grid", AdjustmentBox[ StyleBox[ "Mathematica", FontSlant -> "Italic"], BoxMargins -> {{-.17499999999999999, 0}, {0, 0}}]}], TextForm], "webMathematica"->FormBox[ RowBox[ {"web", AdjustmentBox[ StyleBox[ "Mathematica", FontSlant -> "Italic"], BoxMargins -> {{-.17499999999999999, 0}, {0, 0}}]}], TextForm]}, StyleMenuListing->None, FontFamily->"Helvetica", FontSize->12, FontWeight->"Bold"], Cell[StyleData["Undersubsection", "Presentation"], FontSize->18], Cell[StyleData["Undersubsection", "Printout"], CellMargins->{{2, 0}, {7, 10}}, FontSize->10], Cell[StyleData["Undersubsection", "EnhancedPrintout"], CellMargins->{{2, 0}, {7, 8}}, FontFamily->"Frutiger 65 Bold", FontSize->10, FontWeight->"Plain"], Cell[StyleData["Undersubsection", "EnhancedPrintoutNonGray"], CellMargins->{{2, 0}, {7, 8}}, FontFamily->"Frutiger 65 Bold", FontSize->10, FontWeight->"Plain"] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["SectionFirst"], CellMargins->{{27, 27}, {12, 18}}, CellGroupingRules->{"SectionGrouping", 30}, PageBreakBelow->False, CounterIncrements->"Section", FontFamily->"Helvetica", FontSize->20, FontWeight->"Bold", FontColor->RGBColor[0.592157, 0.313726, 0.313726]], Cell[StyleData["SectionFirst", "Presentation"], FontSize->30], Cell[StyleData["SectionFirst", "Printout"], CellMargins->{{2, 0}, {0, 6}}, PageBreakBelow->False, FontSize->18], Cell[StyleData["SectionFirst", "EnhancedPrintout"], CellFrame->{{0, 0}, {0.5, 0}}, CellMargins->{{2, Inherited}, {5, 6}}, CellGroupingRules->{"SectionGrouping", 30}, PageBreakBelow->False, CellFrameMargins->8, CounterIncrements->"Section", CounterAssignments->{{"Subsection", 0}, {"Subsubsection", 0}}, FontFamily->"Frutiger 65 Bold", FontSize->16, FontWeight->"Plain", FontColor->GrayLevel[0]], Cell[StyleData["SectionFirst", "EnhancedPrintoutNonGray"], CellFrame->{{0, 0}, {0.5, 0}}, CellMargins->{{2, Inherited}, {5, 6}}, CellGroupingRules->{"SectionGrouping", 30}, PageBreakBelow->False, CellFrameMargins->8, CounterIncrements->"Section", CounterAssignments->{{"Subsection", 0}, {"Subsubsection", 0}}, FontFamily->"Frutiger 65 Bold", FontSize->16, FontWeight->"Plain"] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["SubsectionFirst"], CellDingbat->None, CellMargins->{{27, 27}, {0, 18}}, CellElementSpacings->{"ClosedGroupTopMargin"->18}, CellGroupingRules->{"SectionGrouping", 40}, PageBreakBelow->False, FontFamily->"Helvetica", FontSize->16, FontWeight->"Bold", FontColor->RGBColor[0.592157, 0.313726, 0.313726]], Cell[StyleData["SubsectionFirst", "Presentation"], FontSize->24], Cell[StyleData["SubsectionFirst", "SlideShow"], CellDingbat->None, CellMargins->{{70, 0}, {4, 6}}, FontSize->12], Cell[StyleData["SubsectionFirst", "Printout"], CellMargins->{{9, 0}, {5, 6}}, CellBracketOptions->{"Color"->RGBColor[1, 0, 0]}, FontSize->12], Cell[StyleData["SubsectionFirst", "EnhancedPrintout"], CellMargins->{{2, 0}, {5, 6}}, CellBracketOptions->{"Color"->RGBColor[1, 0, 0]}, FontFamily->"Frutiger 65 Bold", FontSize->12, FontWeight->"Plain", FontColor->GrayLevel[0]], Cell[StyleData["SubsectionFirst", "EnhancedPrintoutNonGray"], CellMargins->{{9, 0}, {5, 6}}, CellBracketOptions->{"Color"->RGBColor[1, 0, 0]}, FontFamily->"Frutiger 65 Bold", FontSize->12, FontWeight->"Plain"] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["SubsubsectionFirst"], CellMargins->{{27, 27}, {0, 18}}, CellElementSpacings->{"ClosedGroupTopMargin"->18}, CellGroupingRules->{"SectionGrouping", 50}, PageBreakBelow->False, FontFamily->"Helvetica", FontSize->12, FontWeight->"Bold", FontColor->RGBColor[0.592157, 0.313726, 0.313726]], Cell[StyleData["SubsubsectionFirst", "Presentation"], FontSize->18], Cell[StyleData["SubsubsectionFirst", "Printout"], CellMargins->{{2, 0}, {3, 3}}, CellBracketOptions->{"Color"->RGBColor[1, 0, 0]}, FontSize->10], Cell[StyleData["SubsubsectionFirst", "EnhancedPrintout"], CellMargins->{{2, 0}, {3, 3}}, CellBracketOptions->{"Color"->RGBColor[1, 0, 0]}, FontFamily->"Frutiger 65 Bold", FontSize->10, FontWeight->"Plain", FontColor->GrayLevel[0]], Cell[StyleData["SubsubsectionFirst", "EnhancedPrintoutNonGray"], CellMargins->{{2, 0}, {3, 3}}, CellBracketOptions->{"Color"->RGBColor[1, 0, 0]}, FontFamily->"Frutiger 65 Bold", FontSize->10, FontWeight->"Plain"] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["SubsubsubsectionFirst"], CellMargins->{{10, 4}, {0, 12}}, CellElementSpacings->{"ClosedGroupTopMargin"->18}, StyleMenuListing->None, FontSize->12, FontWeight->"Bold"], Cell[StyleData["SubsubsubsectionFirst", "Presentation"], FontSize->18], Cell[StyleData["SubsubsubsectionFirst", "Printout"], CellMargins->{{2, 0}, {3, 3}}, FontSize->10], Cell[StyleData["SubsubsubsectionFirst", "EnhancedPrintout"], CellMargins->{{2, 0}, {3, 3}}, FontFamily->"Palatino", FontSize->10], Cell[StyleData["SubsubsubsectionFirst", "EnhancedPrintoutNonGray"], CellMargins->{{2, 0}, {3, 3}}, FontFamily->"Palatino", FontSize->10] }, Closed]], Cell["Spacer Cell", "Text"], Cell[CellGroupData[{ Cell[StyleData["Spacer"], CellMargins->{{10, 10}, {0, 0}}, CellElementSpacings->{"CellMinHeight"->2, "ClosedCellHeight"->1}, CellOpen->False, StyleMenuListing->None], Cell[StyleData["Spacer", "Printout"], CellOpen->True, FontSize->3] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["DiscretionaryHyphen"], StyleMenuListing->None, FontSize->0.0625, FontColor->GrayLevel[1]], Cell[StyleData["DiscretionaryHyphen", "Printout"], FontSize->10, FontColor->GrayLevel[0]], Cell[StyleData["DiscretionaryHyphen", "EnhancedPrintout"], FontSize->10, FontColor->GrayLevel[0]], Cell[StyleData["DiscretionaryHyphen", "EnhancedPrintoutNonGray"], FontSize->10, FontColor->GrayLevel[0]] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["PictureSmaller1"], CellMargins->{{10, Inherited}, {4, 4}}, CellGroupingRules->"GraphicsGrouping", CellHorizontalScrolling->True, StyleMenuListing->None], Cell[StyleData["PictureSmaller1", "Presentation"], FontSize->18], Cell[StyleData["PictureSmaller1", "Printout"], CellMargins->{{2, Inherited}, {4, 4}}, Magnification->0.63], Cell[StyleData["PictureSmaller1", "EnhancedPrintout"], CellMargins->{{2, Inherited}, {4, 2}}, Magnification->0.63], Cell[StyleData["PictureSmaller1", "EnhancedPrintoutNonGray"], CellMargins->{{2, Inherited}, {4, 2}}, Magnification->0.63] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["PictureSmaller2"], CellMargins->{{10, Inherited}, {4, 4}}, CellGroupingRules->"GraphicsGrouping", CellHorizontalScrolling->True, StyleMenuListing->None], Cell[StyleData["PictureSmaller2", "Presentation"], FontSize->18], Cell[StyleData["PictureSmaller2", "Printout"], CellMargins->{{2, Inherited}, {4, 4}}, Magnification->0.61], Cell[StyleData["PictureSmaller2", "EnhancedPrintout"], CellMargins->{{2, Inherited}, {4, 2}}, Magnification->0.61], Cell[StyleData["PictureSmaller2", "EnhancedPrintoutNonGray"], CellMargins->{{2, Inherited}, {4, 2}}, Magnification->0.61] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["PictureSmaller3"], CellMargins->{{10, Inherited}, {4, 4}}, CellGroupingRules->"GraphicsGrouping", CellHorizontalScrolling->True, StyleMenuListing->None], Cell[StyleData["PictureSmaller3", "Presentation"], FontSize->18], Cell[StyleData["PictureSmaller3", "Printout"], CellMargins->{{2, Inherited}, {4, 4}}, Magnification->0.59], Cell[StyleData["PictureSmaller3", "EnhancedPrintout"], CellMargins->{{2, Inherited}, {4, 2}}, Magnification->0.59], Cell[StyleData["PictureSmaller3", "EnhancedPrintoutNonGray"], CellMargins->{{2, Inherited}, {4, 2}}, Magnification->0.59] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["PictureSmaller4"], CellMargins->{{10, Inherited}, {4, 4}}, CellGroupingRules->"GraphicsGrouping", CellHorizontalScrolling->True, StyleMenuListing->None], Cell[StyleData["PictureSmaller4", "Presentation"], FontSize->18], Cell[StyleData["PictureSmaller4", "Printout"], CellMargins->{{2, Inherited}, {4, 4}}, Magnification->0.57], Cell[StyleData["PictureSmaller4", "EnhancedPrintout"], CellMargins->{{2, Inherited}, {4, 2}}, Magnification->0.57], Cell[StyleData["PictureSmaller4", "EnhancedPrintoutNonGray"], CellMargins->{{2, Inherited}, {4, 2}}, Magnification->0.57] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["PictureSmaller5"], CellMargins->{{10, Inherited}, {4, 4}}, CellGroupingRules->"GraphicsGrouping", CellHorizontalScrolling->True, StyleMenuListing->None], Cell[StyleData["PictureSmaller5", "Presentation"], FontSize->18], Cell[StyleData["PictureSmaller5", "Printout"], CellMargins->{{2, Inherited}, {4, 4}}, Magnification->0.55], Cell[StyleData["PictureSmaller5", "EnhancedPrintout"], CellMargins->{{2, Inherited}, {4, 2}}, Magnification->0.55], Cell[StyleData["PictureSmaller5", "EnhancedPrintoutNonGray"], CellMargins->{{2, Inherited}, {4, 2}}, Magnification->0.55] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["PictureSmaller6"], CellMargins->{{10, Inherited}, {4, 4}}, CellGroupingRules->"GraphicsGrouping", CellHorizontalScrolling->True, StyleMenuListing->None], Cell[StyleData["PictureSmaller6", "Presentation"], FontSize->18], Cell[StyleData["PictureSmaller6", "Printout"], CellMargins->{{2, Inherited}, {4, 4}}, Magnification->0.53], Cell[StyleData["PictureSmaller6", "EnhancedPrintout"], CellMargins->{{2, Inherited}, {4, 2}}, Magnification->0.53], Cell[StyleData["PictureSmaller6", "EnhancedPrintoutNonGray"], CellMargins->{{2, Inherited}, {4, 2}}, Magnification->0.53] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["ItemPicture"], CellMargins->{{41, Inherited}, {4, 2}}, CellGroupingRules->"GraphicsGrouping", CellHorizontalScrolling->True, StyleMenuListing->None], Cell[StyleData["ItemPicture", "Presentation"], FontSize->18], Cell[StyleData["ItemPicture", "Printout"], CellMargins->{{55, Inherited}, {8, -4}}, Magnification->0.65], Cell[StyleData["ItemPicture", "EnhancedPrintout"], CellMargins->{{60, Inherited}, {10, -3}}, Magnification->0.65], Cell[StyleData["ItemPicture", "EnhancedPrintoutNonGray"], CellMargins->{{60, Inherited}, {10, -3}}, Magnification->0.65] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["ItemPictureSmaller1"], CellMargins->{{41, Inherited}, {4, 2}}, CellGroupingRules->"GraphicsGrouping", CellHorizontalScrolling->True, StyleMenuListing->None], Cell[StyleData["ItemPictureSmaller1", "Presentation"], FontSize->18], Cell[StyleData["ItemPictureSmaller1", "Printout"], CellMargins->{{56, Inherited}, {9, -3}}, Magnification->0.63], Cell[StyleData["ItemPictureSmaller1", "EnhancedPrintout"], CellMargins->{{63, Inherited}, {10, -3}}, Magnification->0.63], Cell[StyleData["ItemPictureSmaller1", "EnhancedPrintoutNonGray"], CellMargins->{{63, Inherited}, {10, -3}}, Magnification->0.63] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["ItemPictureSmaller2"], CellMargins->{{41, Inherited}, {4, 2}}, CellGroupingRules->"GraphicsGrouping", CellHorizontalScrolling->True, StyleMenuListing->None], Cell[StyleData["ItemPictureSmaller2", "Presentation"], FontSize->18], Cell[StyleData["ItemPictureSmaller2", "Printout"], CellMargins->{{58, Inherited}, {8, -4}}, Magnification->0.61], Cell[StyleData["ItemPictureSmaller2", "EnhancedPrintout"], CellMargins->{{65, Inherited}, {11, -3}}, Magnification->0.61], Cell[StyleData["ItemPictureSmaller2", "EnhancedPrintoutNonGray"], CellMargins->{{65, Inherited}, {11, -3}}, Magnification->0.61] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["ItemPictureSmaller3"], CellMargins->{{41, Inherited}, {4, 2}}, CellGroupingRules->"GraphicsGrouping", CellHorizontalScrolling->True, StyleMenuListing->None], Cell[StyleData["ItemPictureSmaller3", "Presentation"], FontSize->18], Cell[StyleData["ItemPictureSmaller3", "Printout"], CellMargins->{{61, Inherited}, {10, -2}}, Magnification->0.59], Cell[StyleData["ItemPictureSmaller3", "EnhancedPrintout"], CellMargins->{{67, Inherited}, {11, -3}}, Magnification->0.59], Cell[StyleData["ItemPictureSmaller3", "EnhancedPrintoutNonGray"], CellMargins->{{67, Inherited}, {11, -3}}, Magnification->0.59] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["ItemPictureSmaller4"], CellMargins->{{41, Inherited}, {4, 2}}, CellGroupingRules->"GraphicsGrouping", CellHorizontalScrolling->True, StyleMenuListing->None], Cell[StyleData["ItemPictureSmaller4", "Presentation"], FontSize->18], Cell[StyleData["ItemPictureSmaller4", "Printout"], CellMargins->{{63, Inherited}, {10, -2}}, Magnification->0.57], Cell[StyleData["ItemPictureSmaller4", "EnhancedPrintout"], CellMargins->{{69, Inherited}, {12, -4}}, Magnification->0.57], Cell[StyleData["ItemPictureSmaller4", "EnhancedPrintoutNonGray"], CellMargins->{{69, Inherited}, {12, -4}}, Magnification->0.57] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["ItemPictureSmaller5"], CellMargins->{{41, Inherited}, {4, 2}}, CellGroupingRules->"GraphicsGrouping", CellHorizontalScrolling->True, StyleMenuListing->None], Cell[StyleData["ItemPictureSmaller5", "Presentation"], FontSize->18], Cell[StyleData["ItemPictureSmaller5", "Printout"], CellMargins->{{65, Inherited}, {11, -2}}, Magnification->0.55], Cell[StyleData["ItemPictureSmaller5", "EnhancedPrintout"], CellMargins->{{71, Inherited}, {13, -2}}, Magnification->0.55], Cell[StyleData["ItemPictureSmaller5", "EnhancedPrintoutNonGray"], CellMargins->{{71, Inherited}, {13, -2}}, Magnification->0.55] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["ItemPictureSmaller6"], CellMargins->{{41, Inherited}, {4, 2}}, CellGroupingRules->"GraphicsGrouping", CellHorizontalScrolling->True, StyleMenuListing->None], Cell[StyleData["ItemPictureSmaller6", "Presentation"], FontSize->18], Cell[StyleData["ItemPictureSmaller6", "Printout"], CellMargins->{{67, Inherited}, {12, -2}}, Magnification->0.53], Cell[StyleData["ItemPictureSmaller6", "EnhancedPrintout"], CellMargins->{{74, Inherited}, {13, -3}}, Magnification->0.53], Cell[StyleData["ItemPictureSmaller6", "EnhancedPrintoutNonGray"], CellMargins->{{74, Inherited}, {13, -3}}, Magnification->0.53] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["PictureBigger1"], CellMargins->{{10, Inherited}, {4, 4}}, CellGroupingRules->"GraphicsGrouping", CellHorizontalScrolling->True, StyleMenuListing->None], Cell[StyleData["PictureBigger1", "Presentation"], FontSize->18], Cell[StyleData["PictureBigger1", "Printout"], CellMargins->{{2, Inherited}, {4, 4}}, Magnification->0.68], Cell[StyleData["PictureBigger1", "EnhancedPrintout"], CellMargins->{{2, Inherited}, {4, 2}}, Magnification->0.68], Cell[StyleData["PictureBigger1", "EnhancedPrintoutNonGray"], CellMargins->{{2, Inherited}, {4, 2}}, Magnification->0.68] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["PictureBigger2"], CellMargins->{{10, Inherited}, {4, 4}}, CellGroupingRules->"GraphicsGrouping", CellHorizontalScrolling->True, StyleMenuListing->None], Cell[StyleData["PictureBigger2", "Presentation"], FontSize->18], Cell[StyleData["PictureBigger2", "Printout"], CellMargins->{{2, Inherited}, {4, 4}}, Magnification->0.71], Cell[StyleData["PictureBigger2", "EnhancedPrintout"], CellMargins->{{2, Inherited}, {4, 2}}, Magnification->0.71], Cell[StyleData["PictureBigger2", "EnhancedPrintoutNonGray"], CellMargins->{{2, Inherited}, {4, 2}}, Magnification->0.71] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["PictureBigger3"], CellMargins->{{10, Inherited}, {4, 4}}, CellGroupingRules->"GraphicsGrouping", CellHorizontalScrolling->True, StyleMenuListing->None], Cell[StyleData["PictureBigger3", "Presentation"], FontSize->18], Cell[StyleData["PictureBigger3", "Printout"], CellMargins->{{2, Inherited}, {4, 4}}, Magnification->0.74], Cell[StyleData["PictureBigger3", "EnhancedPrintout"], CellMargins->{{2, Inherited}, {4, 2}}, Magnification->0.74], Cell[StyleData["PictureBigger3", "EnhancedPrintoutNonGray"], CellMargins->{{2, Inherited}, {4, 2}}, Magnification->0.74] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["PictureBigger4"], CellMargins->{{10, Inherited}, {4, 4}}, CellGroupingRules->"GraphicsGrouping", CellHorizontalScrolling->True, StyleMenuListing->None], Cell[StyleData["PictureBigger4", "Presentation"], FontSize->18], Cell[StyleData["PictureBigger4", "Printout"], CellMargins->{{2, Inherited}, {4, 4}}, Magnification->0.77], Cell[StyleData["PictureBigger4", "EnhancedPrintout"], CellMargins->{{2, Inherited}, {4, 2}}, Magnification->0.77], Cell[StyleData["PictureBigger4", "EnhancedPrintoutNonGray"], CellMargins->{{2, Inherited}, {4, 2}}, Magnification->0.77] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["PictureBigger5"], CellMargins->{{10, Inherited}, {4, 4}}, CellGroupingRules->"GraphicsGrouping", CellHorizontalScrolling->True, StyleMenuListing->None], Cell[StyleData["PictureBigger5", "Presentation"], FontSize->18], Cell[StyleData["PictureBigger5", "Printout"], CellMargins->{{2, Inherited}, {4, 4}}, Magnification->0.8], Cell[StyleData["PictureBigger5", "EnhancedPrintout"], CellMargins->{{2, Inherited}, {4, 2}}, Magnification->0.8], Cell[StyleData["PictureBigger5", "EnhancedPrintoutNonGray"], CellMargins->{{2, Inherited}, {4, 2}}, Magnification->0.8] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["PictureBigger6"], CellMargins->{{10, Inherited}, {4, 4}}, CellGroupingRules->"GraphicsGrouping", CellHorizontalScrolling->True, StyleMenuListing->None], Cell[StyleData["PictureBigger6", "Presentation"], FontSize->18], Cell[StyleData["PictureBigger6", "Printout"], CellMargins->{{2, Inherited}, {4, 4}}, Magnification->0.83], Cell[StyleData["PictureBigger6", "EnhancedPrintout"], CellMargins->{{2, Inherited}, {4, 2}}, Magnification->0.83], Cell[StyleData["PictureBigger6", "EnhancedPrintoutNonGray"], CellMargins->{{2, Inherited}, {4, 2}}, Magnification->0.83] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["ItemPictureBigger1"], CellMargins->{{41, Inherited}, {4, 2}}, CellGroupingRules->"GraphicsGrouping", CellHorizontalScrolling->True, StyleMenuListing->None], Cell[StyleData["ItemPictureBigger1", "Presentation"], FontSize->18], Cell[StyleData["ItemPictureBigger1", "Printout"], CellMargins->{{50, Inherited}, {9, -3}}, Magnification->0.68], Cell[StyleData["ItemPictureBigger1", "EnhancedPrintout"], CellMargins->{{57, Inherited}, {10, -3}}, Magnification->0.68], Cell[StyleData["ItemPictureBigger1", "EnhancedPrintoutNonGray"], CellMargins->{{57, Inherited}, {10, -3}}, Magnification->0.68] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["ItemPictureBigger2"], CellMargins->{{41, Inherited}, {4, 2}}, CellGroupingRules->"GraphicsGrouping", CellHorizontalScrolling->True, StyleMenuListing->None], Cell[StyleData["ItemPictureBigger2", "Presentation"], FontSize->18], Cell[StyleData["ItemPictureBigger2", "Printout"], CellMargins->{{48, Inherited}, {8, -4}}, Magnification->0.71], Cell[StyleData["ItemPictureBigger2", "EnhancedPrintout"], CellMargins->{{54, Inherited}, {10, -3}}, Magnification->0.71], Cell[StyleData["ItemPictureBigger2", "EnhancedPrintoutNonGray"], CellMargins->{{54, Inherited}, {10, -3}}, Magnification->0.71] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["ItemPictureBigger3"], CellMargins->{{41, Inherited}, {4, 2}}, CellGroupingRules->"GraphicsGrouping", CellHorizontalScrolling->True, StyleMenuListing->None], Cell[StyleData["ItemPictureBigger3", "Presentation"], FontSize->18], Cell[StyleData["ItemPictureBigger3", "Printout"], CellMargins->{{46, Inherited}, {10, -2}}, Magnification->0.74], Cell[StyleData["ItemPictureBigger3", "EnhancedPrintout"], CellMargins->{{52, Inherited}, {10, -3}}, Magnification->0.74], Cell[StyleData["ItemPictureBigger3", "EnhancedPrintoutNonGray"], CellMargins->{{52, Inherited}, {10, -3}}, Magnification->0.74] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["ItemPictureBigger4"], CellMargins->{{41, Inherited}, {4, 2}}, CellGroupingRules->"GraphicsGrouping", CellHorizontalScrolling->True, StyleMenuListing->None], Cell[StyleData["ItemPictureBigger4", "Presentation"], FontSize->18], Cell[StyleData["ItemPictureBigger4", "Printout"], CellMargins->{{45, Inherited}, {10, -2}}, Magnification->0.77], Cell[StyleData["ItemPictureBigger4", "EnhancedPrintout"], CellMargins->{{50, Inherited}, {10, -3}}, Magnification->0.77], Cell[StyleData["ItemPictureBigger4", "EnhancedPrintoutNonGray"], CellMargins->{{50, Inherited}, {10, -3}}, Magnification->0.77] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["ItemPictureBigger5"], CellMargins->{{41, Inherited}, {4, 2}}, CellGroupingRules->"GraphicsGrouping", CellHorizontalScrolling->True, StyleMenuListing->None], Cell[StyleData["ItemPictureBigger5", "Presentation"], FontSize->18], Cell[StyleData["ItemPictureBigger5", "Printout"], CellMargins->{{43, Inherited}, {11, -2}}, Magnification->0.8], Cell[StyleData["ItemPictureBigger5", "EnhancedPrintout"], CellMargins->{{49, Inherited}, {10, -3}}, Magnification->0.8], Cell[StyleData["ItemPictureBigger5", "EnhancedPrintoutNonGray"], CellMargins->{{49, Inherited}, {10, -3}}, Magnification->0.8] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["ItemPictureBigger6"], CellMargins->{{41, Inherited}, {4, 2}}, CellGroupingRules->"GraphicsGrouping", CellHorizontalScrolling->True, StyleMenuListing->None], Cell[StyleData["ItemPictureBigger6", "Presentation"], FontSize->18], Cell[StyleData["ItemPictureBigger6", "Printout"], CellMargins->{{43, Inherited}, {12, -2}}, Magnification->0.83], Cell[StyleData["ItemPictureBigger6", "EnhancedPrintout"], CellMargins->{{46, Inherited}, {8, -2}}, Magnification->0.83], Cell[StyleData["ItemPictureBigger6", "EnhancedPrintoutNonGray"], CellMargins->{{46, Inherited}, {8, -2}}, Magnification->0.83] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["ScreenGraphic"], CellMargins->{{12, Inherited}, {0, 8}}, CellHorizontalScrolling->True, StyleMenuListing->None], Cell[StyleData["ScreenGraphic", "Presentation"], FontSize->18], Cell[StyleData["ScreenGraphic", "Printout"], CellMargins->{{2, Inherited}, {0, 8}}], Cell[StyleData["ScreenGraphic", "EnhancedPrintout"], CellMargins->{{2, Inherited}, {0, 8}}, CellElementSpacings->{"CellMinHeight"->2, "ClosedCellHeight"->2}, CellOpen->False], Cell[StyleData["ScreenGraphic", "EnhancedPrintoutNonGray"], CellMargins->{{2, Inherited}, {0, 8}}, CellElementSpacings->{"CellMinHeight"->2, "ClosedCellHeight"->2}, CellOpen->False] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["PrintGraphic"], CellMargins->{{12, Inherited}, {0, 8}}, CellElementSpacings->{"CellMinHeight"->2, "ClosedCellHeight"->2}, CellOpen->False, CellHorizontalScrolling->True, StyleMenuListing->None], Cell[StyleData["PrintGraphic", "Presentation"], FontSize->18], Cell[StyleData["PrintGraphic", "Printout"], CellMargins->{{2, Inherited}, {0, 8}}, CellElementSpacings->{"CellMinHeight"->2, "ClosedCellHeight"->2}, CellOpen->False], Cell[StyleData["PrintGraphic", "EnhancedPrintout"], CellMargins->{{2, Inherited}, {0, 8}}, CellElementSpacings->{"CellMinHeight"->12}, CellOpen->True], Cell[StyleData["PrintGraphic", "EnhancedPrintoutNonGray"], CellMargins->{{2, Inherited}, {0, 8}}, CellElementSpacings->{"CellMinHeight"->12}, CellOpen->True] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["SmallTextSans"], CellMargins->{{10, 4}, {8, 8}}, TextJustification->1, LineSpacing->{1, 2}, FontFamily->"Helvetica", FontSize->9], Cell[StyleData["SmallTextSans", "Presentation"], FontSize->14], Cell[StyleData["SmallTextSans", "Printout"], CellMargins->{{2, 0}, {0, 8}}, Hyphenation->True, FontSize->7], Cell[StyleData["SmallTextSans", "EnhancedPrintout"], CellMargins->{{2, 0}, {0, 8}}, Hyphenation->True, LineSpacing->{1, 1}, ParagraphSpacing->{0, -2}, FontFamily->"Frutiger 55 Roman", FontSize->7] }, Closed]] }, Open ]] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell["AuthorTools", "Section"], Cell[CellGroupData[{ Cell[StyleData["BilateralCell"], CellMargins->{{27, 4}, {0, 8}}, StyleMenuListing->None, FontSize->12, GridBoxOptions->{ColumnWidths->{0.33, 0.6}, RowAlignments->Top, ColumnAlignments->{Left}}], Cell[StyleData["BilateralCell", "Presentation"], FontSize->18], Cell[StyleData["BilateralCell", "SlideShow"], CellMargins->{{36, 24}, {4, 4}}, Background->GrayLevel[0.900008]], Cell[StyleData["BilateralCell", "Printout"], CellMargins->{{2, 2}, {6, 6}}, TextJustification->1, FontSize->10], Cell[StyleData["BilateralCell", "EnhancedPrintout"], CellMargins->{{2, 2}, {6, 6}}, TextJustification->1, FontFamily->"Palatino", FontSize->10], Cell[StyleData["BilateralCell", "EnhancedPrintoutNonGray"], CellMargins->{{2, 2}, {6, 6}}, TextJustification->1, FontFamily->"Palatino", FontSize->10] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["RuledPageBreak"], CellFrame->{{0, 0}, {0.25, 0}}, CellMargins->{{27, 4}, {12, 0}}, CellFrameMargins->{{0, 0}, {1, 0}}, FontSize->8], Cell[StyleData["RuledPageBreak", "Presentation"], FontSize->12], Cell[StyleData["RuledPageBreak", "SlideShow"], CellMargins->{{36, 24}, {4, 4}}], Cell[StyleData["RuledPageBreak", "Printout"], CellMargins->{{2, 2}, {6, 6}}, PageBreakBelow->True, FontSize->1], Cell[StyleData["RuledPageBreak", "EnhancedPrintout"], CellMargins->{{2, 2}, {6, 6}}, PageBreakBelow->True], Cell[StyleData["RuledPageBreak", "EnhancedPrintoutNonGray"], CellMargins->{{2, 2}, {6, 6}}, PageBreakBelow->True] }, Closed]], Cell[StyleData["PaletteTitle"], CellFrame->{{0, 0}, {1, 0}}, CellMargins->{{4, 0}, {Inherited, 0}}, StyleMenuListing->None, ButtonStyleMenuListing->None, FontFamily->"Helvetica", FontSize->14, FontWeight->"Bold", FontColor->GrayLevel[1], Background->RGBColor[0, 0.32549, 0.537255], ButtonBoxOptions->{ButtonFunction:>(FrontEndExecute[ { FrontEnd`HelpBrowserLookup[ "AddOns", #2]}]&), ButtonEvaluator->None, ButtonStyle->"PaletteButton", ButtonMargins->3}], Cell[StyleData["PaletteButton"], StyleMenuListing->None, ButtonStyleMenuListing->None, FontFamily->"Helvetica", FontSize->12, FontWeight->"Bold", FontColor->GrayLevel[1], ButtonBoxOptions->{ButtonEvaluator->"Local", Active->True, ButtonMargins->6, Background->RGBColor[0.329412, 0.584314, 0.694118]}], Cell[StyleData["PaletteButton2"], StyleMenuListing->None, ButtonStyleMenuListing->None, FontFamily->"Helvetica", FontSize->12, FontWeight->"Bold", FontColor->GrayLevel[1], ButtonBoxOptions->{ButtonEvaluator->"Local", Active->True, ButtonMargins->4, Background->RGBColor[0.537255, 0.72549, 0.843137]}] }, Open ]], Cell[CellGroupData[{ Cell["Outline Styles", "Section"], Cell[CellGroupData[{ Cell[StyleData["Outline1"], CellMargins->{{27, 10}, {7, 7}}, CellGroupingRules->{"SectionGrouping", 50}, ParagraphIndent->-38, CounterIncrements->"Outline1", FontSize->18, FontWeight->"Bold", CounterBoxOptions->{ CounterFunction:>Utilities`Notation`Private`CapitalRomanNumeral}], Cell[StyleData["Outline1", "Presentation"], FontSize->27], Cell[StyleData["Outline1", "Printout"], CounterBoxOptions->{ CounterFunction:>Utilities`Notation`Private`CapitalRomanNumeral}] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["Outline2"], CellMargins->{{57, 10}, {6, 6}}, CellGroupingRules->{"SectionGrouping", 60}, ParagraphIndent->-27, CounterIncrements->"Outline2", FontSize->15, FontWeight->"Bold", CounterBoxOptions->{CounterFunction:>(Part[ CharacterRange[ "A", "Z"], #]&)}], Cell[StyleData["Outline2", "Presentation"], FontSize->23], Cell[StyleData["Outline2", "Printout"], CounterBoxOptions->{CounterFunction:>(Part[ CharacterRange[ "A", "Z"], #]&)}] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["Outline3"], CellMargins->{{87, 10}, {5, 5}}, CellGroupingRules->{"SectionGrouping", 70}, ParagraphIndent->-21, CounterIncrements->"Outline3", FontSize->12, CounterBoxOptions->{CounterFunction:>Identity}], Cell[StyleData["Outline3", "Presentation"], FontSize->18], Cell[StyleData["Outline3", "Printout"], CounterBoxOptions->{CounterFunction:>Identity}] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["Outline4"], CellMargins->{{117, 10}, {4, 4}}, CellGroupingRules->{"SectionGrouping", 80}, ParagraphIndent->-18, CounterIncrements->"Outline4", FontSize->10, CounterBoxOptions->{CounterFunction:>(Part[ CharacterRange[ "a", "z"], #]&)}], Cell[StyleData["Outline4", "Presentation"], FontSize->15], Cell[StyleData["Outline4", "Printout"]] }, Closed]] }, Open ]], Cell[CellGroupData[{ Cell["Slide Show Styles", "Section"], Cell[CellGroupData[{ Cell[StyleData["SlideShowNavigationBar"], Editable->False, CellFrame->True, CellMargins->{{0, 0}, {3, 3}}, CellElementSpacings->{"CellMinHeight"->0.8125}, CellGroupingRules->{"SectionGrouping", 30}, CellFrameMargins->False, CellFrameColor->GrayLevel[1], CellFrameLabelMargins->False, TextAlignment->Center, CounterIncrements->"SlideShowNavigationBar", StyleMenuListing->None, FontSize->10, Background->GrayLevel[0.8], Magnification->1, GridBoxOptions->{GridBaseline->Center, RowSpacings->0, ColumnSpacings->0, ColumnWidths->{3.5, 3.5, 3.5, 3.5, 13, 5, 4}, RowAlignments->Baseline, ColumnAlignments->{ Center, Center, Center, Center, Center, Center, Right, Center}}], Cell[StyleData["SlideShowNavigationBar", "SlideShow"], Deletable->False, ShowCellBracket->False, CellMargins->{{-1, -1}, {-1, -1}}, PageBreakAbove->True, CellFrameMargins->{{1, 1}, {0, 0}}], Cell[StyleData["SlideShowNavigationBar", "Printout"], CellMargins->{{18, 4}, {4, 4}}, LineSpacing->{1, 3}, FontSize->10] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["SlideShowSection"], CellFrame->{{0, 0}, {0, 0.5}}, CellMargins->{{0, 0}, {10, 0}}, CellGroupingRules->{"SectionGrouping", 40}, PageBreakBelow->False, CellFrameMargins->{{12, 4}, {6, 12}}, InputAutoReplacements->{"TeX"->StyleBox[ RowBox[ {"T", AdjustmentBox[ "E", BoxMargins -> {{-.074999999999999997, \ -.085000000000000006}, {0, 0}}, BoxBaselineShift -> .5], "X"}]], "LaTeX"->StyleBox[ RowBox[ {"L", StyleBox[ AdjustmentBox[ "A", BoxMargins -> {{-.35999999999999999, \ -.10000000000000001}, {0, 0}}, BoxBaselineShift -> -.20000000000000001], FontSize -> Smaller], "T", AdjustmentBox[ "E", BoxMargins -> {{-.074999999999999997, \ -.085000000000000006}, {0, 0}}, BoxBaselineShift -> .5], "X"}]], "mma"->"Mathematica", "Mma"->"Mathematica", "MMA"->"Mathematica", "gridMathematica"->FormBox[ RowBox[ {"grid", AdjustmentBox[ StyleBox[ "Mathematica", FontSlant -> "Italic"], BoxMargins -> {{-.17499999999999999, 0}, {0, 0}}]}], TextForm], "webMathematica"->FormBox[ RowBox[ {"web", AdjustmentBox[ StyleBox[ "Mathematica", FontSlant -> "Italic"], BoxMargins -> {{-.17499999999999999, 0}, {0, 0}}]}], TextForm], Inherited}, CounterIncrements->"Section", CounterAssignments->{{"Subsection", 0}, {"Subsubsection", 0}}, StyleMenuListing->None, FontFamily->"Helvetica", FontSize->18, FontWeight->"Plain", FontColor->GrayLevel[1], Background->RGBColor[0.408011, 0.440726, 0.8]], Cell[StyleData["SlideShowSection", "Presentation"], FontSize->27], Cell[StyleData["SlideShowSection", "SlideShow"], ShowCellBracket->False, PageBreakAbove->True], Cell[StyleData["SlideShowSection", "Printout"], CellMargins->{{18, 30}, {0, 30}}, CellFrameMargins->5, FontSize->14] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["SlideHyperlink"], StyleMenuListing->None, ButtonStyleMenuListing->Automatic, FontSize->26, FontColor->GrayLevel[0.400015], ButtonBoxOptions->{ButtonFunction:>(FrontEndExecute[ { FrontEnd`NotebookLocate[ #2]}]&), Active->True, ButtonMinHeight->0.85, ButtonMargins->0.5, ButtonNote->None}], Cell[StyleData["SlideHyperlink", "SlideShow"]], Cell[StyleData["SlideHyperlink", "Printout"], FontSize->10, FontColor->GrayLevel[0], FontVariations->{"Underline"->False}] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["SlideTOCLink"], CellMargins->{{24, Inherited}, {Inherited, Inherited}}, StyleMenuListing->None, ButtonStyleMenuListing->Automatic, FontFamily->"Helvetica", ButtonBoxOptions->{ButtonFunction:>(FrontEndExecute[ { FrontEnd`NotebookLocate[ #2]}]&), Active->True, ButtonMargins->1.5, ButtonNote->ButtonData}], Cell[StyleData["SlideTOCLink", "SlideShow"]], Cell[StyleData["SlideTOCLink", "Printout"], FontColor->GrayLevel[0], FontVariations->{"Underline"->False}] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["SlideTOC"], CellDingbat->"\[Bullet]", CellMargins->{{18, Inherited}, {Inherited, Inherited}}, StyleMenuListing->None, FontFamily->"Helvetica"], Cell[StyleData["SlideTOC", "SlideShow"], FontSize->14], Cell[StyleData["SlideTOC", "Printout"], FontSize->10, FontColor->GrayLevel[0]] }, Closed]] }, Open ]], Cell[CellGroupData[{ Cell["Title Page, Contents, and Index", "Section"], Cell[CellGroupData[{ Cell[StyleData["ContentsTitle"], CellMargins->{{21, 4}, {12, 24}}, FontFamily->"Helvetica", FontSize->24, FontWeight->"Bold", FontColor->RGBColor[0.592157, 0.313726, 0.313726]], Cell[StyleData["ContentsTitle", "Presentation"], FontSize->36], Cell[StyleData["ContentsTitle", "Printout"], CellMargins->{{12, 0}, {102, 89}}, PageBreakBelow->False, FontSize->30.5, FontColor->GrayLevel[0]], Cell[StyleData["ContentsTitle", "EnhancedPrintout"], CellMargins->{{2, Inherited}, {15, 30}}, PageBreakBelow->False, FontFamily->"Frutiger 65 Bold", FontSize->30.5, FontWeight->"Plain", FontColor->GrayLevel[0]] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["ContentsSection"], ShowGroupOpenCloseIcon->True, CellMargins->{{35, 4}, {3, 18}}, CellGroupingRules->{"SectionGrouping", 70}, StyleMenuListing->None, FontFamily->"Helvetica", FontSize->12, FontWeight->"Bold"], Cell[StyleData["ContentsSection", "Presentation"], FontSize->18], Cell[StyleData["ContentsSection", "Printout"], CellMargins->{{20, 0}, {3, 18}}, PageBreakBelow->False, FontSize->11], Cell[StyleData["ContentsSection", "EnhancedPrintout"], CellMargins->{{20, 0}, {3, 18}}, PageBreakBelow->False, FontFamily->"Frutiger 65 Bold", FontSize->11, FontWeight->"Plain"], Cell[StyleData["ContentsSection", "EnhancedPrintoutNonGray"], CellMargins->{{20, 0}, {3, 18}}, PageBreakBelow->False, FontFamily->"Frutiger 65 Bold", FontSize->11, FontWeight->"Plain"] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["IndexSection"], CellDingbat->"\[FilledSquare]", CellMargins->{{20, 4}, {5, 20}}, StyleMenuListing->None, FontFamily->"Helvetica", FontSize->12, FontWeight->"Bold"], Cell[StyleData["IndexSection", "Presentation"], FontSize->18], Cell[StyleData["IndexSection", "Printout"], CellMargins->{{12, 0}, {5, 20}}, PageBreakBelow->False, FontSize->12] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["Contents"], ShowGroupOpenCloseIcon->False, CellMargins->{{50, 4}, {0, 5}}, CellGroupingRules->{"SectionGrouping", 90}, StyleMenuListing->None], Cell[StyleData["Contents", "Presentation"], FontSize->18], Cell[StyleData["Contents", "Printout"], CellMargins->{{40, 4}, {0, 5}}, FontSize->11], Cell[StyleData["Contents", "EnhancedPrintout"], CellMargins->{{40, 5}, {0, 5}}, FontFamily->"Palatino", FontSize->11], Cell[StyleData["Contents", "EnhancedPrintoutNonGray"], CellMargins->{{40, 5}, {0, 5}}, FontFamily->"Palatino", FontSize->11] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["Index"], CellMargins->{{21, 4}, {0, 0}}, ParagraphIndent->-48, StyleMenuListing->None], Cell[StyleData["Index", "Presentation"], FontSize->18], Cell[StyleData["Index", "Printout"], CellMargins->{{13, 0}, {0, 0}}, FontSize->9], Cell[StyleData["Index", "EnhancedPrintout"], CellMargins->{{13, 0}, {0, 0}}, FontFamily->"Palatino", FontSize->9], Cell[StyleData["Index", "EnhancedPrintoutNonGray"], CellMargins->{{13, 0}, {0, 0}}, FontFamily->"Palatino", FontSize->9] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["IndexSubentry"], CellMargins->{{36, 4}, {0, 0}}, ParagraphIndent->-48], Cell[StyleData["IndexSubentry", "Presentation"], FontSize->18], Cell[StyleData["IndexSubentry", "Printout"], CellMargins->{{24, 0}, {0, 0}}, FontSize->9], Cell[StyleData["IndexSubentry", "EnhancedPrintout"], CellMargins->{{24, 0}, {0, 0}}, FontFamily->"Palatino", FontSize->9] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["Index2Column"], CellMargins->{{21, 4}, {0, 8}}, ParagraphIndent->-20, TabSpacings->1, StyleMenuListing->None, FontSize->10, GridBoxOptions->{ColumnWidths->0.5, ColumnAlignments->{Left}}], Cell[StyleData["Index2Column", "Presentation"], FontSize->15], Cell[StyleData["Index2Column", "Printout"], CellMargins->{{2, 2}, {6, 6}}, FontSize->8], Cell[StyleData["Index2Column", "EnhancedPrintout"], CellMargins->{{2, 2}, {1, 1}}, LineSpacing->{1, 0.2}, FontFamily->"Palatino", FontSize->8], Cell[StyleData["Index2Column", "EnhancedPrintoutNonGray"], CellMargins->{{2, 2}, {1, 1}}, LineSpacing->{1, 0.2}, FontFamily->"Palatino", FontSize->8] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["Leader"], TabFilling->".", StyleMenuListing->None, FontFamily->"Times", FontSize->12, FontWeight->"Plain"], Cell[StyleData["Leader", "Printout"], FontSize->10], Cell[StyleData["Leader", "EnhancedPrintout"], FontFamily->"Palatino", FontSize->10] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["LeaderNoDots"], TabFilling->" ", StyleMenuListing->None, FontFamily->"Times", FontSize->12, FontWeight->"Plain"], Cell[StyleData["LeaderNoDots", "Printout"], FontSize->10], Cell[StyleData["LeaderNoDots", "EnhancedPrintout"], FontFamily->"Palatino", FontSize->10] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["PageLink"], StyleMenuListing->None, ButtonStyleMenuListing->Automatic, FontColor->RGBColor[0.269993, 0.308507, 0.6], ButtonBoxOptions->{ButtonFunction:>(FrontEndExecute[ { FrontEnd`NotebookLocate[ #2]}]&), Active->True, ButtonFrame->"None"}], Cell[StyleData["PageLink", "Printout"], FontColor->GrayLevel[0]], Cell[StyleData["PageLink", "EnhancedPrintout"], FontColor->GrayLevel[0]] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["TOCPage"], CellSize->{22, Inherited}, TextAlignment->Right, StyleMenuListing->None, FontSize->12, FontWeight->"Plain"], Cell[StyleData["TOCPage", "Presentation"], FontSize->18], Cell[StyleData["TOCPage", "Printout"], FontSize->10], Cell[StyleData["TOCPage", "EnhancedPrintout"], FontFamily->"Palatino", FontSize->10] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["TOCTitle"], CellMargins->{{20, 0}, {1, 8}}, CellGroupingRules->{"SectionGrouping", 70}, TabSpacings->46, CounterIncrements->"TOCTitle", CounterAssignments->{{"TOCSection", 0}}, FontFamily->"Helvetica", FontSize->12, FontWeight->"Bold"], Cell[StyleData["TOCTitle", "Presentation"], FontSize->18], Cell[StyleData["TOCTitle", "Printout"], CellMargins->{{12, 0}, {1, 8}}, PageBreakBelow->False, TabSpacings->47.4, FontSize->11], Cell[StyleData["TOCTitle", "EnhancedPrintout"], CellMargins->{{2, 0}, {2, 10}}, PageBreakBelow->False, TabSpacings->49.3, FontFamily->"Frutiger 65 Bold", FontSize->10, FontWeight->"Plain"] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["TOCSection"], CellMargins->{{48, 0}, {1, 1}}, CellGroupingRules->{"SectionGrouping", 75}, TabSpacings->42.9, CounterIncrements->"TOCSection", CounterAssignments->{{"TOCSubsection", 0}}, FontFamily->"Helvetica", FontSize->12], Cell[StyleData["TOCSection", "Presentation"], FontSize->18], Cell[StyleData["TOCSection", "Printout"], CellMargins->{{30, 0}, {1, 1}}, PageBreakBelow->False, FontSize->12], Cell[StyleData["TOCSection", "EnhancedPrintout"], CellMargins->{{26, 0}, {1, 3}}, PageBreakBelow->False, TabSpacings->46.45, FontFamily->"Frutiger", FontSize->9] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["TOCSubsection"], CellMargins->{{76, 0}, {1, 1}}, CellGroupingRules->{"SectionGrouping", 80}, TabSpacings->39.8, CounterIncrements->"TOCSubsection", CounterAssignments->{{"TOCSubsubsection", 0}}, FontSize->12], Cell[StyleData["TOCSubsection", "Presentation"], FontSize->18], Cell[StyleData["TOCSubsection", "Printout"], CellMargins->{{70, 0}, {1, 1}}, PageBreakBelow->False, FontSize->10], Cell[StyleData["TOCSubsection", "EnhancedPrintout"], CellMargins->{{38, 0}, {1, 1}}, PageBreakBelow->False, TabSpacings->45.15, FontFamily->"Palatino", FontSize->9] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["TOCSubsubsection"], CellMargins->{{104, 0}, {1, 1}}, CellGroupingRules->{"SectionGrouping", 85}, TabSpacings->36.7, CounterIncrements->"TOCSubsubsection", FontSize->12], Cell[StyleData["TOCSubsubsection", "Presentation"], FontSize->18], Cell[StyleData["TOCSubsubsection", "Printout"], CellMargins->{{96, 0}, {1, 1}}, PageBreakBelow->False, FontSize->9], Cell[StyleData["TOCSubsubsection", "EnhancedPrintout"], CellMargins->{{96, 0}, {1, 1}}, PageBreakBelow->False, FontFamily->"Palatino", FontSize->9] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["TOCTitleDingbat"], CellSize->{34, Inherited}, TextAlignment->Right], Cell[StyleData["TOCTitleDingbat", "EnhancedPrintout"], FontFamily->"Frutiger", FontSize->10] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["TOCSectionDingbat"], CellSize->{38, Inherited}, TextAlignment->Right], Cell[StyleData["TOCSectionDingbat", "EnhancedPrintout"], FontFamily->"Frutiger", FontSize->9] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["TOCSubsectionDingbat"], CellSize->{54, Inherited}, TextAlignment->Right], Cell[StyleData["TOCSubsectionDingbat", "EnhancedPrintout"], FontSize->9] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["TOCTitleCondensed"], CellMargins->{{20, 0}, {1, 8}}, CellGroupingRules->{"SectionGrouping", 70}, TabSpacings->50.4, CounterIncrements->"TOCTitleCondensed", CounterAssignments->{{"TOCSectionCondensed", 0}, { "TOCSubsectionCondensed", 0}}, FontFamily->"Helvetica", FontSize->12, FontWeight->"Bold"], Cell[StyleData["TOCTitleCondensed", "Presentation"], FontSize->18], Cell[StyleData["TOCTitleCondensed", "Printout"], CellMargins->{{12, 0}, {1, 8}}, PageBreakBelow->False, FontSize->11], Cell[StyleData["TOCTitleCondensed", "EnhancedPrintout"], CellMargins->{{12, 0}, {1, 8}}, PageBreakBelow->False, FontFamily->"Frutiger 65 Bold", FontSize->11, FontWeight->"Plain"] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["TOCSectionCondensed"], CellMargins->{{48, 0}, {1, 1}}, CellGroupingRules->{"SectionGrouping", 75}, TabSpacings->47.4, CounterIncrements->"TOCSectionCondensed", CounterAssignments->{{"TOCSubsection", 0}}, FontFamily->"Helvetica", FontSize->10, FontWeight->"Bold", FontColor->GrayLevel[0.2]], Cell[StyleData["TOCSectionCondensed", "Presentation"], FontSize->15], Cell[StyleData["TOCSectionCondensed", "Printout"], CellMargins->{{36, 0}, {1, 1}}, PageBreakBelow->False, FontSize->11], Cell[StyleData["TOCSectionCondensed", "EnhancedPrintout"], CellMargins->{{36, 0}, {1, 1}}, PageBreakBelow->False, FontFamily->"Palatino", FontSize->11] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["TOCSubsectionCondensed"], PageWidth->470, CellMargins->{{76, 0}, {1, 1}}, CellGroupingRules->{"SectionGrouping", 80}, TextJustification->1, FontSize->12], Cell[StyleData["TOCSubsectionCondensed", "Presentation"], FontSize->18], Cell[StyleData["TOCSubsectionCondensed", "Printout"], CellMargins->{{72, 0}, {1, 1}}, PageBreakBelow->False, Hyphenation->True, FontSize->10], Cell[StyleData["TOCSubsectionCondensed", "EnhancedPrintout"], CellMargins->{{72, 0}, {1, 1}}, PageBreakBelow->False, Hyphenation->True, FontFamily->"Palatino", FontSize->10] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["TOCSubsubsectionCondensed"], CellMargins->{{104, 0}, {1, 1}}, CellGroupingRules->{"SectionGrouping", 85}, TabSpacings->39.3, CounterIncrements->"TOCSubsubsectionCondensed", FontSize->12], Cell[StyleData["TOCSubsubsectionCondensed", "Presentation"], FontSize->18], Cell[StyleData["TOCSubsubsectionCondensed", "Printout"], CellMargins->{{96, 0}, {1, 1}}, PageBreakBelow->False, FontSize->9], Cell[StyleData["TOCSubsubsectionCondensed", "EnhancedPrintout"], CellMargins->{{96, 0}, {1, 1}}, PageBreakBelow->False, FontFamily->"Palatino", FontSize->9] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["TitlePageGraphic"], CellMargins->{{0, 0}, {100, 20}}, Evaluatable->False, PageBreakBelow->False, TextAlignment->Center], Cell[StyleData["TitlePageGraphic", "Presentation"], FontSize->18], Cell[StyleData["TitlePageGraphic", "Printout"], CellMargins->{{0, 0}, {230, 88}}], Cell[StyleData["TitlePageGraphic", "EnhancedPrintout"], CellMargins->{{0, 0}, {230, 88}}] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["TitlePageLogo"], CellMargins->{{0, 0}, {0, 0}}], Cell[StyleData["TitlePageLogo", "Presentation"], FontSize->18], Cell[StyleData["TitlePageLogo", "Printout"]], Cell[StyleData["TitlePageLogo", "EnhancedPrintout"]] }, Closed]] }, Open ]], Cell[CellGroupData[{ Cell["Horizontal Lines", "Section"], Cell[CellGroupData[{ Cell[StyleData["Line1"], CellFrame->{{0, 0}, {0, 0.5}}, CellMargins->{{10, 4}, {-16, 9}}, StyleMenuListing->None, FontSize->2], Cell[StyleData["Line1", "Presentation"], FontSize->3], Cell[StyleData["Line1", "Printout"], CellMargins->{{2, 0}, {-16, 9}}] }, Closed]], Cell["\<\ The item above is horizontal 0.5 pt line\ \>", "Text"], Cell[CellGroupData[{ Cell[StyleData["ProgramTop"], CellFrame->{{0.5, 0.5}, {0, 0.5}}, CellMargins->{{27, 4}, {-18, 18}}, LineSpacing->{1, -4}, StyleMenuListing->None, FontSize->4], Cell[StyleData["ProgramTop", "Presentation"], FontSize->6], Cell[StyleData["ProgramTop", "Printout"], CellMargins->{{2, 0}, {-18, 18}}] }, Closed]], Cell["\<\ The item above is a ProgramTop line \ \>", "Text"], Cell[CellGroupData[{ Cell[StyleData["ProgramBottom"], CellFrame->{{0.5, 0.5}, {0.5, 0}}, CellMargins->{{27, 4}, {-10, -2}}, LineSpacing->{1, -4}, StyleMenuListing->None, FontSize->4], Cell[StyleData["ProgramBottom", "Presentation"], FontSize->6], Cell[StyleData["ProgramBottom", "Printout"], CellMargins->{{2, 0}, {-10, -2}}] }, Closed]], Cell["\<\ The item above is a ProgramBottom line \ \>", "Text"], Cell[CellGroupData[{ Cell[StyleData["SessionLabel"], CellFrame->{{0.5, 0}, {0, 0.5}}, CellMargins->{{27, 4}, {-4, 18}}, LineSpacing->{1, 0}, StyleMenuListing->None, FontFamily->"Helvetica", FontSize->9], Cell[StyleData["SessionLabel", "Presentation"], FontSize->14], Cell[StyleData["SessionLabel", "Printout"], CellMargins->{{2, 0}, {-4, 18}}, FontSize->7] }, Closed]] }, Open ]], Cell[CellGroupData[{ Cell["Page Headers and Footers", "Section"], Cell[CellGroupData[{ Cell[StyleData["PageHeader"], CellMargins->{{0, 0}, {2, 0}}, StyleMenuListing->None, FontSize->8, FontSlant->"Italic"], Cell[StyleData["PageHeader", "Printout"]], Cell[StyleData["PageHeader", "EnhancedPrintout"], FontFamily->"Frutiger 55 Roman"], Cell[StyleData["PageHeader", "EnhancedPrintoutNonGray"], FontFamily->"Frutiger 55 Roman"] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["PageNumber"], CellMargins->{{0, 0}, {2, 0}}, StyleMenuListing->None, FontFamily->"Helvetica", FontSize->8, FontWeight->"Bold"], Cell[StyleData["PageNumber", "Printout"]], Cell[StyleData["PageNumber", "EnhancedPrintout"], FontFamily->"Frutiger 65 Bold", FontWeight->"Plain"], Cell[StyleData["PageNumber", "EnhancedPrintoutNonGray"], FontFamily->"Frutiger 65 Bold", FontWeight->"Plain"] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["PageFooter"], StyleMenuListing->None, FontFamily->"Helvetica", FontSize->6], Cell[StyleData["PageFooter", "Printout"]], Cell[StyleData["PageFooter", "EnhancedPrintout"], FontFamily->"Frutiger 55 Roman"], Cell[StyleData["PageFooter", "EnhancedPrintoutNonGray"], FontFamily->"Frutiger 55 Roman"] }, Closed]], Cell[CellGroupData[{ Cell["For compatibility", "Subsection"], Cell[CellGroupData[{ Cell[StyleData["Header"], CellMargins->{{0, 0}, {2, 0}}, StyleMenuListing->None, FontSize->8, FontSlant->"Italic"], Cell[StyleData["Header", "Printout"]], Cell[StyleData["Header", "EnhancedPrintout"], FontFamily->"Frutiger 55 Roman", FontSlant->"Plain"], Cell[StyleData["Header", "EnhancedPrintoutNonGray"], FontFamily->"Frutiger 55 Roman", FontSlant->"Plain"] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["Footer"], StyleMenuListing->None, FontFamily->"Helvetica", FontSize->6], Cell[StyleData["Footer", "Printout"]], Cell[StyleData["Footer", "EnhancedPrintout"], FontFamily->"Frutiger 55 Roman"], Cell[StyleData["Footer", "EnhancedPrintoutNonGray"], FontFamily->"Frutiger 55 Roman"] }, Closed]] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell["FormatType Styles", "Section"], Cell["\<\ The cells below define styles that are mixed in with the styles of most \ cells. If a cell's FormatType matches the name of one of the styles defined \ below, then that style is applied between the cell's style and its own \ options. This is particularly true of Input and Output.\ \>", "Text"], Cell[CellGroupData[{ Cell[StyleData["CellExpression"], PageWidth->Infinity, CellMargins->{{6, Inherited}, {Inherited, Inherited}}, ShowCellLabel->False, ShowSpecialCharacters->False, AllowInlineCells->False, Hyphenation->False, AutoItalicWords->{}, StyleMenuListing->None, FontFamily->"Courier", FontSize->12, Background->GrayLevel[1]], Cell[StyleData["CellExpression", "EnhancedPrintout"], FontFamily->"Courier Std", FontSize->10], Cell[StyleData["CellExpression", "EnhancedPrintoutNonGray"], FontFamily->"Courier Std", FontSize->10] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["InputForm"], InputAutoReplacements->{}, AllowInlineCells->False, Hyphenation->False, StyleMenuListing->None, FontFamily->"Courier"], Cell[StyleData["InputForm", "EnhancedPrintout"], FontFamily->"Courier Std"], Cell[StyleData["InputForm", "EnhancedPrintoutNonGray"], FontFamily->"Courier Std"] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["OutputForm"], PageWidth->Infinity, TextAlignment->Left, LineSpacing->{0.6, 1}, StyleMenuListing->None, FontFamily->"Courier"], Cell[StyleData["OutputForm", "EnhancedPrintout"], FontFamily->"Courier Std"], Cell[StyleData["OutputForm", "EnhancedPrintoutNonGray"], FontFamily->"Courier Std"] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["StandardForm"], InputAutoReplacements->{ "->"->"\[Rule]", ":>"->"\[RuleDelayed]", "<="->"\[LessEqual]", ">="->"\[GreaterEqual]", "!="->"\[NotEqual]", "=="->"\[Equal]", Inherited}, "TwoByteSyntaxCharacterAutoReplacement"->True, LineSpacing->{1.25, 0}, StyleMenuListing->None, FontFamily->"Courier"], Cell[StyleData["StandardForm", "EnhancedPrintout"], FontFamily->"Courier Std"], Cell[StyleData["StandardForm", "EnhancedPrintoutNonGray"], FontFamily->"Courier Std"] }, Closed]] }, Open ]], Cell[CellGroupData[{ Cell["Automatic Styles", "Section"], Cell["\<\ The cells below define styles that are used to affect the display of certain \ types of objects in typeset expressions. For example, \"UnmatchedBracket\" \ style defines how unmatched bracket, curly bracket, and parenthesis \ characters are displayed (typically by coloring them to make them stand out).\ \ \>", "Text"], Cell[StyleData["UnmatchedBracket"], StyleMenuListing->None] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell["Notation Package Styles", "Section", CellTags->"NotationPackage"], Cell["\<\ The cells below define certain styles needed by the Notation package. These \ styles serve to make visible otherwise invisible tagboxes.\ \>", "Text", CellTags->"NotationPackage"], Cell[StyleData["NotationTemplateStyle"], StyleMenuListing->None, Background->RGBColor[1, 1, 0.850004], TagBoxOptions->{SyntaxForm->"symbol"}, CellTags->"NotationPackage"], Cell[StyleData["NotationPatternWrapperStyle"], StyleMenuListing->None, Background->RGBColor[1, 0.900008, 0.979995], TagBoxOptions->{SyntaxForm->"symbol"}, CellTags->"NotationPackage"], Cell[StyleData["NotationMadeBoxesWrapperStyle"], StyleMenuListing->None, Background->RGBColor[0.900008, 0.889998, 1], TagBoxOptions->{SyntaxForm->"symbol"}, CellTags->"NotationPackage"] }, Closed]] }] ] (******************************************************************* 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->{ "SlideShowHeader"->{ Cell[1754, 51, 1679, 44, 28, "SlideShowNavigationBar", CellTags->"SlideShowHeader"], Cell[6596, 211, 1717, 45, 29, "SlideShowNavigationBar", CellTags->"SlideShowHeader"], Cell[9404, 300, 1717, 45, 28, "SlideShowNavigationBar", CellTags->"SlideShowHeader"], Cell[14102, 467, 1717, 45, 28, "SlideShowNavigationBar", CellTags->"SlideShowHeader"], Cell[17578, 578, 1679, 44, 28, "SlideShowNavigationBar", CellTags->"SlideShowHeader"], Cell[21816, 691, 1679, 44, 28, "SlideShowNavigationBar", CellTags->"SlideShowHeader"], Cell[25393, 782, 1679, 44, 28, "SlideShowNavigationBar", CellTags->"SlideShowHeader"], Cell[30522, 918, 1679, 44, 28, "SlideShowNavigationBar", CellTags->"SlideShowHeader"], Cell[35596, 1056, 1679, 44, 28, "SlideShowNavigationBar", CellTags->"SlideShowHeader"], Cell[40792, 1210, 1679, 44, 28, "SlideShowNavigationBar", CellTags->"SlideShowHeader"], Cell[43086, 1277, 1679, 44, 28, "SlideShowNavigationBar", CellTags->"SlideShowHeader"]}, "LastSlide"->{ Cell[15844, 516, 83, 1, 82, "Section", CellTags->"LastSlide"]} } *) (*CellTagsIndex CellTagsIndex->{ {"SlideShowHeader", 298012, 10147}, {"LastSlide", 299096, 10170} } *) (*NotebookFileOutline Notebook[{ Cell[1754, 51, 1679, 44, 28, "SlideShowNavigationBar", CellTags->"SlideShowHeader"], Cell[CellGroupData[{ Cell[3458, 99, 34, 0, 82, "Section"], Cell[CellGroupData[{ Cell[3517, 103, 34, 0, 58, "SubsectionIcon"], Cell[3554, 105, 371, 10, 79, "Text"], Cell[3928, 117, 160, 4, 66, "Input", InitializationCell->True] }, Closed]], Cell[CellGroupData[{ Cell[4125, 126, 36, 0, 58, "SubsectionIcon"], Cell[4164, 128, 117, 3, 40, "Input", InitializationCell->True], Cell[4284, 133, 413, 11, 40, "Input", InitializationCell->True], Cell[4700, 146, 390, 11, 40, "Input", InitializationCell->True] }, Closed]], Cell[CellGroupData[{ Cell[5127, 162, 63, 0, 58, "SubsectionIcon"], Cell[5193, 164, 125, 3, 40, "Input", InitializationCell->True] }, Closed]], Cell[CellGroupData[{ Cell[5355, 172, 75, 0, 58, "SubsectionIcon"], Cell[5433, 174, 71, 0, 34, "Text"], Cell[5507, 176, 287, 6, 92, "Input", InitializationCell->True], Cell[5797, 184, 189, 8, 35, "Text"], Cell[5989, 194, 558, 11, 196, "Input", InitializationCell->True] }, Closed]] }, Closed]], Cell[CellGroupData[{ Cell[6596, 211, 1717, 45, 29, "SlideShowNavigationBar", CellTags->"SlideShowHeader"], Cell[8316, 258, 221, 7, 119, "Subsection"] }, Closed]], Cell[CellGroupData[{ Cell[8574, 270, 195, 6, 96, "Section"], Cell[8772, 278, 617, 19, 437, "Subsection"] }, Open ]], Cell[9404, 300, 1717, 45, 28, "SlideShowNavigationBar", CellTags->"SlideShowHeader"], Cell[CellGroupData[{ Cell[11146, 349, 63, 0, 82, "Section"], Cell[11212, 351, 160, 6, 58, "Text"], Cell[CellGroupData[{ Cell[11397, 361, 43, 0, 58, "SubsectionIcon"], Cell[11443, 363, 76, 2, 40, "Input"] }, Closed]], Cell[CellGroupData[{ Cell[11556, 370, 36, 0, 39, "SubsectionIcon"], Cell[11595, 372, 267, 5, 92, "Input"], Cell[11865, 379, 157, 3, 66, "Input"], Cell[12025, 384, 75, 2, 41, "Input"] }, Closed]], Cell[CellGroupData[{ Cell[12137, 391, 45, 0, 39, "SubsectionIcon"], Cell[12185, 393, 299, 9, 82, "Text"], Cell[12487, 404, 114, 2, 40, "Input"], Cell[12604, 408, 109, 2, 40, "Input"], Cell[12716, 412, 101, 2, 40, "Input"], Cell[12820, 416, 101, 2, 40, "Input"] }, Closed]], Cell[CellGroupData[{ Cell[12958, 423, 36, 0, 39, "SubsectionIcon"], Cell[12997, 425, 284, 5, 118, "Input"], Cell[13284, 432, 85, 2, 40, "Input"] }, Closed]], Cell[CellGroupData[{ Cell[13406, 439, 46, 0, 39, "SubsectionIcon"], Cell[13455, 441, 272, 6, 90, "Text"], Cell[13730, 449, 108, 5, 34, "Text"], Cell[13841, 456, 155, 3, 66, "Input"], Cell[13999, 461, 76, 2, 40, "Input"] }, Closed]] }, Open ]], Cell[14102, 467, 1717, 45, 28, "SlideShowNavigationBar", CellTags->"SlideShowHeader"], Cell[CellGroupData[{ Cell[15844, 516, 83, 1, 82, "Section", CellTags->"LastSlide"], Cell[CellGroupData[{ Cell[15952, 521, 173, 7, 58, "SubsectionIcon"], Cell[16128, 530, 64, 1, 41, "Input"], Cell[16195, 533, 114, 2, 41, "Input"] }, Closed]], Cell[CellGroupData[{ Cell[16346, 540, 52, 0, 39, "SubsectionIcon"], Cell[16401, 542, 160, 4, 63, "Input"], Cell[CellGroupData[{ Cell[16586, 550, 79, 0, 35, "SubsubsectionIcon"], Cell[16668, 552, 277, 5, 121, "Input"] }, Closed]] }, Closed]], Cell[CellGroupData[{ Cell[16994, 563, 35, 0, 39, "SubsectionIcon"], Cell[17032, 565, 519, 9, 248, "Input"] }, Closed]] }, Open ]], Cell[17578, 578, 1679, 44, 28, "SlideShowNavigationBar", CellTags->"SlideShowHeader"], Cell[CellGroupData[{ Cell[19282, 626, 241, 6, 82, "Section"], Cell[19526, 634, 78, 2, 40, "Input"], Cell[CellGroupData[{ Cell[19629, 640, 41, 0, 58, "SubsectionIcon"], Cell[19673, 642, 551, 10, 170, "Input"] }, Closed]], Cell[CellGroupData[{ Cell[20261, 657, 51, 0, 39, "SubsectionIcon"], Cell[20315, 659, 1474, 28, 369, "Input"] }, Closed]] }, Open ]], Cell[21816, 691, 1679, 44, 28, "SlideShowNavigationBar", CellTags->"SlideShowHeader"], Cell[CellGroupData[{ Cell[23520, 739, 37, 0, 82, "Section"], Cell[CellGroupData[{ Cell[23582, 743, 50, 0, 58, "SubsectionIcon"], Cell[23635, 745, 1731, 33, 716, "Input"] }, Closed]] }, Open ]], Cell[25393, 782, 1679, 44, 28, "SlideShowNavigationBar", CellTags->"SlideShowHeader"], Cell[CellGroupData[{ Cell[27097, 830, 172, 5, 82, "Section"], Cell[27272, 837, 76, 2, 63, "Input"], Cell[CellGroupData[{ Cell[27373, 843, 242, 7, 64, "SubsectionIcon"], Cell[27618, 852, 908, 17, 248, "Input"] }, Closed]], Cell[CellGroupData[{ Cell[28563, 874, 53, 0, 39, "SubsectionIcon"], Cell[28619, 876, 935, 16, 508, "Input"], Cell[CellGroupData[{ Cell[29579, 896, 48, 0, 35, "SubsubsectionIcon"], Cell[29630, 898, 853, 15, 482, "Input"] }, Closed]] }, Closed]] }, Open ]], Cell[30522, 918, 1679, 44, 28, "SlideShowNavigationBar", CellTags->"SlideShowHeader"], Cell[CellGroupData[{ Cell[32226, 966, 189, 6, 82, "Section"], Cell[CellGroupData[{ Cell[32440, 976, 63, 2, 40, "Input"], Cell[32506, 980, 64, 2, 54, "Output"] }, Closed]], Cell[CellGroupData[{ Cell[32607, 987, 253, 7, 76, "SubsectionIcon"], Cell[32863, 996, 1085, 19, 332, "Input"] }, Closed]], Cell[CellGroupData[{ Cell[33985, 1020, 53, 0, 39, "SubsectionIcon"], Cell[34041, 1022, 1528, 30, 560, "Input"] }, Closed]] }, Open ]], Cell[35596, 1056, 1679, 44, 28, "SlideShowNavigationBar", CellTags->"SlideShowHeader"], Cell[CellGroupData[{ Cell[37300, 1104, 89, 2, 119, "Section"], Cell[37392, 1108, 718, 23, 106, "Text"], Cell[38113, 1133, 200, 4, 102, "Input"], Cell[CellGroupData[{ Cell[38338, 1141, 56, 0, 58, "SubsectionIcon"], Cell[38397, 1143, 129, 3, 39, "Input"], Cell[38529, 1148, 346, 6, 89, "Input"], Cell[38878, 1156, 57, 0, 34, "Text"], Cell[38938, 1158, 364, 7, 133, "Input"] }, Closed]], Cell[CellGroupData[{ Cell[39339, 1170, 125, 5, 39, "SubsectionIcon"], Cell[39467, 1177, 1298, 29, 125, "Input"] }, Closed]] }, Open ]], Cell[40792, 1210, 1679, 44, 28, "SlideShowNavigationBar", CellTags->"SlideShowHeader"], Cell[CellGroupData[{ Cell[42496, 1258, 71, 0, 82, "Section"], Cell[42570, 1260, 501, 14, 64, "Text"] }, Open ]], Cell[43086, 1277, 1679, 44, 28, "SlideShowNavigationBar", CellTags->"SlideShowHeader"], Cell[CellGroupData[{ Cell[44790, 1325, 28, 0, 82, "Section"], Cell[44821, 1327, 235, 6, 64, "Text"], Cell[45059, 1335, 257, 6, 64, "Text"] }, Open ]] } ] *) (******************************************************************* End of Mathematica Notebook file. *******************************************************************)