(************** 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[ 41619, 1477]*) (*NotebookOutlinePosition[ 42299, 1500]*) (* CellTagsIndexPosition[ 42255, 1496]*) (*WindowFrame->Normal*) Notebook[{ Cell[CellGroupData[{ Cell["Style Definitions for ParkStyle", "Subtitle"], Cell["\<\ This style sheet has the following features. 1) There is an extra level of title cells called Chaptertitle. 2) There is an extra level of grouping called Subexercise 3) The Section, Subsection, Subsubsection and Subexercise cells all have \ open/colse icons. 4) The text font size is commensurate with the Input and Output font sizes.\ \>", "Text"], 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.\ \>", "Text"], Cell["Thistle background is RGBColor[0.847105, 0.749004, 0.847105]", "Text"], Cell["SmallText change to regular size with a frame.", "Text"], Cell[CellGroupData[{ Cell["Style Environment Names", "Section"], Cell[StyleData[All, "Working"], PageWidth->WindowWidth, CellLabelMargins->{{12, Inherited}, {Inherited, Inherited}}, ScriptMinSize->9, Background->RGBColor[0.992203, 0.9608, 0.902007]], Cell[StyleData[All, "Presentation"], PageWidth->WindowWidth, CellLabelMargins->{{24, Inherited}, {Inherited, Inherited}}, ScriptMinSize->12], Cell[StyleData[All, "Condensed"], PageWidth->WindowWidth, CellLabelMargins->{{8, Inherited}, {Inherited, Inherited}}, ScriptMinSize->8], Cell[StyleData[All, "Printout"], PageWidth->PaperWidth, CellLabelMargins->{{2, Inherited}, {Inherited, Inherited}}, ScriptMinSize->5, 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["Should this name be \"Notebook\" or \"TextStudy\"?", "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["\<\ The Chaptertitle heading is put lower down in the style definition notebook \ so that it won't take up the use of an Alt key.\ \>", "Text"], Cell[CellGroupData[{ Cell[StyleData["Title"], ShowCellBracket->False, CellMargins->{{12, Inherited}, {0, 5}}, CellGroupingRules->{"TitleGrouping", 0}, PageBreakBelow->False, DefaultNewInlineCellStyle->"None", InputAutoReplacements->{"TeX"->StyleBox[ RowBox[ {"T", AdjustmentBox[ "E", BoxMargins -> {{-0.075, -0.085}, {0, 0}}, BoxBaselineShift -> 0.5], "X"}]], "LaTeX"->StyleBox[ RowBox[ {"L", StyleBox[ AdjustmentBox[ "A", BoxMargins -> {{-0.36, -0.1}, {0, -0}}, BoxBaselineShift -> -0.2], FontSize -> Smaller], "T", AdjustmentBox[ "E", BoxMargins -> {{-0.075, -0.085}, {0, 0}}, BoxBaselineShift -> 0.5], "X"}]], "mma"->"Mathematica", "Mma"->"Mathematica", "MMA"->"Mathematica"}, LineSpacing->{1, 11}, LanguageCategory->"NaturalLanguage", CounterIncrements->"Title", CounterAssignments->{{"Section", 0}, {"Equation", 0}, {"Figure", 0}, { "Subtitle", 0}, {"Subsubtitle", 0}}, FontFamily->"Helvetica", FontSize->36, FontWeight->"Bold", FontColor->GrayLevel[0], Background->RGBColor[0.737255, 0.894118, 0.807843]], Cell[StyleData["Title", "Presentation"], CellMargins->{{24, 10}, {20, 40}}, LineSpacing->{1, 0}, FontSize->44], Cell[StyleData["Title", "Condensed"], CellMargins->{{8, 10}, {4, 8}}, FontSize->20], Cell[StyleData["Title", "Printout"], CellMargins->{{2, 10}, {12, 30}}, FontSize->24, FontColor->GrayLevel[0], Background->GrayLevel[1]] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["Subtitle"], ShowCellBracket->False, CellMargins->{{12, Inherited}, {0, 0}}, CellGroupingRules->{"TitleGrouping", 10}, PageBreakBelow->False, DefaultNewInlineCellStyle->"None", InputAutoReplacements->{"TeX"->StyleBox[ RowBox[ {"T", AdjustmentBox[ "E", BoxMargins -> {{-0.075, -0.085}, {0, 0}}, BoxBaselineShift -> 0.5], "X"}]], "LaTeX"->StyleBox[ RowBox[ {"L", StyleBox[ AdjustmentBox[ "A", BoxMargins -> {{-0.36, -0.1}, {0, -0}}, BoxBaselineShift -> -0.2], FontSize -> Smaller], "T", AdjustmentBox[ "E", BoxMargins -> {{-0.075, -0.085}, {0, 0}}, BoxBaselineShift -> 0.5], "X"}]], "mma"->"Mathematica", "Mma"->"Mathematica", "MMA"->"Mathematica"}, LanguageCategory->"NaturalLanguage", CounterIncrements->"Subtitle", CounterAssignments->{{"Section", 0}, {"Equation", 0}, {"Figure", 0}, { "Subsubtitle", 0}}, FontFamily->"Helvetica", FontSize->24, Background->RGBColor[0.815686, 0.901961, 0.92549]], Cell[StyleData["Subtitle", "Presentation"], CellMargins->{{24, 10}, {20, 20}}, LineSpacing->{1, 0}, FontSize->36], Cell[StyleData["Subtitle", "Condensed"], CellMargins->{{8, 10}, {4, 4}}, FontSize->14], Cell[StyleData["Subtitle", "Printout"], CellMargins->{{2, 10}, {12, 8}}, FontSize->18, Background->GrayLevel[1]] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["Subsubtitle"], ShowCellBracket->False, CellMargins->{{12, Inherited}, {20, 5}}, CellGroupingRules->{"TitleGrouping", 20}, PageBreakBelow->False, DefaultNewInlineCellStyle->"None", InputAutoReplacements->{"TeX"->StyleBox[ RowBox[ {"T", AdjustmentBox[ "E", BoxMargins -> {{-0.075, -0.085}, {0, 0}}, BoxBaselineShift -> 0.5], "X"}]], "LaTeX"->StyleBox[ RowBox[ {"L", StyleBox[ AdjustmentBox[ "A", BoxMargins -> {{-0.36, -0.1}, {0, -0}}, BoxBaselineShift -> -0.2], FontSize -> Smaller], "T", AdjustmentBox[ "E", BoxMargins -> {{-0.075, -0.085}, {0, 0}}, BoxBaselineShift -> 0.5], "X"}]], "mma"->"Mathematica", "Mma"->"Mathematica", "MMA"->"Mathematica"}, LanguageCategory->"NaturalLanguage", CounterIncrements->"Subsubtitle", CounterAssignments->{{"Section", 0}, {"Equation", 0}, {"Figure", 0}}, FontFamily->"Helvetica", FontSize->14, FontWeight->"Bold", FontSlant->"Plain"], Cell[StyleData["Subsubtitle", "Presentation"], CellMargins->{{24, 10}, {20, 20}}, LineSpacing->{1, 0}, FontSize->24], Cell[StyleData["Subsubtitle", "Condensed"], CellMargins->{{8, 10}, {8, 8}}, FontSize->12], Cell[StyleData["Subsubtitle", "Printout"], CellMargins->{{2, 10}, {12, 8}}, FontSize->14] }, Open ]], Cell[CellGroupData[{ Cell[StyleData["Section"], CellDingbat->None, ShowGroupOpenCloseIcon->True, CellMargins->{{25, Inherited}, {8, 24}}, CellGroupingRules->{"SectionGrouping", 30}, PageBreakBelow->False, DefaultNewInlineCellStyle->"None", InputAutoReplacements->{"TeX"->StyleBox[ RowBox[ {"T", AdjustmentBox[ "E", BoxMargins -> {{-0.075, -0.085}, {0, 0}}, BoxBaselineShift -> 0.5], "X"}]], "LaTeX"->StyleBox[ RowBox[ {"L", StyleBox[ AdjustmentBox[ "A", BoxMargins -> {{-0.36, -0.1}, {0, -0}}, BoxBaselineShift -> -0.2], FontSize -> Smaller], "T", AdjustmentBox[ "E", BoxMargins -> {{-0.075, -0.085}, {0, 0}}, BoxBaselineShift -> 0.5], "X"}]], "mma"->"Mathematica", "Mma"->"Mathematica", "MMA"->"Mathematica"}, LineSpacing->{1, 7}, LanguageCategory->"NaturalLanguage", CounterIncrements->"Section", CounterAssignments->{{"Subsection", 0}, {"Subsubsection", 0}}, FontFamily->"Helvetica", FontSize->18, FontWeight->"Bold"], Cell[StyleData["Section", "Presentation"], CellMargins->{{40, 10}, {11, 32}}, LineSpacing->{1, 0}, FontSize->24], Cell[StyleData["Section", "Condensed"], CellMargins->{{18, Inherited}, {6, 12}}, FontSize->12], Cell[StyleData["Section", "Printout"], CellMargins->{{13, 0}, {7, 22}}, FontSize->14] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["Subsection"], CellDingbat->"\[FilledSmallSquare]", ShowGroupOpenCloseIcon->True, CellMargins->{{22, Inherited}, {8, 20}}, CellGroupingRules->{"SectionGrouping", 40}, PageBreakBelow->False, DefaultNewInlineCellStyle->"None", InputAutoReplacements->{"TeX"->StyleBox[ RowBox[ {"T", AdjustmentBox[ "E", BoxMargins -> {{-0.075, -0.085}, {0, 0}}, BoxBaselineShift -> 0.5], "X"}]], "LaTeX"->StyleBox[ RowBox[ {"L", StyleBox[ AdjustmentBox[ "A", BoxMargins -> {{-0.36, -0.1}, {0, -0}}, BoxBaselineShift -> -0.2], FontSize -> Smaller], "T", AdjustmentBox[ "E", BoxMargins -> {{-0.075, -0.085}, {0, 0}}, BoxBaselineShift -> 0.5], "X"}]], "mma"->"Mathematica", "Mma"->"Mathematica", "MMA"->"Mathematica"}, LanguageCategory->"NaturalLanguage", CounterIncrements->"Subsection", CounterAssignments->{{"Subsubsection", 0}}, FontFamily->"Times", FontSize->17, FontWeight->"Bold"], Cell[StyleData["Subsection", "Presentation"], CellMargins->{{36, 10}, {11, 32}}, LineSpacing->{1, 0}, FontSize->22], Cell[StyleData["Subsection", "Condensed"], CellMargins->{{16, Inherited}, {6, 12}}, FontSize->12], Cell[StyleData["Subsection", "Printout"], CellMargins->{{9, 0}, {7, 22}}, FontSize->12] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["Subsubsection"], CellDingbat->"\[GrayCircle]", ShowCellBracket->True, ShowGroupOpenCloseIcon->True, CellMargins->{{22, Inherited}, {8, 18}}, CellGroupingRules->{"SectionGrouping", 50}, PageBreakBelow->False, DefaultNewInlineCellStyle->"None", InputAutoReplacements->{"TeX"->StyleBox[ RowBox[ {"T", AdjustmentBox[ "E", BoxMargins -> {{-0.075, -0.085}, {0, 0}}, BoxBaselineShift -> 0.5], "X"}]], "LaTeX"->StyleBox[ RowBox[ {"L", StyleBox[ AdjustmentBox[ "A", BoxMargins -> {{-0.36, -0.1}, {0, -0}}, BoxBaselineShift -> -0.2], FontSize -> Smaller], "T", AdjustmentBox[ "E", BoxMargins -> {{-0.075, -0.085}, {0, 0}}, BoxBaselineShift -> 0.5], "X"}]], "mma"->"Mathematica", "Mma"->"Mathematica", "MMA"->"Mathematica"}, LanguageCategory->"NaturalLanguage", CounterIncrements->"Subsubsection", FontFamily->"Times", FontSize->15, FontWeight->"Bold"], Cell[StyleData["Subsubsection", "Presentation"], CellMargins->{{34, 10}, {11, 26}}, LineSpacing->{1, 0}, FontSize->18], Cell[StyleData["Subsubsection", "Condensed"], CellMargins->{{17, Inherited}, {6, 12}}, FontSize->10], Cell[StyleData["Subsubsection", "Printout"], CellMargins->{{9, 0}, {7, 14}}, FontSize->11] }, Closed]] }, Closed]], Cell[CellGroupData[{ Cell["Styles for Body Text", "Section"], Cell[CellGroupData[{ Cell[StyleData["Text"], CellMargins->{{12, 10}, {7, 7}}, InputAutoReplacements->{"TeX"->StyleBox[ RowBox[ {"T", AdjustmentBox[ "E", BoxMargins -> {{-0.075, -0.085}, {0, 0}}, BoxBaselineShift -> 0.5], "X"}]], "LaTeX"->StyleBox[ RowBox[ {"L", StyleBox[ AdjustmentBox[ "A", BoxMargins -> {{-0.36, -0.1}, {0, -0}}, BoxBaselineShift -> -0.2], FontSize -> Smaller], "T", AdjustmentBox[ "E", BoxMargins -> {{-0.075, -0.085}, {0, 0}}, BoxBaselineShift -> 0.5], "X"}]], "mma"->"Mathematica", "Mma"->"Mathematica", "MMA"->"Mathematica"}, Hyphenation->True, LineSpacing->{1, 3}, CounterIncrements->"Text", FontSize->14], Cell[StyleData["Text", "Presentation"], CellMargins->{{24, 10}, {10, 10}}, LineSpacing->{1, 5}, FontSize->16], Cell[StyleData["Text", "Condensed"], CellMargins->{{8, 10}, {6, 6}}, LineSpacing->{1, 1}, FontSize->11], Cell[StyleData["Text", "Printout"], CellMargins->{{2, 2}, {6, 6}}, TextJustification->0.5, FontSize->10] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["EmphasisText"], CellFrame->True, CellMargins->{{12, 10}, {6, 6}}, DefaultNewInlineCellStyle->"None", Hyphenation->True, LineSpacing->{1, 3}, LanguageCategory->"NaturalLanguage", CounterIncrements->"SmallText", FontFamily->"Helvetica", FontSize->14], Cell[StyleData["EmphasisText", "Presentation"], CellMargins->{{24, 10}, {8, 8}}, LineSpacing->{1, 5}, FontSize->12], Cell[StyleData["EmphasisText", "Condensed"], CellMargins->{{8, 10}, {5, 5}}, LineSpacing->{1, 2}, FontSize->9], Cell[StyleData["EmphasisText", "Printout"], CellMargins->{{2, 2}, {5, 5}}, TextJustification->0.5, FontSize->7] }, Closed]] }, Closed]], Cell[CellGroupData[{ Cell["Subexercise - Placed here for desired menu order", "Section"], Cell[CellGroupData[{ Cell[StyleData["Subexercise"], CellDingbat->None, ShowCellBracket->True, ShowGroupOpenCloseIcon->True, CellMargins->{{22, Inherited}, {8, 18}}, CellGroupingRules->{"SectionGrouping", 60}, PageBreakBelow->False, DefaultNewInlineCellStyle->"None", InputAutoReplacements->{"TeX"->StyleBox[ RowBox[ {"T", AdjustmentBox[ "E", BoxMargins -> {{-0.075, -0.085}, {0, 0}}, BoxBaselineShift -> 0.5], "X"}]], "LaTeX"->StyleBox[ RowBox[ {"L", StyleBox[ AdjustmentBox[ "A", BoxMargins -> {{-0.36, -0.1}, {0, -0}}, BoxBaselineShift -> -0.2], FontSize -> Smaller], "T", AdjustmentBox[ "E", BoxMargins -> {{-0.075, -0.085}, {0, 0}}, BoxBaselineShift -> 0.5], "X"}]], "mma"->"Mathematica", "Mma"->"Mathematica", "MMA"->"Mathematica"}, LanguageCategory->"NaturalLanguage", CounterIncrements->"Subsubsection", FontFamily->"Times", FontSize->13, FontWeight->"Bold"], Cell[StyleData["Subexercise", "Presentation"], CellMargins->{{34, 10}, {11, 26}}, LineSpacing->{1, 0}, FontSize->18], Cell[StyleData["Subexercise", "Condensed"], CellMargins->{{17, Inherited}, {6, 12}}, FontSize->10], Cell[StyleData["Subexercise", "Printout"], CellMargins->{{9, 0}, {7, 14}}, FontSize->11] }, Open ]] }, 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. \ Some attributes for these styles are actually set in FormatType Styles (in \ the last section of this stylesheet). \ \>", "Text"], Cell[CellGroupData[{ Cell[StyleData["Input"], CellMargins->{{45, 10}, {5, 7}}, Evaluatable->True, CellGroupingRules->"InputGrouping", CellHorizontalScrolling->True, PageBreakWithin->False, GroupPageBreakWithin->False, DefaultFormatType->DefaultInputFormatType, HyphenationOptions->{"HyphenationCharacter"->"\[Continuation]"}, AutoItalicWords->{}, LanguageCategory->"Formula", FormatType->InputForm, ShowStringCharacters->True, NumberMarks->True, LinebreakAdjustments->{0.85, 2, 10, 0, 1}, CounterIncrements->"Input", FontSize->13, FontWeight->"Bold", Background->RGBColor[0.976471, 0.909804, 0.815686]], Cell[StyleData["Input", "Presentation"], CellMargins->{{72, Inherited}, {8, 10}}, LineSpacing->{1, 0}, FontSize->16], Cell[StyleData["Input", "Condensed"], CellMargins->{{40, 10}, {2, 3}}, FontSize->11], Cell[StyleData["Input", "Printout"], CellMargins->{{39, 0}, {4, 6}}, LinebreakAdjustments->{0.85, 2, 10, 1, 1}, FontSize->9, Background->GrayLevel[1]] }, Open ]], Cell[StyleData["InputOnly"], Evaluatable->True, CellGroupingRules->"InputGrouping", CellHorizontalScrolling->True, DefaultFormatType->DefaultInputFormatType, HyphenationOptions->{"HyphenationCharacter"->"\[Continuation]"}, AutoItalicWords->{}, LanguageCategory->"Formula", FormatType->InputForm, ShowStringCharacters->True, NumberMarks->True, LinebreakAdjustments->{0.85, 2, 10, 0, 1}, CounterIncrements->"Input", StyleMenuListing->None, FontWeight->"Bold"], Cell[CellGroupData[{ Cell[StyleData["Output"], CellMargins->{{47, 10}, {7, 5}}, CellEditDuplicate->True, CellGroupingRules->"OutputGrouping", CellHorizontalScrolling->True, PageBreakWithin->False, GroupPageBreakWithin->False, GeneratedCell->True, CellAutoOverwrite->True, DefaultFormatType->DefaultOutputFormatType, HyphenationOptions->{"HyphenationCharacter"->"\[Continuation]"}, AutoItalicWords->{}, LanguageCategory->"Formula", FormatType->InputForm, CounterIncrements->"Output", FontSize->13, FontWeight->"Bold"], Cell[StyleData["Output", "Presentation"], CellMargins->{{72, Inherited}, {10, 8}}, LineSpacing->{1, 0}, FontSize->16], Cell[StyleData["Output", "Condensed"], CellMargins->{{41, Inherited}, {3, 2}}, FontSize->11], Cell[StyleData["Output", "Printout"], CellMargins->{{39, 0}, {6, 4}}, FontSize->9] }, Open ]], Cell[CellGroupData[{ Cell[StyleData["Message"], CellMargins->{{45, Inherited}, {Inherited, Inherited}}, CellGroupingRules->"OutputGrouping", PageBreakWithin->False, GroupPageBreakWithin->False, GeneratedCell->True, CellAutoOverwrite->True, ShowCellLabel->False, DefaultFormatType->DefaultOutputFormatType, HyphenationOptions->{"HyphenationCharacter"->"\[Continuation]"}, AutoItalicWords->{}, FormatType->InputForm, CounterIncrements->"Message", StyleMenuListing->None, FontSize->11, FontColor->RGBColor[0, 0, 1]], Cell[StyleData["Message", "Presentation"], CellMargins->{{72, Inherited}, {Inherited, Inherited}}, LineSpacing->{1, 0}, FontSize->16], Cell[StyleData["Message", "Condensed"], CellMargins->{{41, Inherited}, {Inherited, Inherited}}, FontSize->11], Cell[StyleData["Message", "Printout"], CellMargins->{{39, Inherited}, {Inherited, Inherited}}, FontSize->7, FontColor->GrayLevel[0]] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["Print"], CellMargins->{{45, Inherited}, {Inherited, Inherited}}, CellGroupingRules->"OutputGrouping", CellHorizontalScrolling->True, PageBreakWithin->False, GroupPageBreakWithin->False, GeneratedCell->True, CellAutoOverwrite->True, ShowCellLabel->False, DefaultFormatType->DefaultOutputFormatType, HyphenationOptions->{"HyphenationCharacter"->"\[Continuation]"}, AutoItalicWords->{}, FormatType->InputForm, CounterIncrements->"Print", StyleMenuListing->None], Cell[StyleData["Print", "Presentation"], CellMargins->{{72, Inherited}, {Inherited, Inherited}}, LineSpacing->{1, 0}, FontSize->16], Cell[StyleData["Print", "Condensed"], CellMargins->{{41, Inherited}, {Inherited, Inherited}}, FontSize->11], Cell[StyleData["Print", "Printout"], CellMargins->{{39, Inherited}, {Inherited, Inherited}}, FontSize->8] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["Graphics"], CellMargins->{{4, Inherited}, {Inherited, Inherited}}, CellGroupingRules->"GraphicsGrouping", CellHorizontalScrolling->True, PageBreakWithin->False, GeneratedCell->True, CellAutoOverwrite->True, ShowCellLabel->False, DefaultFormatType->DefaultOutputFormatType, LanguageCategory->None, FormatType->InputForm, CounterIncrements->"Graphics", ImageMargins->{{43, Inherited}, {Inherited, 0}}, StyleMenuListing->None, FontFamily->"Courier", FontSize->10], Cell[StyleData["Graphics", "Presentation"], ImageMargins->{{62, Inherited}, {Inherited, 0}}], Cell[StyleData["Graphics", "Condensed"], ImageMargins->{{38, Inherited}, {Inherited, 0}}, Magnification->0.6], Cell[StyleData["Graphics", "Printout"], ImageMargins->{{30, Inherited}, {Inherited, 0}}, Magnification->0.8] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["CellLabel"], StyleMenuListing->None, FontFamily->"Helvetica", FontSize->9, FontColor->RGBColor[0, 0, 1]], Cell[StyleData["CellLabel", "Presentation"], FontSize->12], Cell[StyleData["CellLabel", "Condensed"], FontSize->9], Cell[StyleData["CellLabel", "Printout"], FontFamily->"Courier", FontSize->8, FontSlant->"Italic", FontColor->GrayLevel[0]] }, Closed]] }, Closed]], Cell[CellGroupData[{ Cell["Comment Text Styles", "Section"], Cell[CellGroupData[{ Cell[StyleData["BlueComments"], CellMargins->{{12, 10}, {7, 7}}, InputAutoReplacements->{"TeX"->StyleBox[ RowBox[ {"T", AdjustmentBox[ "E", BoxMargins -> {{-0.075, -0.085}, {0, 0}}, BoxBaselineShift -> 0.5], "X"}]], "LaTeX"->StyleBox[ RowBox[ {"L", StyleBox[ AdjustmentBox[ "A", BoxMargins -> {{-0.36, -0.1}, {0, -0}}, BoxBaselineShift -> -0.2], FontSize -> Smaller], "T", AdjustmentBox[ "E", BoxMargins -> {{-0.075, -0.085}, {0, 0}}, BoxBaselineShift -> 0.5], "X"}]], "mma"->"Mathematica", "Mma"->"Mathematica", "MMA"->"Mathematica"}, Hyphenation->True, LineSpacing->{1, 3}, CounterIncrements->"Text", FontSize->14, Background->RGBColor[0.941207, 0.972503, 1]], Cell[StyleData["BlueComments", "Presentation"], CellMargins->{{24, 10}, {10, 10}}, LineSpacing->{1, 5}, FontSize->16], Cell[StyleData["BlueComments", "Condensed"], CellMargins->{{8, 10}, {6, 6}}, LineSpacing->{1, 1}, FontSize->11], Cell[StyleData["BlueComments", "Printout"], CellMargins->{{2, 2}, {6, 6}}, TextJustification->0.5, FontSize->10, Background->GrayLevel[1]] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["PinkComments"], CellMargins->{{12, 10}, {7, 7}}, InputAutoReplacements->{"TeX"->StyleBox[ RowBox[ {"T", AdjustmentBox[ "E", BoxMargins -> {{-0.075, -0.085}, {0, 0}}, BoxBaselineShift -> 0.5], "X"}]], "LaTeX"->StyleBox[ RowBox[ {"L", StyleBox[ AdjustmentBox[ "A", BoxMargins -> {{-0.36, -0.1}, {0, -0}}, BoxBaselineShift -> -0.2], FontSize -> Smaller], "T", AdjustmentBox[ "E", BoxMargins -> {{-0.075, -0.085}, {0, 0}}, BoxBaselineShift -> 0.5], "X"}]], "mma"->"Mathematica", "Mma"->"Mathematica", "MMA"->"Mathematica"}, Hyphenation->True, LineSpacing->{1, 3}, CounterIncrements->"Text", FontSize->14, Background->RGBColor[1, 0.894102, 0.882399]], Cell[StyleData["PinkComments", "Presentation"], CellMargins->{{24, 10}, {10, 10}}, LineSpacing->{1, 5}, FontSize->16], Cell[StyleData["PinkComments", "Condensed"], CellMargins->{{8, 10}, {6, 6}}, LineSpacing->{1, 1}, FontSize->11], Cell[StyleData["PinkComments", "Printout"], CellMargins->{{2, 2}, {6, 6}}, TextJustification->0.5, FontSize->10, Background->GrayLevel[1]] }, Closed]] }, Closed]], Cell[CellGroupData[{ Cell["Chaptertitle - Placed here for desired menu order", "Section"], Cell["\<\ Chaptertitle is placed here so that it won't take up an Alt key.\ \>", "Text"], Cell[CellGroupData[{ Cell[StyleData["Chaptertitle"], ShowCellBracket->False, CellMargins->{{12, Inherited}, {0, 0}}, CellGroupingRules->{"TitleGrouping", 10}, PageBreakBelow->False, DefaultNewInlineCellStyle->"None", InputAutoReplacements->{"TeX"->StyleBox[ RowBox[ {"T", AdjustmentBox[ "E", BoxMargins -> {{-0.075, -0.085}, {0, 0}}, BoxBaselineShift -> 0.5], "X"}]], "LaTeX"->StyleBox[ RowBox[ {"L", StyleBox[ AdjustmentBox[ "A", BoxMargins -> {{-0.36, -0.1}, {0, -0}}, BoxBaselineShift -> -0.2], FontSize -> Smaller], "T", AdjustmentBox[ "E", BoxMargins -> {{-0.075, -0.085}, {0, 0}}, BoxBaselineShift -> 0.5], "X"}]], "mma"->"Mathematica", "Mma"->"Mathematica", "MMA"->"Mathematica"}, LanguageCategory->"NaturalLanguage", CounterIncrements->"Subtitle", CounterAssignments->{{"Section", 0}, {"Equation", 0}, {"Figure", 0}, { "Subsubtitle", 0}}, FontFamily->"Helvetica", FontSize->24, Background->RGBColor[0.941176, 0.87451, 0.784314]], Cell[StyleData["Chaptertitle", "Presentation"], CellMargins->{{24, 10}, {20, 20}}, LineSpacing->{1, 0}, FontSize->36], Cell[StyleData["Chaptertitle", "Condensed"], CellMargins->{{8, 10}, {4, 4}}, FontSize->14], Cell[StyleData["Chaptertitle", "Printout"], CellMargins->{{2, 10}, {12, 8}}, FontSize->18, Background->GrayLevel[1]] }, Open ]] }, 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"], HyphenationOptions->{"HyphenationCharacter"->"\[Continuation]"}, StyleMenuListing->None, FontFamily->"Courier", FontWeight->"Plain", FontSlant->"Plain"], Cell[StyleData["MO"], HyphenationOptions->{"HyphenationCharacter"->"\[Continuation]"}, StyleMenuListing->None, FontFamily->"Courier", FontWeight->"Plain", FontSlant->"Italic"], Cell[StyleData["MB"], HyphenationOptions->{"HyphenationCharacter"->"\[Continuation]"}, StyleMenuListing->None, FontFamily->"Courier", FontWeight->"Bold", FontSlant->"Plain"], Cell[StyleData["MBO"], 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"], Cell[StyleData["SO10", "EnhancedPrintout"], StyleMenuListing->None, FontFamily->"Futura", FontSize->7, FontWeight->"Plain", FontSlant->"Italic"] }, Closed]] }, Closed]], Cell[CellGroupData[{ Cell["Formulas and Programming", "Section"], Cell[CellGroupData[{ Cell[StyleData["InlineFormula"], CellMargins->{{10, 4}, {0, 8}}, CellHorizontalScrolling->True, HyphenationOptions->{"HyphenationCharacter"->"\[Continuation]"}, LanguageCategory->"Formula", ScriptLevel->1, SingleLetterItalics->True], Cell[StyleData["InlineFormula", "Presentation"], CellMargins->{{24, 10}, {10, 10}}, LineSpacing->{1, 5}, FontSize->16], Cell[StyleData["InlineFormula", "Condensed"], CellMargins->{{8, 10}, {6, 6}}, LineSpacing->{1, 1}, FontSize->11], Cell[StyleData["InlineFormula", "Printout"], CellMargins->{{2, 0}, {6, 6}}, FontSize->10] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["DisplayFormula"], CellMargins->{{42, Inherited}, {Inherited, Inherited}}, CellHorizontalScrolling->True, DefaultFormatType->DefaultInputFormatType, HyphenationOptions->{"HyphenationCharacter"->"\[Continuation]"}, LanguageCategory->"Formula", ScriptLevel->0, SingleLetterItalics->True, UnderoverscriptBoxOptions->{LimitsPositioning->True}], Cell[StyleData["DisplayFormula", "Presentation"], LineSpacing->{1, 5}, FontSize->16], Cell[StyleData["DisplayFormula", "Condensed"], LineSpacing->{1, 1}, FontSize->11], Cell[StyleData["DisplayFormula", "Printout"], FontSize->10] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["Program"], CellFrame->{{0, 0}, {0.5, 0.5}}, CellMargins->{{10, 4}, {0, 8}}, CellHorizontalScrolling->True, Hyphenation->False, LanguageCategory->"Formula", ScriptLevel->1, FontFamily->"Courier"], Cell[StyleData["Program", "Presentation"], CellMargins->{{24, 10}, {10, 10}}, LineSpacing->{1, 5}, FontSize->16], Cell[StyleData["Program", "Condensed"], CellMargins->{{8, 10}, {6, 6}}, LineSpacing->{1, 1}, FontSize->11], Cell[StyleData["Program", "Printout"], CellMargins->{{2, 0}, {6, 6}}, FontSize->9] }, 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, 0, 1], FontVariations->{"Underline"->True}, ButtonBoxOptions->{ButtonFunction:>(FrontEndExecute[ { FrontEnd`NotebookLocate[ #2]}]&), Active->True, ButtonNote->ButtonData}], Cell[StyleData["Hyperlink", "Presentation"], FontSize->16], Cell[StyleData["Hyperlink", "Condensed"], FontSize->11], 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, 0, 1], FontVariations->{"Underline"->True}, 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", "Printout"], FontSize->10, FontColor->GrayLevel[0], FontVariations->{"Underline"->False}] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["AddOnsLink"], StyleMenuListing->None, ButtonStyleMenuListing->Automatic, FontFamily->"Courier", FontColor->RGBColor[0, 0, 1], FontVariations->{"Underline"->True}, 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", "Printout"], FontSize->10, FontColor->GrayLevel[0], FontVariations->{"Underline"->False}] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["RefGuideLink"], StyleMenuListing->None, ButtonStyleMenuListing->Automatic, FontFamily->"Courier", FontColor->RGBColor[0, 0, 1], FontVariations->{"Underline"->True}, 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", "Printout"], FontSize->10, FontColor->GrayLevel[0], FontVariations->{"Underline"->False}] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["GettingStartedLink"], StyleMenuListing->None, ButtonStyleMenuListing->Automatic, FontColor->RGBColor[0, 0, 1], FontVariations->{"Underline"->True}, 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", "Printout"], FontSize->10, FontColor->GrayLevel[0], FontVariations->{"Underline"->False}] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["OtherInformationLink"], StyleMenuListing->None, ButtonStyleMenuListing->Automatic, FontColor->RGBColor[0, 0, 1], FontVariations->{"Underline"->True}, 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", "Printout"], FontSize->10, FontColor->GrayLevel[0], FontVariations->{"Underline"->False}] }, Closed]] }, Closed]], Cell[CellGroupData[{ Cell["Styles for Headers and Footers", "Section"], Cell[StyleData["Header"], CellMargins->{{0, 0}, {4, 1}}, DefaultNewInlineCellStyle->"None", LanguageCategory->"NaturalLanguage", StyleMenuListing->None, FontSize->10, FontSlant->"Italic"], Cell[StyleData["Footer"], CellMargins->{{0, 0}, {0, 4}}, DefaultNewInlineCellStyle->"None", LanguageCategory->"NaturalLanguage", StyleMenuListing->None, FontSize->9, FontSlant->"Italic"], Cell[StyleData["PageNumber"], CellMargins->{{0, 0}, {4, 1}}, StyleMenuListing->None, FontFamily->"Times", FontSize->10] }, 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], 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["Placeholder Styles", "Section"], Cell["\<\ The cells below define styles useful for making placeholder objects in \ palette templates.\ \>", "Text"], Cell[CellGroupData[{ Cell[StyleData["Placeholder"], Placeholder->True, StyleMenuListing->None, FontSlant->"Italic", FontColor->RGBColor[0.890623, 0.864698, 0.384756], TagBoxOptions->{Editable->False, Selectable->False, StripWrapperBoxes->False}], Cell[StyleData["Placeholder", "Presentation"]], Cell[StyleData["Placeholder", "Condensed"]], Cell[StyleData["Placeholder", "Printout"]] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["PrimaryPlaceholder"], StyleMenuListing->None, DrawHighlighted->True, FontSlant->"Italic", Background->RGBColor[0.912505, 0.891798, 0.507774], TagBoxOptions->{Editable->False, Selectable->False, StripWrapperBoxes->False}], Cell[StyleData["PrimaryPlaceholder", "Presentation"]], Cell[StyleData["PrimaryPlaceholder", "Condensed"]], Cell[StyleData["PrimaryPlaceholder", "Printout"]] }, Closed]] }, Closed]], 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[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["InputForm"], InputAutoReplacements->{}, AllowInlineCells->False, Hyphenation->False, StyleMenuListing->None, FontFamily->"Courier"], Cell[StyleData["OutputForm"], PageWidth->Infinity, TextAlignment->Left, LineSpacing->{0.6, 1}, StyleMenuListing->None, FontFamily->"Courier"], Cell[StyleData["StandardForm"], InputAutoReplacements->{ "->"->"\[Rule]", ":>"->"\[RuleDelayed]", "<="->"\[LessEqual]", ">="->"\[GreaterEqual]", "!="->"\[NotEqual]", "=="->"\[Equal]", Inherited}, LineSpacing->{1.25, 0}, StyleMenuListing->None, FontFamily->"Courier"], Cell[StyleData["TraditionalForm"], InputAutoReplacements->{ "->"->"\[Rule]", ":>"->"\[RuleDelayed]", "<="->"\[LessEqual]", ">="->"\[GreaterEqual]", "!="->"\[NotEqual]", "=="->"\[Equal]", Inherited}, LineSpacing->{1.25, 0}, SingleLetterItalics->True, TraditionalFunctionNotation->True, DelimiterMatching->None, StyleMenuListing->None], Cell["\<\ The style defined below is mixed in to any cell that is in an inline cell \ within another.\ \>", "Text"], Cell[StyleData["InlineCell"], TextAlignment->Left, ScriptLevel->1, StyleMenuListing->None, FontWeight->"Bold"], Cell[StyleData["InlineCellEditing"], StyleMenuListing->None, Background->RGBColor[1, 0.749996, 0.8]] }, Closed]], 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, FontColor->RGBColor[0.760006, 0.330007, 0.8]] }, Closed]] }, Open ]] }, FrontEndVersion->"5.2 for Microsoft Windows", ScreenRectangle->{{0, 1280}, {0, 941}}, WindowSize->{494, 740}, WindowMargins->{{Automatic, 183}, {Automatic, 48}}, StyleDefinitions -> "Default.nb" ] (******************************************************************* 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, 51, 0, 51, "Subtitle"], Cell[1830, 55, 359, 7, 128, "Text"], Cell[2192, 64, 193, 4, 71, "Text"], Cell[2388, 70, 76, 0, 33, "Text"], Cell[2467, 72, 62, 0, 33, "Text"], Cell[CellGroupData[{ Cell[2554, 76, 42, 0, 73, "Section"], Cell[2599, 78, 192, 4, 70, 31, 0, "StyleData", "All", "Working"], Cell[2794, 84, 146, 3, 70, 36, 0, "StyleData", "All", "Presentation"], Cell[2943, 89, 141, 3, 70, 33, 0, "StyleData", "All", "Condensed"], Cell[3087, 94, 186, 4, 70, 32, 0, "StyleData", "All", "Printout"] }, Closed]], Cell[CellGroupData[{ Cell[3310, 103, 35, 0, 43, "Section"], Cell[3348, 105, 99, 2, 33, "Text"], Cell[3450, 109, 66, 0, 33, "Text"], Cell[3519, 111, 426, 11, 40, 27, 0, "StyleData", "Notebook", "All", StyleMenuListing->None] }, Closed]], Cell[CellGroupData[{ Cell[3982, 127, 38, 0, 43, "Section"], Cell[4023, 129, 149, 3, 52, "Text"], Cell[CellGroupData[{ Cell[4197, 136, 1196, 29, 81, 24, 0, "StyleData", "Title", "All", CounterIncrements->"Title", CounterAssignments->{{"Section", 0}, {"Equation", 0}, {"Figure", 0}, { "Subtitle", 0}, {"Subsubtitle", 0}}], Cell[5396, 167, 116, 3, 144, 40, 0, "StyleData", "Title", "Presentation"], Cell[5515, 172, 87, 2, 69, 37, 0, "StyleData", "Title", "Condensed"], Cell[5605, 176, 143, 4, 88, 36, 0, "StyleData", "Title", "Printout"] }, Closed]], Cell[CellGroupData[{ Cell[5785, 185, 1112, 26, 64, 27, 0, "StyleData", "Subtitle", "All", CounterIncrements->"Subtitle", CounterAssignments->{{"Section", 0}, {"Equation", 0}, {"Figure", 0}, { "Subsubtitle", 0}}], Cell[6900, 213, 119, 3, 114, 43, 0, "StyleData", "Subtitle", "Presentation"], Cell[7022, 218, 90, 2, 57, 40, 0, "StyleData", "Subtitle", "Condensed"], Cell[7115, 222, 118, 3, 58, 39, 0, "StyleData", "Subtitle", "Printout"] }, Closed]], Cell[CellGroupData[{ Cell[7270, 230, 1083, 26, 57, 30, 0, "StyleData", "Subsubtitle", "All", CounterIncrements->"Subsubtitle", CounterAssignments->{{"Section", 0}, {"Equation", 0}, {"Figure", 0}}], Cell[8356, 258, 122, 3, 86, 46, 0, "StyleData", "Subsubtitle", \ "Presentation"], Cell[8481, 263, 93, 2, 48, 43, 0, "StyleData", "Subsubtitle", "Condensed"], Cell[8577, 267, 93, 2, 53, 42, 0, "StyleData", "Subsubtitle", "Printout"] }, Open ]], Cell[CellGroupData[{ Cell[8707, 274, 1098, 27, 70, 26, 0, "StyleData", "Section", "All", CounterIncrements->"Section", CounterAssignments->{{"Subsection", 0}, {"Subsubsection", 0}}], Cell[9808, 303, 118, 3, 89, 42, 0, "StyleData", "Section", "Presentation"], Cell[9929, 308, 98, 2, 50, 39, 0, "StyleData", "Section", "Condensed"], Cell[10030, 312, 89, 2, 62, 38, 0, "StyleData", "Section", "Printout"] }, Closed]], Cell[CellGroupData[{ Cell[10156, 319, 1076, 26, 48, 29, 0, "StyleData", "Subsection", "All", CounterIncrements->"Subsection", CounterAssignments->{{"Subsubsection", 0}}], Cell[11235, 347, 121, 3, 85, 45, 0, "StyleData", "Subsection", \ "Presentation"], Cell[11359, 352, 101, 2, 50, 42, 0, "StyleData", "Subsection", "Condensed"], Cell[11463, 356, 91, 2, 61, 41, 0, "StyleData", "Subsection", "Printout"] }, Closed]], Cell[CellGroupData[{ Cell[11591, 363, 1054, 26, 46, 32, 0, "StyleData", "Subsubsection", "All", CounterIncrements->"Subsubsection"], Cell[12648, 391, 124, 3, 74, 48, 0, "StyleData", "Subsubsection", \ "Presentation"], Cell[12775, 396, 104, 2, 47, 45, 0, "StyleData", "Subsubsection", \ "Condensed"], Cell[12882, 400, 94, 2, 51, 44, 0, "StyleData", "Subsubsection", "Printout"] }, Closed]] }, Closed]], Cell[CellGroupData[{ Cell[13025, 408, 39, 0, 43, "Section"], Cell[CellGroupData[{ Cell[13089, 412, 791, 19, 47, 23, 0, "StyleData", "Text", "All", CounterIncrements->"Text"], Cell[13883, 433, 115, 3, 56, 39, 0, "StyleData", "Text", "Presentation"], Cell[14001, 438, 109, 3, 43, 36, 0, "StyleData", "Text", "Condensed"], Cell[14113, 443, 110, 3, 41, 35, 0, "StyleData", "Text", "Printout"] }, Closed]], Cell[CellGroupData[{ Cell[14260, 451, 282, 9, 59, 31, 0, "StyleData", "EmphasisText", "All", CounterIncrements->"SmallText"], Cell[14545, 462, 121, 3, 64, 47, 0, "StyleData", "EmphasisText", \ "Presentation"], Cell[14669, 467, 116, 3, 55, 44, 0, "StyleData", "EmphasisText", \ "Condensed"], Cell[14788, 472, 117, 3, 50, 43, 0, "StyleData", "EmphasisText", "Printout"] }, Closed]] }, Closed]], Cell[CellGroupData[{ Cell[14954, 481, 68, 0, 69, "Section"], Cell[CellGroupData[{ Cell[15047, 485, 1041, 26, 58, 30, 0, "StyleData", "Subexercise", "All", CounterIncrements->"Subsubsection"], Cell[16091, 513, 122, 3, 74, 46, 0, "StyleData", "Subexercise", \ "Presentation"], Cell[16216, 518, 102, 2, 47, 43, 0, "StyleData", "Subexercise", "Condensed"], Cell[16321, 522, 92, 2, 51, 42, 0, "StyleData", "Subexercise", "Printout"] }, Open ]] }, Closed]], Cell[CellGroupData[{ Cell[16462, 530, 42, 0, 43, "Section"], Cell[16507, 532, 364, 6, 109, "Text"], Cell[CellGroupData[{ Cell[16896, 542, 617, 18, 60, 24, 0, "StyleData", "Input", "All", CounterIncrements->"Input"], Cell[17516, 562, 122, 3, 70, 40, 0, "StyleData", "Input", "Presentation"], Cell[17641, 567, 88, 2, 51, 37, 0, "StyleData", "Input", "Condensed"], Cell[17732, 571, 158, 4, 39, 36, 0, "StyleData", "Input", "Printout"] }, Open ]], Cell[17905, 578, 485, 14, 40, 28, 0, "StyleData", "InputOnly", "All", CounterIncrements->"Input", StyleMenuListing->None], Cell[CellGroupData[{ Cell[18415, 596, 527, 16, 44, 25, 0, "StyleData", "Output", "All", CounterIncrements->"Output"], Cell[18945, 614, 123, 3, 54, 41, 0, "StyleData", "Output", "Presentation"], Cell[19071, 619, 96, 2, 35, 38, 0, "StyleData", "Output", "Condensed"], Cell[19170, 623, 86, 2, 39, 37, 0, "StyleData", "Output", "Printout"] }, Open ]], Cell[CellGroupData[{ Cell[19293, 630, 521, 15, 39, 26, 0, "StyleData", "Message", "All", CounterIncrements->"Message", StyleMenuListing->None], Cell[19817, 647, 139, 3, 70, 42, 0, "StyleData", "Message", "Presentation"], Cell[19959, 652, 113, 2, 70, 39, 0, "StyleData", "Message", "Condensed"], Cell[20075, 656, 138, 3, 70, 38, 0, "StyleData", "Message", "Printout"] }, Closed]], Cell[CellGroupData[{ Cell[20250, 664, 502, 14, 40, 24, 0, "StyleData", "Print", "All", CounterIncrements->"Print", StyleMenuListing->None], Cell[20755, 680, 137, 3, 70, 40, 0, "StyleData", "Print", "Presentation"], Cell[20895, 685, 111, 2, 70, 37, 0, "StyleData", "Print", "Condensed"], Cell[21009, 689, 109, 2, 70, 36, 0, "StyleData", "Print", "Printout"] }, Closed]], Cell[CellGroupData[{ Cell[21155, 696, 506, 15, 37, 27, 0, "StyleData", "Graphics", "All", CounterIncrements->"Graphics", StyleMenuListing->None], Cell[21664, 713, 94, 1, 70, 43, 0, "StyleData", "Graphics", "Presentation"], Cell[21761, 716, 113, 2, 70, 40, 0, "StyleData", "Graphics", "Condensed"], Cell[21877, 720, 112, 2, 70, 39, 0, "StyleData", "Graphics", "Printout"] }, Closed]], Cell[CellGroupData[{ Cell[22026, 727, 128, 4, 37, 28, 0, "StyleData", "CellLabel", "All", StyleMenuListing->None], Cell[22157, 733, 60, 1, 70, 44, 0, "StyleData", "CellLabel", "Presentation"], Cell[22220, 736, 56, 1, 70, 41, 0, "StyleData", "CellLabel", "Condensed"], Cell[22279, 739, 130, 4, 70, 40, 0, "StyleData", "CellLabel", "Printout"] }, Closed]] }, Closed]], Cell[CellGroupData[{ Cell[22458, 749, 38, 0, 43, "Section"], Cell[CellGroupData[{ Cell[22521, 753, 846, 20, 63, 31, 0, "StyleData", "BlueComments", "All", CounterIncrements->"Text"], Cell[23370, 775, 123, 3, 72, 47, 0, "StyleData", "BlueComments", \ "Presentation"], Cell[23496, 780, 117, 3, 59, 44, 0, "StyleData", "BlueComments", \ "Condensed"], Cell[23616, 785, 146, 4, 41, 43, 0, "StyleData", "BlueComments", "Printout"] }, Closed]], Cell[CellGroupData[{ Cell[23799, 794, 846, 20, 60, 31, 0, "StyleData", "PinkComments", "All", CounterIncrements->"Text"], Cell[24648, 816, 123, 3, 72, 47, 0, "StyleData", "PinkComments", \ "Presentation"], Cell[24774, 821, 117, 3, 59, 44, 0, "StyleData", "PinkComments", \ "Condensed"], Cell[24894, 826, 146, 4, 41, 43, 0, "StyleData", "PinkComments", "Printout"] }, Closed]] }, Closed]], Cell[CellGroupData[{ Cell[25089, 836, 68, 0, 69, "Section"], Cell[25160, 838, 88, 2, 33, "Text"], Cell[CellGroupData[{ Cell[25273, 844, 1116, 26, 60, 31, 0, "StyleData", "Chaptertitle", "All", CounterIncrements->"Subtitle", CounterAssignments->{{"Section", 0}, {"Equation", 0}, {"Figure", 0}, { "Subsubtitle", 0}}], Cell[26392, 872, 123, 3, 114, 47, 0, "StyleData", "Chaptertitle", \ "Presentation"], Cell[26518, 877, 94, 2, 57, 44, 0, "StyleData", "Chaptertitle", "Condensed"], Cell[26615, 881, 122, 3, 58, 43, 0, "StyleData", "Chaptertitle", "Printout"] }, Open ]] }, Closed]], Cell[CellGroupData[{ Cell[26786, 890, 36, 0, 43, "Section"], Cell[26825, 892, 121, 3, 70, "Text"], Cell[26949, 897, 92, 3, 70, 21, 0, "StyleData", "RM", "All", StyleMenuListing->None], Cell[27044, 902, 69, 2, 70, 21, 0, "StyleData", "BF", "All", StyleMenuListing->None], Cell[27116, 906, 70, 2, 70, 21, 0, "StyleData", "IT", "All", StyleMenuListing->None], Cell[27189, 910, 115, 4, 70, 21, 0, "StyleData", "TR", "All", StyleMenuListing->None], Cell[27307, 916, 116, 4, 70, 21, 0, "StyleData", "TI", "All", StyleMenuListing->None], Cell[27426, 922, 114, 4, 70, 21, 0, "StyleData", "TB", "All", StyleMenuListing->None], Cell[27543, 928, 116, 4, 70, 22, 0, "StyleData", "TBI", "All", StyleMenuListing->None], Cell[27662, 934, 184, 5, 70, 21, 0, "StyleData", "MR", "All", StyleMenuListing->None], Cell[27849, 941, 185, 5, 70, 21, 0, "StyleData", "MO", "All", StyleMenuListing->None], Cell[28037, 948, 183, 5, 70, 21, 0, "StyleData", "MB", "All", StyleMenuListing->None], Cell[28223, 955, 185, 5, 70, 22, 0, "StyleData", "MBO", "All", StyleMenuListing->None], Cell[28411, 962, 119, 4, 70, 21, 0, "StyleData", "SR", "All", StyleMenuListing->None], Cell[28533, 968, 120, 4, 70, 21, 0, "StyleData", "SO", "All", StyleMenuListing->None], Cell[28656, 974, 118, 4, 70, 21, 0, "StyleData", "SB", "All", StyleMenuListing->None], Cell[28777, 980, 120, 4, 70, 22, 0, "StyleData", "SBO", "All", StyleMenuListing->None], Cell[CellGroupData[{ Cell[28922, 988, 138, 5, 70, 23, 0, "StyleData", "SO10", "All", StyleMenuListing->None], Cell[29063, 995, 149, 5, 70, 35, 0, "StyleData", "SO10", "Printout", StyleMenuListing->None], Cell[29215, 1002, 154, 5, 70, 43, 0, "StyleData", "SO10", "EnhancedPrintout", StyleMenuListing->None] }, Closed]] }, Closed]], Cell[CellGroupData[{ Cell[29418, 1013, 43, 0, 43, "Section"], Cell[CellGroupData[{ Cell[29486, 1017, 244, 6, 70, 32, 0, "StyleData", "InlineFormula", "All"], Cell[29733, 1025, 124, 3, 70, 48, 0, "StyleData", "InlineFormula", \ "Presentation"], Cell[29860, 1030, 118, 3, 70, 45, 0, "StyleData", "InlineFormula", \ "Condensed"], Cell[29981, 1035, 93, 2, 70, 44, 0, "StyleData", "InlineFormula", "Printout"] }, Closed]], Cell[CellGroupData[{ Cell[30111, 1042, 370, 8, 70, 33, 0, "StyleData", "DisplayFormula", "All"], Cell[30484, 1052, 88, 2, 70, 49, 0, "StyleData", "DisplayFormula", \ "Presentation"], Cell[30575, 1056, 85, 2, 70, 46, 0, "StyleData", "DisplayFormula", \ "Condensed"], Cell[30663, 1060, 61, 1, 70, 45, 0, "StyleData", "DisplayFormula", \ "Printout"] }, Closed]], Cell[CellGroupData[{ Cell[30761, 1066, 224, 7, 70, 26, 0, "StyleData", "Program", "All"], Cell[30988, 1075, 118, 3, 70, 42, 0, "StyleData", "Program", "Presentation"], Cell[31109, 1080, 112, 3, 70, 39, 0, "StyleData", "Program", "Condensed"], Cell[31224, 1085, 86, 2, 70, 38, 0, "StyleData", "Program", "Printout"] }, Closed]] }, Closed]], Cell[CellGroupData[{ Cell[31359, 1093, 35, 0, 43, "Section"], Cell[31397, 1095, 184, 4, 70, "Text"], Cell[CellGroupData[{ Cell[31606, 1103, 302, 8, 70, 28, 0, "StyleData", "Hyperlink", "All", StyleMenuListing->None, ButtonStyleMenuListing->Automatic], Cell[31911, 1113, 60, 1, 70, 44, 0, "StyleData", "Hyperlink", \ "Presentation"], Cell[31974, 1116, 57, 1, 70, 41, 0, "StyleData", "Hyperlink", "Condensed"], Cell[32034, 1119, 123, 3, 70, 40, 0, "StyleData", "Hyperlink", "Printout"] }, Closed]], Cell[32172, 1125, 104, 3, 70, "Text"], Cell[CellGroupData[{ Cell[32301, 1132, 316, 8, 70, 31, 0, "StyleData", "MainBookLink", "All", StyleMenuListing->None, ButtonStyleMenuListing->Automatic], Cell[32620, 1142, 63, 1, 70, 47, 0, "StyleData", "MainBookLink", \ "Presentation"], Cell[32686, 1145, 60, 1, 70, 44, 0, "StyleData", "MainBookLink", \ "Condensed"], Cell[32749, 1148, 126, 3, 70, 43, 0, "StyleData", "MainBookLink", "Printout"] }, Closed]], Cell[CellGroupData[{ Cell[32912, 1156, 337, 9, 70, 29, 0, "StyleData", "AddOnsLink", "All", StyleMenuListing->None, ButtonStyleMenuListing->Automatic], Cell[33252, 1167, 61, 1, 70, 45, 0, "StyleData", "AddOnsLink", \ "Presentation"], Cell[33316, 1170, 58, 1, 70, 42, 0, "StyleData", "AddOnsLink", "Condensed"], Cell[33377, 1173, 124, 3, 70, 41, 0, "StyleData", "AddOnsLink", "Printout"] }, Closed]], Cell[CellGroupData[{ Cell[33538, 1181, 341, 9, 70, 31, 0, "StyleData", "RefGuideLink", "All", StyleMenuListing->None, ButtonStyleMenuListing->Automatic], Cell[33882, 1192, 63, 1, 70, 47, 0, "StyleData", "RefGuideLink", \ "Presentation"], Cell[33948, 1195, 60, 1, 70, 44, 0, "StyleData", "RefGuideLink", \ "Condensed"], Cell[34011, 1198, 126, 3, 70, 43, 0, "StyleData", "RefGuideLink", "Printout"] }, Closed]], Cell[CellGroupData[{ Cell[34174, 1206, 328, 8, 70, 37, 0, "StyleData", "GettingStartedLink", "All", StyleMenuListing->None, ButtonStyleMenuListing->Automatic], Cell[34505, 1216, 69, 1, 70, 53, 0, "StyleData", "GettingStartedLink", \ "Presentation"], Cell[34577, 1219, 66, 1, 70, 50, 0, "StyleData", "GettingStartedLink", \ "Condensed"], Cell[34646, 1222, 132, 3, 70, 49, 0, "StyleData", "GettingStartedLink", \ "Printout"] }, Closed]], Cell[CellGroupData[{ Cell[34815, 1230, 332, 8, 70, 39, 0, "StyleData", "OtherInformationLink", \ "All", StyleMenuListing->None, ButtonStyleMenuListing->Automatic], Cell[35150, 1240, 71, 1, 70, 55, 0, "StyleData", "OtherInformationLink", \ "Presentation"], Cell[35224, 1243, 68, 1, 70, 52, 0, "StyleData", "OtherInformationLink", \ "Condensed"], Cell[35295, 1246, 134, 3, 70, 51, 0, "StyleData", "OtherInformationLink", \ "Printout"] }, Closed]] }, Closed]], Cell[CellGroupData[{ Cell[35478, 1255, 49, 0, 43, "Section"], Cell[35530, 1257, 199, 6, 70, 25, 0, "StyleData", "Header", "All", StyleMenuListing->None], Cell[35732, 1265, 198, 6, 70, 25, 0, "StyleData", "Footer", "All", StyleMenuListing->None], Cell[35933, 1273, 127, 4, 70, 29, 0, "StyleData", "PageNumber", "All", StyleMenuListing->None] }, Closed]], Cell[CellGroupData[{ Cell[36097, 1282, 33, 0, 43, "Section"], Cell[36133, 1284, 121, 3, 70, "Text"], Cell[36257, 1289, 226, 5, 70, 24, 0, "StyleData", "Paste", "All", StyleMenuListing->None, ButtonStyleMenuListing->Automatic], Cell[36486, 1296, 295, 7, 70, 27, 0, "StyleData", "Evaluate", "All", StyleMenuListing->None, ButtonStyleMenuListing->Automatic], Cell[36784, 1305, 400, 9, 70, 31, 0, "StyleData", "EvaluateCell", "All", StyleMenuListing->None, ButtonStyleMenuListing->Automatic], Cell[37187, 1316, 387, 9, 70, 31, 0, "StyleData", "CopyEvaluate", "All", StyleMenuListing->None, ButtonStyleMenuListing->Automatic], Cell[37577, 1327, 401, 9, 70, 35, 0, "StyleData", "CopyEvaluateCell", "All", StyleMenuListing->None, ButtonStyleMenuListing->Automatic] }, Closed]], Cell[CellGroupData[{ Cell[38015, 1341, 37, 0, 43, "Section"], Cell[38055, 1343, 115, 3, 70, "Text"], Cell[CellGroupData[{ Cell[38195, 1350, 238, 7, 70, 30, 0, "StyleData", "Placeholder", "All", StyleMenuListing->None], Cell[38436, 1359, 46, 0, 70, 46, 0, "StyleData", "Placeholder", \ "Presentation"], Cell[38485, 1361, 43, 0, 70, 43, 0, "StyleData", "Placeholder", "Condensed"], Cell[38531, 1363, 42, 0, 70, 42, 0, "StyleData", "Placeholder", "Printout"] }, Closed]], Cell[CellGroupData[{ Cell[38610, 1368, 250, 7, 70, 37, 0, "StyleData", "PrimaryPlaceholder", "All", StyleMenuListing->None], Cell[38863, 1377, 53, 0, 70, 53, 0, "StyleData", "PrimaryPlaceholder", \ "Presentation"], Cell[38919, 1379, 50, 0, 70, 50, 0, "StyleData", "PrimaryPlaceholder", \ "Condensed"], Cell[38972, 1381, 49, 0, 70, 49, 0, "StyleData", "PrimaryPlaceholder", \ "Printout"] }, Closed]] }, Closed]], Cell[CellGroupData[{ Cell[39070, 1387, 36, 0, 43, "Section"], Cell[39109, 1389, 305, 5, 90, "Text"], Cell[39417, 1396, 336, 11, 40, 33, 0, "StyleData", "CellExpression", "All", StyleMenuListing->None], Cell[39756, 1409, 157, 5, 40, 28, 0, "StyleData", "InputForm", "All", StyleMenuListing->None], Cell[39916, 1416, 151, 5, 40, 29, 0, "StyleData", "OutputForm", "All", StyleMenuListing->None], Cell[40070, 1423, 292, 7, 40, 31, 0, "StyleData", "StandardForm", "All", StyleMenuListing->None], Cell[40365, 1432, 363, 9, 40, 34, 0, "StyleData", "TraditionalForm", "All", StyleMenuListing->None], Cell[40731, 1443, 115, 3, 33, "Text"], Cell[40849, 1448, 118, 4, 40, 29, 0, "StyleData", "InlineCell", "All", StyleMenuListing->None], Cell[40970, 1454, 104, 2, 56, 36, 0, "StyleData", "InlineCellEditing", "All", StyleMenuListing->None] }, Closed]], Cell[CellGroupData[{ Cell[41111, 1461, 35, 0, 43, "Section"], Cell[41149, 1463, 330, 6, 90, "Text"], Cell[41482, 1471, 109, 2, 40, 35, 0, "StyleData", "UnmatchedBracket", "All", StyleMenuListing->None] }, Closed]] }, Open ]] } ] *) (******************************************************************* End of Mathematica Notebook file. *******************************************************************)