(************** Content-type: application/mathematica ************** CreatedBy='Mathematica 4.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[ 20934, 797]*) (*NotebookOutlinePosition[ 45296, 1676]*) (* CellTagsIndexPosition[ 45252, 1672]*) (*WindowFrame->Normal*) Notebook[{ Cell[CellGroupData[{ Cell["\<\ ok.nb Style Definitions, made by Brian Fiedler 14.10.2002\ \>", "Subtitle", TextAlignment->Center], 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[CellGroupData[{ Cell["Style Environment Names", "Section"], Cell[StyleData[All, "Working"], PageWidth->WindowWidth, CellBracketOptions->{"Color"->RGBColor[0.4, 0, 0.239994]}, ScriptMinSize->9, Background->RGBColor[1, 0.960006, 0.900008]], Cell[StyleData[All, "Presentation"], PageWidth->WindowWidth, CellBracketOptions->{"Color"->RGBColor[0.4, 0, 0.239994]}, ScriptMinSize->9, Background->RGBColor[1, 0.959991, 0.899992]], Cell[StyleData[All, "Printout"], PageWidth->PaperWidth, ShowCellLabel->False, ImageSize->{200, 200}, 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"], CellDingbat->None, CellMargins->{{18, 10}, {0, 20}}, CellGroupingRules->{"TitleGrouping", 0}, PageBreakBelow->False, CellFrameMargins->6, CellFrameColor->GrayLevel[0], TextAlignment->Center, LineSpacing->{0.95, 0}, CounterAssignments->{{"Section", 0}, {"Equation", 0}, {"Figure", 0}}, FontFamily->"Helvetica", FontSize->24, FontWeight->"Bold", FontColor->RGBColor[0.669993, 0, 0]], Cell[StyleData["Title", "Presentation"], CellDingbat->None, CellMargins->{{20, 10}, {2, 20}}, CellFrameMargins->5], Cell[StyleData["Title", "Printout"], CellDingbat->None, CellMargins->{{18, 30}, {0, 0}}, CellFrameMargins->4, FontSize->24] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["Subtitle"], CellDingbat->None, CellMargins->{{20, 30}, {2, 10}}, CellGroupingRules->{"TitleGrouping", 10}, PageBreakBelow->False, CellFrameMargins->{{0, 4}, {8, 4}}, LineSpacing->{1, 0}, CounterAssignments->{{"Section", 0}, {"Equation", 0}, {"Figure", 0}}, FontFamily->"Helvetica", FontSize->24], Cell[StyleData["Subtitle", "Presentation"], CellDingbat->None, CellMargins->{{20, 10}, {2, 10}}], Cell[StyleData["Subtitle", "Printout"], CellDingbat->None, CellMargins->{{18, 30}, {0, 10}}, FontSize->18] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["Section 1"], CellDingbat->"\[FilledSquare]", CellMargins->{{18, 10}, {10, 30}}, CellGroupingRules->{"SectionGrouping", 40}, PageBreakBelow->False, CellFrameMargins->{{0, 4}, {8, 4}}, CellFrameColor->RGBColor[0.4, 0, 0.239994], CounterIncrements->"Section", CounterAssignments->{{"Subsection", 0}, {"Subsubsection", 0}}, FontFamily->"Helvetica", FontSize->18, FontWeight->"Bold"], Cell[StyleData["Section 1", "Presentation"], CellDingbat->"\[FilledSquare]", CellMargins->{{20, 10}, {6, 30}}, CellFrameMargins->5], Cell[StyleData["Section 1", "Printout"], CellDingbat->"\[FilledSquare]", CellMargins->{{18, 30}, {4, 30}}, CellFrameMargins->4, FontSize->14] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["Section"], CellDingbat->"\[FilledSquare]", CellMargins->{{18, 10}, {10, 30}}, CellGroupingRules->{"SectionGrouping", 40}, PageBreakBelow->False, CellFrameMargins->4, CellFrameColor->RGBColor[0.4, 0, 0.239994], CounterIncrements->"Section", CounterAssignments->{{"Subsection", 0}, {"Subsubsection", 0}}, FontFamily->"Helvetica", FontSize->18, FontWeight->"Bold"], Cell[StyleData["Section", "Presentation"], CellDingbat->"\[FilledSquare]", CellMargins->{{20, 10}, {0, 30}}], Cell[StyleData["Section", "Printout"], CellDingbat->"\[FilledSquare]", CellMargins->{{18, 30}, {0, 30}}, CellFrameMargins->5, FontSize->14] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["Subsection"], CellDingbat->"\[FilledSquare]", CellMargins->{{38, 30}, {2, 20}}, CellGroupingRules->{"SectionGrouping", 50}, PageBreakBelow->False, CounterIncrements->"Subsection", CounterAssignments->{{"Subsubsection", 0}}, FontFamily->"Times", FontSize->14, FontWeight->"Bold"], Cell[StyleData["Subsection", "Presentation"], CellDingbat->"\[FilledSquare]", CellMargins->{{35, 30}, {0, 20}}], Cell[StyleData["Subsection", "Printout"], CellDingbat->None, CellMargins->{{18, 30}, {0, 10}}, FontSize->12] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["Subsubsection"], CellDingbat->None, FontSize->12], Cell[StyleData["Subsubsection", "Presentation"], CellDingbat->None, CellMargins->{{31, 30}, {0, 12}}], Cell[StyleData["Subsubsection", "Printout"], CellDingbat->None, CellMargins->{{18, 30}, {0, 12}}, FontSize->10] }, Closed]] }, Open ]], Cell[CellGroupData[{ Cell["Styles for Body Text", "Section", CellMargins->{{Inherited, Inherited}, {10, 10}}], Cell[CellGroupData[{ Cell[StyleData["Text"], CellFrame->True, CellMargins->{{55, 10}, {10, 10}}, TextJustification->1, LineSpacing->{1, 2}, FontFamily->"Times", FontSize->14, FontSlant->"Plain", Background->GrayLevel[0.909987], FrameBoxOptions->{BoxFrame->True}], Cell[StyleData["Text", "Presentation"], CellMargins->{{20, 10}, {10, 10}}, TextAlignment->Left, TextJustification->0, LineSpacing->{1.3, 0}, FontSize->14], Cell[StyleData["Text", "Printout"], CellMargins->{{18, 4}, {10, 10}}, LineSpacing->{1, 3}, FontSize->12, Background->GrayLevel[1]] }, Open ]], Cell[CellGroupData[{ Cell[StyleData["Commentary"], CellMargins->{{55, 10}, {10, 10}}, TextJustification->1, LineSpacing->{1, 2}, FontFamily->"Helvetica", FontSize->10, FontColor->RGBColor[0, 0, 0.4]], Cell[StyleData["Commentary", "Presentation"], CellMargins->{{60, 30}, {10, 10}}, TextJustification->1, LineSpacing->{1.3, 0}, FontSize->12], Cell[StyleData["Commentary", "Printout"], CellMargins->{{18, 30}, {10, 10}}, LineSpacing->{1, 3}, FontFamily->"Times", FontSize->10] }, Closed]] }, Open ]], 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"], CellFrame->False, CellMargins->{{55, 10}, {5, 10}}, Evaluatable->True, CellGroupingRules->"InputGrouping", CellHorizontalScrolling->True, PageBreakWithin->False, GroupPageBreakWithin->False, CellLabelPositioning->Automatic, CellLabelMargins->{{23, Inherited}, {Inherited, Inherited}}, CellFrameColor->RGBColor[0.499992, 0.649989, 0.499992], DefaultFormatType->DefaultInputFormatType, FormatType->InputForm, ShowStringCharacters->True, NumberMarks->True, FontSize->14, FontWeight->"Bold", FontColor->RGBColor[0, 0.249989, 0.4], Background->RGBColor[0.919997, 0.949996, 0.919997]], Cell[StyleData["Input", "Presentation"], CellFrame->False, CellMargins->{{Inherited, Inherited}, {5, Inherited}}], Cell[StyleData["Input", "Printout"], CellFrame->False, CellMargins->{{Inherited, Inherited}, {5, Inherited}}, FontColor->GrayLevel[0], Background->GrayLevel[1]] }, Open ]], Cell[StyleData["InlineInput"], Evaluatable->True, CellGroupingRules->"InputGrouping", CellHorizontalScrolling->True, PageBreakWithin->False, GroupPageBreakWithin->False, DefaultFormatType->DefaultInputFormatType, AutoItalicWords->{}, FormatType->InputForm, ShowStringCharacters->True, NumberMarks->True, CounterIncrements->"Input", FontWeight->"Bold"], Cell[CellGroupData[{ Cell[StyleData["Output"], CellFrame->False, CellMargins->{{55, 10}, {20, 0}}, CellEditDuplicate->True, CellGroupingRules->"OutputGrouping", CellHorizontalScrolling->True, PageBreakWithin->False, GroupPageBreakWithin->False, GeneratedCell->True, CellAutoOverwrite->True, CellLabelMargins->{{23, Inherited}, {Inherited, Inherited}}, CellFrameMargins->8, CellFrameColor->RGBColor[0.499992, 0.499992, 0.649989], DefaultFormatType->DefaultOutputFormatType, FormatType->InputForm, FontSize->14, FontWeight->"Bold", FontColor->RGBColor[0.4, 0.249989, 0], Background->RGBColor[0.919997, 0.919997, 0.949996]], Cell[StyleData["Output", "Presentation"], CellFrame->False, CellMargins->{{60, Inherited}, {20, 0}}, CellFrameMargins->8, CellFrameColor->RGBColor[0.499992, 0.499992, 0.649989]], Cell[StyleData["Output", "Printout"], CellFrame->False, CellMargins->{{55, Inherited}, {20, 0}}, CellFrameMargins->8, CellFrameColor->RGBColor[0.499992, 0.499992, 0.649989], FontSize->10, FontColor->GrayLevel[0], Background->GrayLevel[1]] }, Open ]], Cell[CellGroupData[{ Cell[StyleData["InputOnly"], CellMargins->{{55, 10}, {15, 0}}, Evaluatable->True, CellGroupingRules->"InputGrouping", CellHorizontalScrolling->True, PageBreakWithin->False, GroupPageBreakWithin->False, CellLabelPositioning->Automatic, CellLabelMargins->{{23, Inherited}, {Inherited, Inherited}}, DefaultFormatType->DefaultInputFormatType, FormatType->InputForm, ShowStringCharacters->True, NumberMarks->True, FontSize->12, FontWeight->"Bold", Background->RGBColor[0.969985, 0.949996, 0.949996]], Cell[StyleData["InputOnly", "Presentation"], CellMargins->{{60, Inherited}, {10, 10}}], Cell[StyleData["InputOnly", "Printout"], CellMargins->{{55, Inherited}, {10, 10}}, FontSize->10] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["Message"], CellDingbat->"\[LongDash]", CellMargins->{{55, 10}, {0, 0}}, CellGroupingRules->"OutputGrouping", PageBreakWithin->False, GroupPageBreakWithin->False, GeneratedCell->True, CellAutoOverwrite->True, ShowCellLabel->False, CellLabelMargins->{{23, Inherited}, {Inherited, Inherited}}, DefaultFormatType->DefaultOutputFormatType, FormatType->InputForm, StyleMenuListing->None, FontFamily->"Helvetica", FontSize->12, FontColor->RGBColor[0.749996, 0, 0.499992], Background->GrayLevel[1]], Cell[StyleData["Message", "Presentation"], CellMargins->{{60, Inherited}, {Inherited, Inherited}}, LineSpacing->{1, 0}], Cell[StyleData["Message", "Printout"], CellMargins->{{55, Inherited}, {0, 0}}, FontSize->8] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["Print"], CellMargins->{{55, 26}, {1, 6}}, CellGroupingRules->"OutputGrouping", CellHorizontalScrolling->True, PageBreakWithin->False, GroupPageBreakWithin->False, GeneratedCell->True, CellAutoOverwrite->True, ShowCellLabel->False, CellLabelMargins->{{23, Inherited}, {Inherited, Inherited}}, DefaultFormatType->DefaultOutputFormatType, TextAlignment->Left, FormatType->InputForm, StyleMenuListing->None, Background->GrayLevel[0.700008]], Cell[StyleData["Print", "Presentation"], CellMargins->{{60, Inherited}, {10, 2}}], Cell[StyleData["Print", "Printout"], CellMargins->{{54, Inherited}, {2, 6}}, FontSize->10] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["Graphics"], CellMargins->{{55, 10}, {0, 0}}, CellGroupingRules->"GraphicsGrouping", CellHorizontalScrolling->True, PageBreakWithin->False, GeneratedCell->True, CellAutoOverwrite->True, ShowCellLabel->False, DefaultFormatType->DefaultOutputFormatType, FormatType->InputForm, ImageMargins->{{35, Inherited}, {Inherited, 0}}, StyleMenuListing->None, Background->GrayLevel[1]], Cell[StyleData["Graphics", "Presentation"], CellMargins->{{60, Inherited}, {0, 0}}, ImageMargins->{{10, 10}, {10, 10}}], Cell[StyleData["Graphics", "Printout"], CellMargins->{{55, Inherited}, {0, 0}}, ImageSize->{0.0625, 0.0625}] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["CellLabel"], StyleMenuListing->None, FontFamily->"Helvetica", FontSize->10, FontSlant->"Plain", FontColor->RGBColor[0.6, 0, 0.6]], Cell[StyleData["CellLabel", "Presentation"], CellMargins->{{18, Inherited}, {Inherited, Inherited}}], Cell[StyleData["CellLabel", "Printout"], CellMargins->{{0, Inherited}, {Inherited, Inherited}}, FontSize->8] }, Closed]] }, Open ]], Cell[CellGroupData[{ Cell["Unique Styles", "Section"], Cell[CellGroupData[{ Cell[StyleData["Author"], CellMargins->{{20, 30}, {45, 5}}, CellGroupingRules->{"TitleGrouping", 20}, PageBreakBelow->False, CellFrameMargins->{{0, 4}, {8, 4}}, LineSpacing->{1, 0}, CounterAssignments->{{"Section", 0}, {"Equation", 0}, {"Figure", 0}}, FontFamily->"Helvetica", FontSize->14, FontSlant->"Italic"], Cell[StyleData["Author", "Presentation"], CellMargins->{{20, 30}, {45, 10}}], Cell[StyleData["Author", "Printout"], CellMargins->{{18, 30}, {45, 5}}] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["Abstract"], CellFrame->False, CellMargins->{{18, 140}, {4, 30}}, LineSpacing->{0.9, 0}, FontFamily->"Times", FontSize->12], Cell[StyleData["Abstract", "Presentation"], CellFrame->True, CellMargins->{{20, 10}, {Inherited, 30}}], Cell[StyleData["Abstract", "Printout"], LineSpacing->{1, 2}, FontSize->10] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["Caption"], CellMargins->{{55, 10}, {5, 3}}, PageBreakAbove->False, FontFamily->"Helvetica", FontSize->9], Cell[StyleData["Caption", "Presentation"], CellMargins->{{60, 65}, {6, 4}}, FontSize->10], Cell[StyleData["Caption", "Printout"], CellMargins->{{55, 55}, {5, 4}}, LineSpacing->{1, 2}, FontSize->8] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["Reference"], CellMargins->{{24, 40}, {6, 6}}, TextJustification->1, LineSpacing->{1, 0}, FontFamily->"Times"], Cell[StyleData["Reference", "Presentation"], CellMargins->{{20, 40}, {Inherited, 6}}, TextJustification->0, LineSpacing->{1, 4}, FontSize->12], Cell[StyleData["Reference", "Printout"], CellMargins->{{18, 4}, {4, 4}}, FontSize->9] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["PictureGroup"], CellFrame->{{1, 1}, {0, 0}}, CellMargins->{{55, Inherited}, {0, 0}}, CellGroupingRules->"GraphicsGrouping", CellHorizontalScrolling->True, PageBreakWithin->False, ShowCellLabel->False, ImageMargins->{{35, Inherited}, {Inherited, 0}}, StyleMenuListing->None, Background->GrayLevel[0.850004]], Cell[StyleData["PictureGroup", "Presentation"], CellMargins->{{60, Inherited}, {0, 0}}, ImageMargins->{{10, 10}, {10, 10}}], Cell[StyleData["PictureGroup", "Printout"], CellMargins->{{55, Inherited}, {0, 0}}, ImageSize->{0.0625, 0.0625}] }, Closed]] }, Closed]], Cell[CellGroupData[{ Cell["Formulas and Programming", "Section"], Cell[CellGroupData[{ Cell[StyleData["DisplayFormula"], CellMargins->{{55, Inherited}, {Inherited, Inherited}}, CellHorizontalScrolling->True, DefaultFormatType->DefaultInputFormatType, ScriptLevel->0, SingleLetterItalics->True, StyleMenuListing->None, UnderoverscriptBoxOptions->{LimitsPositioning->True}], Cell[StyleData["DisplayFormula", "Presentation"], CellMargins->{{60, 10}, {Inherited, 6}}, LineSpacing->{1, 5}], Cell[StyleData["DisplayFormula", "Printout"], CellMargins->{{18, 4}, {4, 4}}] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["ChemicalFormula"], CellMargins->{{55, 10}, {Inherited, 0}}, CellHorizontalScrolling->True, DefaultFormatType->DefaultInputFormatType, TextJustification->1, AutoSpacing->False, ScriptLevel->1, ScriptBaselineShifts->{0.6, Automatic}, SingleLetterItalics->False, ZeroWidthTimes->True], Cell[StyleData["ChemicalFormula", "Presentation"], CellMargins->{{60, 10}, {Inherited, 6}}], Cell[StyleData["ChemicalFormula", "Printout"], CellMargins->{{18, 4}, {4, 4}}, LineSpacing->{1, 3}, FontSize->10] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["Program"], CellMargins->{{55, 10}, {Inherited, 0}}, CellHorizontalScrolling->True, FontFamily->"Courier"], Cell[StyleData["Program", "Presentation"], CellMargins->{{60, 10}, {Inherited, 6}}], Cell[StyleData["Program", "Printout"], CellMargins->{{18, 4}, {4, 4}}, LineSpacing->{1, 3}, FontSize->9.5] }, 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->{{55, 85}, {Inherited, Inherited}}, CellFrameLabels->{{None, Cell[ TextData[ {"(", CounterBox[ "NumberedEquation"], ")"}]]}, {None, None}}, DefaultFormatType->DefaultInputFormatType, CounterIncrements->"NumberedEquation", FormatTypeAutoConvert->False, FontFamily->"Times"], Cell[StyleData["NumberedEquation", "Presentation"], CellMargins->{{60, 10}, {Inherited, 6}}, LineSpacing->{1, 0}], Cell[StyleData["NumberedEquation", "Printout"], CellMargins->{{18, 4}, {4, 4}}, FontSize->8] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["NumberedFigure"], CellMargins->{{55, 95}, {Inherited, Inherited}}, CellFrameLabels->{{None, None}, {Cell[ TextData[ {"Figure ", CounterBox[ "NumberedFigure"]}], FontWeight -> "Bold"], None}}, CounterIncrements->"NumberedFigure", FormatTypeAutoConvert->False, FontFamily->"Times"], Cell[StyleData["NumberedFigure", "Presentation"], CellMargins->{{60, 80}, {Inherited, 6}}, LineSpacing->{1, 0}], Cell[StyleData["NumberedFigure", "Printout"], CellMargins->{{18, 80}, {4, 4}}, FontSize->8] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["NumberedTable"], CellMargins->{{55, 95}, {Inherited, Inherited}}, CellFrameLabels->{{None, None}, {Cell[ TextData[ {"Table ", CounterBox[ "NumberedTable"]}], FontWeight -> "Bold"], None}}, TextAlignment->Center, CounterIncrements->"NumberedTable", FormatTypeAutoConvert->False, FontFamily->"Times"], Cell[StyleData["NumberedTable", "Presentation"], CellMargins->{{60, 80}, {Inherited, 6}}, LineSpacing->{1, 0}], Cell[StyleData["NumberedTable", "Printout"], CellMargins->{{18, 80}, {4, 4}}, FontSize->8] }, Closed]] }, Closed]], Cell[CellGroupData[{ Cell["Styles for Headers and Footers", "Section"], Cell[StyleData["Header"], StyleMenuListing->None, FontFamily->"Helvetica", FontSize->9], Cell[StyleData["PageNumber"], StyleMenuListing->None, FontFamily->"Helvetica", FontSize->9, FontWeight->"Bold"], Cell[StyleData["Footer"], TextAlignment->Center, StyleMenuListing->None, FontFamily->"Helvetica", FontSize->9] }, Closed]] }, Open ]] }, FrontEndVersion->"4.2 for X", ScreenRectangle->{{0, 1280}, {0, 1024}}, ScreenStyleEnvironment->"Working", WindowSize->{497, 670}, WindowMargins->{{54, Automatic}, {Automatic, 0}}, StyleDefinitions -> Notebook[{ Cell[CellGroupData[{ Cell["Style Definitions", "Subtitle"], 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[CellGroupData[{ Cell["Style Environment Names", "Section"], Cell[StyleData[All, "Working"], PageWidth->WindowWidth, ScriptMinSize->9, Background->GrayLevel[1]], Cell[StyleData[All, "Presentation"], PageWidth->WindowWidth, ScriptMinSize->12, FontSize->16, Background->GrayLevel[1]], Cell[StyleData[All, "Condensed"], PageWidth->WindowWidth, CellBracketOptions->{"Margins"->{1, 1}, "Widths"->{0, 5}}, ScriptMinSize->8, FontSize->11, Background->GrayLevel[1]], Cell[StyleData[All, "Printout"], PageWidth->PaperWidth, ScriptMinSize->5, FontSize->10, Background->GrayLevel[1], PrivateFontOptions->{"FontType"->"Outline"}] }, Open ]], Cell[CellGroupData[{ Cell["Notebook Options", "Section"], Cell["\<\ The options defined for the style below will be used at the \ Notebook level.\ \>", "Text"], Cell[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] }, Open ]], Cell[CellGroupData[{ Cell["Styles for Headings", "Section"], Cell[CellGroupData[{ Cell[StyleData["Title"], CellMargins->{{12, Inherited}, {20, 40}}, CellGroupingRules->{"TitleGrouping", 0}, PageBreakBelow->False, CounterIncrements->"Title", CounterAssignments->{{"Section", 0}, {"Equation", 0}, {"Figure", 0}, { "Subtitle", 0}, {"Subsubtitle", 0}}, FontFamily->"Helvetica", FontSize->36, FontWeight->"Bold"], 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] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["Subtitle"], CellMargins->{{12, Inherited}, {20, 15}}, CellGroupingRules->{"TitleGrouping", 10}, PageBreakBelow->False, CounterIncrements->"Subtitle", CounterAssignments->{{"Section", 0}, {"Equation", 0}, {"Figure", 0}, { "Subsubtitle", 0}}, FontFamily->"Helvetica", FontSize->24], 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] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["Subsubtitle"], CellMargins->{{12, Inherited}, {20, 15}}, CellGroupingRules->{"TitleGrouping", 20}, PageBreakBelow->False, CounterIncrements->"Subsubtitle", CounterAssignments->{{"Section", 0}, {"Equation", 0}, {"Figure", 0}}, FontFamily->"Helvetica", FontSize->14, FontSlant->"Italic"], 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] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["Section"], CellDingbat->"\[FilledSquare]", CellMargins->{{25, Inherited}, {8, 24}}, CellGroupingRules->{"SectionGrouping", 30}, PageBreakBelow->False, CounterIncrements->"Section", CounterAssignments->{{"Subsection", 0}, {"Subsubsection", 0}}, FontFamily->"Helvetica", FontSize->16, 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]", CellMargins->{{22, Inherited}, {8, 20}}, CellGroupingRules->{"SectionGrouping", 40}, PageBreakBelow->False, CounterIncrements->"Subsection", CounterAssignments->{{"Subsubsection", 0}}, FontSize->14, 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->"\[FilledSmallSquare]", CellMargins->{{22, Inherited}, {8, 18}}, CellGroupingRules->{"SectionGrouping", 50}, PageBreakBelow->False, CounterIncrements->"Subsubsection", 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}}, LineSpacing->{1, 3}, CounterIncrements->"Text", FontSize->12, FontColor->GrayLevel[0]], Cell[StyleData["Text", "Presentation"], CellMargins->{{24, 10}, {10, 10}}, LineSpacing->{1, 5}], Cell[StyleData["Text", "Condensed"], CellMargins->{{8, 10}, {6, 6}}, LineSpacing->{1, 1}], Cell[StyleData["Text", "Printout"], CellMargins->{{2, 2}, {6, 6}}] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["SmallText"], CellMargins->{{12, 10}, {6, 6}}, LineSpacing->{1, 3}, CounterIncrements->"SmallText", FontFamily->"Helvetica", FontSize->14], Cell[StyleData["SmallText", "Presentation"], CellMargins->{{24, 10}, {8, 8}}, LineSpacing->{1, 5}, FontSize->12], Cell[StyleData["SmallText", "Condensed"], CellMargins->{{8, 10}, {5, 5}}, LineSpacing->{1, 2}, FontSize->9], Cell[StyleData["SmallText", "Printout"], CellMargins->{{2, 2}, {5, 5}}, FontSize->7] }, Closed]] }, Open ]], 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", PageBreakWithin->False, GroupPageBreakWithin->False, CellLabelMargins->{{11, Inherited}, {Inherited, Inherited}}, DefaultFormatType->DefaultInputFormatType, AutoItalicWords->{}, FormatType->InputForm, ShowStringCharacters->True, NumberMarks->True, CounterIncrements->"Input", FontWeight->"Bold", Background->GrayLevel[1]], Cell[StyleData["Input", "Presentation"], CellMargins->{{72, Inherited}, {8, 10}}, LineSpacing->{1, 0}], Cell[StyleData["Input", "Condensed"], CellMargins->{{40, 10}, {2, 3}}], Cell[StyleData["Input", "Printout"], CellMargins->{{39, 0}, {4, 6}}, FontSize->9] }, Closed]], Cell[StyleData["InputOnly"], Evaluatable->True, CellGroupingRules->"InputGrouping", DefaultFormatType->DefaultInputFormatType, AutoItalicWords->{}, FormatType->InputForm, ShowStringCharacters->True, NumberMarks->True, CounterIncrements->"Input", StyleMenuListing->None, FontWeight->"Bold", Background->GrayLevel[1]], Cell[CellGroupData[{ Cell[StyleData["Output"], CellMargins->{{47, 10}, {7, 5}}, CellEditDuplicate->True, CellGroupingRules->"OutputGrouping", CellHorizontalScrolling->True, PageBreakWithin->False, GroupPageBreakWithin->False, GeneratedCell->True, CellAutoOverwrite->True, CellLabelMargins->{{11, Inherited}, {Inherited, Inherited}}, DefaultFormatType->DefaultOutputFormatType, AutoItalicWords->{}, FormatType->InputForm, CounterIncrements->"Output", Background->GrayLevel[1]], Cell[StyleData["Output", "Presentation"], CellMargins->{{72, Inherited}, {10, 8}}, LineSpacing->{1, 0}], Cell[StyleData["Output", "Condensed"], CellMargins->{{41, Inherited}, {3, 2}}], Cell[StyleData["Output", "Printout"], CellMargins->{{39, 0}, {6, 4}}, FontSize->9] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["Message"], CellMargins->{{45, Inherited}, {Inherited, Inherited}}, CellGroupingRules->"OutputGrouping", PageBreakWithin->False, GroupPageBreakWithin->False, GeneratedCell->True, CellAutoOverwrite->True, ShowCellLabel->False, CellLabelMargins->{{11, Inherited}, {Inherited, Inherited}}, DefaultFormatType->DefaultOutputFormatType, AutoItalicWords->{}, FormatType->InputForm, CounterIncrements->"Message", StyleMenuListing->None, FontColor->RGBColor[0, 0, 1], Background->GrayLevel[1]], Cell[StyleData["Message", "Presentation"], CellMargins->{{72, Inherited}, {Inherited, Inherited}}, LineSpacing->{1, 0}], Cell[StyleData["Message", "Condensed"], CellMargins->{{41, Inherited}, {Inherited, Inherited}}], Cell[StyleData["Message", "Printout"], CellMargins->{{39, Inherited}, {Inherited, Inherited}}, FontSize->8, FontColor->GrayLevel[0]] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["Print"], CellMargins->{{45, Inherited}, {Inherited, Inherited}}, CellGroupingRules->"OutputGrouping", PageBreakWithin->False, GroupPageBreakWithin->False, GeneratedCell->True, CellAutoOverwrite->True, ShowCellLabel->False, CellLabelMargins->{{11, Inherited}, {Inherited, Inherited}}, DefaultFormatType->DefaultOutputFormatType, AutoItalicWords->{}, FormatType->InputForm, CounterIncrements->"Print", StyleMenuListing->None, Background->GrayLevel[1]], Cell[StyleData["Print", "Presentation"], CellMargins->{{72, Inherited}, {Inherited, Inherited}}, LineSpacing->{1, 0}], Cell[StyleData["Print", "Condensed"], CellMargins->{{41, Inherited}, {Inherited, Inherited}}], 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, FormatType->InputForm, CounterIncrements->"Graphics", ImageMargins->{{43, Inherited}, {Inherited, 0}}, StyleMenuListing->None, Background->GrayLevel[1]], 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}}, FontSize->9, Magnification->0.8] }, Open ]], Cell[CellGroupData[{ Cell[StyleData["CellLabel"], StyleMenuListing->None, FontFamily->"Helvetica", FontSize->9, FontColor->RGBColor[0, 0, 1], Background->GrayLevel[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]] }, Open ]], Cell[CellGroupData[{ Cell["Formulas and Programming", "Section"], Cell[CellGroupData[{ Cell[StyleData["InlineFormula"], CellMargins->{{10, 4}, {0, 8}}, CellHorizontalScrolling->True, ScriptLevel->1, SingleLetterItalics->True], Cell[StyleData["InlineFormula", "Presentation"], CellMargins->{{24, 10}, {10, 10}}, LineSpacing->{1, 5}], Cell[StyleData["InlineFormula", "Condensed"], CellMargins->{{8, 10}, {6, 6}}, LineSpacing->{1, 1}], Cell[StyleData["InlineFormula", "Printout"], CellMargins->{{2, 0}, {6, 6}}] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["DisplayFormula"], CellMargins->{{42, Inherited}, {Inherited, Inherited}}, CellHorizontalScrolling->True, DefaultFormatType->DefaultInputFormatType, ScriptLevel->0, SingleLetterItalics->True, UnderoverscriptBoxOptions->{LimitsPositioning->True}], Cell[StyleData["DisplayFormula", "Presentation"], LineSpacing->{1, 5}], Cell[StyleData["DisplayFormula", "Condensed"], LineSpacing->{1, 1}], Cell[StyleData["DisplayFormula", "Printout"]] }, Closed]] }, Open ]], Cell[CellGroupData[{ Cell["Styles for Headers and Footers", "Section"], Cell[StyleData["Header"], CellMargins->{{0, 0}, {4, 1}}, StyleMenuListing->None, FontSize->10, FontSlant->"Italic"], Cell[StyleData["Footer"], CellMargins->{{0, 0}, {0, 4}}, 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["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"]], Cell[StyleData["Hyperlink", "Condensed"]], Cell[StyleData["Hyperlink", "Printout"], 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"]], Cell[StyleData["MainBookLink", "Condensed"]], Cell[StyleData["MainBookLink", "Printout"], 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"]], Cell[StyleData["AddOnsLink", "Condensed"]], Cell[StyleData["AddOnLink", "Printout"], 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[ "RefGuideLink", #]}]&), Active->True, ButtonFrame->"None"}], Cell[StyleData["RefGuideLink", "Presentation"]], Cell[StyleData["RefGuideLink", "Condensed"]], Cell[StyleData["RefGuideLink", "Printout"], 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"]], Cell[StyleData["GettingStartedLink", "Condensed"]], Cell[StyleData["GettingStartedLink", "Printout"], 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"]], Cell[StyleData["OtherInformationLink", "Condensed"]], Cell[StyleData["OtherInformationLink", "Printout"], FontColor->GrayLevel[0], FontVariations->{"Underline"->False}] }, Closed]] }, 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"], Editable->False, Selectable->False, StyleBoxAutoDelete->True, Placeholder->True, StyleMenuListing->None], Cell[StyleData["Placeholder", "Presentation"]], Cell[StyleData["Placeholder", "Condensed"]], Cell[StyleData["Placeholder", "Printout"]] }, Closed]], Cell[CellGroupData[{ Cell[StyleData["SelectionPlaceholder"], Editable->False, Selectable->False, StyleBoxAutoDelete->True, Placeholder->PrimaryPlaceholder, StyleMenuListing->None, DrawHighlighted->True], Cell[StyleData["SelectionPlaceholder", "Presentation"]], Cell[StyleData["SelectionPlaceholder", "Condensed"]], Cell[StyleData["SelectionPlaceholder", "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, AutoItalicWords->{}, StyleMenuListing->None, FontFamily->"Courier", FontSize->12, Background->GrayLevel[1]], Cell[StyleData["InputForm"], AllowInlineCells->False, StyleMenuListing->None, FontFamily->"Courier"], Cell[StyleData["OutputForm"], PageWidth->Infinity, TextAlignment->Left, LineSpacing->{0.6, 1}, StyleMenuListing->None, FontFamily->"Courier"], Cell[StyleData["StandardForm"], LineSpacing->{1.25, 0}, StyleMenuListing->None, FontFamily->"Courier"], Cell[StyleData["TraditionalForm"], 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], Cell[StyleData["InlineCellEditing"], StyleMenuListing->None, Background->RGBColor[1, 0.749996, 0.8]] }, Closed]] }, Open ]], Cell[StyleData["InheritFromParent"], CellGroupingRules->{"NormalGrouping", 9}, Background->RGBColor[0.939986, 0.969985, 0.939986]] }] ] (******************************************************************* 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, 110, 4, 93, "Subtitle"], Cell[1889, 59, 193, 4, 50, "Text"], Cell[CellGroupData[{ Cell[2107, 67, 42, 0, 55, "Section"], Cell[2152, 69, 185, 4, 56, 31, 0, "StyleData", "All", "Working"], Cell[2340, 75, 190, 4, 56, 36, 0, "StyleData", "All", "Presentation"], Cell[2533, 81, 153, 4, 40, 32, 0, "StyleData", "All", "Printout"] }, Closed]], Cell[CellGroupData[{ Cell[2723, 90, 35, 0, 35, "Section"], Cell[2761, 92, 101, 3, 38, "Text"], Cell[2865, 97, 426, 11, 40, 27, 0, "StyleData", "Notebook", "All", StyleMenuListing->None] }, Closed]], Cell[CellGroupData[{ Cell[3328, 113, 38, 0, 35, "Section"], Cell[CellGroupData[{ Cell[3391, 117, 431, 13, 63, 24, 0, "StyleData", "Title", "All", CounterAssignments->{{"Section", 0}, {"Equation", 0}, {"Figure", 0}}], Cell[3825, 132, 120, 3, 67, 40, 0, "StyleData", "Title", "Presentation"], Cell[3948, 137, 131, 4, 45, 36, 0, "StyleData", "Title", "Printout"] }, Closed]], Cell[CellGroupData[{ Cell[4116, 146, 329, 9, 49, 27, 0, "StyleData", "Subtitle", "All", CounterAssignments->{{"Section", 0}, {"Equation", 0}, {"Figure", 0}}], Cell[4448, 157, 100, 2, 53, 43, 0, "StyleData", "Subtitle", "Presentation"], Cell[4551, 161, 112, 3, 44, 39, 0, "StyleData", "Subtitle", "Printout"] }, Closed]], Cell[CellGroupData[{ Cell[4700, 169, 416, 11, 51, 28, 0, "StyleData", "Section 1", "All", CounterIncrements->"Section", CounterAssignments->{{"Subsection", 0}, {"Subsubsection", 0}}], Cell[5119, 182, 137, 3, 73, 44, 0, "StyleData", "Section 1", "Presentation"], Cell[5259, 187, 149, 4, 66, 40, 0, "StyleData", "Section 1", "Printout"] }, Closed]], Cell[CellGroupData[{ Cell[5445, 196, 399, 11, 51, 26, 0, "StyleData", "Section", "All", CounterIncrements->"Section", CounterAssignments->{{"Subsection", 0}, {"Subsubsection", 0}}], Cell[5847, 209, 112, 2, 67, 42, 0, "StyleData", "Section", "Presentation"], Cell[5962, 213, 147, 4, 62, 38, 0, "StyleData", "Section", "Printout"] }, Closed]], Cell[CellGroupData[{ Cell[6146, 222, 312, 9, 37, 29, 0, "StyleData", "Subsection", "All", CounterIncrements->"Subsection", CounterAssignments->{{"Subsubsection", 0}}], Cell[6461, 233, 115, 2, 52, 45, 0, "StyleData", "Subsection", \ "Presentation"], Cell[6579, 237, 114, 3, 40, 41, 0, "StyleData", "Subsection", "Printout"] }, Closed]], Cell[CellGroupData[{ Cell[6730, 245, 69, 2, 38, 32, 0, "StyleData", "Subsubsection", "All"], Cell[6802, 249, 105, 2, 40, 48, 0, "StyleData", "Subsubsection", \ "Presentation"], Cell[6910, 253, 117, 3, 39, 44, 0, "StyleData", "Subsubsection", "Printout"] }, Closed]] }, Open ]], Cell[CellGroupData[{ Cell[7076, 262, 90, 1, 43, "Section"], Cell[CellGroupData[{ Cell[7191, 267, 259, 9, 67, 23, 0, "StyleData", "Text", "All"], Cell[7453, 278, 164, 5, 67, 39, 0, "StyleData", "Text", "Presentation"], Cell[7620, 285, 138, 4, 66, 35, 0, "StyleData", "Text", "Printout"] }, Open ]], Cell[CellGroupData[{ Cell[7795, 294, 190, 6, 48, 29, 0, "StyleData", "Commentary", "All"], Cell[7988, 302, 147, 4, 37, 45, 0, "StyleData", "Commentary", \ "Presentation"], Cell[8138, 308, 140, 4, 30, 41, 0, "StyleData", "Commentary", "Printout"] }, Closed]] }, Open ]], Cell[CellGroupData[{ Cell[8327, 318, 42, 0, 55, "Section"], Cell[8372, 320, 248, 5, 68, "Text"], Cell[CellGroupData[{ Cell[8645, 329, 639, 18, 62, 24, 0, "StyleData", "Input", "All"], Cell[9287, 349, 117, 2, 62, 40, 0, "StyleData", "Input", "Presentation"], Cell[9407, 353, 168, 4, 46, 36, 0, "StyleData", "Input", "Printout"] }, Open ]], Cell[9590, 360, 375, 12, 38, 30, 0, "StyleData", "InlineInput", "All", CounterIncrements->"Input"], Cell[CellGroupData[{ Cell[9990, 376, 635, 18, 67, 25, 0, "StyleData", "Output", "All"], Cell[10628, 396, 185, 4, 67, 41, 0, "StyleData", "Output", "Presentation"], Cell[10816, 402, 252, 7, 48, 37, 0, "StyleData", "Output", "Printout"] }, Open ]], Cell[CellGroupData[{ Cell[11105, 414, 524, 15, 61, 28, 0, "StyleData", "InputOnly", "All"], Cell[11632, 431, 88, 1, 67, 44, 0, "StyleData", "InputOnly", "Presentation"], Cell[11723, 434, 100, 2, 64, 40, 0, "StyleData", "InputOnly", "Printout"] }, Closed]], Cell[CellGroupData[{ Cell[11860, 441, 538, 16, 34, 26, 0, "StyleData", "Message", "All", StyleMenuListing->None], Cell[12401, 459, 123, 2, 28, 42, 0, "StyleData", "Message", "Presentation"], Cell[12527, 463, 95, 2, 24, 38, 0, "StyleData", "Message", "Printout"] }, Closed]], Cell[CellGroupData[{ Cell[12659, 470, 480, 14, 51, 24, 0, "StyleData", "Print", "All", StyleMenuListing->None], Cell[13142, 486, 83, 1, 56, 40, 0, "StyleData", "Print", "Presentation"], Cell[13228, 489, 94, 2, 51, 36, 0, "StyleData", "Print", "Printout"] }, Closed]], Cell[CellGroupData[{ Cell[13359, 496, 412, 12, 34, 27, 0, "StyleData", "Graphics", "All", StyleMenuListing->None], Cell[13774, 510, 123, 2, 44, 43, 0, "StyleData", "Graphics", "Presentation"], Cell[13900, 514, 112, 2, 44, 39, 0, "StyleData", "Graphics", "Printout"] }, Closed]], Cell[CellGroupData[{ Cell[14049, 521, 155, 5, 36, 28, 0, "StyleData", "CellLabel", "All", StyleMenuListing->None], Cell[14207, 528, 102, 1, 36, 44, 0, "StyleData", "CellLabel", \ "Presentation"], Cell[14312, 531, 112, 2, 32, 40, 0, "StyleData", "CellLabel", "Printout"] }, Closed]] }, Open ]], Cell[CellGroupData[{ Cell[14473, 539, 32, 0, 55, "Section"], Cell[CellGroupData[{ Cell[14530, 543, 329, 9, 82, 25, 0, "StyleData", "Author", "All", CounterAssignments->{{"Section", 0}, {"Equation", 0}, {"Figure", 0}}], Cell[14862, 554, 78, 1, 86, 41, 0, "StyleData", "Author", "Presentation"], Cell[14943, 557, 73, 1, 81, 37, 0, "StyleData", "Author", "Printout"] }, Closed]], Cell[CellGroupData[{ Cell[15053, 563, 148, 5, 36, 27, 0, "StyleData", "Abstract", "All"], Cell[15204, 570, 106, 2, 78, 43, 0, "StyleData", "Abstract", "Presentation"], Cell[15313, 574, 78, 2, 61, 39, 0, "StyleData", "Abstract", "Printout"] }, Closed]], Cell[CellGroupData[{ Cell[15428, 581, 128, 4, 35, 26, 0, "StyleData", "Caption", "All"], Cell[15559, 587, 93, 2, 37, 42, 0, "StyleData", "Caption", "Presentation"], Cell[15655, 591, 111, 3, 33, 38, 0, "StyleData", "Caption", "Printout"] }, Closed]], Cell[CellGroupData[{ Cell[15803, 599, 133, 4, 38, 28, 0, "StyleData", "Reference", "All"], Cell[15939, 605, 150, 4, 40, 44, 0, "StyleData", "Reference", \ "Presentation"], Cell[16092, 611, 89, 2, 34, 40, 0, "StyleData", "Reference", "Printout"] }, Closed]], Cell[CellGroupData[{ Cell[16218, 618, 340, 9, 48, 31, 0, "StyleData", "PictureGroup", "All", StyleMenuListing->None], Cell[16561, 629, 127, 2, 44, 47, 0, "StyleData", "PictureGroup", \ "Presentation"], Cell[16691, 633, 116, 2, 44, 43, 0, "StyleData", "PictureGroup", "Printout"] }, Closed]] }, Closed]], Cell[CellGroupData[{ Cell[16856, 641, 43, 0, 35, "Section"], Cell[CellGroupData[{ Cell[16924, 645, 298, 7, 36, 33, 0, "StyleData", "DisplayFormula", "All", StyleMenuListing->None], Cell[17225, 654, 115, 2, 38, 49, 0, "StyleData", "DisplayFormula", \ "Presentation"], Cell[17343, 658, 79, 1, 36, 45, 0, "StyleData", "DisplayFormula", "Printout"] }, Closed]], Cell[CellGroupData[{ Cell[17459, 664, 315, 9, 36, 34, 0, "StyleData", "ChemicalFormula", "All"], Cell[17777, 675, 93, 1, 38, 50, 0, "StyleData", "ChemicalFormula", \ "Presentation"], Cell[17873, 678, 119, 3, 35, 46, 0, "StyleData", "ChemicalFormula", \ "Printout"] }, Closed]], Cell[CellGroupData[{ Cell[18029, 686, 127, 3, 36, 26, 0, "StyleData", "Program", "All"], Cell[18159, 691, 85, 1, 38, 42, 0, "StyleData", "Program", "Presentation"], Cell[18247, 694, 112, 3, 35, 38, 0, "StyleData", "Program", "Printout"] }, Closed]] }, Closed]], Cell[CellGroupData[{ Cell[18408, 703, 49, 0, 35, "Section"], Cell[18460, 705, 225, 4, 74, "Text"], Cell[CellGroupData[{ Cell[18710, 713, 357, 8, 40, 35, 0, "StyleData", "NumberedEquation", "All", CounterIncrements->"NumberedEquation"], Cell[19070, 723, 117, 2, 38, 51, 0, "StyleData", "NumberedEquation", \ "Presentation"], Cell[19190, 727, 96, 2, 32, 47, 0, "StyleData", "NumberedEquation", \ "Printout"] }, Closed]], Cell[CellGroupData[{ Cell[19323, 734, 329, 7, 64, 33, 0, "StyleData", "NumberedFigure", "All", CounterIncrements->"NumberedFigure"], Cell[19655, 743, 115, 2, 57, 49, 0, "StyleData", "NumberedFigure", \ "Presentation"], Cell[19773, 747, 95, 2, 48, 45, 0, "StyleData", "NumberedFigure", "Printout"] }, Closed]], Cell[CellGroupData[{ Cell[19905, 754, 350, 8, 64, 32, 0, "StyleData", "NumberedTable", "All", CounterIncrements->"NumberedTable"], Cell[20258, 764, 114, 2, 57, 48, 0, "StyleData", "NumberedTable", \ "Presentation"], Cell[20375, 768, 94, 2, 48, 44, 0, "StyleData", "NumberedTable", "Printout"] }, Closed]] }, Closed]], Cell[CellGroupData[{ Cell[20518, 776, 49, 0, 35, "Section"], Cell[20570, 778, 93, 3, 34, 25, 0, "StyleData", "Header", "All", StyleMenuListing->None], Cell[20666, 783, 119, 4, 35, 29, 0, "StyleData", "PageNumber", "All", StyleMenuListing->None], Cell[20788, 789, 118, 4, 34, 25, 0, "StyleData", "Footer", "All", StyleMenuListing->None] }, Closed]] }, Open ]] } ] *) (******************************************************************* End of Mathematica Notebook file. *******************************************************************)