(* Content-type: application/mathematica *)

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

(* CreatedBy='Mathematica 6.0' *)

(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[       145,          7]
NotebookDataLength[     21568,        432]
NotebookOptionsPosition[     21296,        418]
NotebookOutlinePosition[     21655,        434]
CellTagsIndexPosition[     21612,        431]
WindowFrame->Normal
ContainsDynamic->False*)

(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[
 RowBox[{"Manipulate", "[", "\n", 
  RowBox[{
   RowBox[{"Column", "[", " ", 
    RowBox[{
     RowBox[{"{", "   ", "\[IndentingNewLine]", 
      RowBox[{
       RowBox[{"Row", "[", 
        RowBox[{"{", "  ", 
         RowBox[{
          RowBox[{"Style", "[", " ", 
           RowBox[{
           "\"\<Cylinder \!\(\*SuperscriptBox[\(x\), \
\(2\)]\)+\!\(\*SuperscriptBox[\(y\), \(2\)]\)=1 cut by a plane z=ax+by=\>\"", 
            ",", "20", ",", " ", "Bold", ",", " ", "Blue"}], "]"}], ",", " ", 
          
          RowBox[{"Style", "[", " ", 
           RowBox[{
            RowBox[{
             RowBox[{"a", "*", "x"}], "+", 
             RowBox[{"b", "*", "y"}]}], ",", "20", ",", " ", "Bold", ",", " ",
             "Blue"}], "]"}]}], "}"}], "]"}], ",", "               ", 
       "\[IndentingNewLine]", 
       RowBox[{"Show", "[", "\[IndentingNewLine]", 
        RowBox[{
         RowBox[{"Graphics3D", "[", " ", 
          RowBox[{"{", 
           RowBox[{"Green", ",", "Thick", ",", 
            RowBox[{"Line", "[", 
             RowBox[{"{", 
              RowBox[{
               RowBox[{"{", 
                RowBox[{
                 FractionBox[
                  RowBox[{"-", "a"}], 
                  SqrtBox[
                   RowBox[{
                    SuperscriptBox["a", "2"], "+", 
                    SuperscriptBox["b", "2"]}]]], ",", 
                 FractionBox[
                  RowBox[{"-", "b"}], 
                  SqrtBox[
                   RowBox[{
                    SuperscriptBox["a", "2"], "+", 
                    SuperscriptBox["b", "2"]}]]], ",", 
                 RowBox[{"-", 
                  SqrtBox[
                   RowBox[{
                    SuperscriptBox["a", "2"], "+", 
                    SuperscriptBox["b", "2"]}]]}]}], "}"}], ",", 
               RowBox[{"{", 
                RowBox[{
                 FractionBox["a", 
                  SqrtBox[
                   RowBox[{
                    SuperscriptBox["a", "2"], "+", 
                    SuperscriptBox["b", "2"]}]]], ",", 
                 FractionBox["b", 
                  SqrtBox[
                   RowBox[{
                    SuperscriptBox["a", "2"], "+", 
                    SuperscriptBox["b", "2"]}]]], ",", 
                 SqrtBox[
                  RowBox[{
                   SuperscriptBox["a", "2"], "+", 
                   SuperscriptBox["b", "2"]}]]}], "}"}]}], "}"}], "]"}]}], 
           "}"}], " ", "]"}], ",", "\[IndentingNewLine]", 
         RowBox[{"Graphics3D", "[", " ", 
          RowBox[{"{", 
           RowBox[{"Blue", ",", "Thick", ",", 
            RowBox[{"Line", "[", 
             RowBox[{"{", 
              RowBox[{
               RowBox[{"{", 
                RowBox[{
                 FractionBox["b", 
                  SqrtBox[
                   RowBox[{
                    SuperscriptBox["a", "2"], "+", 
                    SuperscriptBox["b", "2"]}]]], ",", 
                 FractionBox[
                  RowBox[{"-", "a"}], 
                  SqrtBox[
                   RowBox[{
                    SuperscriptBox["a", "2"], "+", 
                    SuperscriptBox["b", "2"]}]]], ",", "0"}], "}"}], ",", 
               RowBox[{"{", 
                RowBox[{
                 FractionBox[
                  RowBox[{"-", "b"}], 
                  SqrtBox[
                   RowBox[{
                    SuperscriptBox["a", "2"], "+", 
                    SuperscriptBox["b", "2"]}]]], ",", 
                 FractionBox["a", 
                  SqrtBox[
                   RowBox[{
                    SuperscriptBox["a", "2"], "+", 
                    SuperscriptBox["b", "2"]}]]], ",", "0"}], "}"}]}], "}"}], 
             "]"}]}], "}"}], " ", "]"}], ",", "\[IndentingNewLine]", 
         RowBox[{
          StyleBox["ParametricPlot3D",
           FontSize->14], 
          StyleBox["[",
           FontSize->14], 
          StyleBox[
           RowBox[{
            RowBox[{"{", 
             RowBox[{
              RowBox[{"Cos", "[", "u", "]"}], ",", 
              RowBox[{"Sin", "[", "u", "]"}], ",", "v"}], "}"}], ",", 
            RowBox[{"{", 
             RowBox[{"u", ",", "0", ",", 
              RowBox[{"2", "Pi"}]}], "}"}], ",", 
            RowBox[{"{", 
             RowBox[{"v", ",", 
              RowBox[{
               RowBox[{"-", "0.5"}], "-", 
               SqrtBox[
                RowBox[{
                 SuperscriptBox["a", "2"], "+", 
                 SuperscriptBox["b", "2"]}]]}], ",", 
              RowBox[{"0.5", "+", 
               SqrtBox[
                RowBox[{
                 SuperscriptBox["a", "2"], "+", 
                 SuperscriptBox["b", "2"]}]]}]}], "}"}], ",", " ", 
            RowBox[{"PlotStyle", "->", 
             RowBox[{"Opacity", "[", "p", "]"}]}]}],
           FontSize->14], " ", 
          StyleBox["]",
           FontSize->14]}], ",", " ", "\[IndentingNewLine]", 
         RowBox[{"Plot3D", "[", "  ", 
          RowBox[{
           RowBox[{
            RowBox[{"a", "*", "x"}], "+", 
            RowBox[{"b", "*", "y"}]}], ",", 
           RowBox[{"{", 
            RowBox[{"x", ",", 
             RowBox[{"-", "1.2"}], ",", "1.2"}], "}"}], ",", " ", 
           RowBox[{"{", 
            RowBox[{"y", ",", 
             RowBox[{"-", "1.2"}], ",", "1.2"}], "}"}], ",", 
           StyleBox[
            RowBox[{"PlotStyle", "->", 
             RowBox[{"Opacity", "[", "p", "]"}]}],
            FontSize->14]}], " ", "]"}], ",", "\[IndentingNewLine]", 
         RowBox[{
          StyleBox["ParametricPlot3D",
           FontSize->14], 
          StyleBox["[",
           FontSize->14], 
          RowBox[{
           StyleBox[
            RowBox[{"{", 
             RowBox[{
              RowBox[{"Cos", "[", "t", "]"}], ",", 
              RowBox[{"Sin", "[", "t", "]"}], ",", 
              RowBox[{
               RowBox[{"a", "*", 
                RowBox[{"Cos", "[", "t", "]"}]}], "+", 
               RowBox[{"b", "*", 
                RowBox[{"Sin", "[", "t", "]"}]}]}]}], "}"}],
            FontSize->14], 
           StyleBox[",",
            FontSize->14], 
           StyleBox[
            RowBox[{"{", 
             RowBox[{"t", ",", "0", ",", 
              RowBox[{"2", "Pi"}]}], "}"}],
            FontSize->14], 
           StyleBox[",",
            FontSize->14], 
           StyleBox[" ",
            FontSize->14], 
           RowBox[{"PlotStyle", "\[Rule]", 
            RowBox[{"{", 
             RowBox[{"Red", ",", "Thick"}], "}"}]}]}], 
          StyleBox["]",
           FontSize->14]}], ",", " ", "\[IndentingNewLine]", 
         "\[IndentingNewLine]", 
         RowBox[{"ImageSize", " ", "->", " ", 
          RowBox[{"{", 
           RowBox[{"800", ",", "600"}], "}"}]}], "  ", ",", 
         RowBox[{"Axes", "\[Rule]", "True"}], ",", 
         RowBox[{"AxesLabel", "\[Rule]", 
          RowBox[{"{", 
           RowBox[{"\"\<X\>\"", ",", "\"\<Y\>\""}], "}"}]}]}], "]"}]}], 
      "\[IndentingNewLine]", "          ", "}"}], ",", "Center"}], "]"}], 
   "\n", ",", 
   RowBox[{"{", " ", 
    RowBox[{
     RowBox[{"{", 
      RowBox[{"a", ",", "0"}], "}"}], 
     StyleBox[",",
      FontColor->GrayLevel[0]], 
     RowBox[{"-", "10"}], ",", "10", ",", "0.1"}], "}"}], ",", "    ", 
   RowBox[{"{", " ", 
    RowBox[{
     RowBox[{"{", 
      RowBox[{"b", ",", "1"}], "}"}], 
     StyleBox[",",
      FontColor->GrayLevel[0]], 
     RowBox[{"-", "10"}], ",", "10", ",", "0.1"}], "}"}], ",", 
   RowBox[{"{", " ", 
    RowBox[{
     RowBox[{"{", 
      RowBox[{"p", ",", "1"}], "}"}], 
     StyleBox[",",
      FontColor->GrayLevel[0]], "0", ",", "1", ",", "0.1"}], "}"}], ",", 
   "\[IndentingNewLine]", 
   RowBox[{"ControlPlacement", "\[Rule]", "Top"}], ",", 
   RowBox[{"SaveDefinitions", "\[Rule]", "True"}]}], "\[IndentingNewLine]", 
  "                      ", "]"}]], "Input",
 CellChangeTimes->{
  3.4103722785625*^9, {3.410374130704869*^9, 3.410374151267369*^9}, {
   3.4103742262829943`*^9, 3.410374264486119*^9}, {3.410374302267369*^9, 
   3.4103743238142443`*^9}, {3.410374416548619*^9, 3.4103744345954943`*^9}, 
   3.410374603329869*^9, {3.4103746802204943`*^9, 3.4103747485329943`*^9}, {
   3.4103748599392443`*^9, 3.410374862361119*^9}, {3.410374896236119*^9, 
   3.410374962923619*^9}, {3.410375019642369*^9, 3.4103750622204943`*^9}, {
   3.410375094579869*^9, 3.410375097142369*^9}, 3.4103751332829943`*^9, {
   3.4103751686267443`*^9, 3.410375181704869*^9}, {3.4103752201892443`*^9, 
   3.4103752246892443`*^9}, {3.410375321798619*^9, 3.410375323861119*^9}, {
   3.410375364423619*^9, 3.4103753672517443`*^9}, 3.4103773080017443`*^9, {
   3.410377522548619*^9, 3.410377526111119*^9}, {3.4103779443142443`*^9, 
   3.4103779503142443`*^9}, {3.410377997548619*^9, 3.4103780019392443`*^9}, {
   3.4103781461892443`*^9, 3.410378148454869*^9}, {3.410378241236119*^9, 
   3.4103782475642443`*^9}, 3.4103782848142443`*^9, {3.410378554017369*^9, 
   3.4103785796579943`*^9}, {3.410378621923619*^9, 3.410378651486119*^9}, {
   3.410382818017369*^9, 3.410382878454869*^9}, {3.4103829457829943`*^9, 
   3.410382947329869*^9}, {3.4103830236892443`*^9, 3.410383179642369*^9}, {
   3.4103834654704943`*^9, 3.4103834887829943`*^9}, {3.410386834798619*^9, 
   3.410386881142369*^9}, {3.410388378548619*^9, 3.410388414798619*^9}, {
   3.410388503454869*^9, 3.4103885039704943`*^9}, {3.410388592454869*^9, 
   3.410388639361119*^9}, {3.410388672986119*^9, 3.410388703298619*^9}, {
   3.410388787048619*^9, 3.4103888361892443`*^9}, {3.410388887986119*^9, 
   3.4103888885954943`*^9}, {3.4103898314079943`*^9, 3.410389875767369*^9}, {
   3.410389916486119*^9, 3.4103899225954943`*^9}, {3.4103900183454943`*^9, 
   3.4103900843142443`*^9}, {3.4103903664079943`*^9, 3.410390368798619*^9}, {
   3.410393230329869*^9, 3.4103932392829943`*^9}, {3.410393413642369*^9, 
   3.410393420767369*^9}, {3.4103948651267443`*^9, 3.410394873548619*^9}, {
   3.410395508361119*^9, 3.410395512392369*^9}, {3.410395968204869*^9, 
   3.410395972298619*^9}, {3.4103960159079943`*^9, 3.4103960194392443`*^9}, {
   3.4103970075642443`*^9, 3.410397221954869*^9}, {3.4103972842204943`*^9, 
   3.4103973489079943`*^9}, {3.4103974153767443`*^9, 
   3.4103974158454943`*^9}, {3.410398140111119*^9, 3.4103982288142443`*^9}, {
   3.410398279611119*^9, 3.410398331486119*^9}, {3.410398445236119*^9, 
   3.4103984495642443`*^9}, {3.410472607296875*^9, 3.410472660390625*^9}, {
   3.41047303290625*^9, 3.41047310328125*^9}, {3.41047496478125*^9, 
   3.41047500275*^9}, 3.410475154578125*^9, {3.410475248203125*^9, 
   3.41047535121875*^9}, {3.410475398484375*^9, 3.410475412640625*^9}, {
   3.410475453015625*^9, 3.410475456859375*^9}, {3.41047555621875*^9, 
   3.410475573609375*^9}, {3.410475618625*^9, 3.41047570028125*^9}, {
   3.410475769828125*^9, 3.4104757794375*^9}, {3.41047914384375*^9, 
   3.41047920940625*^9}, {3.410479933625*^9, 3.4104799484375*^9}, {
   3.41048009*^9, 3.41048009203125*^9}, {3.410480751828125*^9, 
   3.41048078021875*^9}, {3.410480962640625*^9, 3.4104809659375*^9}, {
   3.410481020625*^9, 3.4104810565625*^9}, {3.41048115759375*^9, 
   3.41048125878125*^9}, 3.41048151746875*^9, {3.41048168275*^9, 
   3.41048169021875*^9}, {3.41048200103125*^9, 3.410482005328125*^9}, {
   3.410482176734375*^9, 3.410482178859375*^9}, {3.410485651125*^9, 
   3.410485662671875*^9}, {3.410622698484375*^9, 3.41062275834375*^9}, {
   3.4106227990625*^9, 3.410622813125*^9}, {3.410623082484375*^9, 
   3.410623108375*^9}, {3.410623212265625*^9, 3.41062322996875*^9}, {
   3.4106232803125*^9, 3.410623290203125*^9}, {3.410623341515625*^9, 
   3.410623378296875*^9}, {3.410623462546875*^9, 3.41062347646875*^9}, {
   3.410623654140625*^9, 3.41062365809375*^9}, 3.410623757546875*^9, {
   3.4106237994375*^9, 3.410623813921875*^9}, {3.410623998265625*^9, 
   3.41062402975*^9}, {3.410624122203125*^9, 3.410624145625*^9}, {
   3.410624180515625*^9, 3.410624183578125*^9}, {3.410624219859375*^9, 
   3.41062424084375*^9}, {3.41062435278125*^9, 3.410624354390625*^9}, {
   3.4106244350625*^9, 3.410624441609375*^9}, {3.410624567765625*^9, 
   3.410624666671875*^9}, {3.4106249228125*^9, 3.410624940578125*^9}, {
   3.4106249775625*^9, 3.41062502090625*^9}, 3.410627022859375*^9, {
   3.41062706975*^9, 3.41062707209375*^9}, 3.41062710859375*^9, {
   3.410627144453125*^9, 3.41062717196875*^9}, {3.410627690328125*^9, 
   3.41062769534375*^9}, {3.41062778065625*^9, 3.410627810359375*^9}, {
   3.410629213359375*^9, 3.410629271703125*^9}, {3.41063172759375*^9, 
   3.410631750984375*^9}, {3.410631980265625*^9, 3.410632052484375*^9}, 
   3.41063208903125*^9, {3.4106321304375*^9, 3.410632191390625*^9}, {
   3.410632224296875*^9, 3.41063223378125*^9}, {3.410632301625*^9, 
   3.410632325375*^9}, {3.41063242490625*^9, 3.410632472125*^9}, {
   3.410632519734375*^9, 3.41063255984375*^9}, {3.410632599484375*^9, 
   3.410632603640625*^9}, {3.410634730859375*^9, 3.41063478196875*^9}, 
   3.410634815765625*^9, {3.410635205640625*^9, 3.41063523253125*^9}, {
   3.410635302625*^9, 3.410635315140625*^9}, {3.41063537671875*^9, 
   3.410635399734375*^9}, {3.41063543321875*^9, 3.410635449984375*^9}, {
   3.410635525875*^9, 3.410635548640625*^9}, {3.410635617265625*^9, 
   3.410635617625*^9}, {3.410635648296875*^9, 3.410635660390625*^9}, {
   3.41063579559375*^9, 3.410635804484375*^9}, {3.41063603965625*^9, 
   3.410636094296875*^9}, {3.41063657321875*^9, 3.410636606671875*^9}, {
   3.410636649921875*^9, 3.410636681546875*^9}, {3.410636729640625*^9, 
   3.410636788296875*^9}, {3.410638400703125*^9, 3.410638426671875*^9}, {
   3.410638504296875*^9, 3.410638509265625*^9}, 3.410643587328125*^9, {
   3.410643622796875*^9, 3.410643641390625*^9}, {3.410643784703125*^9, 
   3.4106437850625*^9}, {3.41064386140625*^9, 3.410643934703125*^9}, {
   3.41064396653125*^9, 3.4106439956875*^9}, {3.410644066703125*^9, 
   3.41064408065625*^9}, {3.41064411803125*^9, 3.410644228203125*^9}, {
   3.41064427415625*^9, 3.41064429265625*^9}, {3.410644516546875*^9, 
   3.410644520171875*^9}, {3.410644743359375*^9, 3.410644836140625*^9}, {
   3.410644921609375*^9, 3.41064501840625*^9}, {3.4106450669375*^9, 
   3.410645068828125*^9}, {3.41064510046875*^9, 3.410645144578125*^9}, {
   3.41064517978125*^9, 3.410645361984375*^9}, {3.41064539671875*^9, 
   3.41064539975*^9}, {3.410645496140625*^9, 3.410645680984375*^9}, {
   3.410645756796875*^9, 3.410645783125*^9}, {3.410645988015625*^9, 
   3.41064599621875*^9}, {3.41064615721875*^9, 3.41064615778125*^9}, {
   3.410646350640625*^9, 3.41064647453125*^9}, {3.410646511078125*^9, 
   3.4106465139375*^9}, {3.410646610828125*^9, 3.41064675590625*^9}, {
   3.410647076234375*^9, 3.410647162765625*^9}, {3.4106481970625*^9, 
   3.410648201890625*^9}, {3.410648232578125*^9, 3.41064826215625*^9}, {
   3.41064830140625*^9, 3.410648302828125*^9}, {3.41064868153125*^9, 
   3.41064875740625*^9}, {3.4106491453125*^9, 3.410649160078125*^9}, {
   3.410649313578125*^9, 3.41064935*^9}, {3.4106493996875*^9, 
   3.4106494809375*^9}, {3.41065054009375*^9, 3.41065056540625*^9}, {
   3.410650770328125*^9, 3.41065080003125*^9}, {3.410650879078125*^9, 
   3.410650891125*^9}, {3.41065094690625*^9, 3.410651032359375*^9}, {
   3.4106512083125*^9, 3.410651208546875*^9}, {3.410651309359375*^9, 
   3.410651311078125*^9}, {3.4106520551875*^9, 3.41065205546875*^9}, {
   3.410654115296875*^9, 3.410654115640625*^9}, {3.410654321546875*^9, 
   3.41065432234375*^9}, {3.410654405328125*^9, 3.410654434578125*^9}, {
   3.4106586635625*^9, 3.410658663984375*^9}, {3.4106589191875*^9, 
   3.410658919546875*^9}, {3.410660826453125*^9, 3.410660905671875*^9}, {
   3.410660943703125*^9, 3.410660948125*^9}, {3.410661258921875*^9, 
   3.410661266234375*^9}, {3.410661751921875*^9, 3.410661755859375*^9}, {
   3.4122999970625*^9, 3.412300023484375*^9}, {3.412381405296875*^9, 
   3.412381409828125*^9}, {3.412717486703125*^9, 3.412717564328125*^9}, {
   3.412717728703125*^9, 3.41271772896875*^9}, {3.412717781328125*^9, 
   3.412717989890625*^9}, {3.412718077828125*^9, 3.41271807934375*^9}, {
   3.41271812621875*^9, 3.412718154640625*^9}, {3.4127182519375*^9, 
   3.412718348578125*^9}, {3.412718423125*^9, 3.41271848128125*^9}, {
   3.412718525359375*^9, 3.4127185425*^9}, {3.41271857309375*^9, 
   3.412718784546875*^9}, {3.41271887196875*^9, 3.41271894753125*^9}, {
   3.412719036265625*^9, 3.412719162296875*^9}, 3.412719543375*^9, {
   3.412727528609375*^9, 3.412727566546875*^9}, 3.412727607703125*^9, {
   3.412727693109375*^9, 3.41272775590625*^9}, {3.413145329125*^9, 
   3.41314539884375*^9}, {3.413145452015625*^9, 3.41314549175*^9}, {
   3.413145536828125*^9, 3.41314554178125*^9}, {3.413145633265625*^9, 
   3.413145636859375*^9}, {3.41347011734375*^9, 3.413470139609375*^9}, {
   3.41511575946875*^9, 3.415115802015625*^9}, {3.415115834078125*^9, 
   3.415115835734375*^9}, {3.415115939015625*^9, 3.415115974765625*^9}, {
   3.415116051265625*^9, 3.415116053734375*^9}, {3.46021789815625*^9, 
   3.460217973171875*^9}, {3.460218269765625*^9, 3.46021837403125*^9}, {
   3.460218416015625*^9, 3.460218523734375*^9}, 3.46021855796875*^9, 
   3.460387190078125*^9, {3.4603872283125*^9, 3.46038737709375*^9}, {
   3.460387413140625*^9, 3.460387477109375*^9}, {3.4603875704375*^9, 
   3.460387594875*^9}, {3.46038769584375*^9, 3.460387699390625*^9}, {
   3.46038773259375*^9, 3.46038780890625*^9}, 3.460387854171875*^9, {
   3.46038789403125*^9, 3.460387957921875*^9}, {3.46038800384375*^9, 
   3.46038801621875*^9}, 3.46038807875*^9, {3.460388158265625*^9, 
   3.46038816896875*^9}, {3.460389182734375*^9, 3.460389201671875*^9}, {
   3.460389287453125*^9, 3.4603893329375*^9}, {3.460389479*^9, 
   3.460389533625*^9}, {3.460389914703125*^9, 3.460389932484375*^9}, {
   3.4603899810625*^9, 3.460390032125*^9}, {3.46039031590625*^9, 
   3.460390321109375*^9}, {3.4603906136875*^9, 3.46039068459375*^9}, {
   3.460390797140625*^9, 3.460390810203125*^9}, {3.46039085046875*^9, 
   3.460390881421875*^9}, 3.460391182546875*^9, 3.460391215640625*^9, {
   3.460391248921875*^9, 3.460391273171875*^9}, {3.4603913185*^9, 
   3.460391384703125*^9}, {3.46039142021875*^9, 3.4603915251875*^9}, {
   3.460391576015625*^9, 3.460391580390625*^9}, 3.460728175109375*^9, 
   3.46072856634375*^9, 3.460730514078125*^9, {3.460733293296875*^9, 
   3.460733293984375*^9}, {3.46082180059375*^9, 3.4608218028125*^9}, {
   3.460821853796875*^9, 3.46082201840625*^9}, {3.46082209371875*^9, 
   3.4608220951875*^9}, {3.460822144515625*^9, 3.460822149640625*^9}, {
   3.46082221115625*^9, 3.460822218359375*^9}, 3.46082226175*^9, {
   3.460822387484375*^9, 3.460822439015625*^9}, 3.460822472796875*^9, {
   3.460823043359375*^9, 3.460823048828125*^9}, {3.460823117375*^9, 
   3.460823366484375*^9}, {3.4609013102233105`*^9, 3.4609013144108644`*^9}, {
   3.461425175703125*^9, 3.461425415234375*^9}, {3.461425736359375*^9, 
   3.46142582096875*^9}, {3.4614259324375*^9, 3.46142606121875*^9}, {
   3.461426101515625*^9, 3.46142615990625*^9}, {3.46142620990625*^9, 
   3.461426223984375*^9}, {3.46142625659375*^9, 3.461426266*^9}, {
   3.46142636775*^9, 3.4614263884375*^9}, {3.461426442203125*^9, 
   3.461426482203125*^9}, {3.461426512859375*^9, 3.46142651625*^9}, {
   3.461426558265625*^9, 3.461426632234375*^9}, {3.461426752453125*^9, 
   3.46142675634375*^9}, {3.461426878109375*^9, 3.46142697575*^9}, {
   3.46142704165625*^9, 3.461427043765625*^9}, {3.4614270781875*^9, 
   3.461427202625*^9}, {3.461428229078125*^9, 3.46142833171875*^9}, {
   3.46159789859375*^9, 3.461597927546875*^9}, {3.461598001265625*^9, 
   3.46159801721875*^9}, {3.461598051765625*^9, 3.461598287703125*^9}, {
   3.4615984928125*^9, 3.4615984955625*^9}, {3.461598581671875*^9, 
   3.461598616125*^9}, {3.4615987495*^9, 3.461598752296875*^9}, {
   3.46159879284375*^9, 3.461598824078125*^9}, 3.4615988783125*^9, {
   3.461598928796875*^9, 3.461598971453125*^9}, {3.461599055796875*^9, 
   3.461599110171875*^9}, {3.461599148234375*^9, 3.461599165390625*^9}, {
   3.46159937840625*^9, 3.46159939134375*^9}, 3.46159943440625*^9, {
   3.4615995266875*^9, 3.46159953253125*^9}, {3.461599567625*^9, 
   3.461599615015625*^9}, {3.461599660609375*^9, 3.46159966665625*^9}, {
   3.461599792640625*^9, 3.461599839953125*^9}, {3.461599896921875*^9, 
   3.461599899625*^9}, {3.461600023046875*^9, 3.46160007321875*^9}, {
   3.4616001348125*^9, 3.461600170515625*^9}, {3.461600217*^9, 
   3.46160024665625*^9}, {3.461600395421875*^9, 3.461600433125*^9}, {
   3.461600471875*^9, 3.4616004828125*^9}, {3.461600815421875*^9, 
   3.46160082475*^9}, {3.461600903640625*^9, 3.461600905515625*^9}, {
   3.46160093609375*^9, 3.46160093934375*^9}, {3.461600980078125*^9, 
   3.461600983203125*^9}}]
},
WindowSize->{1272, 882},
WindowMargins->{{0, Automatic}, {Automatic, 0}},
Magnification->1.,
FrontEndVersion->"6.0 for Microsoft Windows (32-bit) (June 19, 2007)",
StyleDefinitions->"Default.nb"
]
(* End of Notebook Content *)

(* Internal cache information *)
(*CellTagsOutline
CellTagsIndex->{}
*)
(*CellTagsIndex
CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
Cell[568, 21, 20724, 395, 415, "Input"]
}
]
*)

(* End of internal cache information *)