(* Content-type: application/mathematica *)

(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)

(* CreatedBy='Mathematica 7.0' *)

(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[       145,          7]
NotebookDataLength[     44216,       1437]
NotebookOptionsPosition[     31019,       1108]
NotebookOutlinePosition[     31448,       1126]
CellTagsIndexPosition[     31405,       1123]
MenuPosition->1100
WindowFrame->Normal*)

(* Beginning of Notebook Content *)
Notebook[{
Cell[CellGroupData[{
Cell[TextData[{
 "Style Definitions for the ",StyleBox["Mathematica",
  FontSlant->"Italic"]," developments at University of Szeged ", "2011"
}], "Subtitle",
 CellMargins->{{0, Inherited}, {Inherited, 0}},
 CellFrameMargins->{{20, 4}, {8, 20}},
 FontSize->24,
 FontWeight->"Bold",
 FontColor->GrayLevel[0],
 Background->RGBColor[247/256,141/256,30/256]]
}, Open  ]],

 Cell[StyleData[StyleDefinitions -> "Core.nb"]],



Cell[CellGroupData[{

Cell["Style Environment Names", "Section"],


Cell[StyleData[All, "Working"],
 PageWidth->WindowWidth,
 CellLabelMargins->{{12, Inherited}, {Inherited, Inherited}},
 ShowAutoStyles->False,
 ScriptMinSize->9,
 MenuPosition->1100],

Cell[StyleData[All, "Presentation"],
 PageWidth->WindowWidth,
 ShowCellBracket->Automatic,
 ShowGroupOpener->True,
 CellLabelMargins->{{24, Inherited}, {Inherited, Inherited}},
 ShowAutoStyles->False,
 AutoStyleOptions->{"HighlightMisspelledWords"->False},
 ScriptMinSize->15,
 MenuSortingValue->1200],

Cell[StyleData[All, "SlideShow", StyleDefinitions -> StyleData[
 All, "Presentation"]],
 PageWidth->WindowWidth,
 DockedCells->FEPrivate`FrontEndResource[
  "FEExpressions", "SlideshowToolbar"],
 ScrollingOptions->{"PagewiseDisplay"->True,
 "VerticalScrollRange"->Fit},
 MenuPosition->1300],

Cell[StyleData[All, "Condensed"],
 PageWidth->WindowWidth,
 CellLabelMargins->{{8, Inherited}, {Inherited, Inherited}},
 ShowAutoStyles->False,
 ScriptMinSize->8,
 MenuPosition->1400],

Cell[StyleData[All, "Printout"],
 PageWidth->PaperWidth,
 CellLabelMargins->{{2, Inherited}, {Inherited, Inherited}},
 ShowAutoStyles->False,
 ShowSyntaxStyles->False,
 AutoStyleOptions->{"HighlightMisspelledWords"->False},
 ScriptMinSize->5,
 MenuPosition->1500,
 PrivateFontOptions->{"FontType"->"Outline"},
 Magnification->1]


Cell[StyleData[All, "PrintoutGray", StyleDefinitions -> StyleData[
 All, "Printout"]],
 MenuSortingValue->1500]



}, Closed]],



Cell[CellGroupData[{

Cell["Notebook Options Settings", "Section"],

Cell["\<\
The options defined for the style below will be used at the Notebook level.\
\>", "Text"],

Cell[StyleData["Notebook"],
 PageHeaders->{{
    Cell[
     TextData[{
       Cell[
        TextData[{
          CounterBox["Page"]}], "PageNumber"], " ", 
       Cell[
       " ", "Header", CellFrame -> {{0.5, 0}, {0, 0}}, CellFrameMargins -> 4], 
       Cell[
        TextData[{
          ValueBox["FileName"]}], "Header"]}], 
     CellMargins -> {{0, Inherited}, {Inherited, Inherited}}], None, None}, {
   None, None, 
    Cell[
     TextData[{
       Cell[
        TextData[{
          ValueBox["FileName"]}], "Header"], 
       Cell[
       " ", "Header", CellFrame -> {{0, 0.5}, {0, 0}}, CellFrameMargins -> 4],
        " ", 
       Cell[
        TextData[{
          CounterBox["Page"]}], "PageNumber"]}], 
     CellMargins -> {{Inherited, 0}, {Inherited, Inherited}}]}},
 PageHeaderLines->{False, False},
 PageFooterLines->{False, False},
 PrintingOptions->{"FacingPages"->True,
 "FirstPageFace"->Right,
 "FirstPageFooter"->True,
 "FirstPageHeader"->False}]
}, Closed]],

Cell[CellGroupData[{

Cell["Styles for Titles, Chapters and Sections Cells", "Section"],

Cell[CellGroupData[{

Cell["Titles", "Subsection"],


Cell[CellGroupData[{

Cell[StyleData["MainTitle"],
 CellFrame->{{1, 2}, {2, 1}},
 CellDingbat->None,
ShowCellBracket->Automatic,
 CellMargins->{{0, 10}, {20, 20}},
 CellElementSpacings->{"GroupIconTopMargin"->0},
 CellFrameColor->RGBColor[0, 0, 0.2],
 
(* CellMargins->{{27, Inherited}, {10, 30}},*)
 CellGroupingRules->{"TitleGrouping", 0},
 PageBreakBelow->False,
 DefaultNewInlineCellStyle->"None",
 InputAutoReplacements->{"TeX" -> FormBox[
     StyleBox[
      RowBox[{"T", 
        AdjustmentBox[
        "E", BoxMargins -> {{-0.3, 0}, {0, 0}}, BoxBaselineShift -> 0.5], 
        "X"}], SingleLetterItalics -> False], TraditionalForm], "LaTeX" -> 
   FormBox[
     StyleBox[
      RowBox[{"L", 
        StyleBox[
         AdjustmentBox[
         "A", BoxMargins -> {{-0.5, -0.3}, {0, 0}}, BoxBaselineShift -> -0.4],
          FontSize -> Smaller], "T", 
        AdjustmentBox[
        "E", BoxMargins -> {{-0.3, 0}, {0, 0}}, BoxBaselineShift -> 0.5], 
        "X"}], SingleLetterItalics -> False], TraditionalForm], "mma" -> 
   "Mathematica", "Mma" -> "Mathematica", "MMA" -> "Mathematica", 
   "gridMathematica" -> FormBox[
     RowBox[{"grid", 
       AdjustmentBox[
        StyleBox["Mathematica", FontSlant -> "Italic"], 
        BoxMargins -> {{-0.175, 0}, {0, 0}}]}], TextForm], "webMathematica" -> 
   FormBox[
     RowBox[{"web", 
       AdjustmentBox[
        StyleBox["Mathematica", FontSlant -> "Italic"], 
        BoxMargins -> {{-0.175, 0}, {0, 0}}]}], TextForm], ParentList},
 LanguageCategory->"NaturalLanguage",
 MenuPosition->1000,

TextAlignment->Center,
 TextJustification->0,
 LineSpacing->{1., 5.},
 CounterIncrements->"Main-Title",
 CounterAssignments->{{"Part", 0}, {"Chapter", 0},{"Section", 0}, {"Equation", 0}, {"NumberedFigure", 0},
{"NumberedTable", 0}, 
{"Subtitle", 0}, {"Subsubtitle", 0}},
 FontFamily->"Helvetica",
 FontSize->30,
 FontWeight->"Bold",
 FontSlant->"Italic",
 FontTracking->"Plain",
 FontColor->RGBColor[1, 1, 1],
 (* Background->RGBColor[0.850004, 0.80004, 1]
*)
 Background-> RGBColor[
  0.35, 0.40, 0.8]
 ],

Cell[StyleData["Main-Title", "Presentation"],
 CellMargins->{{0, Inherited}, {20, 45}},
 LineSpacing->{1, 5},
 FontSize->40],

Cell[StyleData["Main-Title", "Condensed"],
 CellMargins->{{0, 10}, {4, 8}},
 FontSize->20],

Cell[StyleData["Main-Title", "Printout"],
 CellMargins->{{0, 10}, {10, 20}}],

Cell[StyleData["Main-Title", "SlideShow"],
 FontSize->40]
}, Closed]],



Cell[CellGroupData[{

Cell[StyleData["Title"],
ShowCellBracket->Automatic,
 CellMargins->{{0, 10}, {15,20}},
 CellElementSpacings->{"GroupIconTopMargin"->0},
 CellFrameColor->RGBColor[0, 0, 0.2],
 CellGroupingRules->{"TitleGrouping", 0},
 PageBreakBelow->False,
 DefaultNewInlineCellStyle->"None",
 InputAutoReplacements->{"TeX" -> FormBox[
     StyleBox[
      RowBox[{"T", 
        AdjustmentBox[
        "E", BoxMargins -> {{-0.3, 0}, {0, 0}}, BoxBaselineShift -> 0.5], 
        "X"}], SingleLetterItalics -> False], TraditionalForm], "LaTeX" -> 
   FormBox[
     StyleBox[
      RowBox[{"L", 
        StyleBox[
         AdjustmentBox[
         "A", BoxMargins -> {{-0.5, -0.3}, {0, 0}}, BoxBaselineShift -> -0.4],
          FontSize -> Smaller], "T", 
        AdjustmentBox[
        "E", BoxMargins -> {{-0.3, 0}, {0, 0}}, BoxBaselineShift -> 0.5], 
        "X"}], SingleLetterItalics -> False], TraditionalForm], "mma" -> 
   "Mathematica", "Mma" -> "Mathematica", "MMA" -> "Mathematica", 
   "gridMathematica" -> FormBox[
     RowBox[{"grid", 
       AdjustmentBox[
        StyleBox["Mathematica", FontSlant -> "Italic"], 
        BoxMargins -> {{-0.175, 0}, {0, 0}}]}], TextForm], "webMathematica" -> 
   FormBox[
     RowBox[{"web", 
       AdjustmentBox[
        StyleBox["Mathematica", FontSlant -> "Italic"], 
        BoxMargins -> {{-0.175, 0}, {0, 0}}]}], TextForm], ParentList},
 LanguageCategory->"NaturalLanguage",
 MenuPosition->1100,
 MenuCommandKey->"1",

TextAlignment->Center,
 TextJustification->0,
 LineSpacing->{1., 5.},
 CounterIncrements->"Title",
 CounterAssignments->{{"Part", 0}, {"Chapter", 0},{"Section", 0}, {"NumberedEquation", 0}, {"NumberedFigure", 0}, 
  {"NumberedTable", 0},
{"Subtitle", 0}, {"Subsubtitle", 0}},
 FontFamily->"Helvetica",
 FontSize->28,
 FontWeight->"Bold",
 FontSlant->"Plain",
 FontTracking->"Plain",
 FontColor->RGBColor[
  0.5, 0., 0.]
(*
RGBColor[0, 0,0.5]
*)
 ],

Cell[StyleData["Title", "Presentation"],
 CellMargins->{{0, Inherited}, {20, 45}},
 LineSpacing->{1, 5},
 FontSize->38],

Cell[StyleData["Title", "Condensed"],
 CellMargins->{{0, 10}, {4, 8}},
 FontSize->20],

Cell[StyleData["Title", "Printout"],
 CellMargins->{{0, 5}, {10, 15}}],

Cell[StyleData["Title", "SlideShow"],
 FontSize->36]
}, Closed]],

Cell[CellGroupData[{

Cell[StyleData["Subtitle"],
 CellMargins->{{0, 10},{10, 5}},
(* 
	CellFrame->{{1, 3}, {3, 1}},
*)
 CellGroupingRules->{"TitleGrouping", 10},
 PageBreakBelow->False,

ShowCellBracket->Automatic,

(* CellFrameMargins->7, *)

 CellFrameColor->RGBColor[0, 0, 0.2],
 DefaultNewInlineCellStyle->"None",
 InputAutoReplacements->{"TeX" -> FormBox[
     StyleBox[
      RowBox[{"T", 
        AdjustmentBox[
        "E", BoxMargins -> {{-0.3, 0}, {0, 0}}, BoxBaselineShift -> 0.5], 
        "X"}], SingleLetterItalics -> False], TraditionalForm], "LaTeX" -> 
   FormBox[
     StyleBox[
      RowBox[{"L", 
        StyleBox[
         AdjustmentBox[
         "A", BoxMargins -> {{-0.5, -0.3}, {0, 0}}, BoxBaselineShift -> -0.4],
          FontSize -> Smaller], "T", 
        AdjustmentBox[
        "E", BoxMargins -> {{-0.3, 0}, {0, 0}}, BoxBaselineShift -> 0.5], 
        "X"}], SingleLetterItalics -> False], TraditionalForm], "mma" -> 
   "Mathematica", "Mma" -> "Mathematica", "MMA" -> "Mathematica", 
   "gridMathematica" -> FormBox[
     RowBox[{"grid", 
       AdjustmentBox[
        StyleBox["Mathematica", FontSlant -> "Italic"], 
        BoxMargins -> {{-0.175, 0}, {0, 0}}]}], TextForm], "webMathematica" -> 
   FormBox[
     RowBox[{"web", 
       AdjustmentBox[
        StyleBox["Mathematica", FontSlant -> "Italic"], 
        BoxMargins -> {{-0.175, 0}, {0, 0}}]}], TextForm], ParentList},
 LanguageCategory->"NaturalLanguage",
MenuPosition->1120,
 MenuCommandKey->"2",
 
TextAlignment->Center,
 TextJustification->0,
 LineSpacing->{1, 1},
 CounterIncrements->"Subtitle",
 CounterAssignments->{{"Part", 0}, {"Chapter", 0},{"Section", 0}, {"NumberedEquation", 0}, {"NumberedFigure", 0},{"NumberedTable", 0}},
 FontFamily->"Helvetica",
 FontSize->24,
 FontWeight->"Bold",
 FontSlant->"Italic",
 FontColor->RGBColor [0.3, 0.3, 0.6]
 (* 
	Background->RGBColor[1, 0.86, 0.35]
*)
 ],

Cell[StyleData["Subtitle", "Presentation"],
 CellMargins->{{0, Inherited}, {30, 3}},
 LineSpacing->{1, 16},
 FontSize->34],

Cell[StyleData["Subtitle", "Condensed"],
 CellMargins->{{0, 10}, {4, 4}},
 FontSize->18],

Cell[StyleData["Subtitle", "Printout"],
 CellMargins->{{0, 5}, {10, 5}}],

Cell[StyleData["Subtitle", "SlideShow"],
 FontSize->32]
}, Closed]]
}, Closed]],

Cell[CellGroupData[{

Cell["Chapters", "Subsection"],

(*

Cell[CellGroupData[{

Cell[StyleData["Chapter-Init"],
 CellFrame->False,
 ShowCellBracket->Automatic,
 CellMargins->{{0, 5}, {0, 0}},
 CellElementSpacings->{"ClosedGroupTopMargin"->20},
 CellGroupingRules->{"SectionGrouping", 16},
 CounterAssignments->{{"Part", 0}, {"Chapter", 0}},
 FontFamily->"Helvetica",
 FontSize->10,
 FontWeight->"Bold",
 FontSlant->"Plain",
 FontTracking->"Plain",
 FontColor->RGBColor[0, 0, 0.2],
MenuPosition->1140],

Cell[StyleData["Chapter-Init", "Printout"]]
}, Closed]],

*)

Cell[CellGroupData[{

Cell[StyleData["Chapter"],
 CellFrame->False,
 ShowCellBracket->Automatic,
 ShowGroupOpener->False,
 CellMargins->{{0, 10}, {5, 35}},
 CellElementSpacings->{"ClosedGroupTopMargin"->20},
 CellGroupingRules->{"SectionGrouping", 16},
CellDingbat->Cell[
   TextData[{ 
     CounterBox["Chapter"],". "}](*, CellSize -> {45, Inherited}*), 
   TextAlignment -> Left], 

 CounterIncrements->"Chapter",
 CounterAssignments->{{"SubChapter", 0}},
 FontFamily->"Helvetica",
 FontSize->20,
 FontWeight->"Bold",
 FontSlant->"Plain",
 FontTracking->"Plain",
FontColor->RGBColor[ 0.3, 0.2, 0.5],
MenuPosition->1160],

Cell[StyleData["Chapter", "Printout"],
 PageBreakBelow->False],

Cell[StyleData["Chapter", "SlideShow"],
 FontSize->30]


}, Closed]],

Cell[CellGroupData[{

Cell[StyleData["Chapter-Nonumber"],
 CellFrame->False,
 ShowCellBracket->Automatic,
 ShowGroupOpener->False,
 CellMargins->{{0, 10}, {5, 35}},
 CellElementSpacings->{"ClosedGroupTopMargin"->20},
 CellGroupingRules->{"SectionGrouping", 16},
 CounterIncrements->"Chapter",
 CounterAssignments->{{"SubChapter", 0}},
 FontFamily->"Helvetica",
 FontSize->20,
 FontWeight->"Bold",
 FontSlant->"Plain",
 FontTracking->"Plain",
FontColor->RGBColor[ 0.3, 0.2, 0.5],
MenuPosition->1160],

Cell[StyleData["Chapter-Nonumber", "Printout"],
 PageBreakBelow->False],

Cell[StyleData["Chapter-Nonumber", "SlideShow"],
 FontSize->30]


}, Closed]],

Cell[CellGroupData[{

Cell[StyleData["Appendix"],
 CellFrame->False,
 ShowCellBracket->Automatic,
 ShowGroupOpener->False,
 CellMargins->{{0, 10}, {5, 35}},
 CellElementSpacings->{"ClosedGroupTopMargin"->20},
 CellGroupingRules->{"SectionGrouping", 16},
 
CellDingbat->Cell[
   TextData[{ 
     CounterBox["Appendix"],". "}] (*, CellSize -> {45, Inherited}*), 
   TextAlignment -> Left], 

 CounterIncrements->"Appendix",
CounterBoxOptions->{CounterFunction:>(Part[
   CharacterRange["A", "Z"], #]& )},
 CounterAssignments->{{"SubChapter-App", 0}},
 FontFamily->"Helvetica",
 FontSize->20,
 FontWeight->"Bold",
 FontSlant->"Plain",
 FontTracking->"Plain",
FontColor->RGBColor[0.3, 0.2, 0.5],
MenuPosition->1180],

Cell[StyleData["Appendix", "Printout"],
 PageBreakBelow->False],

Cell[StyleData["Appendix", "SlideShow"],
 FontSize->30]

}, Closed]],

Cell[CellGroupData[{

Cell[StyleData["SubChapter"],
 CellFrame->False,
 ShowCellBracket->Automatic,
 ShowGroupOpener->False,
 CellMargins->{{0, 10}, {5, 20}},
 CellElementSpacings->{"ClosedGroupTopMargin"->15},
 CellGroupingRules->{"SectionGrouping", 17},
 
CellDingbat->Cell[
   TextData[{CounterBox["Chapter"],".",
     CounterBox["SubChapter"],". "}] (*, CellSize -> {35, Inherited}*), 
   TextAlignment -> Left],
 
CounterIncrements->"SubChapter",
 (* 
CounterAssignments->{{"SubSubChapter", 0}, {"Theorem", 0},
 {"Remark", 0}, {
   "Corollary", 0}, {"Problem", 0}, {"SolvedProblem", 0}, {"Section", 0}, {
   "Equation", 0}, {"Figure", 0}, {"NumberedInput", 0}, {
   "NumberedFormula", 0}, {"NumberedTable", 0}},
*)
 FontFamily->"Helvetica",
 FontSize->18,
 FontWeight->"Bold",
 FontSlant->"Plain",
 FontTracking->"Plain",
 FontColor->RGBColor [0.3, 0.3, 0.6],
MenuPosition->1200],

Cell[StyleData["SubChapter", "Printout"],
 PageBreakBelow->False],

Cell[StyleData["SubChapter", "SlideShow"],
 FontSize->26]
}, Closed]],

(*

Cell[CellGroupData[{

Cell[StyleData["SubSubChapter"],
 CellFrame->False,
 ShowCellBracket->Automatic,
 ShowGroupOpener->False,
 CellMargins->{{0, 10}, {5, 10}},
 CellElementSpacings->{"ClosedGroupTopMargin"->12},
 CellGroupingRules->{"SectionGrouping", 18},
 
CellDingbat->Cell[
   TextData[{CounterBox["Chapter"],".",
     CounterBox["SubChapter"],".",CounterBox["SubSubChapter"], "."}],
 CellSize -> {40, Inherited}, 
   TextAlignment -> Left],

 CounterIncrements->"SubSubChapter",
 FontFamily->"Helvetica",
 FontSize->16,
 FontWeight->"Bold",
 FontSlant->"Italic",
 FontTracking->"Plain",
 FontColor->RGBColor[0, 0, 0.2]
(* MenuPosition->1240
*)],

Cell[StyleData["SubSubChapter", "Printout"],
 PageBreakBelow->False]
}, Closed]]

*)

}, Closed]],


Cell[CellGroupData[{

Cell["Sections", "Subsection"],



Cell[CellGroupData[{

Cell[StyleData["MainSection"],
 CellFrame->{{0, 0}, {0.5, 1.5}},
 ShowCellBracket->Automatic,
 ShowGroupOpener->True,
 CellMargins->{{25, 100}, {5, 10}},
 CellElementSpacings->{"ClosedCellHeight"->17,
 "ClosedGroupTopMargin"->20,
 "GroupIconTopMargin"->0},
 CellGroupingRules->{"SectionGrouping", 35},
 PageBreakBelow->False,
 CellFrameMargins->{{4, 4}, {1, 1}},
 CellFrameColor->RGBColor[0.7, 0.7, 0.8]

(*
RGBColor[250/256,150/256,40/256]
[0.7, 0.6, 0.5]
*),
 TextJustification->0,
 FontFamily->"Helvetica",
 FontSize->16,
 FontWeight->"Bold",
 FontSlant->"Plain",
  FontColor->RGBColor[ 0.3, 0.2, 0.5],
 Background->RGBColor[0.93, 0.93, 1],
 (* Background->RGBColor[0.850004, 0.850004, 1],*)
MenuPosition->1260],

Cell[StyleData["MainSection", "Printout"],
 PageBreakBelow->False],

Cell[StyleData["MainSection", "SlideShow"],
 CellMargins->{{20, 20}, {10, 5}},
 FontSize->26]
}, Open  ]],


Cell[CellGroupData[{

Cell[StyleData["Section"],
 CellFrame->False,
ShowCellBracket->Automatic,
 ShowGroupOpener->True,
CellDingbat->"\[GraySquare] ",
 CellMargins->{{40, Inherited}, {5, 15}},
 CellGroupingRules->{"SectionGrouping", 40},
 PageBreakBelow->False,
CellFrameMargins->4,
 DefaultNewInlineCellStyle->"None",
 InputAutoReplacements->{"TeX" -> FormBox[
     StyleBox[
      RowBox[{"T", 
        AdjustmentBox[
        "E", BoxMargins -> {{-0.3, 0}, {0, 0}}, BoxBaselineShift -> 0.5], 
        "X"}], SingleLetterItalics -> False], TraditionalForm], "LaTeX" -> 
   FormBox[
     StyleBox[
      RowBox[{"L", 
        StyleBox[
         AdjustmentBox[
         "A", BoxMargins -> {{-0.5, -0.3}, {0, 0}}, BoxBaselineShift -> -0.4],
          FontSize -> Smaller], "T", 
        AdjustmentBox[
        "E", BoxMargins -> {{-0.3, 0}, {0, 0}}, BoxBaselineShift -> 0.5], 
        "X"}], SingleLetterItalics -> False], TraditionalForm], "mma" -> 
   "Mathematica", "Mma" -> "Mathematica", "MMA" -> "Mathematica", 
   "gridMathematica" -> FormBox[
     RowBox[{"grid", 
       AdjustmentBox[
        StyleBox["Mathematica", FontSlant -> "Italic"], 
        BoxMargins -> {{-0.175, 0}, {0, 0}}]}], TextForm], "webMathematica" -> 
   FormBox[
     RowBox[{"web", 
       AdjustmentBox[
        StyleBox["Mathematica", FontSlant -> "Italic"], 
        BoxMargins -> {{-0.175, 0}, {0, 0}}]}], TextForm], ParentList},
 LineSpacing->{1, 2},
 LanguageCategory->"NaturalLanguage",
 CounterIncrements->"Section",
 CounterAssignments->{{"Subsection", 0}, {"Subsubsection", 0}},
 MenuCommandKey->"4",
 FontFamily->"Helvetica",
 FontSize->16,
 FontWeight->"Bold",
FontColor->RGBColor[0, 0, 0.500008],
MenuPosition->1300
],

Cell[StyleData["Section", "Presentation"],
 CellMargins->{{40, Inherited}, {12, 20}},
 LineSpacing->{1, 10},
 FontSize->40],


Cell[StyleData["Section", "Condensed"],
 CellMargins->{{40, Inherited}, {6, 10}},
 FontSize->12],

Cell[
StyleData["Section", "Printout"],
CellMargins->{{40, 0},{6, 10}}
],

Cell[StyleData["Section", "SlideShow"],
 CellMargins->{{40, 20}, {10, 15}},
 PageBreakBelow->False,
 FontSize->26]

}, Closed]],

Cell[CellGroupData[{

Cell[StyleData["Subsection"],
 CellFrame->False,
 ShowGroupOpener->True,
ShowCellBracket->Automatic,
 CellDingbat->" \[EmptySquare] ",
 CellMargins->{{40, Inherited}, {3, 10}},
 CellGroupingRules->{"SectionGrouping", 45},
 PageBreakBelow->False,
 DefaultNewInlineCellStyle->"None",
 InputAutoReplacements->{"TeX" -> FormBox[
     StyleBox[
      RowBox[{"T", 
        AdjustmentBox[
        "E", BoxMargins -> {{-0.3, 0}, {0, 0}}, BoxBaselineShift -> 0.5], 
        "X"}], SingleLetterItalics -> False], TraditionalForm], "LaTeX" -> 
   FormBox[
     StyleBox[
      RowBox[{"L", 
        StyleBox[
         AdjustmentBox[
         "A", BoxMargins -> {{-0.5, -0.3}, {0, 0}}, BoxBaselineShift -> -0.4],
          FontSize -> Smaller], "T", 
        AdjustmentBox[
        "E", BoxMargins -> {{-0.3, 0}, {0, 0}}, BoxBaselineShift -> 0.5], 
        "X"}], SingleLetterItalics -> False], TraditionalForm], "mma" -> 
   "Mathematica", "Mma" -> "Mathematica", "MMA" -> "Mathematica", 
   "gridMathematica" -> FormBox[
     RowBox[{"grid", 
       AdjustmentBox[
        StyleBox["Mathematica", FontSlant -> "Italic"], 
        BoxMargins -> {{-0.175, 0}, {0, 0}}]}], TextForm], "webMathematica" -> 
   FormBox[
     RowBox[{"web", 
       AdjustmentBox[
        StyleBox["Mathematica", FontSlant -> "Italic"], 
        BoxMargins -> {{-0.175, 0}, {0, 0}}]}], TextForm], ParentList},
 LanguageCategory->"NaturalLanguage",
 CounterIncrements->"Subsection",
 CounterAssignments->{{"Subsubsection", 0}},
 MenuPosition->1300,
 MenuCommandKey->"5",
 FontFamily->"Helvetica",
 FontSize->15,
 FontWeight->"Bold",FontSlant->"Italic",
FontColor->RGBColor[ 0.3, 0.3, 0.6],
MenuPosition->1320
],

Cell[StyleData["Subsection", "Presentation"],
 CellMargins->{{40, Inherited}, {12, 18}},
 LineSpacing->{1, 10},
 FontSize->28],

Cell[StyleData["Subsection", "Condensed"],
 CellMargins->{{40, Inherited}, {6, 12}},
 FontSize->12],

Cell[StyleData["Subsection", "Printout"],
 CellMargins->{{40, 0}, {7, 22}}],

Cell[StyleData["Subsection", "SlideShow"],
 CellMargins->{{40, 20}, {10, 10}},
 PageBreakBelow->False,
 FontSize->22]
}, Closed]],

Cell[CellGroupData[{

Cell[StyleData["Subsubsection"],
ShowCellBracket->Automatic,
 CellDingbat->" \[EmptySmallSquare] ",
 CellMargins->{{40, Inherited}, {3, 8}},
 CellGroupingRules->{"SectionGrouping", 50},
 PageBreakBelow->False,
 InputAutoReplacements->{"TeX" -> FormBox[
     StyleBox[
      RowBox[{"T", 
        AdjustmentBox[
        "E", BoxMargins -> {{-0.3, 0}, {0, 0}}, BoxBaselineShift -> 0.5], 
        "X"}], SingleLetterItalics -> False], TraditionalForm], "LaTeX" -> 
   FormBox[
     StyleBox[
      RowBox[{"L", 
        StyleBox[
         AdjustmentBox[
         "A", BoxMargins -> {{-0.5, -0.3}, {0, 0}}, BoxBaselineShift -> -0.4],
          FontSize -> Smaller], "T", 
        AdjustmentBox[
        "E", BoxMargins -> {{-0.3, 0}, {0, 0}}, BoxBaselineShift -> 0.5], 
        "X"}], SingleLetterItalics -> False], TraditionalForm], "mma" -> 
   "Mathematica", "Mma" -> "Mathematica", "MMA" -> "Mathematica", 
   "gridMathematica" -> FormBox[
     RowBox[{"grid", 
       AdjustmentBox[
        StyleBox["Mathematica", FontSlant -> "Italic"], 
        BoxMargins -> {{-0.175, 0}, {0, 0}}]}], TextForm], "webMathematica" -> 
   FormBox[
     RowBox[{"web", 
       AdjustmentBox[
        StyleBox["Mathematica", FontSlant -> "Italic"], 
        BoxMargins -> {{-0.175, 0}, {0, 0}}]}], TextForm], ParentList},
 LanguageCategory->"NaturalLanguage",
 CounterIncrements->"Subsubsection",
 MenuPosition->1350,
 MenuCommandKey->"6",
FontFamily->"Helvetica",
 FontSize->14,
 FontSlant->"Italic",
 FontColor->RGBColor[0.3, 0.3, 0.7],
MenuPosition->1340
],

Cell[StyleData["Subsubsection", "Presentation"],
 CellMargins->{{40, Inherited}, {4, 10}},
 LineSpacing->{1, 6},
 FontSize->24],

Cell[StyleData["Subsubsection", "Condensed"],
 CellMargins->{{40, Inherited}, {3, 6}},
 FontSize->10],

Cell[StyleData["Subsubsection", "Printout"],
 CellMargins->{{40, 0}, {3, 6}}],

Cell[StyleData["Subsubsection", "SlideShow"],
 CellMargins->{{40, 20}, {4, 8}},
 PageBreakBelow->False,
 FontSize->20]
}, Closed]],

Cell[CellGroupData[{

Cell[StyleData["Math-Init"],
ShowCellBracket->Automatic,
 ShowGroupOpener->True,
 CellFrame->False,
 CellDingbat->"\[FilledSquare]",
 ShowGroupOpener->False,
 CellMargins->{{40, 10}, {2, 10}},
 CellGroupingRules->{"SectionGrouping", 40},
 PageBreakBelow->False,
 CellFrameLabels->{{
    Cell[
     TextData[{" Mathematica program loading"}]], 
    None}, {None, None}},
 FontFamily->"Helvetica",
 FontSize->14,
 FontWeight->"Bold",
 FontSlant->"Italic",
 FontTracking->"Plain",
 FontColor->RGBColor[0.8, 0, 0],
MenuPosition->1360],

Cell[StyleData["Math-Init", "Printout"],
 PageBreakBelow->False],

Cell[StyleData["Math-Init", "SlideShow"],
 FontSize->22]
}, Closed]],


}, Closed]]
}, Closed]],

Cell[CellGroupData[{

Cell["Styles for Theorem-like environments", "Section"],

Cell[CellGroupData[{

Cell[StyleData["Theorem"],
 ShowCellBracket->Automatic,
 CellMargins->{{120, 30}, {0, 7}},
 CellGroupingRules->"NormalGrouping",
 CellHorizontalScrolling->True,
 PageBreakBelow->False,
 

InputAliases->{"the" ->Cell[
   TextData[{StyleBox[
       "THEOREM ", FontWeight -> "Bold"], 
       (*
	CounterBox["Chapter"], ".", 
       CounterBox["SubChapter"], ".", 
	*)
       CounterBox["Theorem"]}] (*, CellSize -> {80, Inherited}*), 
   TextAlignment -> Left, FontWeight -> "Bold"], }, 



CellDingbat->Cell[
   TextData[{StyleBox[
       "THEOREM ", FontWeight -> "Bold"], 
       (*
	CounterBox["Chapter"], ".", 
       CounterBox["SubChapter"], ".", 
	*)
       CounterBox["Theorem"]}] (*, CellSize -> {80, Inherited}*), 
   TextAlignment -> Left, FontWeight -> "Bold"], 

 CounterIncrements->"Theorem",
 FontFamily->"Helvetica",
 FontSize->13,
(*  FontWeight->"Bold",*)
 FontColor->RGBColor[0, 0, 0.7],
MenuPosition->1400],

Cell[StyleData["Theorem", "Printout"],
 PageBreakBelow->False],

Cell[StyleData["Theorem", "SlideShow"],FontSize->20,
CellMargins->{{138, 30}, {0, 7}}
]
}, Closed]],

Cell[CellGroupData[{

Cell[StyleData["Lemma"],
 ShowCellBracket->Automatic,
 CellMargins->{{105, 30}, {0, 7}},
 CellGroupingRules->"NormalGrouping",
 CellHorizontalScrolling->True,
 PageBreakBelow->False,
 
CellDingbat->Cell[
   TextData[{StyleBox[
       "LEMMA ", FontWeight -> "Bold"], 
             (*  CounterBox["Chapter"], ".", 
       CounterBox["SubChapter"], ".", 
	*)
       CounterBox["Lemma"]}], FontWeight -> "Bold", 
   TextAlignment -> Left], 

 CounterIncrements->"Lemma",
 FontFamily->"Helvetica",
 FontSize->13,
 FontColor->RGBColor[0, 0, 0.7],
MenuPosition->1410],

Cell[StyleData["Lemma", "Printout"],
 PageBreakBelow->False],

Cell[StyleData["Lemma", "SlideShow"]
,FontSize->20,CellMargins->{{110, 30}, {0, 7}}
]
}, Closed]],


Cell[CellGroupData[{

Cell[StyleData["Remark"],
 ShowCellBracket->Automatic,
 CellMargins->{{113, 30}, {0, 7}},
 CellGroupingRules->"NormalGrouping",
 CellHorizontalScrolling->True,
 PageBreakBelow->False,
 
CellDingbat->Cell[
   TextData[{StyleBox[
       "REMARK ", FontWeight -> "Bold"], 
       (*
	CounterBox["Chapter"], ".", 
       CounterBox["SubChapter"], ".", 
	*)
       CounterBox["Remark"] }], FontWeight -> "Bold"
        (* CellSize -> {80, Inherited}*), 
   TextAlignment -> Left], 
 CounterIncrements->"Remark",
 FontFamily->"Helvetica",
 FontSize->13,
 FontColor->RGBColor[0, 0, 0.7],
MenuPosition->1420],

Cell[StyleData["Remark", "Printout"],
 PageBreakBelow->False],

Cell[StyleData["Remark", "SlideShow"],
FontSize->20,CellMargins->{{127, 30}, {0, 7}}]
}, Closed]],

Cell[CellGroupData[{

Cell[StyleData["Corollary"],
 ShowCellBracket->Automatic,
 CellMargins->{{135, 30}, {0, 7}},
 CellGroupingRules->"NormalGrouping",
 CellHorizontalScrolling->True,
 PageBreakBelow->False,
 CellDingbat->Cell[
   TextData[{
StyleBox[
       "COROLLARY ",  FontWeight -> "Bold"], 
       (*
	CounterBox["Chapter"], ".", 
       CounterBox["SubChapter"], ".", 
	*)
       CounterBox["Corollary"]}],FontWeight -> "Bold" , 
   TextAlignment -> Left], 
 CounterIncrements->"Corollary",
 FontFamily->"Helvetica",
 FontSize->13,
 FontColor->RGBColor[0, 0, 0.7],
MenuPosition->1440],

Cell[StyleData["Corollary", "Printout"],
 PageBreakBelow->False],

Cell[StyleData["Corollary", "SlideShow"],
FontSize->20,CellMargins->{{165, 30}, {0, 7}}]
}, Closed]],

Cell[CellGroupData[{

Cell[StyleData["Definition"],
 ShowCellBracket->Automatic,
 CellMargins->{{130, 30}, {0, 7}},
 CellGroupingRules->"NormalGrouping",
 CellHorizontalScrolling->True,
 PageBreakBelow->False,
  
CellDingbat->Cell[
   TextData[{StyleBox[
       "DEFINITION ", FontWeight -> "Bold"], 
       (*
	CounterBox["Chapter"], ".", 
       CounterBox["SubChapter"], ".", 
	*)
       CounterBox["Definition"]}], FontWeight -> "Bold",
 
   TextAlignment -> Left],
 CounterIncrements->"Definition",
 FontFamily->"Helvetica",
 FontSize->13,
 FontColor->RGBColor[0, 0, 0.7],
MenuPosition->1460],

Cell[StyleData["Definition", "Printout"],
 PageBreakBelow->False],

Cell[StyleData["Definition", "SlideShow"],
FontSize->20,CellMargins->{{150, 30}, {0, 7}}]
}, Closed]],

Cell[CellGroupData[{

Cell[StyleData["Th-Env"],
 CellDingbat->"\[FilledDiamond]",
 ShowCellBracket->Automatic,
 ShowGroupOpener->False,
 CellMargins->{{50, 30}, {2, 7}},
 CellGroupingRules->"NormalGrouping",
 CellHorizontalScrolling->True,
 PageBreakBelow->False,
 FontFamily->"Helvetica",
 FontSize->13,
 FontColor->RGBColor[0, 0, 0.7],
MenuPosition->1480],

Cell[StyleData["Th-Env", "Printout"],
 PageBreakBelow->False],

Cell[StyleData["Th-Env", "SlideShow"],
 FontSize->20]
}, Closed]],


Cell[CellGroupData[{

Cell[StyleData["SolvedProblem"],
 CellFrame->False,
 ShowCellBracket->Automatic,
 ShowGroupOpener->True,
 CellMargins->{{120, 30}, {3, 10}},
 CellGroupingRules->{"SectionGrouping", 39},
 PageBreakBelow->False,

CellDingbat->Cell[
   TextData[{
StyleBox["EXAMPLE ", FontWeight -> "Bold"], 
       
       (*
	CounterBox["Chapter"], ".", 
       CounterBox["SubChapter"], ".", 
	*)
       CounterBox["SolvedProblem"]}], 
	 FontWeight -> "Bold", TextAlignment -> Left],
 

CounterIncrements->"SolvedProblem",
 CounterAssignments->{{"ProblemInput", 0}, {"SubProblem", 0}},
 FontFamily->"Helvetica",
 FontSize->13,
 FontSlant->"Plain",
 FontTracking->"Plain",
 FontVariations->{"Underline"->False},FontColor->RGBColor[0.5, 0, 0],
 FontColor->RGBColor[0, 0, 0.68751],
MenuPosition->1500],

Cell[StyleData["SolvedProblem", "Printout"]],

Cell[StyleData["SolvedProblem", "SlideShow"],
FontSize->20,CellMargins->{{135, 30}, {0, 7}}]

}, Closed]],

Cell[CellGroupData[{

Cell[StyleData["Problem"],
 CellFrame->False,
 ShowCellBracket->Automatic,
 ShowGroupOpener->True,
 CellMargins->{{125, 30}, {0, 10}},
 CellGroupingRules->{"SectionGrouping", 39},
 PageBreakBelow->False,
 CellDingbat->Cell[
   TextData[{
StyleBox["PROBLEM ", FontWeight -> "Bold"], 
       
       (*
	CounterBox["Chapter"], ".", 
       CounterBox["SubChapter"], ".", 
	*)
       CounterBox["Problem"]}], 
	FontWeight -> "Bold", TextAlignment -> Left],

 CounterIncrements->"Problem",
 CounterAssignments->{{"ProblemInput", 0}, {"SubProblem", 0}},
 FontFamily->"Helvetica",
 FontSize->14,
 FontSlant->"Plain",
 FontTracking->"Plain",
 FontColor->RGBColor[0.5, 0, 0],
MenuPosition->1520],

Cell[StyleData["Problem", "Printout"]],

Cell[StyleData["Problem", "SlideShow"],
 FontSize->20,CellMargins->{{136, 30}, {0, 7}}]
}, Closed]],


Cell[CellGroupData[{

Cell[StyleData["Experiment"],
 CellFrame->False,
 ShowCellBracket->Automatic,
 ShowGroupOpener->True,
 CellMargins->{{140, 30}, {0, 10}},
 CellGroupingRules->{"SectionGrouping", 39},
 PageBreakBelow->False,
 
CellDingbat->Cell[
   TextData[{
StyleBox["EXPERIMENT ", FontWeight -> "Bold"], 
       
       (*
	CounterBox["Chapter"], ".", 
       CounterBox["SubChapter"], ".", 
	*)
       CounterBox["Experiment"]}], 
	FontWeight -> "Bold", TextAlignment -> Left],

 CounterIncrements->"Experiment",
 FontFamily->"Helvetica",
 FontSize->13,
 FontSlant->"Plain",
 FontTracking->"Plain",
 FontColor->RGBColor[0.5, 0, 0],
MenuPosition->1520],

Cell[StyleData["Experiment", "Printout"]],

Cell[StyleData["Experiment", "SlideShow"],
FontSize->20,CellMargins->{{150, 30}, {0, 7}}]

}, Closed]],

Cell[CellGroupData[{

Cell[StyleData["Solution"],
 CellDingbat->None,
 ShowCellBracket->Automatic,
ShowGroupOpener->True,
 CellMargins->{{40, 30}, {0, 8}},
 CellGroupingRules->{"SectionGrouping", 45},
 CellHorizontalScrolling->True,
 PageBreakBelow->False,
 CellFrameLabels->{{
    Cell[
     TextData[{"SOLUTION "}]], None}, {
   None, None}},
 FontFamily->"Helvetica",
 FontSize->13,
FontWeight->"Bold",
 FontSlant->"Plain",
 FontColor->RGBColor[0, 0, 0.7],
MenuPosition->1540],

Cell[StyleData["Solution", "Printout"]],
Cell[StyleData["Solution", "SlideShow"],
FontSize->20]
}, Closed]],

Cell[CellGroupData[{

Cell[StyleData["Proof"],
 CellDingbat->None,
ShowGroupOpener->True,
 ShowCellBracket->Automatic,
 CellMargins->{{40, 30}, {0, 8}},
 CellGroupingRules->{"SectionGrouping", 45},
 CellHorizontalScrolling->True,
 PageBreakBelow->False,
 CellFrameLabels->{{
    Cell[
     TextData[{"PROOF "}]],
     None}, {None, None}},
 FontFamily->"Helvetica",
 FontSize->13,
FontWeight->"Bold",
 FontSlant->"Plain",
 FontColor->RGBColor[0., 0, 0.7],
MenuPosition->1560],

Cell[StyleData["Proof", "Printout"],
 PageBreakBelow->False],
Cell[StyleData["Proof", "SlideShow"],
 FontSize->20]
}, Closed]],

Cell[CellGroupData[{

Cell[StyleData["Sol-End"],
 ShowCellBracket->Automatic,
 CellMargins->{{60, 5}, {5, 1}},
 CellGroupingRules->"NormalGrouping",
 CellHorizontalScrolling->True,
 PageBreakBelow->False,
 CellFrameLabels->{{None, 
    Cell[
     TextData[{StyleForm["\[FilledSquare]"]}]]}, {None, None}},
 FontFamily->"Helvetica",
 FontSize->14,
 FontColor->RGBColor[0, 0, 0.7],
MenuPosition->1580],

Cell[StyleData["Sol-End", "Printout"],
 PageBreakAbove->False]
Cell[StyleData["Sol-End", "SlideShow"],
 Magnification->1.5]
}, Closed]],


}, Closed]],


Cell[CellGroupData[{

Cell["Styles for Body Text", "Section"],

Cell[CellGroupData[{

Cell["Standard", "Subsection"],

Cell[CellGroupData[{

Cell[StyleData["Text"],
 CellMargins->{{50, 10}, {7, 7}},
 ShowCellBracket->Automatic,
 InputAutoReplacements->{"TeX" -> FormBox[
     StyleBox[
      RowBox[{"T", 
        AdjustmentBox[
        "E", BoxMargins -> {{-0.3, 0}, {0, 0}}, BoxBaselineShift -> 0.5], 
        "X"}], SingleLetterItalics -> False], TraditionalForm], "LaTeX" -> 
   FormBox[
     StyleBox[
      RowBox[{"L", 
        StyleBox[
         AdjustmentBox[
         "A", BoxMargins -> {{-0.5, -0.3}, {0, 0}}, BoxBaselineShift -> -0.4],
          FontSize -> Smaller], "T", 
        AdjustmentBox[
        "E", BoxMargins -> {{-0.3, 0}, {0, 0}}, BoxBaselineShift -> 0.5], 
        "X"}], SingleLetterItalics -> False], TraditionalForm], "mma" -> 
   "Mathematica", "Mma" -> "Mathematica", "MMA" -> "Mathematica", 
   "gridMathematica" -> FormBox[
     RowBox[{"grid", 
       AdjustmentBox[
        StyleBox["Mathematica", FontSlant -> "Italic"], 
        BoxMargins -> {{-0.175, 0}, {0, 0}}]}], TextForm], "webMathematica" -> 
   FormBox[
     RowBox[{"web", 
       AdjustmentBox[
        StyleBox["Mathematica", FontSlant -> "Italic"], 
        BoxMargins -> {{-0.175, 0}, {0, 0}}]}], TextForm], ParentList},
 LineSpacing->{1, 3},
 CounterIncrements->"Text",
TextJustification -> 1,
FontFamily->"Times",
 FontSize->12,
 MenuPosition->1700,
 MenuCommandKey->"7"],

Cell[StyleData["Text", "Presentation"],
 CellMargins->{{50, 10}, {10, 10}},
 LineSpacing->{1, 5},
 FontSize->24],

Cell[StyleData["Text", "Condensed"],
 CellMargins->{{8, 10}, {6, 6}},
 LineSpacing->{1, 1},
 FontSize->11],

Cell[StyleData["Text", "Printout"],
 CellMargins->{{50, 10}, {6, 6}},
 TextJustification->1,
 Hyphenation->True],

Cell[StyleData["Text", "SlideShow"],
 FontSize->24]

}, Closed]],

Cell[CellGroupData[{

Cell[StyleData["Text-Indented"],
 CellMargins->{{50, 10}, {7, 7}},
 ShowCellBracket->Automatic,
 InputAutoReplacements->{"TeX" -> FormBox[
     StyleBox[
      RowBox[{"T", 
        AdjustmentBox[
        "E", BoxMargins -> {{-0.3, 0}, {0, 0}}, BoxBaselineShift -> 0.5], 
        "X"}], SingleLetterItalics -> False], TraditionalForm], "LaTeX" -> 
   FormBox[
     StyleBox[
      RowBox[{"L", 
        StyleBox[
         AdjustmentBox[
         "A", BoxMargins -> {{-0.5, -0.3}, {0, 0}}, BoxBaselineShift -> -0.4],
          FontSize -> Smaller], "T", 
        AdjustmentBox[
        "E", BoxMargins -> {{-0.3, 0}, {0, 0}}, BoxBaselineShift -> 0.5], 
        "X"}], SingleLetterItalics -> False], TraditionalForm], "mma" -> 
   "Mathematica", "Mma" -> "Mathematica", "MMA" -> "Mathematica", 
   "gridMathematica" -> FormBox[
     RowBox[{"grid", 
       AdjustmentBox[
        StyleBox["Mathematica", FontSlant -> "Italic"], 
        BoxMargins -> {{-0.175, 0}, {0, 0}}]}], TextForm], "webMathematica" -> 
   FormBox[
     RowBox[{"web", 
       AdjustmentBox[
        StyleBox["Mathematica", FontSlant -> "Italic"], 
        BoxMargins -> {{-0.175, 0}, {0, 0}}]}], TextForm], ParentList},
 LineSpacing->{1, 3},
 CounterIncrements->"Text",
FontFamily->"Times",
 FontSize->12,
TextJustification -> 1,
 MenuPosition->1720,
 ParagraphIndent->25
 ],

Cell[StyleData["Text-Indented", "Presentation"],
 CellMargins->{{50, 10}, {10, 10}},
 LineSpacing->{1, 5},
 FontSize->24],

Cell[StyleData["Text-Indented", "Condensed"],
 CellMargins->{{8, 10}, {6, 6}},
 LineSpacing->{1, 1},
 FontSize->11],

Cell[StyleData["Text-Indented", "Printout"],
 CellMargins->{{50,10}, {6, 6}},
 TextJustification->1,
 Hyphenation->True],

Cell[StyleData["Text-Indented", "SlideShow"],
 FontSize->24]

}, Closed]],

Cell[CellGroupData[{

Cell[StyleData["Text-Theorem"],
 CellMargins->{{50, 10}, {7, 7}},
 ShowCellBracket->Automatic,
 InputAutoReplacements->{"TeX" -> FormBox[
     StyleBox[
      RowBox[{"T", 
        AdjustmentBox[
        "E", BoxMargins -> {{-0.3, 0}, {0, 0}}, BoxBaselineShift -> 0.5], 
        "X"}], SingleLetterItalics -> False], TraditionalForm], "LaTeX" -> 
   FormBox[
     StyleBox[
      RowBox[{"L", 
        StyleBox[
         AdjustmentBox[
         "A", BoxMargins -> {{-0.5, -0.3}, {0, 0}}, BoxBaselineShift -> -0.4],
          FontSize -> Smaller], "T", 
        AdjustmentBox[
        "E", BoxMargins -> {{-0.3, 0}, {0, 0}}, BoxBaselineShift -> 0.5], 
        "X"}], SingleLetterItalics -> False], TraditionalForm], "mma" -> 
   "Mathematica", "Mma" -> "Mathematica", "MMA" -> "Mathematica", 
   "gridMathematica" -> FormBox[
     RowBox[{"grid", 
       AdjustmentBox[
        StyleBox["Mathematica", FontSlant -> "Italic"], 
        BoxMargins -> {{-0.175, 0}, {0, 0}}]}], TextForm], "webMathematica" -> 
   FormBox[
     RowBox[{"web", 
       AdjustmentBox[
        StyleBox["Mathematica", FontSlant -> "Italic"], 
        BoxMargins -> {{-0.175, 0}, {0, 0}}]}], TextForm], ParentList},
 LineSpacing->{1, 3},
 CounterIncrements->"Text-Theorem",
TextJustification -> 1,
FontFamily->"Times",
 FontSize->12,
 FontSlant->"Italic",
 MenuPosition->1740
 ],

Cell[StyleData["Text-Theorem", "Presentation"],
 CellMargins->{{50, 10}, {10, 10}},
 LineSpacing->{1, 5},
 FontSize->24],

Cell[StyleData["Text-Theorem", "Condensed"],
 CellMargins->{{8, 10}, {6, 6}},
 LineSpacing->{1, 1},
 FontSize->11],

Cell[StyleData["Text-Theorem", "Printout"],
 CellMargins->{{50,10}, {6, 6}},
 TextJustification->1,
 Hyphenation->True],

Cell[StyleData["Text-Theorem", "SlideShow"],
 FontSize->24]

}, Closed]],

Cell[CellGroupData[{

Cell[StyleData["Text-Framed"],
 CellMargins->{{50, 10}, {7, 7}},
 ShowCellBracket->Automatic,
 CellFrame->1,
 InputAutoReplacements->{"TeX" -> FormBox[
     StyleBox[
      RowBox[{"T", 
        AdjustmentBox[
        "E", BoxMargins -> {{-0.3, 0}, {0, 0}}, BoxBaselineShift -> 0.5], 
        "X"}], SingleLetterItalics -> False], TraditionalForm], "LaTeX" -> 
   FormBox[
     StyleBox[
      RowBox[{"L", 
        StyleBox[
         AdjustmentBox[
         "A", BoxMargins -> {{-0.5, -0.3}, {0, 0}}, BoxBaselineShift -> -0.4],
          FontSize -> Smaller], "T", 
        AdjustmentBox[
        "E", BoxMargins -> {{-0.3, 0}, {0, 0}}, BoxBaselineShift -> 0.5], 
        "X"}], SingleLetterItalics -> False], TraditionalForm], "mma" -> 
   "Mathematica", "Mma" -> "Mathematica", "MMA" -> "Mathematica", 
   "gridMathematica" -> FormBox[
     RowBox[{"grid", 
       AdjustmentBox[
        StyleBox["Mathematica", FontSlant -> "Italic"], 
        BoxMargins -> {{-0.175, 0}, {0, 0}}]}], TextForm], "webMathematica" -> 
   FormBox[
     RowBox[{"web", 
       AdjustmentBox[
        StyleBox["Mathematica", FontSlant -> "Italic"], 
        BoxMargins -> {{-0.175, 0}, {0, 0}}]}], TextForm], ParentList},
 LineSpacing->{1, 3},
 CounterIncrements->"Text",
FontFamily->"Times",
 FontSize->12,
 CellFrameColor->RGBColor[0.7, 0.7, 0.8],
TextJustification -> 1,
 MenuPosition->1760
 ],

Cell[StyleData["Text-Framed", "Presentation"],
 CellMargins->{{50, 10}, {10, 10}},
 LineSpacing->{1, 5},
 FontSize->24],

Cell[StyleData["Text-Framed", "Condensed"],
 CellMargins->{{8, 10}, {6, 6}},
 LineSpacing->{1, 1},
 FontSize->11],

Cell[StyleData["Text-Framed", "Printout"],
 CellMargins->{{50,10}, {6, 6}},
 TextJustification->1,
 Hyphenation->True],

Cell[StyleData["Text-Framed", "SlideShow"],
 FontSize->24]

}, Closed]],


Cell[CellGroupData[{

Cell[StyleData["SmallText"],
 CellMargins->{{60, 10}, {6, 6}},
 DefaultNewInlineCellStyle->"None",
 LineSpacing->{1, 3},
 LanguageCategory->"NaturalLanguage",
 CounterIncrements->"SmallText",
 MenuPosition->1900,
 StyleMenuListing->None,
 FontFamily->"Times",
 FontSize->10],

Cell[StyleData["SmallText", "Presentation"],
 CellMargins->{{60, 10}, {9, 9}},
 LineSpacing->{1, 5},
 FontSize->18],

Cell[StyleData["SmallText", "Condensed"],
 CellMargins->{{8, 10}, {5, 5}},
 LineSpacing->{1, 2},
 FontSize->9],

Cell[StyleData["SmallText", "Printout"],
 CellMargins->{{2, 2}, {5, 5}},
 TextJustification->0.5,
 Hyphenation->True],

Cell[StyleData["SmallText", "SlideShow"],
 FontSize->18]
}, Closed]]
}, Closed]],

Cell[CellGroupData[{

Cell["Display", "Subsection"],

Cell[CellGroupData[{

Cell["Lists", "Subsubsection"],

Cell[CellGroupData[{

Cell["Bulleted", "Subsubsubsection"],

Cell[CellGroupData[{

Cell[StyleData["Item-Dashed"],
 CellDingbat->"\[Dash]",
 ShowCellBracket->Automatic,
 CellMargins->{{75, 0}, {1, 1}},
 CellHorizontalScrolling->True,
 TextJustification->1,
 LineSpacing->{1, 1},
 CounterIncrements->"Item-Dashed",
FontFamily->"Times",
 FontSize->12,
TextJustification -> 1,
 MenuPosition->1990],

Cell[StyleData["Item-Dashed", "Printout"]],

Cell[StyleData["Item-Dashed", "SlideShow"],
 FontSize->24]
}, Closed]],

Cell[CellGroupData[{

Cell[StyleData["Item"],
 CellDingbat->Cell["\[FilledSmallCircle]"],
 ShowCellBracket->Automatic,
 CellMargins->{{75, 10}, {4, 4}},
 ReturnCreatesNewCell->True,
 CellGroupingRules->{"GroupTogetherNestedGrouping", 15000},
 CellFrameLabelMargins->4,
 CounterIncrements->"Item",
 CounterAssignments->{{"Subitem", 0}, {"Subsubitem", 0}},
FontFamily->"Times",
 FontSize->12,
 MenuPosition->2000],

Cell[StyleData["Item", "Presentation"],
 CellMargins->{{100, 10}, {7, 7}},
 CellFrameLabelMargins->6,
 FontSize->24],

Cell[StyleData["Item", "Condensed"],
 CellMargins->{{58, Inherited}, {2, 2}},
 FontSize->8],

Cell[StyleData["Item", "Printout"],
 CellMargins->{{50, 0}, {2, 2}}],

Cell[StyleData["Item", "SlideShow"],
 FontSize->24]
}, Closed]],

Cell[CellGroupData[{

Cell[StyleData["ItemParagraph"],
 CellMargins->{{75, 10}, {4, 1}},
 ShowCellBracket->Automatic,
 ReturnCreatesNewCell->True,
 CellGroupingRules->{"GroupTogetherNestedGrouping", 15000},
 DefaultNewCellStyle->"Item",
FontFamily->"Times",
 FontSize->12,
 MenuPosition->2020],

Cell[StyleData["ItemParagraph", "Presentation"],
 CellMargins->{{100, 10}, {7, 2}},
 FontSize->24],

Cell[StyleData["ItemParagraph", "Condensed"],
 CellMargins->{{58, Inherited}, {2, 1}},
 FontSize->8],

Cell[StyleData["ItemParagraph", "Printout"],
 CellMargins->{{50, 0}, {1, 0}}
],

Cell[StyleData["ItemParagraph", "SlideShow"],
 FontSize->24]
}, Closed]],

Cell[CellGroupData[{

Cell[StyleData["Subitem"],
 CellDingbat->Cell["\[FilledSmallCircle]", FontWeight -> "Bold"],
 CellMargins->{{90, 12}, {4, 4}},
 ShowCellBracket->Automatic,
 ReturnCreatesNewCell->True,
 CellGroupingRules->{"GroupTogetherNestedGrouping", 15100},
 CellFrameLabelMargins->4,
 DefaultNewCellStyle->"Item",
 CounterIncrements->"Subitem",
 CounterAssignments->{{"Subsubitem", 0}},
FontFamily->"Times",
 FontSize->12,
 MenuPosition->2040],

Cell[StyleData["Subitem", "Presentation"],
 CellMargins->{{125, 12}, {7, 7}},
 CellFrameLabelMargins->6,
 FontSize->24],

Cell[StyleData["Subitem", "Condensed"],
 CellMargins->{{80, 2}, {2, 2}},
 FontSize->8],

Cell[StyleData["Subitem", "Printout"],
 CellMargins->{{70, 2}, {1, 1}}],

Cell[StyleData["SubItem", "SlideShow"],
 FontSize->24]
}, Closed]],

Cell[CellGroupData[{

Cell[StyleData["SubitemParagraph"],
 CellMargins->{{90, 12}, {4, 1}},
 ShowCellBracket->Automatic,
 ReturnCreatesNewCell->True,
 CellGroupingRules->{"GroupTogetherNestedGrouping", 15100},
 CellFrameLabelMargins->4,
 DefaultNewCellStyle->"Subitem",
FontFamily->"Times",
 FontSize->12,
 MenuPosition->2060],

Cell[StyleData["SubitemParagraph", "Presentation"],
 CellMargins->{{125, 12}, {7, 2}},
 FontSize->24],

Cell[StyleData["SubitemParagraph", "Condensed"],
 CellMargins->{{80, 2}, {2, 1}},
 FontSize->8],

Cell[StyleData["SubitemParagraph", "Printout"],
 CellMargins->{{70, 2}, {1, 0}}],

Cell[StyleData["SubitemParagraph", "SlideShow"],
 FontSize->24]
}, Closed]]

(*

Cell[CellGroupData[{


Cell[StyleData["Subsubitem"],
 CellDingbat->Cell["\[FilledSmallCircle]", FontWeight -> "Bold"],
 CellMargins->{{110, 12}, {4, 4}},
 ShowCellBracket->Automatic,
 ReturnCreatesNewCell->True,
 CellGroupingRules->{"GroupTogetherNestedGrouping", 15200},
 CellFrameLabelMargins->4,
 DefaultNewCellStyle->"Subsubitem",
 CounterIncrements->"Subsubitem",
FontFamily->"Times",
 FontSize->12,
 MenuPosition->2080],

Cell[StyleData["Subsubitem", "Presentation"],
 CellMargins->{{140, 12}, {7, 7}},
 CellFrameLabelMargins->6,
 FontSize->24],

Cell[StyleData["Subsubitem", "Condensed"],
 CellMargins->{{100, 2}, {2, 2}},
 FontSize->8],

Cell[StyleData["Subsubitem", "Printout"],
 CellMargins->{{90, 2}, {1, 1}},
 FontSize->10],

Cell[StyleData["Subsubitem", "SlideShow"],
 FontSize->24]
}, Closed]],

Cell[CellGroupData[{

Cell[StyleData["SubsubitemParagraph"],
 CellMargins->{{110, 12}, {4, 1}},
 ShowCellBracket->Automatic,
 ReturnCreatesNewCell->True,
 CellGroupingRules->{"GroupTogetherNestedGrouping", 15200},
 CellFrameLabelMargins->4,
 DefaultNewCellStyle->"Subsubitem",
 CounterIncrements->"Subsubitem",
FontFamily->"Times",
 FontSize->12,
 MenuPosition->2100],

Cell[StyleData["SubsubitemParagraph", "Presentation"],
 CellMargins->{{140, 12}, {7, 2}},
 FontSize->24],

Cell[StyleData["SubsubitemParagraph", "Condensed"],
 CellMargins->{{100, 2}, {2, 1}},
 FontSize->8],

Cell[StyleData["SubsubitemParagraph", "Printout"],
 CellMargins->{{90, 2}, {1, 0}}],

Cell[StyleData["SubsubitemParagraph", "SlideShow"],
 FontSize->24]
}, Closed]]

*)

}, Closed]],

Cell[CellGroupData[{

Cell["Numbered", "Subsubsubsection"],

Cell[CellGroupData[{

Cell[StyleData["ItemNumbered"],
 ShowCellBracket->Automatic,
 CellDingbat->Cell[
   TextData[{
     CounterBox["ItemNumbered"], "."}], FontWeight -> "Bold"],
 CellMargins->{{75, 10}, {4, 4}},
 ReturnCreatesNewCell->True,
 CellGroupingRules->{"GroupTogetherNestedGrouping", 15000},
 CellFrameLabelMargins->4,
 CounterIncrements->"ItemNumbered",
 CounterAssignments->{{"SubitemNumbered", 0}, {"SubsubitemNumbered", 0}},
FontFamily->"Times",
 FontSize->12,
 MenuPosition->2200],

Cell[StyleData["ItemNumbered", "Presentation"],
 CellMargins->{{100, 10}, {7, 7}},
 CellFrameLabelMargins->6,
 FontSize->24],

Cell[StyleData["ItemNumbered", "Condensed"],
 CellMargins->{{58, Inherited}, {2, 2}},
 FontSize->8],

Cell[StyleData["ItemNumbered", "Printout"],
 CellMargins->{{50, 0}, {2, 2}}],

Cell[StyleData["ItemNumbered", "SlideShow"],
 FontSize->24]
}, Closed]],

Cell[CellGroupData[{

Cell[StyleData["SubitemNumbered"],
 ShowCellBracket->Automatic,
 CellDingbat->Cell[
   TextData[{
     CounterBox["ItemNumbered"], ".", 
     CounterBox["SubitemNumbered"], "."}], FontWeight -> "Bold"],
 CellMargins->{{90, 12}, {4, 4}},
 ReturnCreatesNewCell->True,
 CellGroupingRules->{"GroupTogetherNestedGrouping", 15100},
 CellFrameLabelMargins->4,
 DefaultNewCellStyle->"Item",
 CounterIncrements->"SubitemNumbered",
 CounterAssignments->{{"SubsubitemNumbered", 0}},
FontFamily->"Times",
 FontSize->12,
 MenuPosition->2220],

Cell[StyleData["SubitemNumbered", "Presentation"],
 CellMargins->{{125, 12}, {7, 7}},
 CellFrameLabelMargins->6,
 FontSize->24],

Cell[StyleData["SubitemNumbered", "Condensed"],
 CellMargins->{{80, 2}, {2, 2}},
 FontSize->8],

Cell[StyleData["SubitemNumbered", "Printout"],
 CellMargins->{{70, 2}, {1, 1}}],

Cell[StyleData["SubitemNumbered", "SlideShow"],
 FontSize->24]
}, Closed]],


(*

Cell[CellGroupData[{

Cell[StyleData["SubsubitemNumbered"],
 ShowCellBracket->Automatic,
 CellDingbat->Cell[
   TextData[{
     CounterBox["ItemNumbered"], ".", 
     CounterBox["SubitemNumbered"], ".", 
     CounterBox["SubsubitemNumbered"], "."}], FontWeight -> "Bold"],
 CellMargins->{{110, 12}, {4, 4}},
 ReturnCreatesNewCell->True,
 CellGroupingRules->{"GroupTogetherNestedGrouping", 15200},
 CellFrameLabelMargins->4,
 DefaultNewCellStyle->"SubitemNumbered",
 CounterIncrements->"SubsubitemNumbered",
MenuPosition->2240],

Cell[StyleData["SubsubitemNumbered", "Presentation"],
 CellMargins->{{140, 12}, {7, 7}},
 CellFrameLabelMargins->6,
 FontSize->24],

Cell[StyleData["SubsubitemNumbered", "Condensed"],
 CellMargins->{{100, 2}, {2, 2}},
 FontSize->8],

Cell[StyleData["SubsubitemNumbered", "Printout"],
 CellMargins->{{90, 2}, {1, 1}},
 FontSize->10]
}, Closed]]

*)


}, Closed]]
}, Closed]]
}, Closed]]
}, Closed]],

Cell[CellGroupData[{

Cell["Styles for Input and Output", "Section"],

Cell[CellGroupData[{

Cell[StyleData["Input"],
 CellMargins->{{50, 10}, {0, 3}},
 CellFrame->{{2, 2}, {0, 2}},
 Evaluatable->True,
 CellGroupingRules->"InputGrouping",
 CellHorizontalScrolling->True,
 PageBreakWithin->True,
 GroupPageBreakWithin->False,
 CellLabelMargins->{{25, Inherited}, {Inherited, Inherited}},
 DefaultFormatType->DefaultInputFormatType,
 AutoItalicWords->{},
 FormatType->StandardForm,
 ShowStringCharacters->True,
 NumberMarks->True,
 CounterIncrements->"Input",
 FontSize->11,
 FontWeight->"Bold",
CellFrameColor->RGBColor[1, 0.93, 0.8],
 Background->RGBColor[0.98, 0.98, 0.9],
MenuPosition->2300],

Cell[StyleData["Input", "Printout"]],

Cell[StyleData["Input", "SlideShow"],
 FontSize->20]
}, Closed]],

Cell[CellGroupData[{

Cell[StyleData["Output"],
 CellMargins->{{50, 10}, {4, 0}},
CellFrame->{{2, 2}, {2, 0}},
 CellEditDuplicate->True,
 CellGroupingRules->"OutputGrouping",
 CellHorizontalScrolling->True,
 PageBreakWithin->False,
 GroupPageBreakWithin->False,
 GeneratedCell->True,
 CellAutoOverwrite->True,
 CellLabelPositioning->Left,
 CellLabelMargins->{{25, Inherited}, {Inherited, Inherited}},
 DefaultFormatType->DefaultOutputFormatType,
 AutoItalicWords->{},
 FormatType->StandardForm,
 CounterIncrements->"Output",
 FontSize->11,
CellFrameColor->RGBColor[1, 0.93, 0.8],
MenuPosition->2320
],

Cell[StyleData["Output", "Printout"]],

Cell[StyleData["Output", "SlideShow"],
 FontSize->20]
}, Closed]],

Cell[CellGroupData[{

Cell[StyleData["Message"],
 CellDingbat->"\[LongDash]",
 CellMargins->{{60, Inherited}, {Inherited, Inherited}},
 CellGroupingRules->"OutputGrouping",
 PageBreakWithin->False,
 GroupPageBreakWithin->False,
 GeneratedCell->True,
 CellAutoOverwrite->True,
 ShowCellLabel->False,
 CellLabelMargins->{{25, Inherited}, {Inherited, Inherited}},
 DefaultFormatType->DefaultOutputFormatType,
 AutoItalicWords->{},
 FormatType->InputForm,
 CounterIncrements->"Message",
 StyleMenuListing->None,
 FontSize->10,
 FontSlant->"Italic",
 FontColor->RGBColor[1, 0, 0]],

Cell[StyleData["Message", "Printout"],
 CellMargins->{{60, 5}, {3, 3}},
 FontSize->10],

Cell[StyleData["Message", "SlideShow"],
 FontSize->14]
}, Closed]]
}, Closed]],



Cell[CellGroupData[{

Cell["Styles for Tables and Figures", "Section"],



Cell[CellGroupData[{

Cell[StyleData["NumberedFigure"],
 ShowCellBracket->Automatic,
CellMargins->{{50, 10}, {7, 7}},
 CellHorizontalScrolling->True,

InputAliases->{"fig" ->Cell[
     TextData[{"Figure ",
      (*
	 CounterBox["Chapter"], ".", 
       CounterBox["SubChapter"], ".", 
	*)
       CounterBox["NumberedFigure"],". "}], FontWeight -> 
     "Bold"] }, 


(*
CellFrameLabels->{{None, None}, { 
    Cell[
     TextData[{"Figure ",
      (*
	 CounterBox["Chapter"], ".", 
       CounterBox["SubChapter"], ".", 
	*)
       CounterBox["NumberedFigure"]}](*, FontWeight -> 
     "Bold"*)],None}},
*)

 TextAlignment->Center,
 TextJustification->0,
 CounterIncrements->"NumberedFigure",
 FontFamily->"Times",
 FontSize->11,
MenuPosition->2400],

Cell[StyleData["NumberedFigure", "Printout"]],

Cell[StyleData["NumberedFigure", "SlideShow"],
 FontSize->18]
}, Closed]],

Cell[CellGroupData[{

Cell[StyleData["NumberedTable"],
 ShowCellBracket->Automatic,
 CellMargins->{{50, 10}, {7, 7}},
 CellHorizontalScrolling->True,
 
InputAliases->{"tab" ->Cell[
     TextData[{"Table ",
      (*
	 CounterBox["Chapter"], ".", 
       CounterBox["SubChapter"], ".", 
	*)
       CounterBox["NumberedTable"],". "}], FontWeight -> 
     "Bold"] },

(* 
CellFrameLabels->{{None, None}, { 
    Cell[
     TextData[{"Table ",
      (*
	 CounterBox["Chapter"], ".", 
       CounterBox["SubChapter"], ".", 
	*)
       CounterBox["NumberedTable"]}]],None}},
*)

 TextAlignment->Center,
 TextJustification->0,
 CounterIncrements->"NumberedTable",
FontFamily->"Times",
 FontSize->11,
MenuPosition->2410],

Cell[StyleData["NumberedTable", "Printout"]],

Cell[StyleData["NumberedTable", "SlideShow"],
 FontSize->20]
}, Closed]],



Cell[CellGroupData[{

Cell["Styles for Formulas and Programming", "Section"],

Cell[CellGroupData[{

Cell[StyleData["NumberedEquation"],
 ShowCellBracket->Automatic,
 CellMargins->{{60, Inherited}, {Inherited, Inherited}},
 StripStyleOnPaste->True,
HyphenationOptions->{"HyphenationCharacter"->"\[Continuation]"},
CellFrameLabels->{{None, 
    Cell[
     TextData[{"(", 
       (* 
	CounterBox["Chapter"], ".", 
       CounterBox["SubChapter"], ".",
	*) 
       CounterBox["NumberedEquation"], ")"}]]}, {None, None}},
 DefaultFormatType->TraditionalForm (* DefaultInlineFormatType*),
 (* DefaultFormatType->DefaultInputFormatType,*)
LanguageCategory->"Formula",
 ScriptLevel->0,
 SingleLetterItalics->True,
TextAlignment->Center,
 TextJustification->0,
UnderoverscriptBoxOptions->{LimitsPositioning->True},
 CounterIncrements->"NumberedEquation",
FontFamily->"Times",
 FontSize->12,
(* FontWeight -> "Bold",*)
MenuPosition->2420],

Cell[StyleData["NumberedEquation", "Printout"]],

Cell[StyleData["NumberedEquation", "SlideShow"],
 FontSize->20]
}, Closed]],

Cell[CellGroupData[{

Cell[StyleData["InlineFormula"],
 CellMargins->{{10, 4}, {0, 8}},
 StripStyleOnPaste->True,
 HyphenationOptions->{"HyphenationCharacter"->"\[Continuation]"},
 LanguageCategory->"Formula",
 ScriptLevel->1,
 SingleLetterItalics->True,
 MenuPosition->2430],

Cell[StyleData["InlineFormula", "Presentation"],
 CellMargins->{{10, 4}, {0, 12}},
 LineSpacing->{1, 5},
 FontSize->24],

Cell[StyleData["InlineFormula", "Condensed"],
 CellMargins->{{8, 10}, {6, 6}},
 LineSpacing->{1, 1},
 FontSize->11],

Cell[StyleData["InlineFormula", "Printout"],
 CellMargins->{{2, 0}, {6, 6}}],

Cell[StyleData["InlineFormula", "SlideShow"],
 FontSize->20]
}, Closed]],

Cell[CellGroupData[{

Cell[StyleData["DisplayFormula"],
ShowCellBracket->Automatic, 
CellMargins->{{60, Inherited}, {Inherited, Inherited}},
 StripStyleOnPaste->True,
 DefaultFormatType->DefaultInputFormatType,
 HyphenationOptions->{"HyphenationCharacter"->"\[Continuation]"},
 LanguageCategory->"Formula",
 ScriptLevel->0,
 SingleLetterItalics->True,
 MenuPosition->2440,
 UnderoverscriptBoxOptions->{LimitsPositioning->True},
FontFamily->"Times",
 FontSize->12],

Cell[StyleData["DisplayFormula", "Presentation"],
 CellMargins->{{60, Inherited}, {Inherited 1.5, Inherited 1.5}},
 LineSpacing->{1, 5},
 FontSize->24],

Cell[StyleData["DisplayFormula", "Condensed"],
 LineSpacing->{1, 1},
 FontSize->11],

Cell[StyleData["DisplayFormula", "Printout"]],

Cell[StyleData["DisplayFormula", "SlideShow"],
 FontSize->20]
}, Closed]],

Cell[CellGroupData[{

Cell[StyleData["DisplayFormulaNumbered"],
ShowCellBracket->Automatic, 
CellMargins->{{60, Inherited}, {Inherited, Inherited}},
 StripStyleOnPaste->True,
 CellFrameLabels->{{None, 
    Cell[
     TextData[{"(", 
       CounterBox["DisplayFormulaNumbered"], ")"}]]}, {None, None}},
 DefaultFormatType->DefaultInputFormatType,
 HyphenationOptions->{"HyphenationCharacter"->"\[Continuation]"},
 LanguageCategory->"Formula",
 ScriptLevel->0,
 SingleLetterItalics->True,
 CounterIncrements->"DisplayFormulaNumbered",
 MenuPosition->2450,
 UnderoverscriptBoxOptions->{LimitsPositioning->True},
FontFamily->"Times",
 FontSize->12],

Cell[StyleData["DisplayFormulaNumbered", "Presentation"],
 CellMargins->{{60, Inherited}, {Inherited 1.5, Inherited 1.5}},
 LineSpacing->{1, 5},
 FontSize->24],

Cell[StyleData["DisplayFormulaNumbered", "Condensed"],
 LineSpacing->{1, 1},
 FontSize->11],

Cell[StyleData["DisplayFormulaNumbered", "Printout"]],

Cell[StyleData["DisplayFormulaNumbered", "SlideShow"],
 FontSize->20]
}, Closed]],

Cell[CellGroupData[{

Cell[StyleData["Program"],
 CellFrame->{{0, 0}, {0.5, 0.5}},
 CellMargins->{{60, 4}, {0, 8}},
 StripStyleOnPaste->True,
 Hyphenation->False,
 LanguageCategory->"Formula",
 ScriptLevel->1,
 MenuPosition->2460,
 FontFamily->"Courier",
 FontSize->12],

Cell[StyleData["Program", "Presentation"],
 CellFrame->{{0, 0}, {1, 1}},
 CellMargins->{{60, 4}, {0, 12}},
 LineSpacing->{1, 5},
 FontSize->24],

Cell[StyleData["Program", "Condensed"],
 CellMargins->{{8, 10}, {6, 6}},
 LineSpacing->{1, 1},
 FontSize->11],

Cell[StyleData["Program", "Printout"],
 CellMargins->{{2, 0}, {6, 6}}],

Cell[StyleData["Program", "SlideShow"],
 FontSize->20]
}, Closed]]
}, Closed]],

Cell[CellGroupData[{

Cell[StyleData["1ColumnBox"],
 CellFrame->True,
 CellMargins->{{5, 5}, {0, 8}},
 CellHorizontalScrolling->True,
 LineIndent->0,
 Background->RGBColor[1, 0.900008, 0.700008],
 FrameBoxOptions->{
 FrameMargins->{{31., 31.}, {
  15., 15.}}},
 GridBoxOptions->{GridBoxSpacings->{"Columns" -> {
     Offset[0.28], {
      Offset[0.7]}, 
     Offset[0.28]}, "ColumnsIndexed" -> {}, "Rows" -> {
     Offset[0.2], {
      Offset[0.4]}, 
     Offset[0.2]}, "RowsIndexed" -> {}}},
     MenuPosition->2500],

Cell[StyleData["1ColumnBox", "Printout"]]
}, Closed]],

Cell[CellGroupData[{

Cell[StyleData["2ColumnBox"],
 CellFrame->True,
 ShowCellBracket->True,
 CellMargins->{{5, 5}, {2, 8}},
 CellHorizontalScrolling->True,
 LineIndent->0,
 Background->RGBColor[1, 0.900008, 0.700008],
 FrameBoxOptions->{
 FrameMargins->{{31., 31.}, {15., 15.}}},
 GridBoxOptions->{
 GridBoxAlignment->{
  "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, 
   "RowsIndexed" -> {}},
 GridBoxDividers->{
  "Columns" -> {False, {False}, False}, "ColumnsIndexed" -> {}, 
   "Rows" -> {False, {False}, False}, "RowsIndexed" -> {}},
 GridBoxItemSize->{"Columns" -> {
     Scaled[0.3], {
      Scaled[0.45]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}}, 
   "RowsIndexed" -> {}},
 GridBoxSpacings->{"Columns" -> {Offset[0.28], {Offset[0.35]}, Offset[0.28]},
  "ColumnsIndexed" -> {}, 
  "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}},
     MenuPosition->2510],

Cell[StyleData["2ColumnBox", "Printout"]]
}, Closed]],

Cell[CellGroupData[{

Cell[StyleData["3ColumnBox"],
 CellFrame->True,
 ShowCellBracket->True,
 CellMargins->{{5, 5}, {2, 8}},
 CellHorizontalScrolling->True,
 LineIndent->0,
 Background->RGBColor[1, 0.900008, 0.700008],
 FrameBoxOptions->{
 FrameMargins->{{31.200000000000003`, 31.200000000000003`}, {
  15.600000000000001`, 15.600000000000001`}}},
 GridBoxOptions->{
 GridBoxAlignment->{
  "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, 
   "RowsIndexed" -> {}},
 GridBoxDividers->{
  "Columns" -> {True, {False}, True}, "ColumnsIndexed" -> {}, 
   "Rows" -> {True, {False}, True}, "RowsIndexed" -> {}},
 GridBoxItemSize->{"Columns" -> {{
      Scaled[0.25]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}}, 
   "RowsIndexed" -> {}}},
MenuPosition->2520],

Cell[StyleData["3ColumnBox", "Printout"]]
}, Closed]],


Cell[CellGroupData[{

Cell[StyleData["2ColumnTable"],
 CellMargins->{{5, 5}, {0, 8}},
 CellHorizontalScrolling->True,
 GridBoxOptions->{
 GridBoxAlignment->{
  "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, 
   "RowsIndexed" -> {}},
 GridBoxItemSize->{"Columns" -> {
     Scaled[0.3], {
      Scaled[0.5]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}}, 
   "RowsIndexed" -> {}}},
MenuPosition->2530],

Cell[StyleData["2ColumnTable", "Printout"],
 CellMargins->{{5, 5}, {0, 8}},
 FontSize->10]
}, Closed]],

Cell[CellGroupData[{

Cell[StyleData["3ColumnTable"],
 CellMargins->{{5, 5}, {0, 8}},
 CellHorizontalScrolling->True,
 GridBoxOptions->{
 GridBoxAlignment->{
  "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, 
   "RowsIndexed" -> {}},
 GridBoxItemSize->{"Columns" -> {{
      Scaled[0.3]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}}, 
   "RowsIndexed" -> {}}},
MenuPosition->2540],

Cell[StyleData["3ColumnTable", "Printout"],
 CellMargins->{{5, 5}, {0, 8}},
 FontSize->10]
}, Open  ]]

}, Closed]],

Cell[CellGroupData[{

Cell["Special book styles", "Section"],

Cell[CellGroupData[{

Cell[StyleData["Author"],
 CellMargins->{{0, 10}, {5, 5}},
 CellGroupingRules->{"TitleGrouping", 20},
 PageBreakBelow->False,
 CounterAssignments->{{"Section", 0}, {"Equation", 0}, {"Figure", 0}},
 FontSize->20,
FontFamily->"Helvetica",
TextAlignment->Center,
 FontWeight->"Bold",
FontSlant->"Italic",
FontColor->RGBColor [0.3, 0.3, 0.7],
MenuPosition->2600],

Cell[StyleData["Author", "Printout"],
 CellMargins->{{0, 10},{0, 2}}],

Cell[StyleData["Author", "SlideShow"],
 FontSize->26]
}, Closed]],

Cell[CellGroupData[{

Cell[StyleData["Address"],
 CellMargins->{{0, 10},{2, 2}},
 CellGroupingRules->{"TitleGrouping", 30},
 PageBreakBelow->False,
 LineSpacing->{1, 1},
 CounterAssignments->{{"Section", 0}, {"Equation", 0}, {"Figure", 0}},
 FontSize->14,
FontFamily->"Helvetica",
 FontSlant->"Italic",
TextAlignment->Center,
FontColor->RGBColor[ 0.3, 0.3, 0.7],
MenuPosition->2620],

Cell[StyleData["Address", "Printout"],
 CellMargins->{{0, 10}, {2, 2}}],

Cell[StyleData["Address", "SlideShow"],
 FontSize->20]
}, Closed]],

Cell[CellGroupData[{

Cell[StyleData["Abstract"],
 CellMargins->{{75, 75}, {Inherited, 15}},
 LineSpacing->{1.3, 0},
TextJustification -> 1,
FontFamily->"Times",
 FontSize->11,
MenuPosition->2640],

Cell[StyleData["Abstract", "Printout"]
 (*,
CellMargins->{{75, 75}, {Inherited, 10}},
 FontSize->10
*)],

Cell[StyleData["Abstract","SlideShow"],
 FontSize->18
]
}, Closed]],


Cell[CellGroupData[{

Cell[StyleData["Reference"],
 CellDingbat->Cell[
   TextData[{"[", 
     Cell[TextData[{CounterBox["Reference"]}],
	TextAlignment -> Right
	(* CellSize -> {15, Inherited}*)], "] "}], 
	 
   TextAlignment -> Right],
 ShowCellBracket->Automatic,
 CellMargins->{{100, 20}, {2, 2}},
 CellHorizontalScrolling->True,
 LineSpacing->{1.2, 1},
 CounterIncrements->"Reference",
 FontFamily->"Times",
 FontSize->12,
TextJustification -> 0.5,
MenuPosition->2660],

Cell[StyleData["Reference","Printout"],
CellMargins->{{100, 20}, {2, 2}}],

Cell[StyleData["Reference","SlideShow"],
FontSize->20,
CellMargins->{{100, 20}, {2, 2}}]
}, Closed]]
}, Open  ]],


Cell[CellGroupData[{

Cell["Styles for Printed Runningheads and Footers", "Section"],

Cell[CellGroupData[{

Cell[StyleData["Header"],
 CellMargins->{{0, 0}, {0, 0}},
 LineSpacing->{1, 8},
 MenuPosition->None,
 FontFamily->"Verdana",
 FontSize->7,
 FontSlant->"Italic"],

Cell[StyleData["Header", "Printout"],
 Magnification->1.]
}, Closed]],

Cell[CellGroupData[{

Cell[StyleData["HeaderSection"],
 StyleMenuListing->None],

Cell[StyleData["HeaderSection", "Printout"],
 Magnification->1.]
}, Closed]],

Cell[CellGroupData[{

Cell[StyleData["HeaderSubsection"],
 StyleMenuListing->None],

Cell[StyleData["HeaderSubsection", "Printout"],
 Magnification->1.]
}, Closed]],

Cell[CellGroupData[{

Cell[StyleData["HeaderTitle"],
 StyleMenuListing->None],

Cell[StyleData["HeaderTitle", "Printout"],
 Magnification->1.]
}, Closed]],

Cell[CellGroupData[{

Cell[StyleData["Footer"],
 CellMargins->{{0, 0}, {0, 0}},
 MenuPosition->None,
 FontFamily->"Verdana",
 FontSize->6],

Cell[StyleData["Footer", "Printout"],
 Magnification->1.]
}, Closed]],

Cell[CellGroupData[{

Cell[StyleData["FooterSection"],
 StyleMenuListing->None],

Cell[StyleData["FooterSection", "Printout"],
 Magnification->1.]
}, Closed]],

Cell[CellGroupData[{

Cell[StyleData["FooterSubsection"],
 StyleMenuListing->None],

Cell[StyleData["FooterSubsection", "Printout"],
 Magnification->1.]
}, Closed]],

Cell[CellGroupData[{

Cell[StyleData["FooterTitle"],
 StyleMenuListing->None],

Cell[StyleData["FooterTitle", "Printout"],
 Magnification->1.]
}, Closed]],

Cell[CellGroupData[{

Cell[StyleData["PageNumber"],
 LineSpacing->{1, 8},
 MenuPosition->None,
 FontFamily->"Verdana",
 FontSize->7,
 FontWeight->"Bold"],

Cell[StyleData["PageNumber", "Printout"],
 Magnification->1.]
}, Closed]]
}, Closed]]
},
AutoGeneratedPackage->None,
WindowSize->{680, 651},
WindowMargins->{{33, Automatic}, {Automatic, 15}},
TrackCellChangeTimes->False,
MenuPosition->1100,
FrontEndVersion->"7.0 for Mac OS X x86 (32-bit) (October 20, 2008)",
StyleDefinitions->"StylesheetFormatting.nb"
]
(* End of Notebook Content *)

(* Internal cache information *)
(*CellTagsOutline
CellTagsIndex->{}
*)
(*CellTagsIndex
CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
Cell[564, 21, 46, 0, 35, 46, 0, "StyleData", "StyleDefinitions", ""],
Cell[613, 23, 191, 4, 57, "Text"],
Cell[CellGroupData[{
Cell[829, 31, 42, 0, 48, "Section"],
Cell[874, 33, 290, 7, 35, 87, 1, "StyleData", "All", "SlideShow",
 MenuPosition->1300]
}, Closed]],
Cell[CellGroupData[{
Cell[1201, 45, 44, 0, 32, "Section"],
Cell[1248, 47, 99, 2, 42, "Text"],
Cell[1350, 51, 966, 31, 35, 27, 0, "StyleData", "Notebook", "All"]
}, Closed]],
Cell[CellGroupData[{
Cell[2353, 87, 53, 0, 32, "Section"],
Cell[CellGroupData[{
Cell[2431, 91, 27, 0, 44, "Subsection"],
Cell[CellGroupData[{
Cell[2483, 95, 1571, 41, 91, 24, 0, "StyleData", "Title", "All",
 CounterIncrements->"Title",
 CounterAssignments->{{"Section", 0}, {"Equation", 0}, {"Figure", 0}, {
   "Subtitle", 0}, {"Subsubtitle", 0}},
 MenuPosition->1100,
 MenuCommandKey->"1"],
Cell[4057, 138, 121, 3, 147, 40, 0, "StyleData", "Title", "Presentation"],
Cell[4181, 143, 85, 2, 47, 37, 0, "StyleData", "Title", "Condensed"],
Cell[4269, 147, 86, 2, 81, 36, 0, "StyleData", "Title", "Printout"]
}, Closed]],
Cell[CellGroupData[{
Cell[4392, 154, 1516, 39, 61, 27, 0, "StyleData", "Subtitle", "All",
 CounterIncrements->"Subtitle",
 CounterAssignments->{{"Section", 0}, {"Equation", 0}, {"Figure", 0}, {
   "Subsubtitle", 0}},
 MenuPosition->1150,
 MenuCommandKey->"2"],
Cell[5911, 195, 123, 3, 96, 43, 0, "StyleData", "Subtitle", "Presentation"],
Cell[6037, 200, 88, 2, 37, 40, 0, "StyleData", "Subtitle", "Condensed"],
Cell[6128, 204, 88, 2, 53, 39, 0, "StyleData", "Subtitle", "Printout"]
}, Closed]],
Cell[CellGroupData[{
Cell[6253, 211, 1497, 38, 41, 30, 0, "StyleData", "Subsubtitle", "All",
 CounterIncrements->"Subsubtitle",
 CounterAssignments->{{"Section", 0}, {"Equation", 0}, {"Figure", 0}},
 MenuPosition->1200,
 MenuCommandKey->"3"],
Cell[7753, 251, 126, 3, 62, 46, 0, "StyleData", "Subsubtitle", "Presentation"],
Cell[7882, 256, 91, 2, 43, 43, 0, "StyleData", "Subsubtitle", "Condensed"],
Cell[7976, 260, 91, 2, 49, 42, 0, "StyleData", "Subsubtitle", "Printout"]
}, Closed]]
}, Closed]],
Cell[CellGroupData[{
Cell[8116, 268, 29, 0, 28, "Subsection"],
Cell[CellGroupData[{
Cell[8170, 272, 1580, 42, 82, 26, 0, "StyleData", "Section", "All",
 CounterIncrements->"Section",
 CounterAssignments->{{"Subsection", 0}, {"Subsubsection", 0}},
 MenuPosition->1250,
 MenuCommandKey->"4"],
Cell[9753, 316, 175, 5, 128, 42, 0, "StyleData", "Section", "Presentation"],
Cell[9931, 323, 96, 2, 45, 39, 0, "StyleData", "Section", "Condensed"],
Cell[10030, 327, 86, 2, 58, 38, 0, "StyleData", "Section", "Printout"]
}, Closed]],
Cell[CellGroupData[{
Cell[10153, 334, 1537, 40, 41, 29, 0, "StyleData", "Subsection", "All",
 CounterIncrements->"Subsection",
 CounterAssignments->{{"Subsubsection", 0}},
 MenuPosition->1300,
 MenuCommandKey->"5"],
Cell[11693, 376, 126, 3, 73, 45, 0, "StyleData", "Subsection", "Presentation"],
Cell[11822, 381, 99, 2, 45, 42, 0, "StyleData", "Subsection", "Condensed"],
Cell[11924, 385, 89, 2, 56, 41, 0, "StyleData", "Subsection", "Printout"]
}, Closed]],
Cell[CellGroupData[{
Cell[12050, 392, 1443, 37, 33, 32, 0, "StyleData", "Subsubsection", "All",
 CounterIncrements->"Subsubsection",
 MenuPosition->1350,
 MenuCommandKey->"6"],
Cell[13496, 431, 127, 3, 57, 48, 0, "StyleData", "Subsubsection", \
"Presentation"],
Cell[13626, 436, 102, 2, 44, 45, 0, "StyleData", "Subsubsection", "Condensed"],
Cell[13731, 440, 92, 2, 47, 44, 0, "StyleData", "Subsubsection", "Printout"]
}, Closed]],
Cell[CellGroupData[{
Cell[13860, 447, 1481, 38, 33, 35, 0, "StyleData", "Subsubsubsection", "All",
 CounterIncrements->"Subsubsubsection",
 MenuPosition->None],
Cell[15344, 487, 130, 3, 57, 51, 0, "StyleData", "Subsubsubsection", \
"Presentation"],
Cell[15477, 492, 104, 2, 41, 48, 0, "StyleData", "Subsubsubsection", \
"Condensed"],
Cell[15584, 496, 81, 1, 48, 47, 0, "StyleData", "Subsubsubsection", "Printout"]
}, Closed]],
Cell[CellGroupData[{
Cell[15702, 502, 1389, 35, 33, 38, 0, "StyleData", "Subsubsubsubsection", \
"All",
 CounterIncrements->"Subsubsubsubsection",
 MenuPosition->None],
Cell[17094, 539, 133, 3, 57, 54, 0, "StyleData", "Subsubsubsubsection", \
"Presentation"],
Cell[17230, 544, 107, 2, 41, 51, 0, "StyleData", "Subsubsubsubsection", \
"Condensed"],
Cell[17340, 548, 84, 1, 48, 50, 0, "StyleData", "Subsubsubsubsection", \
"Printout"]
}, Closed]]
}, Closed]]
}, Closed]],
Cell[CellGroupData[{
Cell[17485, 556, 39, 0, 32, "Section"],
Cell[CellGroupData[{
Cell[17549, 560, 30, 0, 44, "Subsection"],
Cell[CellGroupData[{
Cell[17604, 564, 1245, 32, 41, 23, 0, "StyleData", "Text", "All",
 CounterIncrements->"Text",
 MenuPosition->1400,
 MenuCommandKey->"7"],
Cell[18852, 598, 112, 3, 59, 39, 0, "StyleData", "Text", "Presentation"],
Cell[18967, 603, 106, 3, 38, 36, 0, "StyleData", "Text", "Condensed"],
Cell[19076, 608, 112, 3, 39, 35, 0, "StyleData", "Text", "Printout"]
}, Closed]],
Cell[CellGroupData[{
Cell[19225, 616, 277, 9, 37, 28, 0, "StyleData", "SmallText", "All",
 CounterIncrements->"SmallText",
 MenuPosition->1750,
 StyleMenuListing->None],
Cell[19505, 627, 115, 3, 51, 44, 0, "StyleData", "SmallText", \
"Presentation"],
Cell[19623, 632, 110, 3, 35, 41, 0, "StyleData", "SmallText", "Condensed"],
Cell[19736, 637, 117, 3, 37, 40, 0, "StyleData", "SmallText", "Printout"]
}, Closed]]
}, Closed]],
Cell[CellGroupData[{
Cell[19902, 646, 29, 0, 28, "Subsection"],
Cell[CellGroupData[{
Cell[19956, 650, 30, 0, 43, "Subsubsection"],
Cell[CellGroupData[{
Cell[20011, 654, 36, 0, 42, "Subsubsubsection"],
Cell[CellGroupData[{
Cell[20072, 658, 346, 8, 35, 23, 0, "StyleData", "Item", "All",
 CounterIncrements->"Item",
 CounterAssignments->{{"Subitem", 0}, {"Subsubitem", 0}},
 MenuPosition->1600],
Cell[20421, 668, 116, 3, 53, 39, 0, "StyleData", "Item", "Presentation"],
Cell[20540, 673, 91, 2, 27, 36, 0, "StyleData", "Item", "Condensed"],
Cell[20634, 677, 83, 2, 30, 35, 0, "StyleData", "Item", "Printout"]
}, Closed]],
Cell[CellGroupData[{
Cell[20754, 684, 206, 5, 32, 32, 0, "StyleData", "ItemParagraph", "All",
 MenuPosition->1600],
Cell[20963, 691, 98, 2, 48, 48, 0, "StyleData", "ItemParagraph", \
"Presentation"],
Cell[21064, 695, 100, 2, 26, 45, 0, "StyleData", "ItemParagraph", "Condensed"],
Cell[21167, 699, 92, 2, 27, 44, 0, "StyleData", "ItemParagraph", "Printout"]
}, Closed]],
Cell[CellGroupData[{
Cell[21296, 706, 366, 9, 35, 26, 0, "StyleData", "Subitem", "All",
 CounterIncrements->"Subitem",
 CounterAssignments->{{"Subsubitem", 0}},
 MenuPosition->1610],
Cell[21665, 717, 119, 3, 53, 42, 0, "StyleData", "Subitem", "Presentation"],
Cell[21787, 722, 86, 2, 27, 39, 0, "StyleData", "Subitem", "Condensed"],
Cell[21876, 726, 86, 2, 28, 38, 0, "StyleData", "Subitem", "Printout"]
}, Closed]],
Cell[CellGroupData[{
Cell[21999, 733, 239, 6, 32, 35, 0, "StyleData", "SubitemParagraph", "All",
 MenuPosition->1610],
Cell[22241, 741, 101, 2, 48, 51, 0, "StyleData", "SubitemParagraph", \
"Presentation"],
Cell[22345, 745, 95, 2, 26, 48, 0, "StyleData", "SubitemParagraph", \
"Condensed"],
Cell[22443, 749, 95, 2, 27, 47, 0, "StyleData", "SubitemParagraph", "Printout"]
}, Closed]],
Cell[CellGroupData[{
Cell[22575, 756, 316, 7, 35, 29, 0, "StyleData", "Subsubitem", "All",
 CounterIncrements->"Subsubitem"],
Cell[22894, 765, 122, 3, 53, 45, 0, "StyleData", "Subsubitem", "Presentation"],
Cell[23019, 770, 90, 2, 27, 42, 0, "StyleData", "Subsubitem", "Condensed"],
Cell[23112, 774, 90, 2, 28, 41, 0, "StyleData", "Subsubitem", "Printout"]
}, Closed]],
Cell[CellGroupData[{
Cell[23239, 781, 259, 6, 32, 38, 0, "StyleData", "SubsubitemParagraph", "All",
 
 CounterIncrements->"Subsubitem"],
Cell[23501, 789, 95, 2, 48, 45, 0, "StyleData", "Subsubitem", \
"Presentation"],
Cell[23599, 793, 90, 2, 26, 42, 0, "StyleData", "Subsubitem", "Condensed"],
Cell[23692, 797, 90, 2, 27, 41, 0, "StyleData", "Subsubitem", "Printout"]
}, Closed]]
}, Closed]],
Cell[CellGroupData[{
Cell[23831, 805, 36, 0, 26, "Subsubsubsection"],
Cell[CellGroupData[{
Cell[23892, 809, 409, 10, 35, 31, 0, "StyleData", "ItemNumbered", "All",
 CounterIncrements->"ItemNumbered",
 CounterAssignments->{{"SubitemNumbered", 0}, {"SubsubitemNumbered", 0}},
 MenuPosition->1630],
Cell[24304, 821, 124, 3, 53, 47, 0, "StyleData", "ItemNumbered", \
"Presentation"],
Cell[24431, 826, 99, 2, 27, 44, 0, "StyleData", "ItemNumbered", "Condensed"],
Cell[24533, 830, 91, 2, 30, 43, 0, "StyleData", "ItemNumbered", "Printout"]
}, Closed]],
Cell[CellGroupData[{
Cell[24661, 837, 463, 12, 35, 34, 0, "StyleData", "SubitemNumbered", "All",
 CounterIncrements->"SubitemNumbered",
 CounterAssignments->{{"SubsubitemNumbered", 0}},
 MenuPosition->1640],
Cell[25127, 851, 127, 3, 53, 50, 0, "StyleData", "SubitemNumbered", \
"Presentation"],
Cell[25257, 856, 94, 2, 27, 47, 0, "StyleData", "SubitemNumbered", \
"Condensed"],
Cell[25354, 860, 94, 2, 28, 46, 0, "StyleData", "SubitemNumbered", \
"Printout"]
}, Closed]],
Cell[CellGroupData[{
Cell[25485, 867, 455, 11, 35, 37, 0, "StyleData", "SubsubitemNumbered", "All",
 
 CounterIncrements->"SubsubitemNumbered"],
Cell[25943, 880, 130, 3, 53, 53, 0, "StyleData", "SubsubitemNumbered", \
"Presentation"],
Cell[26076, 885, 98, 2, 27, 50, 0, "StyleData", "SubsubitemNumbered", \
"Condensed"],
Cell[26177, 889, 98, 2, 28, 49, 0, "StyleData", "SubsubitemNumbered", \
"Printout"]
}, Closed]]
}, Closed]]
}, Closed]]
}, Closed]]
}, Closed]],
Cell[CellGroupData[{
Cell[26360, 900, 54, 0, 32, "Section"],
Cell[CellGroupData[{
Cell[26439, 904, 253, 7, 35, 32, 0, "StyleData", "InlineFormula", "All",
 MenuPosition->1650],
Cell[26695, 913, 119, 3, 51, 48, 0, "StyleData", "InlineFormula", \
"Presentation"],
Cell[26817, 918, 115, 3, 38, 45, 0, "StyleData", "InlineFormula", "Condensed"],
Cell[26935, 923, 76, 1, 39, 44, 0, "StyleData", "InlineFormula", "Printout"]
}, Closed]],
Cell[CellGroupData[{
Cell[27048, 929, 377, 9, 35, 33, 0, "StyleData", "DisplayFormula", "All",
 MenuPosition->1700],
Cell[27428, 940, 151, 3, 57, 49, 0, "StyleData", "DisplayFormula", \
"Presentation"],
Cell[27582, 945, 83, 2, 34, 46, 0, "StyleData", "DisplayFormula", "Condensed"],
Cell[27668, 949, 45, 0, 35, 45, 0, "StyleData", "DisplayFormula", "Printout"]
}, Closed]],
Cell[CellGroupData[{
Cell[27750, 954, 558, 14, 35, 41, 0, "StyleData", "DisplayFormulaNumbered", \
"All",
 CounterIncrements->"DisplayFormulaNumbered",
 MenuPosition->1710],
Cell[28311, 970, 159, 3, 57, 57, 0, "StyleData", "DisplayFormulaNumbered", \
"Presentation"],
Cell[28473, 975, 91, 2, 34, 54, 0, "StyleData", "DisplayFormulaNumbered", \
"Condensed"],
Cell[28567, 979, 53, 0, 35, 53, 0, "StyleData", "DisplayFormulaNumbered", \
"Printout"]
}, Closed]],
Cell[CellGroupData[{
Cell[28657, 984, 232, 8, 48, 26, 0, "StyleData", "Program", "All",
 MenuPosition->1800],
Cell[28892, 994, 143, 4, 69, 42, 0, "StyleData", "Program", "Presentation"],
Cell[29038, 1000, 109, 3, 38, 39, 0, "StyleData", "Program", "Condensed"],
Cell[29150, 1005, 70, 1, 39, 38, 0, "StyleData", "Program", "Printout"]
}, Closed]]
}, Closed]],
Cell[CellGroupData[{
Cell[29269, 1012, 62, 0, 32, "Section"],
Cell[CellGroupData[{
Cell[29356, 1016, 160, 6, 23, 25, 0, "StyleData", "Header", "All",
 MenuPosition->None],
Cell[29519, 1024, 57, 1, 35, 37, 0, "StyleData", "Header", "Printout"]
}, Closed]],
Cell[CellGroupData[{
Cell[29613, 1030, 57, 1, 35, 32, 0, "StyleData", "HeaderSection", "All",
 StyleMenuListing->None],
Cell[29673, 1033, 64, 1, 35, 44, 0, "StyleData", "HeaderSection", "Printout"]
}, Closed]],
Cell[CellGroupData[{
Cell[29774, 1039, 60, 1, 35, 35, 0, "StyleData", "HeaderSubsection", "All",
 StyleMenuListing->None],
Cell[29837, 1042, 67, 1, 35, 47, 0, "StyleData", "HeaderSubsection", \
"Printout"]
}, Closed]],
Cell[CellGroupData[{
Cell[29941, 1048, 55, 1, 35, 30, 0, "StyleData", "HeaderTitle", "All",
 StyleMenuListing->None],
Cell[29999, 1051, 62, 1, 35, 42, 0, "StyleData", "HeaderTitle", "Printout"]
}, Closed]],
Cell[CellGroupData[{
Cell[30098, 1057, 116, 4, 22, 25, 0, "StyleData", "Footer", "All",
 MenuPosition->None],
Cell[30217, 1063, 57, 1, 35, 37, 0, "StyleData", "Footer", "Printout"]
}, Closed]],
Cell[CellGroupData[{
Cell[30311, 1069, 57, 1, 35, 32, 0, "StyleData", "FooterSection", "All",
 StyleMenuListing->None],
Cell[30371, 1072, 64, 1, 35, 44, 0, "StyleData", "FooterSection", "Printout"]
}, Closed]],
Cell[CellGroupData[{
Cell[30472, 1078, 60, 1, 35, 35, 0, "StyleData", "FooterSubsection", "All",
 StyleMenuListing->None],
Cell[30535, 1081, 67, 1, 35, 47, 0, "StyleData", "FooterSubsection", \
"Printout"]
}, Closed]],
Cell[CellGroupData[{
Cell[30639, 1087, 55, 1, 35, 30, 0, "StyleData", "FooterTitle", "All",
 StyleMenuListing->None],
Cell[30697, 1090, 62, 1, 35, 42, 0, "StyleData", "FooterTitle", "Printout"]
}, Closed]],
Cell[CellGroupData[{
Cell[30796, 1096, 131, 5, 28, 29, 0, "StyleData", "PageNumber", "All",
 MenuPosition->None],
Cell[30930, 1103, 61, 1, 35, 41, 0, "StyleData", "PageNumber", "Printout"]
}, Closed]]
}, Closed]]
}
]
*)

(* End of internal cache information *)
