(***********************************************************************

                    Mathematica-Compatible Notebook

This notebook can be used on any computer system with Mathematica 4.0,
MathReader 4.0, or any compatible application. 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[     14562,        458]*)
(*NotebookOutlinePosition[     15753,        505]*)
(*  CellTagsIndexPosition[     15602,        495]*)
(*WindowFrame->Normal*)



Notebook[{
Cell["\:95a2\:6570\:306e\:4f7f\:3044\:65b9", "Title",
  Editable->False,
  TextAlignment->Center],

Cell["\:300c\:95a2\:6570\:300d\:3068\:3044\:3046\:6982\:5ff5\:3092\:5b66\:3076\
", "Subtitle",
  Editable->False,
  TextAlignment->Center],

Cell[TextData[{
  StyleBox["Mathematica",
    FontSlant->"Italic"],
  " \:306b\:304a\:3044\:3066\:4f55\:3089\:304b\:306e\:8a08\:7b97\:3092\:884c\
\:3046\:5834\:5408\:ff0c\:5207\:3063\:3066\:3082\:5207\:308a\:96e2\:305b\:306a\
\:3044\:5b58\:5728\:3067\:3042\:308b\:300c\:95a2\:6570\:300d\:306b\:3064\:3044\
\:3066\:5b66\:3073\:307e\:3057\:3087\:3046\:ff0e\:7279\:306b\:3053\:306e\:30ce\
\:30fc\:30c8\:30d6\:30c3\:30af\:3067\:306f\:300c",
  StyleBox["\:7d44\:8fbc\:95a2\:6570",
    FontColor->RGBColor[1, 0, 0]],
  "\:300d\:3068\:3044\:3046\:306e\:3092\:5b66\:3073\:307e\:3059\:ff0e"
}], "Text",
  Editable->False,
  ShowCellBracket->False],

Cell[CellGroupData[{

Cell["\:95a2\:6570\:3068\:306f", "Section",
  Editable->False,
  CellTags->"1"],

Cell[TextData[{
  StyleBox["Mathematica",
    FontSlant->"Italic"],
  " \:3067\:306f\:ff0c\:4f55\:3092\:8a08\:7b97\:3059\:308b\:306b\:3082\:300c\
\:95a2\:6570\:300d\:3068\:547c\:3070\:308c\:308b\:6a5f\:80fd\:3092\:4f7f\:7528\
\:3057\:307e\:3059\:ff0e\:4f8b\:3048\:3070\:ff0c\:6b21\:306e\:3088\:3046\:306a\
\:8db3\:3057\:7b97\:3092\:884c\:3046\:5834\:5408\:3092\:8003\:3048\:3066\:307f\
\:307e\:3057\:3087\:3046\:ff0e"
}], "Text",
  Editable->False,
  ShowCellBracket->False],

Cell[CellGroupData[{

Cell[BoxData[
    \(1 + 1\)], "Input",
  Editable->False,
  Selectable->False,
  ShowCellBracket->False],

Cell[BoxData[
    \(2\)], "Output",
  Editable->False,
  ShowCellBracket->False]
}, Open  ]],

Cell[TextData[{
  "\:3053\:308c\:306f\:ff0c\:95a2\:6570 ",
  ButtonBox["Plus",
    ButtonStyle->"RefGuideLink"],
  " \:3092\:4f7f\:3063\:3066\:3044\:307e\:3059\:ff0e\:898b\:305f\:76ee\:306b\
\:306f ",
  StyleBox["Plus",
    FontFamily->"Courier"],
  " \:3068\:3044\:3046\:6587\:5b57\:306f\:3069\:3053\:306b\:3082\:51fa\:3066\
\:304d\:307e\:305b\:3093\:304c\:ff0c",
  Cell[BoxData[
      \(TraditionalForm\`1 + 1\)]],
  " \:3068\:3044\:3046\:306e\:306f\:6b21\:306e\:3088\:3046\:306a\:8868\:8a18\
\:3092\:7701\:7565\:3057\:305f\:3082\:306e\:3060\:304b\:3089\:3067\:3059\:ff0e\
"
}], "Text",
  Editable->False,
  ShowCellBracket->False],

Cell[CellGroupData[{

Cell[BoxData[
    \(Plus[1, 1]\)], "Input",
  Editable->False,
  Selectable->False,
  ShowCellBracket->False,
  Copyable->False],

Cell[BoxData[
    \(2\)], "Output",
  Editable->False,
  ShowCellBracket->False]
}, Open  ]],

Cell["\<\
\:3067\:306f\:ff0c\:95a2\:6570\:3068\:306f\:4f55\:306a\:3093\:3067\:3057\:3087\
\:3046\:304b\:ff0e\:305d\:308c\:306b\:3064\:3044\:3066\:ff0c\:4ee5\:4e0b\:306e\
\:7ae0\:3067\:306f\:53d6\:308a\:4e0a\:3052\:3066\:3044\:307e\:3059\:ff0e\
\>", "Text",
  Editable->False,
  ShowCellBracket->False]
}, Closed]],

Cell[CellGroupData[{

Cell[TextData[{
  StyleBox["Mathematica",
    FontSlant->"Italic"],
  " \:3078\:306e\:547d\:4ee4"
}], "Section",
  Editable->False,
  CellTags->"2"],

Cell[TextData[{
  "\:7c21\:5358\:306b\:3044\:3046\:3068\:300c\:95a2\:6570\:300d\:3068\:306f\
\:ff0c ",
  StyleBox["Mathematica",
    FontSlant->"Italic"],
  " \:304c\:7406\:89e3\:3067\:304d\:308b\:8a00\:8449\:306b\:3088\:308b\:30e6\
\:30fc\:30b6\:304b\:3089\:306e\:547d\:4ee4\:3067\:3059\:ff0e\:8db3\:3057\:7b97\
\:305b\:3088\:ff0c\:5f15\:304d\:7b97\:305b\:3088\:ff0c\:5834\:5408\:306b\:3088\
\:3063\:3066\:306f\:3082\:3063\:3068\:96e3\:3057\:3044\:547d\:4ee4\:3092\:3059\
\:308b\:5834\:5408\:3082\:3042\:308b\:3068\:601d\:3044\:307e\:3059\:304c\:ff0c\
\:305d\:306e\:3088\:3046\:306a\:547d\:4ee4\:306e\:3072\:3068\:3064\:3072\:3068\
\:3064\:3092\:6307\:3057\:3066\:95a2\:6570\:3068\:547c\:3093\:3067\:3044\:308b\
\:306e\:3067\:3059\:ff0e"
}], "Text",
  Editable->False,
  ShowCellBracket->False],

Cell[TextData[{
  "\:3067\:3059\:304b\:3089\:ff0c\:6b21\:306e\:4f8b\:3067\:306f\:ff0c ",
  StyleBox["Mathematica",
    FontSlant->"Italic"],
  " \:306b ",
  ButtonBox["Subtract",
    ButtonStyle->"RefGuideLink"],
  " \:ff08\:5f15\:304d\:7b97\:305b\:3088\:ff09\:3068\:547d\:4ee4\:3057\:3066\
\:3044\:307e\:3059\:ff0e\:3053\:308c\:3060\:3051\:3067\:306f\:ff0c\:4f55\:304b\
\:3089\:4f55\:3092\:5f15\:3051\:3070\:826f\:3044\:304b\:308f\:304b\:308a\:307e\
\:305b\:3093\:304b\:3089\:ff0c",
  Cell[BoxData[
      \(TraditionalForm\`10\)]],
  " \:304b\:3089 ",
  Cell[BoxData[
      \(TraditionalForm\`3\)]],
  " \:3092\:ff0c\:3068\:6307\:5b9a\:3082\:3057\:3066\:304a\:304d\:307e\:3059\
\:ff0e"
}], "Text",
  Editable->False,
  ShowCellBracket->False],

Cell[CellGroupData[{

Cell[BoxData[
    \(Subtract[10, 3]\)], "Input",
  Editable->False,
  Selectable->False,
  ShowCellBracket->False],

Cell[BoxData[
    \(7\)], "Output",
  Editable->False,
  ShowCellBracket->False]
}, Open  ]],

Cell["\:3053\:308c\:3092\:7701\:7565\:3057\:3066\:66f8\:3044\:305f\:3082\:306e\
\:304c\:6b21\:306e\:3088\:3046\:306b\:306a\:308a\:307e\:3059\:ff0e", "Text",
  Editable->False,
  ShowCellBracket->False],

Cell[CellGroupData[{

Cell[BoxData[
    \(10 - 3\)], "Input",
  Editable->False,
  Selectable->False,
  ShowCellBracket->False],

Cell[BoxData[
    \(7\)], "Output",
  Editable->False,
  ShowCellBracket->False]
}, Open  ]],

Cell["\:3053\:306e\:3088\:3046\:306a\:95a2\:6570\:306f\:ff0c\:4e00\:822c\:306b\
\:6b21\:306e\:3088\:3046\:306a\:66f8\:5f0f\:306b\:306a\:3063\:3066\:3044\:307e\
\:3059\:ff0e", "Text",
  Editable->False,
  ShowCellBracket->False],

Cell[TextData[StyleBox["\:95a2\:6570\:540d[\:5f15\:6570]",
  FontFamily->"Courier",
  FontWeight->"Bold"]], "Text",
  Editable->False,
  ShowCellBracket->False],

Cell[TextData[{
  "\:5148\:307b\:3069\:306e\:4f8b\:3067\:8a00\:3048\:3070\:ff0c\:307e\:305a\
\:95a2\:6570\:540d ",
  StyleBox["Subtract",
    FontFamily->"Courier"],
  " \:304c\:6765\:3066\:ff0c\:30d6\:30e9\:30b1\:30c3\:30c8\:ff08",
  StyleBox["[\:ff0c]",
    FontFamily->"Courier"],
  "\:ff09\:3067\:56f2\:307e\:308c\:305f\:5f15\:6570 ",
  Cell[BoxData[
      \(TraditionalForm\`10\)]],
  " \:3068 ",
  Cell[BoxData[
      \(TraditionalForm\`3\)]],
  " \:304c\:6765\:307e\:3059\:ff0e\:3053\:3053\:3067\:7a81\:7136\:ff0c\:300c\
\:5f15\:6570\:300d\:3068\:3044\:3046\:8a00\:8449\:304c\:51fa\:3066\:304d\:307e\
\:3057\:305f\:304c\:ff0c\:95a2\:6570\:3067\:8868\:3055\:308c\:308b\:547d\:4ee4\
\:306e\:76ee\:7684\:8a9e\:306e\:3053\:3068\:3092\:5f15\:6570\:3068\:547c\:3073\
\:307e\:3059\:ff0e"
}], "Text",
  Editable->False,
  ShowCellBracket->False],

Cell[TextData[{
  "\:6b21\:306e\:4f8b\:306e\:5834\:5408\:ff0c",
  Cell[BoxData[
      \(TraditionalForm\`Factor\)]],
  " \:ff08\:56e0\:6570\:5206\:89e3\:305b\:3088\:ff09\:304c\:95a2\:6570\:540d\
\:3067\:ff0c",
  Cell[BoxData[
      \(TraditionalForm\`x\^3 - 1\)]],
  " \:304c\:5f15\:6570\:3067\:3059\:ff0e"
}], "Text",
  Editable->False,
  ShowCellBracket->False],

Cell[CellGroupData[{

Cell[BoxData[
    \(Factor[x^3 - 1]\)], "Input",
  Editable->False,
  Selectable->False,
  ShowCellBracket->False],

Cell[BoxData[
    \(\((\(-1\) + x)\)\ \((1 + x + x\^2)\)\)], "Output",
  Editable->False,
  ShowCellBracket->False]
}, Open  ]]
}, Closed]],

Cell[CellGroupData[{

Cell["\:6570\:5b66\:3067\:3044\:3046\:95a2\:6570", "Section",
  Editable->False,
  CellTags->"3"],

Cell[TextData[{
  StyleBox["Mathematica",
    FontSlant->"Italic"],
  " \:304c\:6700\:3082\:95a2\:4fc2\:3059\:308b\:5206\:91ce\:3067\:3042\:308b\
\:6570\:5b66\:306b\:304a\:3044\:3066\:3082\:ff0c\:300c\:95a2\:6570\:300d\:3068\
\:3044\:3046\:3082\:306e\:304c\:51fa\:3066\:304d\:307e\:3059\:ff0e\:4f8b\:3048\
\:3070\:ff0c\:300c\:95a2\:6570 ",
  Cell[BoxData[
      \(TraditionalForm\`f(x) = x\^2 + 1\)]],
  " \:306e\:30b0\:30e9\:30d5\:3092\:66f8\:304d\:306a\:3055\:3044\:ff0e\:300d\
\:3068\:3044\:3046\:611f\:3058\:3067\:3059\:ff0e"
}], "Text",
  Editable->False,
  ShowCellBracket->False],

Cell[TextData[{
  "\:3053\:306e\:6570\:5b66\:3067\:306e\:300c\:95a2\:6570\:300d\:3068\:ff0c\
\:3053\:306e\:30ce\:30fc\:30c8\:30d6\:30c3\:30af\:3067\:8aac\:660e\:3057\:3066\
\:3044\:308b\:300c\:95a2\:6570\:300d\:306f\:540c\:3058\:69d8\:306a\:3082\:306e\
\:3067\:3059\:ff0e\:6570\:5b66\:306b\:51fa\:3066\:304f\:308b ",
  Cell[BoxData[
      \(TraditionalForm\`f(x)\)]],
  " \:3092\:ff0c\:95a2\:6570\:540d ",
  Cell[BoxData[
      \(TraditionalForm\`f\)]],
  " \:ff0c\:5f15\:6570 ",
  Cell[BoxData[
      \(TraditionalForm\`x\)]],
  " \:3068\:8003\:3048\:308c\:3070\:826f\:3044\:306e\:3067\:3059\:ff0e\:305d\
\:3057\:3066\:5b9f\:969b\:306b\:306f\:ff0c",
  Cell[BoxData[
      \(TraditionalForm\`x\^2 + 1\)]],
  " \:306e\:5024\:3092\:8a08\:7b97\:3059\:308b\:547d\:4ee4\:3068\:3044\:3046\
\:3053\:3068\:306b\:306a\:308a\:307e\:3059\:ff0e"
}], "Text",
  Editable->False,
  ShowCellBracket->False],

Cell[TextData[{
  "\:305f\:3060\:3057\:ff0c ",
  StyleBox["Mathematica",
    FontSlant->"Italic"],
  " \:3067\:95a2\:6570\:3092\:4f7f\:3046\:5834\:5408\:ff08\:4f7f\:308f\:306a\
\:3044\:5834\:5408\:306f\:3042\:307e\:308a\:3042\:308a\:307e\:305b\:3093\:ff09\
\:ff0c\:5f15\:6570\:306e\:3042\:308b\:306a\:3057\:306b\:95a2\:4fc2\:306a\:304f\
\:30d6\:30e9\:30b1\:30c3\:30c8\:3092\:4ed8\:3051\:308b\:3053\:3068\:3092\:5fd8\
\:308c\:306a\:3044\:3067\:304f\:3060\:3055\:3044\:ff0e"
}], "Text",
  Editable->False,
  ShowCellBracket->False],

Cell[TextData[{
  "\:4f8b\:3048\:3070\:ff0c\:6b21\:306e\:95a2\:6570 ",
  ButtonBox["Date",
    ButtonStyle->"RefGuideLink"],
  " \:3092\:4f7f\:3046\:5834\:5408\:ff0c\:5f15\:6570\:306f\:306a\:3044\:3067\
\:3059\:304c\:ff0c\:30d6\:30e9\:30b1\:30c3\:30c8\:306f\:5fc5\:8981\:3067\:3059\
\:ff0e"
}], "Text",
  Editable->False,
  ShowCellBracket->False],

Cell[CellGroupData[{

Cell[BoxData[
    \(Date[]\)], "Input",
  Editable->False,
  Selectable->False,
  ShowCellBracket->False],

Cell[BoxData[
    \({2000, 8, 3, 10, 10, 59}\)], "Output",
  Editable->False,
  ShowCellBracket->False]
}, Open  ]]
}, Closed]],

Cell[CellGroupData[{

Cell["\:7d44\:8fbc\:95a2\:6570", "Section",
  Editable->False,
  CellTags->"4"],

Cell[TextData[{
  "\:65b0\:3057\:304f\:5b9a\:7fa9\:3059\:308b\:3053\:3068\:3067\:4f7f\:7528\
\:53ef\:80fd\:306a\:95a2\:6570\:3092\:5897\:3084\:3059\:3053\:3068\:304c\:3067\
\:304d\:307e\:3059\:ff0e\:305d\:306e\:3088\:3046\:306a\:30e6\:30fc\:30b6\:304c\
\:5b9a\:7fa9\:3057\:305f\:95a2\:6570\:3092\:300c\:30e6\:30fc\:30b6\:5b9a\:7fa9\
\:95a2\:6570\:300d\:ff0c",
  StyleBox["Mathematica",
    FontSlant->"Italic"],
  " \:306b\:6700\:521d\:304b\:3089\:3042\:308b\:5b9a\:7fa9\:6e08\:307f\:306e\
\:95a2\:6570\:3092\:300c\:7d44\:8fbc\:95a2\:6570\:300d\:3068\:547c\:3073\:307e\
\:3059\:ff0e"
}], "Text",
  Editable->False,
  ShowCellBracket->False],

Cell[TextData[{
  StyleBox["Mathematica",
    FontSlant->"Italic"],
  " \:306e\:7d44\:8fbc\:95a2\:6570\:306f\:ff0c\:5fc5\:305a\:5927\:6587\:5b57\
\:304b\:3089\:59cb\:307e\:308a\:307e\:3059\:ff0e\:307e\:305f\:ff0c\:305d\:308c\
\:306b\:3088\:3063\:3066\:5f97\:3089\:308c\:308b\:52b9\:679c\:306e\:82f1\:8a9e\
\:540d\:306b\:306a\:3063\:3066\:3044\:308b\:3053\:3068\:304c\:307b\:3068\:3093\
\:3069\:3067\:3059\:ff0e\:4f8b\:3048\:3070\:ff0c\:8db3\:3057\:7b97\:3092\:884c\
\:3046 ",
  StyleBox["Plus",
    FontFamily->"Courier"],
  "\:ff0c\:56e0\:6570\:5206\:89e3\:3092\:884c\:3046 ",
  StyleBox["Factor",
    FontFamily->"Courier"],
  "\:ff0c\:65b9\:7a0b\:5f0f\:3092\:89e3\:304f ",
  StyleBox["Solve",
    FontFamily->"Courier"],
  " \:306a\:3069\:3067\:3059\:ff0e"
}], "Text",
  Editable->False,
  ShowCellBracket->False],

Cell["\<\
\:5f93\:3063\:3066\:ff0c\:30e6\:30fc\:30b6\:5b9a\:7fa9\:95a2\:6570\:3092\:5b9a\
\:7fa9\:3059\:308b\:5834\:5408\:ff0c\:306a\:308b\:3079\:304f\:5c0f\:6587\:5b57\
\:304b\:3089\:59cb\:307e\:308b\:540d\:524d\:3092\:4ed8\:3051\:308b\:3053\:3068\
\:304c\:63a8\:5968\:3055\:308c\:3066\:3044\:307e\:3059\:ff0e\:3053\:308c\:306b\
\:3088\:308a\:ff0c\:7d44\:8fbc\:95a2\:6570\:306e\:4e0a\:66f8\:304d\:3092\:9632\
\:304e\:ff0c\:4f7f\:7528\:6642\:306e\:6df7\:4e71\:3092\:672a\:7136\:306b\:9632\
\:3050\:3053\:3068\:304c\:3067\:304d\:307e\:3059\:ff0e\
\>", "Text",
  Editable->False,
  ShowCellBracket->False]
}, Closed]],

Cell[CellGroupData[{

Cell["\:307e\:3068\:3081\:3068\:6f14\:7fd2", "Section",
  Editable->False,
  CellTags->"5"],

Cell[TextData[{
  "\:3053\:306e\:30ce\:30fc\:30c8\:30d6\:30c3\:30af\:306e\:5185\:5bb9\:3092\
\:632f\:308a\:8fd4\:3063\:3066\:ff0c\:6b21\:306e\:64cd\:4f5c\:3092 ",
  StyleBox["Mathematica",
    FontSlant->"Italic"],
  " \:3092\:4f7f\:3063\:3066\:3084\:3063\:3066\:307f\:307e\:3057\:3087\:3046\
\:ff0e"
}], "Text",
  Editable->False,
  ShowCellBracket->False],

Cell["\<\
(1) \:3053\:306e\:30ce\:30fc\:30c8\:30d6\:30c3\:30af\:306b\:51fa\:3066\:304f\
\:308b\:95a2\:6570\:3092\:3059\:3079\:3066\:5b9f\:969b\:306b\:4f7f\:3063\:3066\
\:307f\:3066\:304f\:3060\:3055\:3044\:ff0e\
\>", "Text",
  Editable->False,
  ShowCellBracket->False]
}, Closed]]
},
FrontEndVersion->"4.0 for Microsoft Windows",
ScreenRectangle->{{0, 1280}, {0, 951}},
WindowToolbars->{},
WindowSize->{500, 500},
WindowMargins->{{127, Automatic}, {Automatic, 0}},
StyleDefinitions -> "DemoText.nb"
]


(***********************************************************************
Cached data follows.  If you edit this Notebook file directly, not using
Mathematica, you must remove the line containing CacheID at the top of 
the file.  The cache data will then be recreated when you save this file 
from within Mathematica.
***********************************************************************)

(*CellTagsOutline
CellTagsIndex->{
  "1"->{
    Cell[2621, 75, 79, 2, 54, "Section",
      CellTags->"1"]},
  "2"->{
    Cell[4626, 150, 148, 6, 34, "Section",
      CellTags->"2"]},
  "3"->{
    Cell[8893, 295, 97, 2, 34, "Section",
      CellTags->"3"]},
  "4"->{
    Cell[11639, 378, 79, 2, 34, "Section",
      CellTags->"4"]},
  "5"->{
    Cell[13823, 434, 91, 2, 34, "Section",
      CellTags->"5"]}
  }
*)

(*CellTagsIndex
CellTagsIndex->{
  {"1", 15214, 476},
  {"2", 15287, 479},
  {"3", 15362, 482},
  {"4", 15436, 485},
  {"5", 15511, 488}
  }
*)

(*NotebookFileOutline
Notebook[{
Cell[1717, 49, 97, 2, 56, "Title"],
Cell[1817, 53, 138, 3, 41, "Subtitle"],
Cell[1958, 58, 638, 13, 67, "Text"],

Cell[CellGroupData[{
Cell[2621, 75, 79, 2, 54, "Section",
  CellTags->"1"],
Cell[2703, 79, 474, 10, 48, "Text"],

Cell[CellGroupData[{
Cell[3202, 93, 104, 4, 40, "Input"],
Cell[3309, 99, 80, 3, 49, "Output"]
}, Open  ]],
Cell[3404, 105, 633, 17, 48, "Text"],

Cell[CellGroupData[{
Cell[4062, 126, 128, 5, 40, "Input"],
Cell[4193, 133, 80, 3, 49, "Output"]
}, Open  ]],
Cell[4288, 139, 301, 6, 48, "Text"]
}, Closed]],

Cell[CellGroupData[{
Cell[4626, 150, 148, 6, 34, "Section",
  CellTags->"2"],
Cell[4777, 158, 795, 15, 86, "Text"],
Cell[5575, 175, 743, 20, 67, "Text"],

Cell[CellGroupData[{
Cell[6343, 199, 114, 4, 40, "Input"],
Cell[6460, 205, 80, 3, 49, "Output"]
}, Open  ]],
Cell[6555, 211, 201, 3, 29, "Text"],

Cell[CellGroupData[{
Cell[6781, 218, 105, 4, 40, "Input"],
Cell[6889, 224, 80, 3, 49, "Output"]
}, Open  ]],
Cell[6984, 230, 227, 4, 29, "Text"],
Cell[7214, 236, 160, 4, 30, "Text"],
Cell[7377, 242, 844, 21, 67, "Text"],
Cell[8224, 265, 363, 11, 29, "Text"],

Cell[CellGroupData[{
Cell[8612, 280, 114, 4, 40, "Input"],
Cell[8729, 286, 115, 3, 49, "Output"]
}, Open  ]]
}, Closed]],

Cell[CellGroupData[{
Cell[8893, 295, 97, 2, 34, "Section",
  CellTags->"3"],
Cell[8993, 299, 586, 13, 67, "Text"],
Cell[9582, 314, 890, 21, 67, "Text"],
Cell[10475, 337, 529, 11, 48, "Text"],
Cell[11007, 350, 347, 9, 29, "Text"],

Cell[CellGroupData[{
Cell[11379, 363, 105, 4, 40, "Input"],
Cell[11487, 369, 103, 3, 49, "Output"]
}, Open  ]]
}, Closed]],

Cell[CellGroupData[{
Cell[11639, 378, 79, 2, 34, "Section",
  CellTags->"4"],
Cell[11721, 382, 640, 13, 67, "Text"],
Cell[12364, 397, 816, 20, 67, "Text"],
Cell[13183, 419, 603, 10, 67, "Text"]
}, Closed]],

Cell[CellGroupData[{
Cell[13823, 434, 91, 2, 34, "Section",
  CellTags->"5"],
Cell[13917, 438, 357, 9, 48, "Text"],
Cell[14277, 449, 269, 6, 29, "Text"]
}, Closed]]
}
]
*)




(***********************************************************************
End of Mathematica Notebook file.
***********************************************************************)