(************** Content-type: application/mathematica ************** CreatedBy='Mathematica 5.2' Mathematica-Compatible Notebook This notebook can be used with any Mathematica-compatible application, such as Mathematica, MathReader or Publicon. The data for the notebook starts with the line containing stars above. To get the notebook into a Mathematica-compatible application, do one of the following: * Save the data starting with the line of stars above into a file with a name ending in .nb, then open the file inside the application; * Copy the data starting with the line of stars above to the clipboard, then use the Paste menu command inside the application. Data for notebooks contains only printable 7-bit ASCII and can be sent directly in email or through ftp in text mode. Newlines can be CR, LF or CRLF (Unix, Macintosh or MS-DOS style). NOTE: If you modify the data for this notebook not in a Mathematica- compatible application, you must delete the line below containing the word CacheID, otherwise Mathematica-compatible applications may try to use invalid cache data. For more information on notebooks and Mathematica-compatible applications, contact Wolfram Research: web: http://www.wolfram.com email: info@wolfram.com phone: +1-217-398-0700 (U.S.) Notebook reader applications are available free of charge from Wolfram Research. *******************************************************************) (*CacheID: 232*) (*NotebookFileLineBreakTest NotebookFileLineBreakTest*) (*NotebookOptionsPosition[ 47756, 1650]*) (*NotebookOutlinePosition[ 48386, 1672]*) (* CellTagsIndexPosition[ 48342, 1668]*) (*WindowFrame->Normal*) Notebook[{ Cell[CellGroupData[{ Cell["Style Definitions", "Title"], Cell["\<\ Modify the definitions below to change the default appearance of \ all cells in a given style. Make modifications to any definition using \ commands in the Format menu. See Custom Styles below. NB: this is a plea \ for help, not an example of how to do things right.\ \>", "Text"], Cell[CellGroupData[{ Cell["Style Environment Names", "Section"], Cell[StyleData[All, "Working"], CellBracketOptions->{"Color"->RGBColor[0.771908, 0.399634, 0.262867]}, ScriptMinSize->9], Cell[StyleData[All, "Presentation"], CellBracketOptions->{"Color"->RGBColor[0.771908, 0.399634, 0.262867]}, ScriptMinSize->9], Cell[StyleData[All, "SlideShow"], PageWidth->WindowWidth, ScrollingOptions->{"PagewiseDisplay"->True, "VerticalScrollRange"->Fit}, ShowCellBracket->False, ScriptMinSize->9], Cell[StyleData[All, "Printout"], PageWidth->PaperWidth, PrivateFontOptions->{"FontType"->"Outline"}] }, Closed]], Cell[CellGroupData[{ Cell["Notebook Options", "Section"], Cell["\<\ The options defined for the style below will be used at the \ Notebook level.\ \>", "Text"], 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"]}}, CellFrameLabelMargins->6, StyleMenuListing->None] }, Closed]], Cell[CellGroupData[{ Cell["Styles for Headings", "Section"], Cell[CellGroupData[{ Cell[StyleData["Title"], CellMargins->{{36, 20}, {0, 10}}, CellGroupingRules->{"TitleGrouping", 0}, PageBreakBelow->False, CellFrameMargins->{{100, 4}, {8, 10}}, InputAutoReplacements->{"TeX"->StyleBox[ RowBox[ {"T", AdjustmentBox[ "E", BoxMargins -> {{-0.074999999999999997, \ -0.085000000000000006}, {0, 0}}, BoxBaselineShift -> 0.5], "X"}]], "LaTeX"->StyleBox[ RowBox[ {"L", StyleBox[ AdjustmentBox[ "A", BoxMargins -> {{-0.35999999999999999, \ -0.10000000000000001}, {0, 0}}, BoxBaselineShift -> -0.20000000000000001], FontSize -> Smaller], "T", AdjustmentBox[ "E", BoxMargins -> {{-0.074999999999999997, \ -0.085000000000000006}, {0, 0}}, BoxBaselineShift -> 0.5], "X"}]], "mma"->"Mathematica", "Mma"->"Mathematica", "MMA"->"Mathematica", "gridMathematica"->FormBox[ RowBox[ {"grid", AdjustmentBox[ StyleBox[ "Mathematica", FontSlant -> "Italic"], BoxMargins -> {{-0.175, 0}, {0, 0}}]}], TextForm], "webMathematica"->FormBox[ RowBox[ {"web", AdjustmentBox[ StyleBox[ "Mathematica", FontSlant -> "Italic"], BoxMargins -> {{-0.17499999999999999, 0}, {0, 0}}]}], TextForm], Inherited}, TextAlignment->Center, LineSpacing->{1, 13}, CounterIncrements->"Title", CounterAssignments->{{"Section", 0}, {"Equation", 0}, {"Figure", 0}}, FontSize->48], Cell[StyleData["Title", "Presentation"], CellMargins->{{36, 20}, {20, 15}}, FontSize->72], Cell[StyleData["Title", "Printout"], FontSize->40] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["Subtitle"], CellMargins->{{54, 25}, {2, 30}}, CellGroupingRules->{"TitleGrouping", 10}, PageBreakBelow->False, InputAutoReplacements->{"TeX"->StyleBox[ RowBox[ {"T", AdjustmentBox[ "E", BoxMargins -> {{-0.074999999999999997, \ -0.085000000000000006}, {0, 0}}, BoxBaselineShift -> 0.5], "X"}]], "LaTeX"->StyleBox[ RowBox[ {"L", StyleBox[ AdjustmentBox[ "A", BoxMargins -> {{-0.35999999999999999, \ -0.10000000000000001}, {0, 0}}, BoxBaselineShift -> -0.20000000000000001], FontSize -> Smaller], "T", AdjustmentBox[ "E", BoxMargins -> {{-0.074999999999999997, \ -0.085000000000000006}, {0, 0}}, BoxBaselineShift -> 0.5], "X"}]], "mma"->"Mathematica", "Mma"->"Mathematica", "MMA"->"Mathematica", "gridMathematica"->FormBox[ RowBox[ {"grid", AdjustmentBox[ StyleBox[ "Mathematica", FontSlant -> "Italic"], BoxMargins -> {{-0.175, 0}, {0, 0}}]}], TextForm], "webMathematica"->FormBox[ RowBox[ {"web", AdjustmentBox[ StyleBox[ "Mathematica", FontSlant -> "Italic"], BoxMargins -> {{-0.17499999999999999, 0}, {0, 0}}]}], TextForm], Inherited}, TextAlignment->Center, CounterIncrements->"Subtitle", CounterAssignments->{{"Section", 0}, {"Equation", 0}, {"Figure", 0}}, FontSize->24, FontSlant->"Italic", FontColor->RGBColor[0.771908, 0.399634, 0.262867]], Cell[StyleData["Subtitle", "Presentation"], CellMargins->{{54, 25}, {10, 30}}, FontSize->36], Cell[StyleData["Subtitle", "Printout"], FontSize->18, FontColor->GrayLevel[0]] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["Subsubtitle"], CellMargins->{{54, 25}, {30, 10}}, CellGroupingRules->{"TitleGrouping", 20}, PageBreakBelow->False, InputAutoReplacements->{"TeX"->StyleBox[ RowBox[ {"T", AdjustmentBox[ "E", BoxMargins -> {{-0.074999999999999997, \ -0.085000000000000006}, {0, 0}}, BoxBaselineShift -> 0.5], "X"}]], "LaTeX"->StyleBox[ RowBox[ {"L", StyleBox[ AdjustmentBox[ "A", BoxMargins -> {{-0.35999999999999999, \ -0.10000000000000001}, {0, 0}}, BoxBaselineShift -> -0.20000000000000001], FontSize -> Smaller], "T", AdjustmentBox[ "E", BoxMargins -> {{-0.074999999999999997, \ -0.085000000000000006}, {0, 0}}, BoxBaselineShift -> 0.5], "X"}]], "mma"->"Mathematica", "Mma"->"Mathematica", "MMA"->"Mathematica", "gridMathematica"->FormBox[ RowBox[ {"grid", AdjustmentBox[ StyleBox[ "Mathematica", FontSlant -> "Italic"], BoxMargins -> {{-0.175, 0}, {0, 0}}]}], TextForm], "webMathematica"->FormBox[ RowBox[ {"web", AdjustmentBox[ StyleBox[ "Mathematica", FontSlant -> "Italic"], BoxMargins -> {{-0.17499999999999999, 0}, {0, 0}}]}], TextForm], Inherited}, TextAlignment->Center, CounterIncrements->"Subsubtitle", CounterAssignments->{{"Section", 0}, {"Equation", 0}, {"Figure", 0}}, FontSize->14, FontSlant->"Italic"], Cell[StyleData["Subsubtitle", "Presentation"], CellMargins->{{54, 25}, {60, 10}}, FontSize->21], Cell[StyleData["Subsubtitle", "Printout"], FontSize->12] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["Section"], CellMargins->{{54, 25}, {2, 30}}, CellGroupingRules->{"SectionGrouping", 30}, PageBreakBelow->False, InputAutoReplacements->{"TeX"->StyleBox[ RowBox[ {"T", AdjustmentBox[ "E", BoxMargins -> {{-0.074999999999999997, \ -0.085000000000000006}, {0, 0}}, BoxBaselineShift -> 0.5], "X"}]], "LaTeX"->StyleBox[ RowBox[ {"L", StyleBox[ AdjustmentBox[ "A", BoxMargins -> {{-0.35999999999999999, \ -0.10000000000000001}, {0, 0}}, BoxBaselineShift -> -0.20000000000000001], FontSize -> Smaller], "T", AdjustmentBox[ "E", BoxMargins -> {{-0.074999999999999997, \ -0.085000000000000006}, {0, 0}}, BoxBaselineShift -> 0.5], "X"}]], "mma"->"Mathematica", "Mma"->"Mathematica", "MMA"->"Mathematica", "gridMathematica"->FormBox[ RowBox[ {"grid", AdjustmentBox[ StyleBox[ "Mathematica", FontSlant -> "Italic"], BoxMargins -> {{-0.175, 0}, {0, 0}}]}], TextForm], "webMathematica"->FormBox[ RowBox[ {"web", AdjustmentBox[ StyleBox[ "Mathematica", FontSlant -> "Italic"], BoxMargins -> {{-0.17499999999999999, 0}, {0, 0}}]}], TextForm], Inherited}, TextAlignment->Center, LineSpacing->{1, 9}, CounterIncrements->"Section", CounterAssignments->{{"Subsection", 0}, {"Subsubsection", 0}}, FontSize->16, FontWeight->"Bold", FontColor->RGBColor[0.771908, 0.399634, 0.262867]], Cell[StyleData["Section", "Presentation"], CellMargins->{{54, 25}, {10, 30}}, FontSize->24], Cell[StyleData["Section", "Printout"], FontSize->12, FontColor->GrayLevel[0]] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["Subsection"], CellDingbat->"\[FilledSmallSquare]", CellMargins->{{54, 25}, {2, 12}}, CellGroupingRules->{"SectionGrouping", 40}, PageBreakBelow->False, CellFrameMargins->{{2, 12}, {0, 12}}, InputAutoReplacements->{"TeX"->StyleBox[ RowBox[ {"T", AdjustmentBox[ "E", BoxMargins -> {{-0.074999999999999997, \ -0.085000000000000006}, {0, 0}}, BoxBaselineShift -> 0.5], "X"}]], "LaTeX"->StyleBox[ RowBox[ {"L", StyleBox[ AdjustmentBox[ "A", BoxMargins -> {{-0.35999999999999999, \ -0.10000000000000001}, {0, 0}}, BoxBaselineShift -> -0.20000000000000001], FontSize -> Smaller], "T", AdjustmentBox[ "E", BoxMargins -> {{-0.074999999999999997, \ -0.085000000000000006}, {0, 0}}, BoxBaselineShift -> 0.5], "X"}]], "mma"->"Mathematica", "Mma"->"Mathematica", "MMA"->"Mathematica", "gridMathematica"->FormBox[ RowBox[ {"grid", AdjustmentBox[ StyleBox[ "Mathematica", FontSlant -> "Italic"], BoxMargins -> {{-0.175, 0}, {0, 0}}]}], TextForm], "webMathematica"->FormBox[ RowBox[ {"web", AdjustmentBox[ StyleBox[ "Mathematica", FontSlant -> "Italic"], BoxMargins -> {{-0.17499999999999999, 0}, {0, 0}}]}], TextForm], Inherited}, CounterIncrements->"Subsection", CounterAssignments->{{"Subsubsection", 0}}, FontWeight->"Bold"], Cell[StyleData["Subsection", "Presentation"], CellMargins->{{76, 25}, {8, 15}}, FontSize->18], Cell[StyleData["Subsection", "Printout"], FontSize->10] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["Subsubsection"], CellMargins->{{54, 25}, {2, 12}}, CellGroupingRules->{"SectionGrouping", 50}, PageBreakBelow->False, InputAutoReplacements->{"TeX"->StyleBox[ RowBox[ {"T", AdjustmentBox[ "E", BoxMargins -> {{-0.074999999999999997, \ -0.085000000000000006}, {0, 0}}, BoxBaselineShift -> 0.5], "X"}]], "LaTeX"->StyleBox[ RowBox[ {"L", StyleBox[ AdjustmentBox[ "A", BoxMargins -> {{-0.35999999999999999, \ -0.10000000000000001}, {0, 0}}, BoxBaselineShift -> -0.20000000000000001], FontSize -> Smaller], "T", AdjustmentBox[ "E", BoxMargins -> {{-0.074999999999999997, \ -0.085000000000000006}, {0, 0}}, BoxBaselineShift -> 0.5], "X"}]], "mma"->"Mathematica", "Mma"->"Mathematica", "MMA"->"Mathematica", "gridMathematica"->FormBox[ RowBox[ {"grid", AdjustmentBox[ StyleBox[ "Mathematica", FontSlant -> "Italic"], BoxMargins -> {{-0.175, 0}, {0, 0}}]}], TextForm], "webMathematica"->FormBox[ RowBox[ {"web", AdjustmentBox[ StyleBox[ "Mathematica", FontSlant -> "Italic"], BoxMargins -> {{-0.17499999999999999, 0}, {0, 0}}]}], TextForm], Inherited}, CounterIncrements->"Subsubsection", FontSlant->"Italic", FontColor->RGBColor[0.771908, 0.399634, 0.262867]], Cell[StyleData["Subsubsection", "Presentation"], CellMargins->{{76, 25}, {8, 12}}, FontSize->18], Cell[StyleData["Subsubsection", "Printout"], FontSize->9, FontColor->GrayLevel[0]] }, Closed]] }, Closed]], Cell[CellGroupData[{ Cell["Styles for Body Text", "Section"], Cell[CellGroupData[{ Cell[StyleData["Text"], CellMargins->{{54, 25}, {6, 6}}, CellFrameMargins->{{4, 10}, {6, 0}}, CellFrameLabelMargins->4, InputAutoReplacements->{"TeX"->StyleBox[ RowBox[ {"T", AdjustmentBox[ "E", BoxMargins -> {{-0.074999999999999997, \ -0.085000000000000006}, {0, 0}}, BoxBaselineShift -> 0.5], "X"}]], "LaTeX"->StyleBox[ RowBox[ {"L", StyleBox[ AdjustmentBox[ "A", BoxMargins -> {{-0.35999999999999999, \ -0.10000000000000001}, {0, 0}}, BoxBaselineShift -> -0.20000000000000001], FontSize -> Smaller], "T", AdjustmentBox[ "E", BoxMargins -> {{-0.074999999999999997, \ -0.085000000000000006}, {0, 0}}, BoxBaselineShift -> 0.5], "X"}]], "mma"->"Mathematica", "Mma"->"Mathematica", "MMA"->"Mathematica", "gridMathematica"->FormBox[ RowBox[ {"grid", AdjustmentBox[ StyleBox[ "Mathematica", FontSlant -> "Italic"], BoxMargins -> {{-0.175, 0}, {0, 0}}]}], TextForm], "webMathematica"->FormBox[ RowBox[ {"web", AdjustmentBox[ StyleBox[ "Mathematica", FontSlant -> "Italic"], BoxMargins -> {{-0.17499999999999999, 0}, {0, 0}}]}], TextForm], Inherited}, TextJustification->1, LineSpacing->{1.25, 0}, CounterIncrements->"Text"], Cell[StyleData["Text", "Presentation"], CellMargins->{{76, 25}, {6, 6}}, FontSize->18], Cell[StyleData["Text", "Printout"], Hyphenation->True, LineSpacing->{1.5, 0}, FontSize->10] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["SmallText"], CellFrame->{{0, 0}, {0, 0.25}}, CellMargins->{{72, 44}, {6, 6}}, CellFrameMargins->2, InputAutoReplacements->{"TeX"->StyleBox[ RowBox[ {"T", AdjustmentBox[ "E", BoxMargins -> {{-0.074999999999999997, \ -0.085000000000000006}, {0, 0}}, BoxBaselineShift -> 0.5], "X"}]], "LaTeX"->StyleBox[ RowBox[ {"L", StyleBox[ AdjustmentBox[ "A", BoxMargins -> {{-0.35999999999999999, \ -0.10000000000000001}, {0, 0}}, BoxBaselineShift -> -0.20000000000000001], FontSize -> Smaller], "T", AdjustmentBox[ "E", BoxMargins -> {{-0.074999999999999997, \ -0.085000000000000006}, {0, 0}}, BoxBaselineShift -> 0.5], "X"}]], "mma"->"Mathematica", "Mma"->"Mathematica", "MMA"->"Mathematica", "gridMathematica"->FormBox[ RowBox[ {"grid", AdjustmentBox[ StyleBox[ "Mathematica", FontSlant -> "Italic"], BoxMargins -> {{-0.175, 0}, {0, 0}}]}], TextForm], "webMathematica"->FormBox[ RowBox[ {"web", AdjustmentBox[ StyleBox[ "Mathematica", FontSlant -> "Italic"], BoxMargins -> {{-0.17499999999999999, 0}, {0, 0}}]}], TextForm], Inherited}, TextJustification->1, LineSpacing->{1, 2}, CounterIncrements->"SmallText", FontSize->10], Cell[StyleData["SmallText", "Presentation"], CellMargins->{{100, 44}, {6, 10}}, FontSize->15], Cell[StyleData["SmallText", "Printout"], Hyphenation->True, LineSpacing->{1, 3}, FontSize->9] }, Closed]] }, Closed]], 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[StyleData["RM"], StyleMenuListing->None, FontWeight->"Plain", FontSlant->"Plain"], Cell[StyleData["BF"], StyleMenuListing->None, FontWeight->"Bold"], Cell[StyleData["IT"], StyleMenuListing->None, FontSlant->"Italic"], Cell[StyleData["TR"], StyleMenuListing->None, FontFamily->"Times", FontWeight->"Plain", FontSlant->"Plain"], Cell[StyleData["TI"], StyleMenuListing->None, FontFamily->"Times", FontWeight->"Plain", FontSlant->"Italic"], Cell[StyleData["TB"], StyleMenuListing->None, FontFamily->"Times", FontWeight->"Bold", FontSlant->"Plain"], Cell[StyleData["TBI"], StyleMenuListing->None, FontFamily->"Times", FontWeight->"Bold", FontSlant->"Italic"], Cell[StyleData["MR"], "TwoByteSyntaxCharacterAutoReplacement"->True, HyphenationOptions->{"HyphenationCharacter"->"\[Continuation]"}, StyleMenuListing->None, FontFamily->"Courier", FontWeight->"Plain", FontSlant->"Plain"], Cell[StyleData["MO"], "TwoByteSyntaxCharacterAutoReplacement"->True, HyphenationOptions->{"HyphenationCharacter"->"\[Continuation]"}, StyleMenuListing->None, FontFamily->"Courier", FontWeight->"Plain", FontSlant->"Italic"], Cell[StyleData["MB"], "TwoByteSyntaxCharacterAutoReplacement"->True, HyphenationOptions->{"HyphenationCharacter"->"\[Continuation]"}, StyleMenuListing->None, FontFamily->"Courier", FontWeight->"Bold", FontSlant->"Plain"], Cell[StyleData["MBO"], "TwoByteSyntaxCharacterAutoReplacement"->True, HyphenationOptions->{"HyphenationCharacter"->"\[Continuation]"}, StyleMenuListing->None, FontFamily->"Courier", FontWeight->"Bold", FontSlant->"Italic"], Cell[StyleData["SR"], StyleMenuListing->None, FontFamily->"Helvetica", FontWeight->"Plain", FontSlant->"Plain"], Cell[StyleData["SO"], StyleMenuListing->None, FontFamily->"Helvetica", FontWeight->"Plain", FontSlant->"Italic"], Cell[StyleData["SB"], StyleMenuListing->None, FontFamily->"Helvetica", FontWeight->"Bold", FontSlant->"Plain"], Cell[StyleData["SBO"], StyleMenuListing->None, FontFamily->"Helvetica", FontWeight->"Bold", FontSlant->"Italic"], Cell[CellGroupData[{ Cell[StyleData["SO10"], StyleMenuListing->None, FontFamily->"Helvetica", FontSize->10, FontWeight->"Plain", FontSlant->"Italic"], Cell[StyleData["SO10", "Printout"], StyleMenuListing->None, FontFamily->"Helvetica", FontSize->7, FontWeight->"Plain", FontSlant->"Italic"] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["Inert"], StyleMenuListing->None, Background->RGBColor[0.870588, 0.905882, 0.972549]], Cell[StyleData["Inert", "Printout"], StyleMenuListing->None, Background->GrayLevel[1]] }, Closed]] }, Closed]], Cell[CellGroupData[{ Cell["Styles for 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"], CellMargins->{{72, 25}, {8, 12}}, Evaluatable->True, CellGroupingRules->"InputGrouping", CellHorizontalScrolling->True, PageBreakWithin->False, GroupPageBreakWithin->False, CellLabelMargins->{{33, Inherited}, {Inherited, Inherited}}, DefaultFormatType->DefaultInputFormatType, "TwoByteSyntaxCharacterAutoReplacement"->True, TextAlignment->Left, HyphenationOptions->{"HyphenationCharacter"->"\[Continuation]"}, AutoItalicWords->{}, LanguageCategory->"Formula", FormatType->InputForm, ShowStringCharacters->True, NumberMarks->True, LinebreakAdjustments->{0.85, 2, 10, 0, 1}, CounterIncrements->"Input", FontSize->12, FontWeight->"Bold"], Cell[StyleData["Input", "Presentation"], CellMargins->{{100, 25}, {10, 25}}, FontSize->18], Cell[StyleData["Input", "Printout"], LinebreakAdjustments->{0.85, 2, 10, 1, 1}, FontSize->9.5] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["Output"], CellMargins->{{72, 25}, {12, 4}}, CellEditDuplicate->True, CellGroupingRules->"OutputGrouping", CellHorizontalScrolling->True, PageBreakWithin->False, GroupPageBreakWithin->False, GeneratedCell->True, CellAutoOverwrite->True, CellLabelMargins->{{33, Inherited}, {Inherited, Inherited}}, DefaultFormatType->DefaultOutputFormatType, "TwoByteSyntaxCharacterAutoReplacement"->True, TextAlignment->Left, HyphenationOptions->{"HyphenationCharacter"->"\[Continuation]"}, AutoItalicWords->{}, LanguageCategory->"Formula", FormatType->InputForm, CounterIncrements->"Output", FontSize->12], Cell[StyleData["Output", "Presentation"], CellMargins->{{100, 25}, {14, 8}}, FontSize->18], Cell[StyleData["Output", "Printout"], FontSize->9.5] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["Message"], CellDingbat->"\[LongDash]", CellMargins->{{72, 25}, {12, 4}}, CellGroupingRules->"OutputGrouping", PageBreakWithin->False, GroupPageBreakWithin->False, GeneratedCell->True, CellAutoOverwrite->True, ShowCellLabel->False, CellLabelMargins->{{33, Inherited}, {Inherited, Inherited}}, DefaultFormatType->DefaultOutputFormatType, "TwoByteSyntaxCharacterAutoReplacement"->True, AutoStyleOptions->{"UnmatchedBracketStyle"->None}, HyphenationOptions->{"HyphenationCharacter"->"\[Continuation]"}, AutoItalicWords->{}, FormatType->InputForm, CounterIncrements->"Message", StyleMenuListing->None, FontFamily->"Helvetica", FontSize->10, FontSlant->"Oblique"], Cell[StyleData["Message", "Presentation"], CellMargins->{{100, 25}, {12, 10}}, FontSize->15], Cell[StyleData["Message", "Printout"], FontSize->8] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["Print"], CellMargins->{{72, 25}, {12, 4}}, CellGroupingRules->"OutputGrouping", CellHorizontalScrolling->True, PageBreakWithin->False, GroupPageBreakWithin->False, GeneratedCell->True, CellAutoOverwrite->True, ShowCellLabel->False, CellLabelMargins->{{33, Inherited}, {Inherited, Inherited}}, DefaultFormatType->DefaultOutputFormatType, "TwoByteSyntaxCharacterAutoReplacement"->True, TextAlignment->Left, HyphenationOptions->{"HyphenationCharacter"->"\[Continuation]"}, AutoItalicWords->{}, FormatType->InputForm, CounterIncrements->"Print", StyleMenuListing->None], Cell[StyleData["Print", "Presentation"], CellMargins->{{100, 25}, {12, 10}}, FontSize->18], Cell[StyleData["Print", "Printout"], FontSize->9.5] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["Graphics"], CellMargins->{{72, 25}, {12, 4}}, CellGroupingRules->"GraphicsGrouping", CellHorizontalScrolling->True, PageBreakWithin->False, GeneratedCell->True, CellAutoOverwrite->True, ShowCellLabel->False, DefaultFormatType->DefaultOutputFormatType, FormatType->InputForm, CounterIncrements->"Graphics", ImageMargins->{{35, Inherited}, {Inherited, 0}}, StyleMenuListing->None, FontSize->10], Cell[StyleData["Graphics", "Presentation"], CellMargins->{{100, 25}, {18, 12}}, FontSize->15], Cell[StyleData["Graphics", "Printout"], FontSize->8] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["CellLabel"], CellLabelAutoDelete->False, StyleMenuListing->None, FontSize->10, FontSlant->"Italic", FontColor->RGBColor[0.551492, 0.231144, 0.313466]], Cell[StyleData["CellLabel", "Presentation"], FontSize->15], Cell[StyleData["CellLabel", "Printout"], FontSize->8, FontColor->GrayLevel[0]] }, Closed]] }, Closed]], Cell[CellGroupData[{ Cell["Hyperlink Styles", "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.\ \>", "Text"], Cell[CellGroupData[{ Cell[StyleData["Hyperlink"], StyleMenuListing->None, ButtonStyleMenuListing->Automatic, FontColor->RGBColor[0.269993, 0.308507, 0.6], ButtonBoxOptions->{ButtonFunction:>(FrontEndExecute[ { FrontEnd`NotebookLocate[ #2]}]&), Active->True, ButtonFrame->"None", ButtonNote->ButtonData}], Cell[StyleData["Hyperlink", "Presentation"], FontSize->16], Cell[StyleData["Hyperlink", "Condensed"], FontSize->11], Cell[StyleData["Hyperlink", "SlideShow"]], Cell[StyleData["Hyperlink", "Printout"], FontSize->10, FontColor->GrayLevel[0], FontVariations->{"Underline"->False}] }, Closed]], Cell["\<\ The following styles are for linking automatically to the on-line \ help system.\ \>", "Text"], Cell[CellGroupData[{ Cell[StyleData["MainBookLink"], StyleMenuListing->None, ButtonStyleMenuListing->Automatic, FontColor->RGBColor[0.269993, 0.308507, 0.6], ButtonBoxOptions->{ButtonFunction:>(FrontEndExecute[ { FrontEnd`HelpBrowserLookup[ "MainBook", #]}]&), Active->True, ButtonFrame->"None"}], Cell[StyleData["MainBookLink", "Presentation"], FontSize->16], Cell[StyleData["MainBookLink", "Condensed"], FontSize->11], Cell[StyleData["MainBookLink", "SlideShow"]], Cell[StyleData["MainBookLink", "Printout"], FontSize->10, 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], ButtonBoxOptions->{ButtonFunction:>(FrontEndExecute[ { FrontEnd`HelpBrowserLookup[ "AddOns", #]}]&), Active->True, ButtonFrame->"None"}], Cell[StyleData["AddOnsLink", "Presentation"], FontSize->16], Cell[StyleData["AddOnsLink", "Condensed"], FontSize->11], Cell[StyleData["AddOnsLink", "SlideShow"]], Cell[StyleData["AddOnsLink", "Printout"], FontSize->10, 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], ButtonBoxOptions->{ButtonFunction:>(FrontEndExecute[ { FrontEnd`HelpBrowserLookup[ "RefGuide", #]}]&), Active->True, ButtonFrame->"None"}], Cell[StyleData["RefGuideLink", "Presentation"], FontSize->16], Cell[StyleData["RefGuideLink", "Condensed"], FontSize->11], Cell[StyleData["RefGuideLink", "SlideShow"]], Cell[StyleData["RefGuideLink", "Printout"], FontSize->10, FontColor->GrayLevel[0], FontVariations->{"Underline"->False}] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["RefGuideLinkText"], StyleMenuListing->None, ButtonStyleMenuListing->Automatic, FontColor->RGBColor[0.269993, 0.308507, 0.6], ButtonBoxOptions->{ButtonFunction:>(FrontEndExecute[ { FrontEnd`HelpBrowserLookup[ "RefGuide", #]}]&), Active->True, ButtonFrame->"None"}], Cell[StyleData["RefGuideLinkText", "Presentation"], FontSize->16], Cell[StyleData["RefGuideLinkText", "Condensed"], FontSize->11], Cell[StyleData["RefGuideLinkText", "SlideShow"]], Cell[StyleData["RefGuideLinkText", "Printout"], FontSize->10, FontColor->GrayLevel[0], FontVariations->{"Underline"->False}] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["GettingStartedLink"], StyleMenuListing->None, ButtonStyleMenuListing->Automatic, FontColor->RGBColor[0.269993, 0.308507, 0.6], ButtonBoxOptions->{ButtonFunction:>(FrontEndExecute[ { FrontEnd`HelpBrowserLookup[ "GettingStarted", #]}]&), Active->True, ButtonFrame->"None"}], Cell[StyleData["GettingStartedLink", "Presentation"], FontSize->16], Cell[StyleData["GettingStartedLink", "Condensed"], FontSize->11], Cell[StyleData["GettingStartedLink", "SlideShow"]], Cell[StyleData["GettingStartedLink", "Printout"], FontSize->10, FontColor->GrayLevel[0], FontVariations->{"Underline"->False}] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["DemosLink"], StyleMenuListing->None, ButtonStyleMenuListing->Automatic, FontColor->RGBColor[0.269993, 0.308507, 0.6], ButtonBoxOptions->{ButtonFunction:>(FrontEndExecute[ { FrontEnd`HelpBrowserLookup[ "Demos", #]}]&), Active->True, ButtonFrame->"None"}], Cell[StyleData["DemosLink", "SlideShow"]], Cell[StyleData["DemosLink", "Printout"], FontColor->GrayLevel[0], FontVariations->{"Underline"->False}] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["TourLink"], StyleMenuListing->None, ButtonStyleMenuListing->Automatic, FontColor->RGBColor[0.269993, 0.308507, 0.6], ButtonBoxOptions->{ButtonFunction:>(FrontEndExecute[ { FrontEnd`HelpBrowserLookup[ "Tour", #]}]&), Active->True, ButtonFrame->"None"}], Cell[StyleData["TourLink", "SlideShow"]], Cell[StyleData["TourLink", "Printout"], FontColor->GrayLevel[0], FontVariations->{"Underline"->False}] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["OtherInformationLink"], StyleMenuListing->None, ButtonStyleMenuListing->Automatic, FontColor->RGBColor[0.269993, 0.308507, 0.6], ButtonBoxOptions->{ButtonFunction:>(FrontEndExecute[ { FrontEnd`HelpBrowserLookup[ "OtherInformation", #]}]&), Active->True, ButtonFrame->"None"}], Cell[StyleData["OtherInformationLink", "Presentation"], FontSize->16], Cell[StyleData["OtherInformationLink", "Condensed"], FontSize->11], Cell[StyleData["OtherInformationLink", "SlideShow"]], Cell[StyleData["OtherInformationLink", "Printout"], FontSize->10, FontColor->GrayLevel[0], FontVariations->{"Underline"->False}] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["MasterIndexLink"], StyleMenuListing->None, ButtonStyleMenuListing->Automatic, FontColor->RGBColor[0.269993, 0.308507, 0.6], ButtonBoxOptions->{ButtonFunction:>(FrontEndExecute[ { FrontEnd`HelpBrowserLookup[ "MasterIndex", #]}]&), Active->True, ButtonFrame->"None"}], Cell[StyleData["MasterIndexLink", "SlideShow"]], Cell[StyleData["MasterIndexLink", "Printout"], FontColor->GrayLevel[0], FontVariations->{"Underline"->False}] }, Closed]] }, Closed]], 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], FrontEnd`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]}]&)}] }, Closed]], 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", "Presentation"]], 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 -> {{-0.074999999999999997, \ -0.085000000000000006}, {0, 0}}, BoxBaselineShift -> 0.5], "X"}]], "LaTeX"->StyleBox[ RowBox[ {"L", StyleBox[ AdjustmentBox[ "A", BoxMargins -> {{-0.35999999999999999, \ -0.10000000000000001}, {0, 0}}, BoxBaselineShift -> -0.20000000000000001], FontSize -> Smaller], "T", AdjustmentBox[ "E", BoxMargins -> {{-0.074999999999999997, \ -0.085000000000000006}, {0, 0}}, BoxBaselineShift -> 0.5], "X"}]], "mma"->"Mathematica", "Mma"->"Mathematica", "MMA"->"Mathematica", "gridMathematica"->FormBox[ RowBox[ {"grid", AdjustmentBox[ StyleBox[ "Mathematica", FontSlant -> "Italic"], BoxMargins -> {{-0.175, 0}, {0, 0}}]}], TextForm], "webMathematica"->FormBox[ RowBox[ {"web", AdjustmentBox[ StyleBox[ "Mathematica", FontSlant -> "Italic"], BoxMargins -> {{-0.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"], CellFrameMargins->{{20, 10}, {10, 18}}, 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", "Presentation"], CellMargins->{{14, 10}, {6, 12}}, FontSize->36], 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", "Presentation"], CellMargins->{{35, 10}, {8, 8}}, FontSize->18], 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", "Presentation"], CellMargins->{{25, 10}, {10, 5}}, FontSize->18], Cell[StyleData["SlideTOC", "SlideShow"], FontSize->14], Cell[StyleData["SlideTOC", "Printout"], FontSize->10, FontColor->GrayLevel[0]] }, Closed]] }, Closed]], Cell[CellGroupData[{ Cell["Styles for Automatic Numbering", "Section"], Cell["\<\ The following styles are useful for numbered equations, figures, \ etc. They automatically give the cell a FrameLabel containing a reference to \ a particular counter, and also increment that counter.\ \>", "Text"], Cell[CellGroupData[{ Cell[StyleData["NumberedEquation"], CellMargins->{{72, 10}, {0, 10}}, CellFrameLabels->{{None, Cell[ TextData[ {"(", CounterBox[ "NumberedEquation"], ")"}]]}, {None, None}}, DefaultFormatType->DefaultInputFormatType, HyphenationOptions->{"HyphenationCharacter"->"\[Continuation]"}, CounterIncrements->"NumberedEquation", FormatTypeAutoConvert->False], Cell[StyleData["NumberedEquation", "Presentation"], CellMargins->{{105, 10}, {0, 12}}, FontSize->18], Cell[StyleData["NumberedEquation", "Printout"], FontSize->10] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["NumberedFigure"], CellMargins->{{72, 145}, {2, 10}}, CellHorizontalScrolling->True, CellFrameLabels->{{None, None}, {Cell[ TextData[ {"Figure ", CounterBox[ "NumberedFigure"]}]], None}}, CounterIncrements->"NumberedFigure", FormatTypeAutoConvert->False], Cell[StyleData["NumberedFigure", "Presentation"], CellMargins->{{105, 145}, {4, 14}}, FontSize->18], Cell[StyleData["NumberedFigure", "Printout"], FontSize->10] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["NumberedTable"], CellMargins->{{72, 145}, {2, 10}}, CellFrameLabels->{{None, None}, {Cell[ TextData[ {"Table ", CounterBox[ "NumberedTable"]}]], None}}, TextAlignment->Center, CounterIncrements->"NumberedTable", FormatTypeAutoConvert->False], Cell[StyleData["NumberedTable", "Presentation"], CellMargins->{{100, 145}, {4, 10}}, FontSize->18], Cell[StyleData["NumberedTable", "Printout"], FontSize->10] }, Closed]] }, Closed]], Cell[CellGroupData[{ Cell["Formulas and Programming", "Section"], Cell[CellGroupData[{ Cell[StyleData["DisplayFormula"], CellMargins->{{72, 10}, {2, 10}}, CellHorizontalScrolling->True, DefaultFormatType->DefaultInputFormatType, "TwoByteSyntaxCharacterAutoReplacement"->True, HyphenationOptions->{"HyphenationCharacter"->"\[Continuation]"}, LanguageCategory->"Formula", ScriptLevel->0, SingleLetterItalics->True, UnderoverscriptBoxOptions->{LimitsPositioning->True}], Cell[StyleData["DisplayFormula", "Presentation"], CellMargins->{{100, 10}, {5, 25}}, FontSize->18], Cell[StyleData["DisplayFormula", "Printout"], FontSize->10] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["ChemicalFormula"], CellMargins->{{72, 10}, {2, 10}}, DefaultFormatType->DefaultInputFormatType, "TwoByteSyntaxCharacterAutoReplacement"->True, HyphenationOptions->{"HyphenationCharacter"->"\[Continuation]"}, LanguageCategory->"Formula", AutoSpacing->False, ScriptLevel->1, ScriptBaselineShifts->{0.6, Automatic}, SingleLetterItalics->False, ZeroWidthTimes->True], Cell[StyleData["ChemicalFormula", "Presentation"], CellMargins->{{100, 10}, {4, 14}}, FontSize->18], Cell[StyleData["ChemicalFormula", "Printout"], FontSize->10] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["Program"], CellMargins->{{54, 10}, {Inherited, 6}}, Hyphenation->False, LanguageCategory->"Formula", FontFamily->"Courier"], Cell[StyleData["Program", "Presentation"], CellMargins->{{72, 10}, {6, 8}}, FontSize->18], Cell[StyleData["Program", "Printout"], FontSize->9.5] }, Closed]] }, Closed]], Cell[CellGroupData[{ Cell["Custom Styles", "Section"], Cell["\<\ User-added styles. I'm not even sure how to comment the styles so \ I can explain my intent.\ \>", "Text"], Cell[CellGroupData[{ Cell[StyleData["Theorem"], CellFrame->False, CellMargins->{{72, 145}, {2, 10}}, CellGroupingRules->{"SectionGrouping", 35}, CellHorizontalScrolling->True, CellFrameLabels->{{Cell[ TextData[ { CounterBox[ "Section"], ".", CounterBox[ "FormalNumbering"], " Theorem "}]], None}, { None, None}}, CounterIncrements->"FormalNumbering", CounterAssignments->{{"Corollary", 0}}, FormatTypeAutoConvert->False], Cell[StyleData["Theorem", "Presentation"], CellMargins->{{105, 145}, {4, 14}}, FontSize->18], Cell[StyleData["Theorem", "Printout"], FontSize->10] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["Corollary"], CellFrame->False, CellMargins->{{72, 145}, {2, 10}}, CellGroupingRules->{"SectionGrouping", 35}, CellHorizontalScrolling->True, CellFrameLabels->{{Cell[ TextData[ { CounterBox[ "Section"], ".", CounterBox[ "FormalNumbering"], ".", CounterBox[ "Corollary"], " Corollary "}]], None}, {None, None}}, CounterIncrements->"Corollary", CounterAssignments->{{"FormalItem", 0}}, FormatTypeAutoConvert->False], Cell[StyleData["Corollary", "Presentation"], CellMargins->{{105, 145}, {4, 14}}, FontSize->18], Cell[StyleData["Corollary", "Printout"], FontSize->10] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["Lemma"], CellFrame->False, CellMargins->{{72, 145}, {2, 10}}, CellGroupingRules->{"SectionGrouping", 35}, CellHorizontalScrolling->True, CellFrameLabels->{{Cell[ TextData[ { CounterBox[ "Section"], ".", CounterBox[ "FormalNumbering"], " Lemma "}]], None}, { None, None}}, CounterIncrements->"FormalNumbering", CounterAssignments->{{"FormalItem", 0}}, FormatTypeAutoConvert->False], Cell[StyleData["Lemma", "Presentation"], CellMargins->{{105, 145}, {4, 14}}, FontSize->18], Cell[StyleData["Lemma", "Printout"], FontSize->10] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["Definition"], CellMargins->{{72, 145}, {2, 10}}, CellGroupingRules->{"SectionGrouping", 35}, CellHorizontalScrolling->True, CellFrameLabels->{{Cell[ TextData[ { CounterBox[ "Section"], ".", CounterBox[ "FormalNumbering"], " Definition "}]], None}, { None, None}}, CounterIncrements->"FormalNumbering", FormatTypeAutoConvert->False], Cell[StyleData["Definition", "Presentation"], CellMargins->{{105, 145}, {4, 14}}, FontSize->18], Cell[StyleData["Definition", "Printout"], FontSize->10] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["Definitions"], CellMargins->{{72, 145}, {2, 10}}, CellGroupingRules->{"SectionGrouping", 35}, CellHorizontalScrolling->True, CellFrameLabels->{{Cell[ TextData[ { CounterBox[ "Section"], ".", CounterBox[ "FormalNumbering"], " Definitions "}]], None}, { None, None}}, CounterIncrements->"FormalNumbering", FormatTypeAutoConvert->False], Cell[StyleData["Definitions", "Presentation"], CellMargins->{{105, 145}, {4, 14}}, FontSize->18], Cell[StyleData["Definitions", "Printout"], FontSize->10] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["FormalStatement"], CellMargins->{{54, 25}, {6, 6}}, CellGroupingRules->{"SectionGrouping", 40}, CellFrameMargins->{{4, 10}, {6, 0}}, CellFrameLabelMargins->4, TextJustification->1, LineSpacing->{1.25, 0}, CounterAssignments->{{"FormalItem", 0}}, FontSlant->"Italic"], Cell[StyleData["FormalStatement", "Presentation"], CellMargins->{{76, 25}, {6, 6}}, FontSize->18], Cell[StyleData["FormalStatement", "Printout"], Hyphenation->True, LineSpacing->{1.5, 0}, FontSize->10] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["Proof"], CellMargins->{{54, 25}, {6, 6}}, CellGroupingRules->{"SectionGrouping", 40}, CellFrameMargins->{{4, 10}, {6, 0}}, CellFrameLabels->{{"Proof", None}, {None, None}}, CellFrameLabelMargins->4, TextJustification->1, LineSpacing->{1.25, 0}, CounterAssignments->{{"CountedItem", 0}}], Cell[StyleData["FormalStatement", "Presentation"], CellMargins->{{76, 25}, {6, 6}}, FontSize->18], Cell[StyleData["FormalStatement", "Printout"], Hyphenation->True, LineSpacing->{1.5, 0}, FontSize->10] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["FormalItem"], CellMargins->{{54, 25}, {6, 6}}, CellGroupingRules->{"SectionGrouping", 50}, CellFrameMargins->{{4, 10}, {6, 0}}, CellFrameLabels->{{Cell[ TextData[ {"(", CounterBox[ "FormalItem"], ")"}]], None}, {None, None}}, CellFrameLabelMargins->4, TextJustification->1, LineSpacing->{1.25, 0}, CounterIncrements->"FormalItem", FontSlant->"Italic", CounterBoxOptions->{CounterFunction:>(Part[ CharacterRange[ "a", "z"], #]&)}], Cell[StyleData["FormalItem", "Presentation"], CellMargins->{{76, 25}, {6, 6}}, FontSize->18], Cell[StyleData["FormalItem", "Printout"], Hyphenation->True, LineSpacing->{1.5, 0}, FontSize->10] }, Closed]], Cell[StyleData["InlineDefinition"], FontWeight->"Bold", FontSlant->"Plain"], Cell[CellGroupData[{ Cell[StyleData["CountedItem"], CellMargins->{{54, 25}, {6, 6}}, CellGroupingRules->{"SectionGrouping", 50}, CellFrameMargins->{{4, 10}, {6, 0}}, CellFrameLabels->{{Cell[ TextData[ {"(", CounterBox[ "CountedItem"], ")"}]], None}, {None, None}}, CellFrameLabelMargins->4, TextJustification->1, LineSpacing->{1.25, 0}, CounterIncrements->"CountedItem", FontSlant->"Plain"], Cell[StyleData["CountedItem", "Presentation"], CellMargins->{{76, 25}, {6, 6}}, FontSize->18], Cell[StyleData["CountedItem", "Printout"], Hyphenation->True, LineSpacing->{1.5, 0}, FontSize->10] }, Closed]] }, Open ]] }, Open ]] }, FrontEndVersion->"5.2 for X", ScreenRectangle->{{0, 1600}, {0, 1200}}, WindowSize->{1531, 1169}, WindowMargins->{{0, Automatic}, {Automatic, 0}} ] (******************************************************************* Cached data follows. If you edit this Notebook file directly, not using Mathematica, you must remove the line containing CacheID at the top of the file. The cache data will then be recreated when you save this file from within Mathematica. *******************************************************************) (*CellTagsOutline CellTagsIndex->{} *) (*CellTagsIndex CellTagsIndex->{} *) (*NotebookFileOutline Notebook[{ Cell[CellGroupData[{ Cell[1776, 53, 34, 0, 146, "Title"], Cell[1813, 55, 292, 5, 71, "Text"], Cell[CellGroupData[{ Cell[2130, 64, 42, 0, 113, "Section"], Cell[2175, 66, 124, 2, 70, 31, 0, "StyleData", "All", "Working"], Cell[2302, 70, 129, 2, 70, 36, 0, "StyleData", "All", "Presentation"], Cell[2434, 74, 182, 5, 70, 33, 0, "StyleData", "All", "SlideShow"], Cell[2619, 81, 104, 2, 70, 32, 0, "StyleData", "All", "Printout"] }, Closed]], Cell[CellGroupData[{ Cell[2760, 88, 35, 0, 66, "Section"], Cell[2798, 90, 101, 3, 70, "Text"], Cell[2902, 95, 426, 11, 70, 27, 0, "StyleData", "Notebook", "All", StyleMenuListing->None] }, Closed]], Cell[CellGroupData[{ Cell[3365, 111, 38, 0, 66, "Section"], Cell[CellGroupData[{ Cell[3428, 115, 1539, 36, 70, 24, 0, "StyleData", "Title", "All", CounterIncrements->"Title", CounterAssignments->{{"Section", 0}, {"Equation", 0}, {"Figure", 0}}], Cell[4970, 153, 93, 2, 70, 40, 0, "StyleData", "Title", "Presentation"], Cell[5066, 157, 52, 1, 70, 36, 0, "StyleData", "Title", "Printout"] }, Closed]], Cell[CellGroupData[{ Cell[5155, 163, 1557, 36, 70, 27, 0, "StyleData", "Subtitle", "All", CounterIncrements->"Subtitle", CounterAssignments->{{"Section", 0}, {"Equation", 0}, {"Figure", 0}}], Cell[6715, 201, 96, 2, 70, 43, 0, "StyleData", "Subtitle", "Presentation"], Cell[6814, 205, 82, 2, 70, 39, 0, "StyleData", "Subtitle", "Printout"] }, Closed]], Cell[CellGroupData[{ Cell[6933, 212, 1511, 35, 70, 30, 0, "StyleData", "Subsubtitle", "All", CounterIncrements->"Subsubtitle", CounterAssignments->{{"Section", 0}, {"Equation", 0}, {"Figure", 0}}], Cell[8447, 249, 99, 2, 70, 46, 0, "StyleData", "Subsubtitle", \ "Presentation"], Cell[8549, 253, 58, 1, 70, 42, 0, "StyleData", "Subsubtitle", "Printout"] }, Closed]], Cell[CellGroupData[{ Cell[8644, 259, 1572, 37, 70, 26, 0, "StyleData", "Section", "All", CounterIncrements->"Section", CounterAssignments->{{"Subsection", 0}, {"Subsubsection", 0}}], Cell[10219, 298, 95, 2, 70, 42, 0, "StyleData", "Section", "Presentation"], Cell[10317, 302, 81, 2, 70, 38, 0, "StyleData", "Section", "Printout"] }, Closed]], Cell[CellGroupData[{ Cell[10435, 309, 1521, 35, 70, 29, 0, "StyleData", "Subsection", "All", CounterIncrements->"Subsection", CounterAssignments->{{"Subsubsection", 0}}], Cell[11959, 346, 97, 2, 70, 45, 0, "StyleData", "Subsection", \ "Presentation"], Cell[12059, 350, 57, 1, 70, 41, 0, "StyleData", "Subsection", "Printout"] }, Closed]], Cell[CellGroupData[{ Cell[12153, 356, 1456, 33, 70, 32, 0, "StyleData", "Subsubsection", "All", CounterIncrements->"Subsubsection"], Cell[13612, 391, 100, 2, 70, 48, 0, "StyleData", "Subsubsection", \ "Presentation"], Cell[13715, 395, 86, 2, 70, 44, 0, "StyleData", "Subsubsection", "Printout"] }, Closed]] }, Closed]], Cell[CellGroupData[{ Cell[13850, 403, 39, 0, 66, "Section"], Cell[CellGroupData[{ Cell[13914, 407, 1407, 33, 70, 23, 0, "StyleData", "Text", "All", CounterIncrements->"Text"], Cell[15324, 442, 90, 2, 70, 39, 0, "StyleData", "Text", "Presentation"], Cell[15417, 446, 97, 3, 70, 35, 0, "StyleData", "Text", "Printout"] }, Closed]], Cell[CellGroupData[{ Cell[15551, 454, 1420, 34, 70, 28, 0, "StyleData", "SmallText", "All", CounterIncrements->"SmallText"], Cell[16974, 490, 97, 2, 70, 44, 0, "StyleData", "SmallText", "Presentation"], Cell[17074, 494, 99, 3, 70, 40, 0, "StyleData", "SmallText", "Printout"] }, Closed]] }, Closed]], Cell[CellGroupData[{ Cell[17222, 503, 36, 0, 66, "Section"], Cell[17261, 505, 121, 3, 50, "Text"], Cell[17385, 510, 92, 3, 38, 21, 0, "StyleData", "RM", "All", StyleMenuListing->None], Cell[17480, 515, 69, 2, 38, 21, 0, "StyleData", "BF", "All", StyleMenuListing->None], Cell[17552, 519, 70, 2, 38, 21, 0, "StyleData", "IT", "All", StyleMenuListing->None], Cell[17625, 523, 115, 4, 38, 21, 0, "StyleData", "TR", "All", StyleMenuListing->None], Cell[17743, 529, 116, 4, 38, 21, 0, "StyleData", "TI", "All", StyleMenuListing->None], Cell[17862, 535, 114, 4, 38, 21, 0, "StyleData", "TB", "All", StyleMenuListing->None], Cell[17979, 541, 116, 4, 38, 22, 0, "StyleData", "TBI", "All", StyleMenuListing->None], Cell[18098, 547, 233, 6, 37, 21, 0, "StyleData", "MR", "All", StyleMenuListing->None], Cell[18334, 555, 234, 6, 37, 21, 0, "StyleData", "MO", "All", StyleMenuListing->None], Cell[18571, 563, 232, 6, 37, 21, 0, "StyleData", "MB", "All", StyleMenuListing->None], Cell[18806, 571, 234, 6, 37, 22, 0, "StyleData", "MBO", "All", StyleMenuListing->None], Cell[19043, 579, 119, 4, 38, 21, 0, "StyleData", "SR", "All", StyleMenuListing->None], Cell[19165, 585, 120, 4, 38, 21, 0, "StyleData", "SO", "All", StyleMenuListing->None], Cell[19288, 591, 118, 4, 38, 21, 0, "StyleData", "SB", "All", StyleMenuListing->None], Cell[19409, 597, 120, 4, 38, 22, 0, "StyleData", "SBO", "All", StyleMenuListing->None], Cell[CellGroupData[{ Cell[19554, 605, 138, 5, 35, 23, 0, "StyleData", "SO10", "All", StyleMenuListing->None], Cell[19695, 612, 149, 5, 31, 35, 0, "StyleData", "SO10", "Printout", StyleMenuListing->None] }, Closed]], Cell[CellGroupData[{ Cell[19881, 622, 104, 2, 54, 24, 0, "StyleData", "Inert", "All", StyleMenuListing->None], Cell[19988, 626, 90, 2, 38, 36, 0, "StyleData", "Inert", "Printout", StyleMenuListing->None] }, Closed]] }, Closed]], Cell[CellGroupData[{ Cell[20127, 634, 42, 0, 66, "Section"], Cell[20172, 636, 248, 5, 70, "Text"], Cell[CellGroupData[{ Cell[20445, 645, 699, 20, 70, 24, 0, "StyleData", "Input", "All", CounterIncrements->"Input"], Cell[21147, 667, 94, 2, 70, 40, 0, "StyleData", "Input", "Presentation"], Cell[21244, 671, 98, 2, 70, 36, 0, "StyleData", "Input", "Printout"] }, Closed]], Cell[CellGroupData[{ Cell[21379, 678, 641, 18, 70, 25, 0, "StyleData", "Output", "All", CounterIncrements->"Output"], Cell[22023, 698, 94, 2, 70, 41, 0, "StyleData", "Output", "Presentation"], Cell[22120, 702, 54, 1, 70, 37, 0, "StyleData", "Output", "Printout"] }, Closed]], Cell[CellGroupData[{ Cell[22211, 708, 713, 20, 70, 26, 0, "StyleData", "Message", "All", CounterIncrements->"Message", StyleMenuListing->None], Cell[22927, 730, 96, 2, 70, 42, 0, "StyleData", "Message", "Presentation"], Cell[23026, 734, 53, 1, 70, 38, 0, "StyleData", "Message", "Printout"] }, Closed]], Cell[CellGroupData[{ Cell[23116, 740, 615, 17, 70, 24, 0, "StyleData", "Print", "All", CounterIncrements->"Print", StyleMenuListing->None], Cell[23734, 759, 94, 2, 70, 40, 0, "StyleData", "Print", "Presentation"], Cell[23831, 763, 53, 1, 70, 36, 0, "StyleData", "Print", "Printout"] }, Closed]], Cell[CellGroupData[{ Cell[23921, 769, 434, 13, 70, 27, 0, "StyleData", "Graphics", "All", CounterIncrements->"Graphics", StyleMenuListing->None], Cell[24358, 784, 97, 2, 70, 43, 0, "StyleData", "Graphics", "Presentation"], Cell[24458, 788, 54, 1, 70, 39, 0, "StyleData", "Graphics", "Printout"] }, Closed]], Cell[CellGroupData[{ Cell[24549, 794, 176, 5, 70, 28, 0, "StyleData", "CellLabel", "All", StyleMenuListing->None], Cell[24728, 801, 60, 1, 70, 44, 0, "StyleData", "CellLabel", "Presentation"], Cell[24791, 804, 82, 2, 70, 40, 0, "StyleData", "CellLabel", "Printout"] }, Closed]] }, Closed]], Cell[CellGroupData[{ Cell[24922, 812, 35, 0, 66, "Section"], Cell[24960, 814, 184, 4, 50, "Text"], Cell[CellGroupData[{ Cell[25169, 822, 302, 8, 38, 28, 0, "StyleData", "Hyperlink", "All", StyleMenuListing->None, ButtonStyleMenuListing->Automatic], Cell[25474, 832, 60, 1, 40, 44, 0, "StyleData", "Hyperlink", "Presentation"], Cell[25537, 835, 57, 1, 35, 41, 0, "StyleData", "Hyperlink", "Condensed"], Cell[25597, 838, 41, 0, 38, 41, 0, "StyleData", "Hyperlink", "SlideShow"], Cell[25641, 840, 123, 3, 35, 40, 0, "StyleData", "Hyperlink", "Printout"] }, Closed]], Cell[25779, 846, 104, 3, 29, "Text"], Cell[CellGroupData[{ Cell[25908, 853, 293, 7, 38, 31, 0, "StyleData", "MainBookLink", "All", StyleMenuListing->None, ButtonStyleMenuListing->Automatic], Cell[26204, 862, 63, 1, 40, 47, 0, "StyleData", "MainBookLink", \ "Presentation"], Cell[26270, 865, 60, 1, 35, 44, 0, "StyleData", "MainBookLink", "Condensed"], Cell[26333, 868, 44, 0, 38, 44, 0, "StyleData", "MainBookLink", "SlideShow"], Cell[26380, 870, 126, 3, 35, 43, 0, "StyleData", "MainBookLink", "Printout"] }, Closed]], Cell[CellGroupData[{ Cell[26543, 878, 314, 8, 37, 29, 0, "StyleData", "AddOnsLink", "All", StyleMenuListing->None, ButtonStyleMenuListing->Automatic], Cell[26860, 888, 61, 1, 40, 45, 0, "StyleData", "AddOnsLink", \ "Presentation"], Cell[26924, 891, 58, 1, 35, 42, 0, "StyleData", "AddOnsLink", "Condensed"], Cell[26985, 894, 42, 0, 37, 42, 0, "StyleData", "AddOnsLink", "SlideShow"], Cell[27030, 896, 124, 3, 35, 41, 0, "StyleData", "AddOnsLink", "Printout"] }, Closed]], Cell[CellGroupData[{ Cell[27191, 904, 318, 8, 37, 31, 0, "StyleData", "RefGuideLink", "All", StyleMenuListing->None, ButtonStyleMenuListing->Automatic], Cell[27512, 914, 63, 1, 40, 47, 0, "StyleData", "RefGuideLink", \ "Presentation"], Cell[27578, 917, 60, 1, 35, 44, 0, "StyleData", "RefGuideLink", "Condensed"], Cell[27641, 920, 44, 0, 37, 44, 0, "StyleData", "RefGuideLink", "SlideShow"], Cell[27688, 922, 126, 3, 35, 43, 0, "StyleData", "RefGuideLink", "Printout"] }, Closed]], Cell[CellGroupData[{ Cell[27851, 930, 297, 7, 38, 35, 0, "StyleData", "RefGuideLinkText", "All", StyleMenuListing->None, ButtonStyleMenuListing->Automatic], Cell[28151, 939, 67, 1, 40, 51, 0, "StyleData", "RefGuideLinkText", \ "Presentation"], Cell[28221, 942, 64, 1, 35, 48, 0, "StyleData", "RefGuideLinkText", \ "Condensed"], Cell[28288, 945, 48, 0, 38, 48, 0, "StyleData", "RefGuideLinkText", \ "SlideShow"], Cell[28339, 947, 130, 3, 35, 47, 0, "StyleData", "RefGuideLinkText", \ "Printout"] }, Closed]], Cell[CellGroupData[{ Cell[28506, 955, 305, 7, 38, 37, 0, "StyleData", "GettingStartedLink", "All", StyleMenuListing->None, ButtonStyleMenuListing->Automatic], Cell[28814, 964, 69, 1, 40, 53, 0, "StyleData", "GettingStartedLink", \ "Presentation"], Cell[28886, 967, 66, 1, 35, 50, 0, "StyleData", "GettingStartedLink", \ "Condensed"], Cell[28955, 970, 50, 0, 38, 50, 0, "StyleData", "GettingStartedLink", \ "SlideShow"], Cell[29008, 972, 132, 3, 35, 49, 0, "StyleData", "GettingStartedLink", \ "Printout"] }, Closed]], Cell[CellGroupData[{ Cell[29177, 980, 287, 7, 38, 28, 0, "StyleData", "DemosLink", "All", StyleMenuListing->None, ButtonStyleMenuListing->Automatic], Cell[29467, 989, 41, 0, 38, 41, 0, "StyleData", "DemosLink", "SlideShow"], Cell[29511, 991, 107, 2, 38, 40, 0, "StyleData", "DemosLink", "Printout"] }, Closed]], Cell[CellGroupData[{ Cell[29655, 998, 285, 7, 38, 27, 0, "StyleData", "TourLink", "All", StyleMenuListing->None, ButtonStyleMenuListing->Automatic], Cell[29943, 1007, 40, 0, 38, 40, 0, "StyleData", "TourLink", "SlideShow"], Cell[29986, 1009, 106, 2, 38, 39, 0, "StyleData", "TourLink", "Printout"] }, Closed]], Cell[CellGroupData[{ Cell[30129, 1016, 309, 7, 38, 39, 0, "StyleData", "OtherInformationLink", \ "All", StyleMenuListing->None, ButtonStyleMenuListing->Automatic], Cell[30441, 1025, 71, 1, 40, 55, 0, "StyleData", "OtherInformationLink", \ "Presentation"], Cell[30515, 1028, 68, 1, 35, 52, 0, "StyleData", "OtherInformationLink", \ "Condensed"], Cell[30586, 1031, 52, 0, 38, 52, 0, "StyleData", "OtherInformationLink", \ "SlideShow"], Cell[30641, 1033, 134, 3, 35, 51, 0, "StyleData", "OtherInformationLink", \ "Printout"] }, Closed]], Cell[CellGroupData[{ Cell[30812, 1041, 299, 7, 38, 34, 0, "StyleData", "MasterIndexLink", "All", StyleMenuListing->None, ButtonStyleMenuListing->Automatic], Cell[31114, 1050, 47, 0, 38, 47, 0, "StyleData", "MasterIndexLink", \ "SlideShow"], Cell[31164, 1052, 113, 2, 38, 46, 0, "StyleData", "MasterIndexLink", \ "Printout"] }, Closed]] }, Closed]], Cell[CellGroupData[{ Cell[31326, 1060, 33, 0, 66, "Section"], Cell[31362, 1062, 121, 3, 70, "Text"], Cell[31486, 1067, 226, 5, 70, 24, 0, "StyleData", "Paste", "All", StyleMenuListing->None, ButtonStyleMenuListing->Automatic], Cell[31715, 1074, 304, 7, 70, 27, 0, "StyleData", "Evaluate", "All", StyleMenuListing->None, ButtonStyleMenuListing->Automatic], Cell[32022, 1083, 400, 9, 70, 31, 0, "StyleData", "EvaluateCell", "All", StyleMenuListing->None, ButtonStyleMenuListing->Automatic], Cell[32425, 1094, 387, 9, 70, 31, 0, "StyleData", "CopyEvaluate", "All", StyleMenuListing->None, ButtonStyleMenuListing->Automatic], Cell[32815, 1105, 401, 9, 70, 35, 0, "StyleData", "CopyEvaluateCell", "All", StyleMenuListing->None, ButtonStyleMenuListing->Automatic] }, Closed]], Cell[CellGroupData[{ Cell[33253, 1119, 36, 0, 66, "Section"], Cell[CellGroupData[{ Cell[33314, 1123, 709, 21, 70, 41, 0, "StyleData", "SlideShowNavigationBar", \ "All", CounterIncrements->"SlideShowNavigationBar", StyleMenuListing->None], Cell[34026, 1146, 57, 0, 70, 57, 0, "StyleData", "SlideShowNavigationBar", \ "Presentation"], Cell[34086, 1148, 199, 5, 70, 54, 0, "StyleData", "SlideShowNavigationBar", \ "SlideShow"], Cell[34288, 1155, 126, 3, 70, 53, 0, "StyleData", "SlideShowNavigationBar", \ "Printout"] }, Closed]], Cell[CellGroupData[{ Cell[34451, 1163, 1681, 40, 70, 35, 0, "StyleData", "SlideShowSection", "All", CounterIncrements->"Section", CounterAssignments->{{"Subsection", 0}, {"Subsubsection", 0}}, StyleMenuListing->None], Cell[36135, 1205, 109, 2, 70, 51, 0, "StyleData", "SlideShowSection", \ "Presentation"], Cell[36247, 1209, 98, 2, 70, 48, 0, "StyleData", "SlideShowSection", \ "SlideShow"], Cell[36348, 1213, 122, 3, 70, 47, 0, "StyleData", "SlideShowSection", \ "Printout"] }, Closed]], Cell[CellGroupData[{ Cell[36507, 1221, 327, 10, 70, 33, 0, "StyleData", "SlideHyperlink", "All", StyleMenuListing->None, ButtonStyleMenuListing->Automatic], Cell[36837, 1233, 101, 2, 70, 49, 0, "StyleData", "SlideHyperlink", \ "Presentation"], Cell[36941, 1237, 46, 0, 70, 46, 0, "StyleData", "SlideHyperlink", \ "SlideShow"], Cell[36990, 1239, 128, 3, 70, 45, 0, "StyleData", "SlideHyperlink", \ "Printout"] }, Closed]], Cell[CellGroupData[{ Cell[37155, 1247, 341, 9, 70, 31, 0, "StyleData", "SlideTOCLink", "All", StyleMenuListing->None, ButtonStyleMenuListing->Automatic], Cell[37499, 1258, 98, 2, 70, 47, 0, "StyleData", "SlideTOCLink", \ "Presentation"], Cell[37600, 1262, 44, 0, 70, 44, 0, "StyleData", "SlideTOCLink", \ "SlideShow"], Cell[37647, 1264, 110, 2, 70, 43, 0, "StyleData", "SlideTOCLink", "Printout"] }, Closed]], Cell[CellGroupData[{ Cell[37794, 1271, 166, 4, 70, 27, 0, "StyleData", "SlideTOC", "All", StyleMenuListing->None], Cell[37963, 1277, 95, 2, 70, 43, 0, "StyleData", "SlideTOC", "Presentation"], Cell[38061, 1281, 56, 1, 70, 40, 0, "StyleData", "SlideTOC", "SlideShow"], Cell[38120, 1284, 82, 2, 70, 39, 0, "StyleData", "SlideTOC", "Printout"] }, Closed]] }, Closed]], Cell[CellGroupData[{ Cell[38251, 1292, 49, 0, 66, "Section"], Cell[38303, 1294, 225, 4, 70, "Text"], Cell[CellGroupData[{ Cell[38553, 1302, 386, 8, 70, 35, 0, "StyleData", "NumberedEquation", "All", CounterIncrements->"NumberedEquation"], Cell[38942, 1312, 104, 2, 70, 51, 0, "StyleData", "NumberedEquation", \ "Presentation"], Cell[39049, 1316, 63, 1, 70, 47, 0, "StyleData", "NumberedEquation", \ "Printout"] }, Closed]], Cell[CellGroupData[{ Cell[39149, 1322, 303, 7, 70, 33, 0, "StyleData", "NumberedFigure", "All", CounterIncrements->"NumberedFigure"], Cell[39455, 1331, 103, 2, 70, 49, 0, "StyleData", "NumberedFigure", \ "Presentation"], Cell[39561, 1335, 61, 1, 70, 45, 0, "StyleData", "NumberedFigure", \ "Printout"] }, Closed]], Cell[CellGroupData[{ Cell[39659, 1341, 291, 7, 70, 32, 0, "StyleData", "NumberedTable", "All", CounterIncrements->"NumberedTable"], Cell[39953, 1350, 102, 2, 70, 48, 0, "StyleData", "NumberedTable", \ "Presentation"], Cell[40058, 1354, 60, 1, 70, 44, 0, "StyleData", "NumberedTable", "Printout"] }, Closed]] }, Closed]], Cell[CellGroupData[{ Cell[40167, 1361, 43, 0, 66, "Section"], Cell[CellGroupData[{ Cell[40235, 1365, 397, 9, 70, 33, 0, "StyleData", "DisplayFormula", "All"], Cell[40635, 1376, 102, 2, 70, 49, 0, "StyleData", "DisplayFormula", \ "Presentation"], Cell[40740, 1380, 61, 1, 70, 45, 0, "StyleData", "DisplayFormula", \ "Printout"] }, Closed]], Cell[CellGroupData[{ Cell[40838, 1386, 398, 10, 70, 34, 0, "StyleData", "ChemicalFormula", "All"], Cell[41239, 1398, 103, 2, 70, 50, 0, "StyleData", "ChemicalFormula", \ "Presentation"], Cell[41345, 1402, 62, 1, 70, 46, 0, "StyleData", "ChemicalFormula", \ "Printout"] }, Closed]], Cell[CellGroupData[{ Cell[41444, 1408, 147, 4, 70, 26, 0, "StyleData", "Program", "All"], Cell[41594, 1414, 93, 2, 70, 42, 0, "StyleData", "Program", "Presentation"], Cell[41690, 1418, 55, 1, 70, 38, 0, "StyleData", "Program", "Printout"] }, Closed]] }, Closed]], Cell[CellGroupData[{ Cell[41794, 1425, 32, 0, 66, "Section"], Cell[41829, 1427, 117, 3, 46, "Text"], Cell[CellGroupData[{ Cell[41971, 1434, 457, 12, 53, 26, 0, "StyleData", "Theorem", "All", CounterIncrements->"FormalNumbering", CounterAssignments->{{"Corollary", 0}}], Cell[42431, 1448, 96, 2, 72, 42, 0, "StyleData", "Theorem", "Presentation"], Cell[42530, 1452, 54, 1, 51, 38, 0, "StyleData", "Theorem", "Printout"] }, Closed]], Cell[CellGroupData[{ Cell[42621, 1458, 493, 12, 42, 28, 0, "StyleData", "Corollary", "All", CounterIncrements->"Corollary", CounterAssignments->{{"FormalItem", 0}}], Cell[43117, 1472, 98, 2, 72, 44, 0, "StyleData", "Corollary", \ "Presentation"], Cell[43218, 1476, 56, 1, 51, 40, 0, "StyleData", "Corollary", "Printout"] }, Closed]], Cell[CellGroupData[{ Cell[43311, 1482, 454, 12, 42, 24, 0, "StyleData", "Lemma", "All", CounterIncrements->"FormalNumbering", CounterAssignments->{{"FormalItem", 0}}], Cell[43768, 1496, 94, 2, 72, 40, 0, "StyleData", "Lemma", "Presentation"], Cell[43865, 1500, 52, 1, 51, 36, 0, "StyleData", "Lemma", "Printout"] }, Closed]], Cell[CellGroupData[{ Cell[43954, 1506, 401, 10, 42, 29, 0, "StyleData", "Definition", "All", CounterIncrements->"FormalNumbering"], Cell[44358, 1518, 99, 2, 72, 45, 0, "StyleData", "Definition", \ "Presentation"], Cell[44460, 1522, 57, 1, 51, 41, 0, "StyleData", "Definition", "Printout"] }, Closed]], Cell[CellGroupData[{ Cell[44554, 1528, 403, 10, 42, 30, 0, "StyleData", "Definitions", "All", CounterIncrements->"FormalNumbering"], Cell[44960, 1540, 100, 2, 72, 46, 0, "StyleData", "Definitions", \ "Presentation"], Cell[45063, 1544, 58, 1, 51, 42, 0, "StyleData", "Definitions", "Printout"] }, Closed]], Cell[CellGroupData[{ Cell[45158, 1550, 298, 8, 48, 34, 0, "StyleData", "FormalStatement", "All", CounterAssignments->{{"FormalItem", 0}}], Cell[45459, 1560, 101, 2, 67, 50, 0, "StyleData", "FormalStatement", \ "Presentation"], Cell[45563, 1564, 108, 3, 53, 46, 0, "StyleData", "FormalStatement", \ "Printout"] }, Closed]], Cell[CellGroupData[{ Cell[45708, 1572, 318, 8, 48, 24, 0, "StyleData", "Proof", "All", CounterAssignments->{{"CountedItem", 0}}], Cell[46029, 1582, 101, 2, 67, 50, 0, "StyleData", "FormalStatement", \ "Presentation"], Cell[46133, 1586, 108, 3, 53, 46, 0, "StyleData", "FormalStatement", \ "Printout"] }, Closed]], Cell[CellGroupData[{ Cell[46278, 1594, 496, 13, 48, 29, 0, "StyleData", "FormalItem", "All", CounterIncrements->"FormalItem"], Cell[46777, 1609, 96, 2, 67, 45, 0, "StyleData", "FormalItem", \ "Presentation"], Cell[46876, 1613, 103, 3, 53, 41, 0, "StyleData", "FormalItem", "Printout"] }, Closed]], Cell[46994, 1619, 79, 2, 45, 35, 0, "StyleData", "InlineDefinition", "All"], Cell[CellGroupData[{ Cell[47098, 1625, 411, 11, 53, 30, 0, "StyleData", "CountedItem", "All", CounterIncrements->"CountedItem"], Cell[47512, 1638, 97, 2, 63, 46, 0, "StyleData", "CountedItem", \ "Presentation"], Cell[47612, 1642, 104, 3, 51, 42, 0, "StyleData", "CountedItem", "Printout"] }, Closed]] }, Open ]] }, Open ]] } ] *) (******************************************************************* End of Mathematica Notebook file. *******************************************************************)