(* Content-type: application/vnd.wolfram.mathematica *)

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

(* CreatedBy='Mathematica 9.0' *)

(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[       157,          7]
NotebookDataLength[     42090,       2044]
NotebookOptionsPosition[     41247,       2016]
NotebookOutlinePosition[     41732,       2034]
CellTagsIndexPosition[     41689,       2031]
WindowFrame->Normal*)

(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[
 RowBox[{
  RowBox[{"(*", " ", 
   RowBox[{"[", " ", 
    RowBox[{
     RowBox[{
      RowBox[{"HCN", " ", "computation"}], ";", " ", 
      RowBox[{"coordinates", " ", "and", " ", "radii", " ", "from", " ", 
       RowBox[{"HCN002", ".", "exe"}]}]}], ",", " ", 
     RowBox[{"05.02", ".2012"}]}], " "}], "*)"}], "\[IndentingNewLine]", 
  RowBox[{"(*", " ", 
   RowBox[{
   "pi", " ", "clouds", " ", "off", " ", "axis", " ", "and", " ", "towards", 
    " ", 
    RowBox[{"N", ".", " ", "pi"}], " ", "optimization", " ", "produces", " ", 
    RowBox[{"nonsense", "!"}]}], " ", "*)"}], "\[IndentingNewLine]", 
  "\[IndentingNewLine]", 
  RowBox[{
   RowBox[{"t", "=", 
    RowBox[{"{", 
     RowBox[{
      RowBox[{"{", 
       RowBox[{"0.00000", ",", "0.00000", ",", "0.00000", ",", "0.25170"}], 
       "}"}], ",", 
      RowBox[{"{", 
       RowBox[{"2.23448", ",", "0.00000", ",", "0.00000", ",", "0.21362"}], 
       "}"}], ",", 
      RowBox[{"{", 
       RowBox[{
        RowBox[{"-", "1.38171"}], ",", "0.00000", ",", "0.00000", ",", 
        "1.13001"}], "}"}], ",", 
      RowBox[{"{", 
       RowBox[{"1.13628", ",", "0.00000", ",", "0.00000", ",", "0.88458"}], 
       "}"}], ",", 
      RowBox[{"{", 
       RowBox[{"1.30628", ",", "2.15720", ",", "0.00000", ",", "1.98720"}], 
       "}"}], ",", 
      RowBox[{"{", 
       RowBox[{"1.30628", ",", "0.00000", ",", "2.15720", ",", "1.98720"}], 
       "}"}], ",", 
      RowBox[{"{", 
       RowBox[{"1.30628", ",", 
        RowBox[{"-", "2.15720"}], ",", "0.00000", ",", "1.98720"}], "}"}], 
      ",", 
      RowBox[{"{", 
       RowBox[{"1.30628", ",", "0.00000", ",", 
        RowBox[{"-", "2.15720"}], ",", "1.98720"}], "}"}], ",", 
      RowBox[{"{", 
       RowBox[{"3.39021", ",", "0.00000", ",", "0.00000", ",", "0.94211"}], 
       "}"}]}], "}"}]}], ";"}]}]], "Input"],

Cell[BoxData[{
 RowBox[{
  RowBox[{"x", "=", 
   RowBox[{"Table", "[", 
    RowBox[{
     RowBox[{"t", "[", 
      RowBox[{"[", 
       RowBox[{"i", ",", "1"}], "]"}], "]"}], ",", 
     RowBox[{"{", 
      RowBox[{"i", ",", "1", ",", "9"}], "}"}]}], "]"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"y", "=", 
   RowBox[{"Table", "[", 
    RowBox[{
     RowBox[{"t", "[", 
      RowBox[{"[", 
       RowBox[{"i", ",", "2"}], "]"}], "]"}], ",", 
     RowBox[{"{", 
      RowBox[{"i", ",", "1", ",", "9"}], "}"}]}], "]"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"z", "=", 
   RowBox[{"Table", "[", 
    RowBox[{
     RowBox[{"t", "[", 
      RowBox[{"[", 
       RowBox[{"i", ",", "3"}], "]"}], "]"}], ",", 
     RowBox[{"{", 
      RowBox[{"i", ",", "1", ",", "9"}], "}"}]}], "]"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"r", "=", 
   RowBox[{"Table", "[", 
    RowBox[{
     RowBox[{"t", "[", 
      RowBox[{"[", 
       RowBox[{"i", ",", "4"}], "]"}], "]"}], ",", 
     RowBox[{"{", 
      RowBox[{"i", ",", "1", ",", "9"}], "}"}]}], "]"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"sq", "=", "1.0"}], ";"}], " ", 
  RowBox[{"(*", 
   RowBox[{
    RowBox[{
     RowBox[{"Sqrt", "[", "2", "]"}], "/", "2"}], ";"}], "*)"}], 
  "\[IndentingNewLine]"}]}], "Input"],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"\[IndentingNewLine]", 
  RowBox[{"(*", " ", 
   RowBox[{"xy", " ", "plane"}], " ", "*)"}], "\[IndentingNewLine]", 
  RowBox[{
   RowBox[{
    RowBox[{"plot2", "=", 
     RowBox[{"Graphics", "[", 
      RowBox[{"{", 
       RowBox[{
        RowBox[{"Circle", "[", 
         RowBox[{
          RowBox[{"{", 
           RowBox[{
            RowBox[{"x", "[", 
             RowBox[{"[", "1", "]"}], "]"}], ",", 
            RowBox[{"y", "[", 
             RowBox[{"[", "1", "]"}], "]"}]}], "}"}], ",", 
          RowBox[{"r", "[", 
           RowBox[{"[", "1", "]"}], "]"}]}], "]"}], ",", 
        "\[IndentingNewLine]", 
        RowBox[{"Circle", "[", 
         RowBox[{
          RowBox[{"{", 
           RowBox[{
            RowBox[{"x", "[", 
             RowBox[{"[", "2", "]"}], "]"}], ",", 
            RowBox[{"y", "[", 
             RowBox[{"[", "2", "]"}], "]"}]}], "}"}], ",", 
          RowBox[{"r", "[", 
           RowBox[{"[", "2", "]"}], "]"}]}], "]"}], ",", 
        RowBox[{"Circle", "[", 
         RowBox[{
          RowBox[{"{", 
           RowBox[{
            RowBox[{"x", "[", 
             RowBox[{"[", "9", "]"}], "]"}], ",", 
            RowBox[{"y", "[", 
             RowBox[{"[", "9", "]"}], "]"}]}], "}"}], ",", 
          RowBox[{"r", "[", 
           RowBox[{"[", "9", "]"}], "]"}]}], "]"}], ",", 
        RowBox[{"Circle", "[", 
         RowBox[{
          RowBox[{"{", 
           RowBox[{
            RowBox[{"x", "[", 
             RowBox[{"[", "3", "]"}], "]"}], ",", 
            RowBox[{"y", "[", 
             RowBox[{"[", "3", "]"}], "]"}]}], "}"}], ",", 
          RowBox[{"r", "[", 
           RowBox[{"[", "3", "]"}], "]"}]}], "]"}], ",", 
        RowBox[{"Circle", "[", 
         RowBox[{
          RowBox[{"{", 
           RowBox[{
            RowBox[{"x", "[", 
             RowBox[{"[", "4", "]"}], "]"}], ",", 
            RowBox[{"y", "[", 
             RowBox[{"[", "4", "]"}], "]"}]}], "}"}], ",", 
          RowBox[{"r", "[", 
           RowBox[{"[", "4", "]"}], "]"}]}], "]"}], ",", 
        RowBox[{"Circle", "[", 
         RowBox[{
          RowBox[{"{", 
           RowBox[{
            RowBox[{"x", "[", 
             RowBox[{"[", "5", "]"}], "]"}], ",", 
            RowBox[{"y", "[", 
             RowBox[{"[", "5", "]"}], "]"}]}], "}"}], ",", 
          RowBox[{"r", "[", 
           RowBox[{"[", "5", "]"}], "]"}]}], "]"}], ",", 
        RowBox[{"Circle", "[", 
         RowBox[{
          RowBox[{"{", 
           RowBox[{
            RowBox[{"x", "[", 
             RowBox[{"[", "6", "]"}], "]"}], ",", 
            RowBox[{"y", "[", 
             RowBox[{"[", "6", "]"}], "]"}]}], "}"}], ",", 
          RowBox[{"r", "[", 
           RowBox[{"[", "6", "]"}], "]"}]}], "]"}], ",", 
        RowBox[{"Circle", "[", 
         RowBox[{
          RowBox[{"{", 
           RowBox[{
            RowBox[{"x", "[", 
             RowBox[{"[", "7", "]"}], "]"}], ",", 
            RowBox[{"y", "[", 
             RowBox[{"[", "7", "]"}], "]"}]}], "}"}], ",", 
          RowBox[{"r", "[", 
           RowBox[{"[", "7", "]"}], "]"}]}], "]"}], ",", 
        RowBox[{"Circle", "[", 
         RowBox[{
          RowBox[{"{", 
           RowBox[{
            RowBox[{"x", "[", 
             RowBox[{"[", "8", "]"}], "]"}], ",", 
            RowBox[{"y", "[", 
             RowBox[{"[", "8", "]"}], "]"}]}], "}"}], ",", 
          RowBox[{"r", "[", 
           RowBox[{"[", "8", "]"}], "]"}]}], "]"}], ",", 
        RowBox[{"Disk", "[", 
         RowBox[{
          RowBox[{"{", 
           RowBox[{
            RowBox[{"x", "[", 
             RowBox[{"[", "1", "]"}], "]"}], ",", 
            RowBox[{"y", "[", 
             RowBox[{"[", "1", "]"}], "]"}]}], "}"}], ",", "0.08"}], "]"}], 
        ",", " ", 
        RowBox[{"Disk", "[", 
         RowBox[{
          RowBox[{"{", 
           RowBox[{
            RowBox[{"x", "[", 
             RowBox[{"[", "2", "]"}], "]"}], ",", 
            RowBox[{"y", "[", 
             RowBox[{"[", "2", "]"}], "]"}]}], "}"}], ",", "0.08"}], "]"}], 
        ",", " ", 
        RowBox[{"Disk", "[", 
         RowBox[{
          RowBox[{"{", 
           RowBox[{
            RowBox[{"-", "1.975"}], ",", "0"}], "}"}], ",", "0.08"}], "]"}]}],
        "}"}], " ", "]"}]}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"Show", "[", 
     RowBox[{"plot2", ",", 
      RowBox[{"{", 
       RowBox[{
        RowBox[{"AspectRatio", " ", "\[Rule]", " ", "Automatic"}], ",", 
        RowBox[{"Axes", " ", "->", " ", "True"}], ",", 
        RowBox[{"GridLines", " ", "->", " ", "Automatic"}], ",", " ", 
        RowBox[{"PlotRange", " ", "\[Rule]", " ", 
         RowBox[{"{", 
          RowBox[{
           RowBox[{"{", 
            RowBox[{
             RowBox[{"-", "3"}], ",", "5"}], "}"}], ",", 
           RowBox[{"{", 
            RowBox[{
             RowBox[{"-", "4"}], ",", "4"}], "}"}]}], "}"}]}], ",", " ", 
        RowBox[{"Frame", " ", "->", " ", "True"}]}], "}"}]}], "]"}], 
    "\[IndentingNewLine]", "\[IndentingNewLine]"}], 
   RowBox[{"(*", " ", 
    RowBox[{"yz", " ", "plane"}], " ", "*)"}], "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"plot3", "=", 
     RowBox[{"Graphics", "[", 
      RowBox[{"{", 
       RowBox[{
        RowBox[{"Circle", "[", 
         RowBox[{
          RowBox[{"{", 
           RowBox[{
            RowBox[{"y", "[", 
             RowBox[{"[", "1", "]"}], "]"}], ",", 
            RowBox[{"z", "[", 
             RowBox[{"[", "1", "]"}], "]"}]}], "}"}], ",", 
          RowBox[{"r", "[", 
           RowBox[{"[", "1", "]"}], "]"}]}], "]"}], ",", 
        "\[IndentingNewLine]", 
        RowBox[{"Circle", "[", 
         RowBox[{
          RowBox[{"{", 
           RowBox[{
            RowBox[{"sq", "*", 
             RowBox[{"y", "[", 
              RowBox[{"[", "2", "]"}], "]"}]}], ",", 
            RowBox[{"z", "[", 
             RowBox[{"[", "2", "]"}], "]"}]}], "}"}], ",", 
          RowBox[{"r", "[", 
           RowBox[{"[", "2", "]"}], "]"}]}], "]"}], ",", 
        RowBox[{"Circle", "[", 
         RowBox[{
          RowBox[{"{", 
           RowBox[{
            RowBox[{"sq", "*", 
             RowBox[{"y", "[", 
              RowBox[{"[", "3", "]"}], "]"}]}], ",", 
            RowBox[{"z", "[", 
             RowBox[{"[", "3", "]"}], "]"}]}], "}"}], ",", 
          RowBox[{"r", "[", 
           RowBox[{"[", "3", "]"}], "]"}]}], "]"}], ",", 
        RowBox[{"Circle", "[", 
         RowBox[{
          RowBox[{"{", 
           RowBox[{
            RowBox[{"sq", "*", 
             RowBox[{"y", "[", 
              RowBox[{"[", "4", "]"}], "]"}]}], ",", 
            RowBox[{"z", "[", 
             RowBox[{"[", "4", "]"}], "]"}]}], "}"}], ",", 
          RowBox[{"r", "[", 
           RowBox[{"[", "4", "]"}], "]"}]}], "]"}], ",", 
        RowBox[{"Circle", "[", 
         RowBox[{
          RowBox[{"{", 
           RowBox[{
            RowBox[{"sq", "*", 
             RowBox[{"y", "[", 
              RowBox[{"[", "5", "]"}], "]"}]}], ",", 
            RowBox[{"z", "[", 
             RowBox[{"[", "5", "]"}], "]"}]}], "}"}], ",", 
          RowBox[{"r", "[", 
           RowBox[{"[", "5", "]"}], "]"}]}], "]"}], ",", 
        RowBox[{"Circle", "[", 
         RowBox[{
          RowBox[{"{", 
           RowBox[{
            RowBox[{"sq", "*", 
             RowBox[{"y", "[", 
              RowBox[{"[", "6", "]"}], "]"}]}], ",", 
            RowBox[{"z", "[", 
             RowBox[{"[", "6", "]"}], "]"}]}], "}"}], ",", 
          RowBox[{"r", "[", 
           RowBox[{"[", "6", "]"}], "]"}]}], "]"}], ",", 
        RowBox[{"Circle", "[", 
         RowBox[{
          RowBox[{"{", 
           RowBox[{
            RowBox[{"sq", "*", 
             RowBox[{"y", "[", 
              RowBox[{"[", "7", "]"}], "]"}]}], ",", 
            RowBox[{"z", "[", 
             RowBox[{"[", "7", "]"}], "]"}]}], "}"}], ",", 
          RowBox[{"r", "[", 
           RowBox[{"[", "7", "]"}], "]"}]}], "]"}], ",", 
        RowBox[{"Circle", "[", 
         RowBox[{
          RowBox[{"{", 
           RowBox[{
            RowBox[{"sq", "*", 
             RowBox[{"y", "[", 
              RowBox[{"[", "8", "]"}], "]"}]}], ",", 
            RowBox[{"z", "[", 
             RowBox[{"[", "8", "]"}], "]"}]}], "}"}], ",", 
          RowBox[{"r", "[", 
           RowBox[{"[", "8", "]"}], "]"}]}], "]"}], ",", 
        RowBox[{"Circle", "[", 
         RowBox[{
          RowBox[{"{", 
           RowBox[{
            RowBox[{"sq", "*", 
             RowBox[{"y", "[", 
              RowBox[{"[", "9", "]"}], "]"}]}], ",", 
            RowBox[{"z", "[", 
             RowBox[{"[", "9", "]"}], "]"}]}], "}"}], ",", 
          RowBox[{"r", "[", 
           RowBox[{"[", "9", "]"}], "]"}]}], "]"}], ",", 
        RowBox[{"Disk", "[", 
         RowBox[{
          RowBox[{"{", 
           RowBox[{
            RowBox[{"sq", "*", 
             RowBox[{"x", "[", 
              RowBox[{"[", "1", "]"}], "]"}]}], ",", 
            RowBox[{"z", "[", 
             RowBox[{"[", "1", "]"}], "]"}]}], "}"}], ",", "0.08"}], "]"}]}], 
       "}"}], "]"}]}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"Show", "[", 
     RowBox[{"plot3", ",", 
      RowBox[{"{", 
       RowBox[{
        RowBox[{"AspectRatio", " ", "\[Rule]", " ", "Automatic"}], ",", 
        RowBox[{"Axes", " ", "->", " ", "True"}], ",", 
        RowBox[{"GridLines", " ", "->", " ", "Automatic"}], ",", " ", 
        RowBox[{"PlotRange", " ", "\[Rule]", " ", 
         RowBox[{"{", 
          RowBox[{
           RowBox[{"{", 
            RowBox[{
             RowBox[{"-", "4"}], ",", "4"}], "}"}], ",", 
           RowBox[{"{", 
            RowBox[{
             RowBox[{"-", "4"}], ",", "4"}], "}"}]}], "}"}]}], ",", " ", 
        RowBox[{"Frame", " ", "->", " ", "True"}]}], "}"}]}], "]"}], 
    "\[IndentingNewLine]", "\[IndentingNewLine]"}]}]}]], "Input"],

Cell[BoxData[
 TagBox[
  RowBox[{"\[SkeletonIndicator]", "Graphics", "\[SkeletonIndicator]"}],
  False,
  Editable->False]], "Output"],

Cell[GraphicsData["PostScript", "\<\
%!
%%Creator: Mathematica
%%AspectRatio: 1 
MathPictureStart
/Mabs {
Mgmatrix idtransform
Mtmatrix dtransform
} bind def
/Mabsadd { Mabs
3 -1 roll add
3 1 roll add
exch } bind def
%% Graphics
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10  scalefont  setfont
% Scaling calculations
0.375 0.125 0.5 0.125 [
[.125 -0.0125 -6 -9 ]
[.125 -0.0125 6 0 ]
[.25 -0.0125 -6 -9 ]
[.25 -0.0125 6 0 ]
[.375 -0.0125 -3 -9 ]
[.375 -0.0125 3 0 ]
[.5 -0.0125 -3 -9 ]
[.5 -0.0125 3 0 ]
[.625 -0.0125 -3 -9 ]
[.625 -0.0125 3 0 ]
[.75 -0.0125 -3 -9 ]
[.75 -0.0125 3 0 ]
[.875 -0.0125 -3 -9 ]
[.875 -0.0125 3 0 ]
[1 -0.0125 -3 -9 ]
[1 -0.0125 3 0 ]
[ 0 0 -0.125 0 ]
[-0.0125 .125 -12 -4.5 ]
[-0.0125 .125 0 4.5 ]
[-0.0125 .25 -12 -4.5 ]
[-0.0125 .25 0 4.5 ]
[-0.0125 .375 -12 -4.5 ]
[-0.0125 .375 0 4.5 ]
[-0.0125 .5 -6 -4.5 ]
[-0.0125 .5 0 4.5 ]
[-0.0125 .625 -6 -4.5 ]
[-0.0125 .625 0 4.5 ]
[-0.0125 .75 -6 -4.5 ]
[-0.0125 .75 0 4.5 ]
[-0.0125 .875 -6 -4.5 ]
[-0.0125 .875 0 4.5 ]
[-0.0125 1 -6 -4.5 ]
[-0.0125 1 0 4.5 ]
[ 0 0 -0.125 0 ]
[ 0 1 .125 0 ]
[ 1 0 .125 0 ]
[ 0 0 0 0 ]
[ 1 1 0 0 ]
] MathScale
% Start of Graphics
1 setlinecap
1 setlinejoin
newpath
0 0 .5 r
.25 Mabswid
[ ] 0 setdash
.125 0 m
.125 1 L
s
.25 0 m
.25 1 L
s
.375 0 m
.375 1 L
s
.5 0 m
.5 1 L
s
.625 0 m
.625 1 L
s
.75 0 m
.75 1 L
s
.875 0 m
.875 1 L
s
0 .125 m
1 .125 L
s
0 .25 m
1 .25 L
s
0 .375 m
1 .375 L
s
0 .5 m
1 .5 L
s
0 .625 m
1 .625 L
s
0 .75 m
1 .75 L
s
0 .875 m
1 .875 L
s
0 g
.125 0 m
.125 .00625 L
s
[(-2)] .125 -0.0125 0 1 Mshowa
.25 0 m
.25 .00625 L
s
[(-1)] .25 -0.0125 0 1 Mshowa
.375 0 m
.375 .00625 L
s
[(0)] .375 -0.0125 0 1 Mshowa
.5 0 m
.5 .00625 L
s
[(1)] .5 -0.0125 0 1 Mshowa
.625 0 m
.625 .00625 L
s
[(2)] .625 -0.0125 0 1 Mshowa
.75 0 m
.75 .00625 L
s
[(3)] .75 -0.0125 0 1 Mshowa
.875 0 m
.875 .00625 L
s
[(4)] .875 -0.0125 0 1 Mshowa
1 0 m
1 .00625 L
s
[(5)] 1 -0.0125 0 1 Mshowa
.125 Mabswid
.025 0 m
.025 .00375 L
s
.05 0 m
.05 .00375 L
s
.075 0 m
.075 .00375 L
s
.1 0 m
.1 .00375 L
s
.15 0 m
.15 .00375 L
s
.175 0 m
.175 .00375 L
s
.2 0 m
.2 .00375 L
s
.225 0 m
.225 .00375 L
s
.275 0 m
.275 .00375 L
s
.3 0 m
.3 .00375 L
s
.325 0 m
.325 .00375 L
s
.35 0 m
.35 .00375 L
s
.4 0 m
.4 .00375 L
s
.425 0 m
.425 .00375 L
s
.45 0 m
.45 .00375 L
s
.475 0 m
.475 .00375 L
s
.525 0 m
.525 .00375 L
s
.55 0 m
.55 .00375 L
s
.575 0 m
.575 .00375 L
s
.6 0 m
.6 .00375 L
s
.65 0 m
.65 .00375 L
s
.675 0 m
.675 .00375 L
s
.7 0 m
.7 .00375 L
s
.725 0 m
.725 .00375 L
s
.775 0 m
.775 .00375 L
s
.8 0 m
.8 .00375 L
s
.825 0 m
.825 .00375 L
s
.85 0 m
.85 .00375 L
s
.9 0 m
.9 .00375 L
s
.925 0 m
.925 .00375 L
s
.95 0 m
.95 .00375 L
s
.975 0 m
.975 .00375 L
s
.25 Mabswid
0 0 m
1 0 L
s
0 .125 m
.00625 .125 L
s
[(-3)] -0.0125 .125 1 0 Mshowa
0 .25 m
.00625 .25 L
s
[(-2)] -0.0125 .25 1 0 Mshowa
0 .375 m
.00625 .375 L
s
[(-1)] -0.0125 .375 1 0 Mshowa
0 .5 m
.00625 .5 L
s
[(0)] -0.0125 .5 1 0 Mshowa
0 .625 m
.00625 .625 L
s
[(1)] -0.0125 .625 1 0 Mshowa
0 .75 m
.00625 .75 L
s
[(2)] -0.0125 .75 1 0 Mshowa
0 .875 m
.00625 .875 L
s
[(3)] -0.0125 .875 1 0 Mshowa
0 1 m
.00625 1 L
s
[(4)] -0.0125 1 1 0 Mshowa
.125 Mabswid
0 .025 m
.00375 .025 L
s
0 .05 m
.00375 .05 L
s
0 .075 m
.00375 .075 L
s
0 .1 m
.00375 .1 L
s
0 .15 m
.00375 .15 L
s
0 .175 m
.00375 .175 L
s
0 .2 m
.00375 .2 L
s
0 .225 m
.00375 .225 L
s
0 .275 m
.00375 .275 L
s
0 .3 m
.00375 .3 L
s
0 .325 m
.00375 .325 L
s
0 .35 m
.00375 .35 L
s
0 .4 m
.00375 .4 L
s
0 .425 m
.00375 .425 L
s
0 .45 m
.00375 .45 L
s
0 .475 m
.00375 .475 L
s
0 .525 m
.00375 .525 L
s
0 .55 m
.00375 .55 L
s
0 .575 m
.00375 .575 L
s
0 .6 m
.00375 .6 L
s
0 .65 m
.00375 .65 L
s
0 .675 m
.00375 .675 L
s
0 .7 m
.00375 .7 L
s
0 .725 m
.00375 .725 L
s
0 .775 m
.00375 .775 L
s
0 .8 m
.00375 .8 L
s
0 .825 m
.00375 .825 L
s
0 .85 m
.00375 .85 L
s
0 .9 m
.00375 .9 L
s
0 .925 m
.00375 .925 L
s
0 .95 m
.00375 .95 L
s
0 .975 m
.00375 .975 L
s
.25 Mabswid
0 0 m
0 1 L
s
0 .99375 m
0 1 L
s
.125 .99375 m
.125 1 L
s
.25 .99375 m
.25 1 L
s
.375 .99375 m
.375 1 L
s
.5 .99375 m
.5 1 L
s
.625 .99375 m
.625 1 L
s
.75 .99375 m
.75 1 L
s
.875 .99375 m
.875 1 L
s
.125 Mabswid
.025 .99625 m
.025 1 L
s
.05 .99625 m
.05 1 L
s
.075 .99625 m
.075 1 L
s
.1 .99625 m
.1 1 L
s
.15 .99625 m
.15 1 L
s
.175 .99625 m
.175 1 L
s
.2 .99625 m
.2 1 L
s
.225 .99625 m
.225 1 L
s
.275 .99625 m
.275 1 L
s
.3 .99625 m
.3 1 L
s
.325 .99625 m
.325 1 L
s
.35 .99625 m
.35 1 L
s
.4 .99625 m
.4 1 L
s
.425 .99625 m
.425 1 L
s
.45 .99625 m
.45 1 L
s
.475 .99625 m
.475 1 L
s
.525 .99625 m
.525 1 L
s
.55 .99625 m
.55 1 L
s
.575 .99625 m
.575 1 L
s
.6 .99625 m
.6 1 L
s
.65 .99625 m
.65 1 L
s
.675 .99625 m
.675 1 L
s
.7 .99625 m
.7 1 L
s
.725 .99625 m
.725 1 L
s
.775 .99625 m
.775 1 L
s
.8 .99625 m
.8 1 L
s
.825 .99625 m
.825 1 L
s
.85 .99625 m
.85 1 L
s
.9 .99625 m
.9 1 L
s
.925 .99625 m
.925 1 L
s
.95 .99625 m
.95 1 L
s
.975 .99625 m
.975 1 L
s
.25 Mabswid
0 1 m
1 1 L
s
.99375 0 m
1 0 L
s
.99375 .125 m
1 .125 L
s
.99375 .25 m
1 .25 L
s
.99375 .375 m
1 .375 L
s
.99375 .5 m
1 .5 L
s
.99375 .625 m
1 .625 L
s
.99375 .75 m
1 .75 L
s
.99375 .875 m
1 .875 L
s
.125 Mabswid
.99625 .025 m
1 .025 L
s
.99625 .05 m
1 .05 L
s
.99625 .075 m
1 .075 L
s
.99625 .1 m
1 .1 L
s
.99625 .15 m
1 .15 L
s
.99625 .175 m
1 .175 L
s
.99625 .2 m
1 .2 L
s
.99625 .225 m
1 .225 L
s
.99625 .275 m
1 .275 L
s
.99625 .3 m
1 .3 L
s
.99625 .325 m
1 .325 L
s
.99625 .35 m
1 .35 L
s
.99625 .4 m
1 .4 L
s
.99625 .425 m
1 .425 L
s
.99625 .45 m
1 .45 L
s
.99625 .475 m
1 .475 L
s
.99625 .525 m
1 .525 L
s
.99625 .55 m
1 .55 L
s
.99625 .575 m
1 .575 L
s
.99625 .6 m
1 .6 L
s
.99625 .65 m
1 .65 L
s
.99625 .675 m
1 .675 L
s
.99625 .7 m
1 .7 L
s
.99625 .725 m
1 .725 L
s
.99625 .775 m
1 .775 L
s
.99625 .8 m
1 .8 L
s
.99625 .825 m
1 .825 L
s
.99625 .85 m
1 .85 L
s
.99625 .9 m
1 .9 L
s
.99625 .925 m
1 .925 L
s
.99625 .95 m
1 .95 L
s
.99625 .975 m
1 .975 L
s
.25 Mabswid
1 0 m
1 1 L
s
0 .5 m
1 .5 L
s
.375 0 m
.375 1 L
s
0 0 m
1 0 L
1 1 L
0 1 L
closepath
clip
newpath
.5 Mabswid
newpath
.375 .5 .03146 0 365.73 arc
s
newpath
.65431 .5 .0267 0 365.73 arc
s
newpath
.79878 .5 .11776 0 365.73 arc
s
newpath
.20229 .5 .14125 0 365.73 arc
s
newpath
.51704 .5 .11057 0 365.73 arc
s
newpath
.53829 .76965 .2484 0 365.73 arc
s
newpath
.53829 .5 .2484 0 365.73 arc
s
newpath
.53829 .23035 .2484 0 365.73 arc
s
newpath
.53829 .5 .2484 0 365.73 arc
s
.375 .5 m
.375 .5 .01 0 365.73 arc
F
.65431 .5 m
.65431 .5 .01 0 365.73 arc
F
.12812 .5 m
.12812 .5 .01 0 365.73 arc
F
% End of Graphics
MathPictureEnd
\
\>"], "Graphics",
 ImageSize->{369, 369},
 ImageMargins->{{43, 0}, {0, 0}},
 ImageRegion->{{0, 1}, {0, 
  1}},ImageCache->GraphicsData["CompressedBitmap", "\<\
eJztXc1vJEcVb3vGXnuzG2/Wm+x6v8abeG1vEpBAgBAfx4AvORD+gGgTISWR
ELDMEcmXReJDAsGFiw85IE4cEBIITnPkz9g/ZXBVd9fr7vnVm1dT1dXV425l
x53qrur+/ep1fbx69d6Hz6ef/eSnz6eff/r88Icvnv/8s88//eXhD3724jJp
tJFlG79Q/w4zdT7PsvJnfvnf/IX6USl0/l39Zzubz6ZZ/Zhms/n8uLw8n2X1
G86yi1fzI315nL26OKMLF6+W5DqWPLNeaDadPVtI1oWd4FfYzOF9T/8ZZflF
XXz2bpGmHn95p/6/p/p3K7uYXugz9e/iLL//BNx/Cso9KWG9usjOzspyFAP6
RZ+BYo5hFvVonWUjB/H9Ss6ci3mGSjuq0l4pbTatMFXP8gwUXWIra0elnVSL
XqxRTemGetBG5b2/2ShcHZv6d1sXWr5fSdRsNn9izbJVz1JgeOoO2VR//sRa
dVaLKQVLvYl+dF7GaSW5Ip2bjc9pQQa0jJTvo0WreKfjUvTyOq/eXlyr33/K
P6LGSLZQZInKXL6ooBqVvBk6zCe08IGdZvWaIijj/NUMNbVaKG9d/Jp1+gku
wYhpkUw82Crif+rPdZX0ZZ4wU392VMJ1dbarzv6SX/qP+nNNJTxQZ9vq7E/5
pX+rP1oAT83ZH/NL/1R/xirhfXP2+/zSP8y93zBnv80v/d3c+21z9uv80i31
R7fWH6ufUSX18n/UUUr3NkjbEt4XOm9/32VcSyvraZQcP/g9N69kna2WtmH/
lE5B2jNh2i1TGW8Jc4xMjnc8niuCcw6KQGmU93XzcveEpWyZHE88ntsSnBvm
5e4LS7lmckzSg3PdvNxDYSm7Jsej9ODsmJd7LCzlNZPjQXpwroE0KbCbBthB
IGC6MD4jX5j7h70HSnlLmFcP+nRWZszjUztjkCYFht7lzfQEEA1b3haW9wbI
eycFiHjk81RYxm2TI0Ewl8eJMPsdg+N2Cjgorzqked8Ez72VABynphIN8/a6
BUHT0neFOe6aHB2/+kkjrwuIA/DcG4HgOIlEqfJofNtSHPfBu7zmwl+obrNU
gFbzulbKA/D8693K2BHIi2bO0vIeGgHpGBiaP6IxgLS8RyDvTrcQ3wZ50UhO
Wt5jkPeaMG9LEJ+AvEj5MUA0aROQd1uYtyWI+pV0o7DjUcqhKaVjOEiIfIAh
CRgL8wbtq0MDQw3USJg3aOeNGu9dj/JQ57IpzNuSUIaGmA8M0HjnPHsvHqwH
RohveJTytPimqnkvr0fEgcaxA6LFiQLljSxoaMJ0c4BTplXnomU6P+0J0B/d
A4W9HgFE0L4nNAh+Qa51wboL8iLdtjucc5N/TeDol1sq7kHhvGm+sdv9BXEH
5PWHM66lZcs0sz1AtFVLKyuK15ovwLpWkNMwJvSZgSaMNp85Wk0QfbQn7aCu
pyHN3BFb3gID5XyuaryoK1vf/YUuhnpI9W8fpL0EaR+qXz0iLXrNTG7ZOD27
8JG4fZAXpXXMvZE+bHroI31I0pBEdsxA2do0zBd96j4GcqQ4foctL2j3gdaf
0XrhAJG9D31fvAlAUIgoL1owHSCy96G2grdVCQoRTQ7QJCIFiE6T7RjAkO3p
Ibgv6AQ8JWA9FsqOISKVCVKtDBDZ+5Ad5mSAOEAcINbSkK4c6dRTgOjUzccA
htaMkbF30G4+JWA9FsqOIaIVRLTSOEBk70Mr//wmlwHiALHHEJ36wJSABe0D
XwN5kdFxCjWWMMTroDx+U+EAcYA4QBwgDhDbhejUzacErHfd/CCUA8QB4gCx
PxCNdQ32mudjXdMTBkqFctXpHlrTWjPYpT6v6qOPTNo+0cWMClHITdUegLSv
qV/tEO1H4OoH6ndF47aZn4HTKrVQHtpVG/lzQw4F2v4asRe+GF+jNnwht3W6
9tAe+Fa/xgUPfjFE4VD9WrdKPjJs7ICrCep8pPq6hyywJ+Yq2lzZY9j3TW0j
6X5qrqIdij2G/Zapz9dBKSfmKnpGTyBKPNvQvobiQCbxSavZJX6I6rs35oyn
o04U71KoyCMiXzLyiEhXe7IgHdpzYk9gh/aw2BPYoT0x9gT2jgERxmNjT4y8
2vPs2BMC2vMF2RMCYniP7MRWTkpADN+SiZnOt+l5Mllj+pY8VCaLl9LUIS1P
6skyVditeLzsGKy1mQ3oGbPjjVkob3MfqAtYqQfNBGHnW59b97nZ8WZD1HO+
UVRJNc214qVeOkPBd2pvEGhEYns+PKUbhYMORNAmbzQ6i+Hhs+Od0ogKNEWN
4Qk0gEcAHyqQiwe0RBLDY2jHVCCPB2gNK4Zn0QSpIN0MUiZJSz40pWwXZFav
6hfPnF3ShIaKZso+oO3eSa8EfLsP0y4dSqE5Fvq00WKI9Bl2J6dBkHtPs1AH
54P3qJCfat4c37kRbpQv6ECH0674+wvdruWtAOPrIajoWlQpPi4RkW9+dV0d
qzipFLyGngArz1hwMNBUEvoCXHQmmrXlTJRU8vtGrpG9xD1zn4+7xGNTiuDm
AOh0T6AFRb//GDw5Qc+pdb9h1cPJa922IfuJqdq0qrFqyVeGo5WOWMfmHdBk
DEYhTOCztCLWd39FFVOo6Mqz3B3flpEn+pddyqk6G9Wu/Yq5/8fqbKlVI44s
LDUs1WWgQSFVGKe18fn0Vu3RmfoiE1sKOCxhwvYolJfMBpDso1ldAoRUYxcv
I6RMt1pACCCjZ0Qa7epH76mzfbZwUS91YiobtRw0b0UcxJvrbNfuK0VlXvSg
e/UzP0LIXtE0SvZOk0xNEG4ffvRHgtS59vkwtlGjRZOboDRHclyjMqApA2pU
pOzpHk8/Xl/V8wlk5GMniSSpPIrzA8MTH99LxJNPgA7U4yCdL8keYupt802g
5+pnjAzsxtWJKXnb3Ife4MA8g49hJKLMJ1gLGkQhLaBUOdtUtNWfRuqDu+Aq
UtjSUKPRpiBWH5mbt0DxIrUGH5mL53KvuLuaN8PDczTwf2xeAq1dkOEFMrJB
1G2aHEgYUCVP2BwibQkVIQ3O1SxFHVQfiCjpcg/ZbqDeHpWCSEFUIOGbFN9E
Na0U2PfA/cwH7RPrzGeZkUL2oIYcafKQdchD4dPQZ4WIPYSf1XlsTitGQHi+
Q+yh4QINJhBnaOUacYbaNfSJUDPs17X4xE68Beut0pCZFj2/zqtvqFwabqDd
I3SV7O/RG1ttABp2NSKakMjvgofaacIi1VwxVgfpfaSChD5mZAyJBA5Rt8xu
pkx3lDWfGKuoj0Vw6EtGTnatrZm1TbzHVB66X2JypI6OqUPNMFGHlrDeACXz
QQkbHUtj2MHjsNvkMQtcIiZ9ohY7Mdn4qpFBBLI4nYD7UDeG6ogf10vYXbZu
zAys+aBz7sSi9tvS46AhERoRHoL70CymHW6XD89197RsAI4adl59QWloMohe
eM8Iw2Krh+oKmYrzwXPpvn0jQajGkQRJKeatwUStRWiykTrCOkO3riyjCaKU
bmrlUVeFsEn3d/SYblJCID012v8jVSPsmZKR1KLxrZRu3sZVRDcaIqFXktKN
VJVIZYeoQNKIdEh88Hj+/dAzkFr8ClQBgog+YLQpOKUq4MfboiqQ7hORKqRR
E4LuQ1WFRgWoCo7YvHQfrVciQtF0SEo83wl3Qjxah0Pd564hJasrKNBWcGTA
lOc5r7CL6hLNmKT7pVdhF9pR2Ko5NKf8fmmORFqrQc/yIRGJstZ3jSpVz+9y
DUMiWluxp9H0pjjQOtRx49aCTVqURpUUmswJSGO+d2QTjF4J0YrgWOVwCa3F
P+sylYVbstFCHZsPt/x9PeAWjAWsK1lNZYK6RuNvNLtEahLUybo7qEiaWqtp
jXXFC1FLM0mkJfGhlr+vE2qlPRhK05JitZTR1OoODG3yQpVxBWi0jnSti2Q1
a9RSROsMhmGVdxIoYlWqsfVhVQudNtVBDRUZb6G1JmTGkq0roaiBtKrjK6Tg
Xh8Nr/dNTqQ2e2yuVvOmRHbDZ0d7FPNL/bw6wTq/zecG9Rc6MBeqfJR36Fq6
ZqtNpJGWOg5F9+mp4Sh/x8gCjtXwaDw+Zu6fqLObBsANdWY1G7FqDFCd+lAt
9ZoavVVZWGNC7fMWvnViI0TnfshUEs2FEyRaOvBZtW1RB2ogHVh+hm+9iZOR
Xv8K8NlsLh3JJIeRaO7cd/6siig31ur3UckJUqbTrN540UNRyVumFNKuWumh
MVjDQprKQ5qDlohycAZu5U8352ivghN/uhRS4fHiRWZYlBeNhKIzuZVdTC/M
Jb0ba45HiFY69YwIbUxzotM6r+LdKxOxY1NKx8TWdpmeEbmzKe0y1U3Nx+pn
JM/UQYXwfnSTrgYj32eawawSNMFNvjttLsYmbyINr45DkeXHFAfkCN3XI06t
G60EnRnSrUZksvvh0UCUkKi1HUf2YOqS5jwwhlrUqtBxmFxr8nUUpgOQqS7z
WL2xlkQHVM9VOmp1WCNEUXakJkKDJKR3ja1O6oWC2moDp6uNglVV36Wmkd5R
/4+GMGukkQaUVQy45UsudwydyHSWYmFVP6aUllwCki1dMNw2MoaGq7cMZXyU
raqUJ0xoSuvapPa0RvLKMyS/rp2SPcuuEUk+UFhoGhM0uvChkWZfqL3J9TZV
s8JzcD/fZl0BYlEaGaah7hvZW1FvyE+c3KkNYMrmY9gamlpaaEbTAosNJgX0
QSOR2DaYrVhcuxkLNznNcBw3C53UbqA3WQvba6kBOx8QjjNgpwUvVCUd21x3
tceC7B3QfgDp9hWiFjWSsTdYtEyt074hq5GIz24h2sRhnVw4SWhQutd5pxwZ
zaKndbw/LjTx0k251NejHD57Q6XuBjreG9rpbmjB1+KzLxrhRc/teId0PGcL
yxsY1PV6ewIQVAHCG9EFgzTYl9SviH0HMlZcomr08XdB7rHQm8T2d7FurlvI
JSB6iU4ctgweh8J7HGpcWgP3WAJi4zrK8uGUc3lH/n7CeGgjv4uo1tDGqZZ8
tPXPR+AB81RU1S35BWzLB+ViMmqK0fBG2iHeZwhEVb8sLuWKBEZyfSogBMUs
acolHmah97VGL2845ReRhLo5NIKwSpl1vQS11fdNDkQTOURE/Qa1d6hFc/Kq
yzvrF/GGRl689+1m37rwGUotWfhop9Ju2OoHujFM5OmcWL+O5d6fk3A8Lmgf
qGtGExxUCq12IX0i+jDICToCL3JBnpI7fC0W1l3DtIEb6UoQoaT0EnBJ3wff
kIm+89BxGZAgSsOevmOASf2KIe0r3+JL229+JCKi9oj9Sqy2V1bdJx8yVa9V
3VEpaOmFuoWqzJSHdX+2tRV2pGIxLheOjiKNqRMvpGpzaJIVE0F9xmtLRMxI
g9GhZaLQEXYQMw7RVskJw01zxq/hihg6NYKIeKG1bGlkHcRkCzGp9Ivpnfeo
V2U4CBBbUB3o9VEzKG3EfWhrIcqZW2BCUXxcVxVxOtFf+ZiF76tiNutnt3XR
40Kwzot/l32sOhnVkp3CFfrEi6RRJYpNrvM3B//5O69eDQHiRa4af7BeR019
ijrSigS6SljBMo2cbJFzF6Rb6DiqqzRm7Q0Dgiyv1ycir55M31J3oTFwjwMp
o8ffLb7Dat7yNXyksYMA2DHhtdChhwlBL11B71UIeqTy6nBkyxcZVH6RUXi8
Gc6yRcq1gG+f+iYJXzrnDT3zRyoSNExtiQq0qs+HO5WWPAGlJA1bqqOVPkOq
Ju+YCrQEJZ27XwEqaKOeDwHSNWne5kpOgNN4xycEqJQAqTWDlICg4yBEQJ6G
R7j8QJvSpDYvy9bxWxZ76+ZjFNRCKlQUVxNZRCSIuDkocKloqV2vxFSoRdhI
W0C2A1cALBl3Oc0FrZZRUmPP2BAbYuwzH+wV7AWTBn5S0Tvk9qVq3FEdC8ul
1h4ZS4cC7fTh8avyjUGJVbnPm6ih7Q7S3SBBByBSsLR/nO8sG9+K1ceXFGx0
ca6nIQHkX5N/Ro+pQK+JNqT2mAo0+US7dlZxxVqm8duze0LArgEhhU2aHeQW
SrrZuWPYfGw4VDIZOLm7akgGNm3qRQHcrFYZOgfqrUPBdurVkWkDso7nuy1U
Mt81SsEG7dWlYPkBCSqZH/Sg5Rq+hQgq0FLY/KATw87wmLYniMnAD21nODVX
0XN7ApFX+1jjdaFH9gQxOXFE+kyKqoVMjxOsaKkrzokBxse3Qmr+lmAbA8dZ
3bwxy32q++jvpaxoVTUffArtnEOvIXXmKTIhMySITat8WNDlade+O+YMaVNa
gl21FdTAZ1WLuE90MaNCMnKTwwcg7evqV7vG/Ahc/UD9Vg0US/lV1rWzWf4+
MSROWl5LXJtvTjndN1EhTByDK8CAQ7yXNUMeo5sZIA4QB4gDxJW0DSkBC6pZ
SAnYIJQDxAHiAHGAOEAMprxqZVEhBrBOFhBSqLEB4gBxgOgHsScr0QPEKBCd
+sCUgAXtA2MA64nt1wBxgLj2EJO1LR8gDhDbgOjUzacELGg3HwNYxxuSpEF/
BojsfR1vHeQjzg8QhRBDbXRe8ZXQTm/kFaJjiMi2JJvOfGxLYiAPsI3fblck
dlZoe2M++GsyDJSz7dKYsW7F9oUuZlSIRG6Ttg/SXoK0D9WvzXZtWpDtwzAf
lT0ZhusOMbVcZYFs19phIIjjnLJN0V+WaVLmPm1KO2i79A/FO4PvIyI+rqz/
N6kOfhYTFA6aG/g4Q1xjOGX+VeA4TU6RKsjHheMpyIvuCzoRDQ0iovtQ9Hjr
TsIBjvon9R/fEhw+MFDv4PCBotzLy52dLoQZ7zGifIS6LOxL67CQNy5/b6ad
w0Je1pDZgLQ8nxgmQXtWPvSfOzCfkDdBe9vQwKReNyMO7SYgbwzHohEhHhqB
bs9haEQ4fOjdMELeMUQ+ethaQKSgTzEcd0YEdgTyxnDNGREi8nKvC83CO99s
vfMGTg8kE3JK430qtN5HN4Mnu1SCT8D7lmTr1LDZYxDPnKWQd2QZ+9Ub4uSj
lk0CTuuOJ6MjatOhZIfSpv6FdhnZMZzQTiFb7xBRYTFcPLbeUyJgMRw2diyA
aMIexhFjx8B2zcuFcbDYMZzQjhM7hhPaIaIjnFzqq7Y5AsuUjC0ZpaG2ms+B
+gP35xYoy4lgNe4igojab6QzQfeFzrsu72JVXqREDg2msvrsFnV861xb0jSH
aLyazI8r1Ja2O8omTNmDFV/llypZT0G+Y85e1nMYG6cLneOvpta+Zc5+k+co
e/PSPkh99X8zxX7VnP0uv/1fJuHYnP0hv/Rf9UfPIx6asz8XMrLxf1nwE3Y=
\
\>"],ImageRangeCache->{{{0, 368}, {368, 0}} -> {-3.3754, -4.32377, 0.0229464, \
0.0229464}}],

Cell[BoxData[
 TagBox[
  RowBox[{"\[SkeletonIndicator]", "Graphics", "\[SkeletonIndicator]"}],
  False,
  Editable->False]], "Output"],

Cell[BoxData[
 TagBox[
  RowBox[{"\[SkeletonIndicator]", "Graphics", "\[SkeletonIndicator]"}],
  False,
  Editable->False]], "Output"],

Cell[GraphicsData["PostScript", "\<\
%!
%%Creator: Mathematica
%%AspectRatio: 1 
MathPictureStart
/Mabs {
Mgmatrix idtransform
Mtmatrix dtransform
} bind def
/Mabsadd { Mabs
3 -1 roll add
3 1 roll add
exch } bind def
%% Graphics
%%IncludeResource: font Courier
%%IncludeFont: Courier
/Courier findfont 10  scalefont  setfont
% Scaling calculations
0.5 0.125 0.5 0.125 [
[.125 -0.0125 -6 -9 ]
[.125 -0.0125 6 0 ]
[.25 -0.0125 -6 -9 ]
[.25 -0.0125 6 0 ]
[.375 -0.0125 -6 -9 ]
[.375 -0.0125 6 0 ]
[.5 -0.0125 -3 -9 ]
[.5 -0.0125 3 0 ]
[.625 -0.0125 -3 -9 ]
[.625 -0.0125 3 0 ]
[.75 -0.0125 -3 -9 ]
[.75 -0.0125 3 0 ]
[.875 -0.0125 -3 -9 ]
[.875 -0.0125 3 0 ]
[1 -0.0125 -3 -9 ]
[1 -0.0125 3 0 ]
[ 0 0 -0.125 0 ]
[-0.0125 .125 -12 -4.5 ]
[-0.0125 .125 0 4.5 ]
[-0.0125 .25 -12 -4.5 ]
[-0.0125 .25 0 4.5 ]
[-0.0125 .375 -12 -4.5 ]
[-0.0125 .375 0 4.5 ]
[-0.0125 .5 -6 -4.5 ]
[-0.0125 .5 0 4.5 ]
[-0.0125 .625 -6 -4.5 ]
[-0.0125 .625 0 4.5 ]
[-0.0125 .75 -6 -4.5 ]
[-0.0125 .75 0 4.5 ]
[-0.0125 .875 -6 -4.5 ]
[-0.0125 .875 0 4.5 ]
[-0.0125 1 -6 -4.5 ]
[-0.0125 1 0 4.5 ]
[ 0 0 -0.125 0 ]
[ 0 1 .125 0 ]
[ 1 0 .125 0 ]
[ 0 0 0 0 ]
[ 1 1 0 0 ]
] MathScale
% Start of Graphics
1 setlinecap
1 setlinejoin
newpath
0 0 .5 r
.25 Mabswid
[ ] 0 setdash
.125 0 m
.125 1 L
s
.25 0 m
.25 1 L
s
.375 0 m
.375 1 L
s
.5 0 m
.5 1 L
s
.625 0 m
.625 1 L
s
.75 0 m
.75 1 L
s
.875 0 m
.875 1 L
s
0 .125 m
1 .125 L
s
0 .25 m
1 .25 L
s
0 .375 m
1 .375 L
s
0 .5 m
1 .5 L
s
0 .625 m
1 .625 L
s
0 .75 m
1 .75 L
s
0 .875 m
1 .875 L
s
0 g
.125 0 m
.125 .00625 L
s
[(-3)] .125 -0.0125 0 1 Mshowa
.25 0 m
.25 .00625 L
s
[(-2)] .25 -0.0125 0 1 Mshowa
.375 0 m
.375 .00625 L
s
[(-1)] .375 -0.0125 0 1 Mshowa
.5 0 m
.5 .00625 L
s
[(0)] .5 -0.0125 0 1 Mshowa
.625 0 m
.625 .00625 L
s
[(1)] .625 -0.0125 0 1 Mshowa
.75 0 m
.75 .00625 L
s
[(2)] .75 -0.0125 0 1 Mshowa
.875 0 m
.875 .00625 L
s
[(3)] .875 -0.0125 0 1 Mshowa
1 0 m
1 .00625 L
s
[(4)] 1 -0.0125 0 1 Mshowa
.125 Mabswid
.025 0 m
.025 .00375 L
s
.05 0 m
.05 .00375 L
s
.075 0 m
.075 .00375 L
s
.1 0 m
.1 .00375 L
s
.15 0 m
.15 .00375 L
s
.175 0 m
.175 .00375 L
s
.2 0 m
.2 .00375 L
s
.225 0 m
.225 .00375 L
s
.275 0 m
.275 .00375 L
s
.3 0 m
.3 .00375 L
s
.325 0 m
.325 .00375 L
s
.35 0 m
.35 .00375 L
s
.4 0 m
.4 .00375 L
s
.425 0 m
.425 .00375 L
s
.45 0 m
.45 .00375 L
s
.475 0 m
.475 .00375 L
s
.525 0 m
.525 .00375 L
s
.55 0 m
.55 .00375 L
s
.575 0 m
.575 .00375 L
s
.6 0 m
.6 .00375 L
s
.65 0 m
.65 .00375 L
s
.675 0 m
.675 .00375 L
s
.7 0 m
.7 .00375 L
s
.725 0 m
.725 .00375 L
s
.775 0 m
.775 .00375 L
s
.8 0 m
.8 .00375 L
s
.825 0 m
.825 .00375 L
s
.85 0 m
.85 .00375 L
s
.9 0 m
.9 .00375 L
s
.925 0 m
.925 .00375 L
s
.95 0 m
.95 .00375 L
s
.975 0 m
.975 .00375 L
s
.25 Mabswid
0 0 m
1 0 L
s
0 .125 m
.00625 .125 L
s
[(-3)] -0.0125 .125 1 0 Mshowa
0 .25 m
.00625 .25 L
s
[(-2)] -0.0125 .25 1 0 Mshowa
0 .375 m
.00625 .375 L
s
[(-1)] -0.0125 .375 1 0 Mshowa
0 .5 m
.00625 .5 L
s
[(0)] -0.0125 .5 1 0 Mshowa
0 .625 m
.00625 .625 L
s
[(1)] -0.0125 .625 1 0 Mshowa
0 .75 m
.00625 .75 L
s
[(2)] -0.0125 .75 1 0 Mshowa
0 .875 m
.00625 .875 L
s
[(3)] -0.0125 .875 1 0 Mshowa
0 1 m
.00625 1 L
s
[(4)] -0.0125 1 1 0 Mshowa
.125 Mabswid
0 .025 m
.00375 .025 L
s
0 .05 m
.00375 .05 L
s
0 .075 m
.00375 .075 L
s
0 .1 m
.00375 .1 L
s
0 .15 m
.00375 .15 L
s
0 .175 m
.00375 .175 L
s
0 .2 m
.00375 .2 L
s
0 .225 m
.00375 .225 L
s
0 .275 m
.00375 .275 L
s
0 .3 m
.00375 .3 L
s
0 .325 m
.00375 .325 L
s
0 .35 m
.00375 .35 L
s
0 .4 m
.00375 .4 L
s
0 .425 m
.00375 .425 L
s
0 .45 m
.00375 .45 L
s
0 .475 m
.00375 .475 L
s
0 .525 m
.00375 .525 L
s
0 .55 m
.00375 .55 L
s
0 .575 m
.00375 .575 L
s
0 .6 m
.00375 .6 L
s
0 .65 m
.00375 .65 L
s
0 .675 m
.00375 .675 L
s
0 .7 m
.00375 .7 L
s
0 .725 m
.00375 .725 L
s
0 .775 m
.00375 .775 L
s
0 .8 m
.00375 .8 L
s
0 .825 m
.00375 .825 L
s
0 .85 m
.00375 .85 L
s
0 .9 m
.00375 .9 L
s
0 .925 m
.00375 .925 L
s
0 .95 m
.00375 .95 L
s
0 .975 m
.00375 .975 L
s
.25 Mabswid
0 0 m
0 1 L
s
0 .99375 m
0 1 L
s
.125 .99375 m
.125 1 L
s
.25 .99375 m
.25 1 L
s
.375 .99375 m
.375 1 L
s
.5 .99375 m
.5 1 L
s
.625 .99375 m
.625 1 L
s
.75 .99375 m
.75 1 L
s
.875 .99375 m
.875 1 L
s
.125 Mabswid
.025 .99625 m
.025 1 L
s
.05 .99625 m
.05 1 L
s
.075 .99625 m
.075 1 L
s
.1 .99625 m
.1 1 L
s
.15 .99625 m
.15 1 L
s
.175 .99625 m
.175 1 L
s
.2 .99625 m
.2 1 L
s
.225 .99625 m
.225 1 L
s
.275 .99625 m
.275 1 L
s
.3 .99625 m
.3 1 L
s
.325 .99625 m
.325 1 L
s
.35 .99625 m
.35 1 L
s
.4 .99625 m
.4 1 L
s
.425 .99625 m
.425 1 L
s
.45 .99625 m
.45 1 L
s
.475 .99625 m
.475 1 L
s
.525 .99625 m
.525 1 L
s
.55 .99625 m
.55 1 L
s
.575 .99625 m
.575 1 L
s
.6 .99625 m
.6 1 L
s
.65 .99625 m
.65 1 L
s
.675 .99625 m
.675 1 L
s
.7 .99625 m
.7 1 L
s
.725 .99625 m
.725 1 L
s
.775 .99625 m
.775 1 L
s
.8 .99625 m
.8 1 L
s
.825 .99625 m
.825 1 L
s
.85 .99625 m
.85 1 L
s
.9 .99625 m
.9 1 L
s
.925 .99625 m
.925 1 L
s
.95 .99625 m
.95 1 L
s
.975 .99625 m
.975 1 L
s
.25 Mabswid
0 1 m
1 1 L
s
.99375 0 m
1 0 L
s
.99375 .125 m
1 .125 L
s
.99375 .25 m
1 .25 L
s
.99375 .375 m
1 .375 L
s
.99375 .5 m
1 .5 L
s
.99375 .625 m
1 .625 L
s
.99375 .75 m
1 .75 L
s
.99375 .875 m
1 .875 L
s
.125 Mabswid
.99625 .025 m
1 .025 L
s
.99625 .05 m
1 .05 L
s
.99625 .075 m
1 .075 L
s
.99625 .1 m
1 .1 L
s
.99625 .15 m
1 .15 L
s
.99625 .175 m
1 .175 L
s
.99625 .2 m
1 .2 L
s
.99625 .225 m
1 .225 L
s
.99625 .275 m
1 .275 L
s
.99625 .3 m
1 .3 L
s
.99625 .325 m
1 .325 L
s
.99625 .35 m
1 .35 L
s
.99625 .4 m
1 .4 L
s
.99625 .425 m
1 .425 L
s
.99625 .45 m
1 .45 L
s
.99625 .475 m
1 .475 L
s
.99625 .525 m
1 .525 L
s
.99625 .55 m
1 .55 L
s
.99625 .575 m
1 .575 L
s
.99625 .6 m
1 .6 L
s
.99625 .65 m
1 .65 L
s
.99625 .675 m
1 .675 L
s
.99625 .7 m
1 .7 L
s
.99625 .725 m
1 .725 L
s
.99625 .775 m
1 .775 L
s
.99625 .8 m
1 .8 L
s
.99625 .825 m
1 .825 L
s
.99625 .85 m
1 .85 L
s
.99625 .9 m
1 .9 L
s
.99625 .925 m
1 .925 L
s
.99625 .95 m
1 .95 L
s
.99625 .975 m
1 .975 L
s
.25 Mabswid
1 0 m
1 1 L
s
0 .5 m
1 .5 L
s
.5 0 m
.5 1 L
s
0 0 m
1 0 L
1 1 L
0 1 L
closepath
clip
newpath
.5 Mabswid
newpath
.5 .5 .03146 0 365.73 arc
s
newpath
.5 .5 .0267 0 365.73 arc
s
newpath
.5 .5 .14125 0 365.73 arc
s
newpath
.5 .5 .11057 0 365.73 arc
s
newpath
.76965 .5 .2484 0 365.73 arc
s
newpath
.5 .76965 .2484 0 365.73 arc
s
newpath
.23035 .5 .2484 0 365.73 arc
s
newpath
.5 .23035 .2484 0 365.73 arc
s
newpath
.5 .5 .11776 0 365.73 arc
s
.5 .5 m
.5 .5 .01 0 365.73 arc
F
% End of Graphics
MathPictureEnd
\
\>"], "Graphics",
 ImageSize->{288, 288},
 ImageMargins->{{43, 0}, {0, 0}},
 ImageRegion->{{0, 1}, {0, 
  1}},ImageCache->GraphicsData["CompressedBitmap", "\<\
eJztXdty3LgRpTUzkmXdLMuydZec20P2JclDUvu2efEqqcpHuLZStfuQSuKd
VLYqSSmXquQl+QP9y3yKP2UigEQ3CB5gGgNwyJHIsmbGIAj2OWxcCHQ3fvNh
+vVvf/dh+s1XH26+/PjhD19/89W3N+9///EhafSsKJ7dqL+bQv2eF4X5mD/8
m79THyqFf/9Uf42LT/e3BR3T2aVO3izms2lRP6bFbD6/MKfns6Ke4ba4/zQ/
BYXe3n+6DF91Hr7nJZb0upGsC3tWwvuJKfPTfXF7e6//V95e5yrLHBXltfo2
xU2VpsR4EFr/70x/Tor7qSli/nBNmf8K5EflXoVFuQbFVCB+Vp0yvExn88LO
jtJMEac257cs/Wyq74qEvwoUbYuw4HFWwv/YKU0dG/pzU5diBCI6bu/fRl4y
m839l0zql1Q4z+JpIXbLOzbSTDFGT5Uk+tZlGRuOQvKTr37XK1ZDSaw6MCp1
r5Lt3OjmbaO0AuW/DN/iIiygQUen7210pjXRZVMVrehstAeuojEaTwn1rMFS
GyXQo6qSVQkbzfbwf+rrUF3zzzLh3+prSyUc0q+/lKf+pb5GKuGafn1Xnvo7
JfyQfv2pPPU3SvhM/RqrX38sTx2oL91eH6iPkZVa6CtIT8cgbSTMl/vavsui
n/JG2Xz0jA2d9NSeR+7ynvmryRWl3VHatTBNa8wFKPSc9GkDXBZ/y9aQmOMK
lHdJIPol/xXJdQNKQTftWOALm0hdWnUS3S/8dNLk1zJIlfuMrhiBs0hhBFUk
fEutcSOLpxTWT8G1aUia+U6FsrSkWCfg2jHIJ4U4okfeMbC34NpJArAJyPem
W4jHxPXzBGBouHLcLbDX4NoUiFsg32uhLC1BPALXbidAfA7yHQllWQQxqs3P
DWwb5HsllCVrZ/AKXPsiAdgLkO+wW6V8SU97LwHYDsj3sltg6NoUiLsg34FQ
lpYg7oNr90E+KcQ9YXkDxJwQkUhIsaQQEWVI8ZeBGNUtoBqDGgUpMETyrlCW
rN0Cau1QMy4F9hLk2xHK0pJSop4KdcFSiIcgH+pJB4g5IaKBFBohSiGi8RAa
6K0QIhoEo3G+FCIay6L3kNZbzz4By9p6ojcz9PIpBYbeHLeEsrSklLkhHoN8
m0JZWoKIphDQ3MgAEVwbnp6KhFgqW8N8AS1oSJGjia+3IF/HyDfNY8KGD2g5
qCsG0NQkmnONZMA04Lb1BK//famLGVUqcaf/PhemvVefdpNfRFlapGgfuvYE
5JNyj+a70ZT+stqH7RlStA9di+bWO2bAtDyOQUTKs8+NHC3noMXVSOQp3Qpa
ETpbd4iTWpou4OG4HGC5+c6o3MIp9654twSUBe8U3QNIfHcY19IKvKrdFfnd
oDinIgsbwQBgACAF4FoftV4BOM3XXq1adPFkzKoEzjbJkirwpZXPpN+0rxwm
7yD6IPraiS5qTVYpcJbWpE8MdyC6NN8g+iB6d6LnESmX6IKGcLUCZ2gI+8Xw
IPogulR0mqPGnq/LzFGbvB0jM0ustiMsWrRZEzhmIcd2jeWFnJ+rYnbVr1/q
Ank0pf6+oLM6n93WFfJFm5l84l5bmGl/Rdu+xRx6WuQ8gaYTKl4bQW2qX2Fj
Ur/eY1dUqd5r2xY9XXjoAFX/G9PZlFXhIyrFVl+T4yWdDRuEeepHw4dV+og3
SffeAOTbdDbFmugllfICID+ms2ErlaWb6xHd4BRA1IaFWpVTbDH36B57AOIJ
nQ0vhidALOpuVOYCph4ZUEaZs4/q1ZPRnRODRd1/7WYBsMYQ0hyo3W7FqWKj
rtqM6RqkXRELgQEme0W+AyBe09kU0TeplGMg5g2dXcS/c4q9Ur3P8a5Kr1oL
nRmZYEmRjKmUtz4k1nx4daDCA7BO6R6SlXB1nNAVKU5l7DTursqrXO8cbNWf
12U4AHDZRX91ZPTiPPOiBM0xvGIBzjjTmsYyimctB1USxJR0dj9sUCQCyr5/
fvPGBryaF3HMQzTpEWtd3AAtQtZopUymCGQIQBiU06bJQCE7XG0HvajJf0VA
/VbgwUU9UxgC5fWyj0AWtg4XqWSczfvCJUzfY73AoC6qmmUnh+pg2OJfBDjO
VUNufeFt4MMtcaxBww6VFok7zvcmBnezXGT5I3XLjyUk7HwlomaPOPW7A8oJ
Qa+mqCeXOvGnmFGFne9E5KR4TUoN5dA7LeqApOEBUigLe50GOkOpsxy6qdRo
MhzPIJyGbPFTiEINKb9PBrrVFFdjKVHh+AjxRKXY36IuFnEQqIQpbudSY+xw
vIUwjWjQl0JZ2G1fRFlKCAIpZeH4DWEa0ZxYio9BeBpFRFlKOAqpu0X4sYRp
RFMrKZSFH4uIspQgJVLKwpU/TCMayqf48oQrf+uUSR26pJSFm+buKHPmCFDj
m4eocF8cTkNvDylOgIhkXkELDChSojxJSQ4Pg8NpKHZDClHhYbCoEoZH3Hko
Q6Nm3YTvqBSkeSiOR4pzcPgVS0RU+G0ufHupAzh6I9P3bSwqNs+iio5oTHEe
D7+6N2isu9XZh9epc3Us16eg5o35PYcdZ94m/Aq8Qo5tawMThdob4NZJk8b4
k8ae0FTobKiR1NRq1tELS0o8CrTKgPAuoqzMXZZdHnfFr/XniP6v/r6nPnXS
Pji720grih+AfL8CaXYHV8gjlZctA5oqk4felMZQ4XlHpJWoMUfKsFGy1yw+
JfSKiXKOaKhIZVsjDnY+Ae1Bgaf00F2lIYQQwYhCrfXaUsZ7hTPNxPdICT8U
wZ4dYT2RPelkGTfCaNSxQZxtAHHmlQ0SYht1qqjdSYlYhdc8Cs9AVh1SB2Rp
wDFeznPb8pKzooow/pwIHlFmrzFDSnSy9iiRhpnzPnhmY0S/mgq1SeJ6xw1o
FJ8StO7SudYlLComkZQmNJbguqhr29hXK1mRUG+MhmvoVbo3lEnf6FAzg8CO
fIrDNnk0FigPNBBDc1wpSzVZA0SFQ5IirdiiKxzsUhV6XimSU1+5DCfkMuqM
WcSUJYorulur8WvxgqRTRwWjYz+Z6FpMMGoFEK0pyxhZafXPLmNatwLg0Rs4
IsSre97HhfoqtDqXstRxDa6tXpj2SbibZFobhiMhRr2diiBtk25XyG53B7Uy
QxRutwOLIVKyYLSIRaRvfsbQvTwsNqx4kP5liNSeQqA/yr46EGTBeC6chobY
7jNQQqDnEhW632ovKo7GtZsW8rHNIoMKk+7iVQcaoKEWC3Hl8uxyZWSULmMg
bHpEM25wtZw+SWeSXQLUgcbciCiU5g7p1GFXYiMj21tH7eDRVKXl6JHOXqK3
qkSGkNjeuQInbdndTtRRNVK7GJGUODYOtOWrPdVm4dI1MJTmUq0Ob3MonURs
jx/vFkpu5VMHmgbLyYs6pCPM9ijhNzXEAXphkDRU6g/Nv0zoAUj7FNyj62MH
II8tvvluf1fAEXQMGyjN1SbSQdto25yUqgU/PC1ujRc8jItSiwYvjdpTnkzh
xZ2qL8EUzS3v1LFsdWkoTRo5HvNzdiBEby5SQthNwJ2U6T8D7lu9/Z1cecY9
58S/9HEHW5MNUhfU00j3rmSPUm5N3MmSdJJ0KV2QNKEnj6YjGTKiZoeo4ZWL
ESnunS2/dKGpa3b4tVLLgKdyCXFhH9X//ReTTrZCD3oXZkjhwlyCtiFBBoP5
1jWDV1ic11qjVk6t2UKqloGZxoS4lw8nTVpvY5jR3dMR/YJI8czlskN4iSIs
Cdxvt8EQbHjskey1cNFJrkndE6CGp7m8VmIOIXzFI6fGnUINkmTpDxoL3cHO
HXkyRZIEd37Aer5KnjRaHr11y86kuJ/e0yl1zIBut04RdwUT+oVerY5Wz1PN
4PK2zpUxuKwmjlhcyUVd8ztmBe1G8W55U4geKF5famR9v4ii+/aqd+16152f
YFygz/LQ6pGPBjgW1aMfQ8a8V+gpnmP61RPg7b5gTkgLRgTyOaVNKB8kI9/r
ZF9mH7YYnHvCXPaCilrzyRjnkXKIPO9UlSCN6WUjtsfFE3elUg8p1MhyPD7v
PSw51dGTGdDg1Hljjko/f+TOELfu1DDp6PE8equrK4dUSqsMtLEoOV+TxbdV
L0oWa7JYG1CazGv4jYKkDUgny/g5bDpG1nMxJ9xZ/6rcVsxddFL3xhxh+x9k
TbZOxj+DSdmqWXsydoqDyStIy2ryGjahdk3Bq2NNDaiXY0hqpe+xpl97A/3B
QSSJvnVzYEJp3J730IFp/Rzv/I50j8TxbknPUDQ+TXNmNAV07BbanicyA2Ow
+lJvrJsRCyes+M598/sft+Lbjlol6H9M2cJe7hUX1oHas1X7uDunWgktgbSI
DbUmXEtxHIUmcaiCoXgKKTEoWiJOGtFE0rOWIhXVtM0m/Ypq91CQtLbDmawm
HoxgfDxCSmbrHnopZqNjFHqoPe5EAdNaD1TEUVBQA8lhvFB5iE3EYcuBivxR
0VYYJEsw9POHy8LLEKhpazliVnK0tHfq0519V997IHMZPG1spenj+yDrovhp
fYqMt0+EoW6VvR06joznj47mGxJz2ipiYWq9wLYLc8+SsvrrOESjP2paX1g1
5CGpuK6jAUvHEUZ7F9FW792JeokeRrRNiZYsnZxe92jJaxt/OyVQ+dLxt/sU
BL+vEd0fAWUpWy1koCxldwrphh7S3SmkWy10vDtFn/ZA0Wnel+uOdz5JmR+X
bkn0yPbXWcddnFK2u1pmF6fkfcGkG6g9in3Bhp3mFu80h7IPOxcOO15G7nj5
VDdBfXK73T7KLYyfwt7Tj2ircEHX+ih3e192gK6OcHu56HGatA0qSoCYrUbQ
8kEA52lQVoTuhK5AYyo5OlOKyzRDrKuPyY96qADAc7tamfLV9w3Axi7VqOJK
sbFdna109fuOa/ctcJvWaDfZDslWAnPJazqL1pqk0nPbcOyTnmVZ1BJeWWCt
A3VS3NuhwYxUejaGegWkZ/68ii5SqlKaxUMrc03Yck6KDb2xHgCU3JOEB+wR
UEHl1dnOAFiOkYfea6Rgd6mUfQDxlM6GJ5qWhsiR8N4AiPxKjGbkpBAP6B4v
AMQ3dI/w+lIDIlmkzOr2KEUxVUFQpDFQdBuix7uHgIEJnUWrKlIGjoiBTcDA
Id0jbBvRYIDXxAk1HBMg2FrbdEiBbfqFJiOkEHUXsF0vLzwx0oBjW0VoQDN7
becXqpgyhAI/IvX9hf5kSnGaKt6UYrfmpgtRdk2zmTXKEHBo82DyIm6kHErz
SSqFCn5DEZOUyVZUpeghMhSG7Pb+U3xYnzySZkAUb6M+iD6ILjA3X63AGXbl
6hfD69k+DqIPoq+F6LZvg2+SQiK6yO9mlQJn2Z6wTwwPog+itym6vtBTiXvZ
muQQWDq5n22z01UJnE05Fi5pPh3pI9a6BgADAAQg1m4hsaGU22G0BSCx4ewe
QDY9yg8lxVoqG6x6mtSqbo0hSk1RO4YIN4qYzlICr+dGnmKPHEDun3W/Td2n
QGri3jEDZu3GrMXV126+1MXwIF39fS5Me68+7ebcXrExm0KkMCx1VYlaCXPy
Sd0EJDrGelUkruy0xUCK35KgfbE3dnjQs5T2ReoC1zHylM4jN8QUN8eWIEqd
IPsAMSpaUG5gKV692eYj1J/UJzzKwMLJJ/XrbkkpnwBEaYgJKcSUcBItQZRG
VZFCTImIMkBcFqI0vJAUYkqIoEUQozoIqd9elKmek08aPyprByEN8SYFlhKM
rSWllIYClEJMCdQ3QFwWojQ6SJQ9sEDxVwixPatuqYtxS8CkERKkEFM89BdB
jOoWwtEG4oFx0Exp/I+snYEkhnkMnJTAJi2potRTUAoxHJWgE4hSv/41hij1
yJdCTAmD1RJEqV+9FCJ79C27K0kmYOwhGAcHe++dZwITv82k1yFKAqE6lt4w
MuUBeD21F6mSSZfeqCUFQsWGRc9zj6yis/siEl3wiJaW3+wWwquHyWtnKM3r
WyutPEsDpHUrK+irdF9Kab7c1/ZdFnavRqOBTtnQSU/teeQuD6592ge3Ebrz
OlAfVV9klgvVkrRajq7q3bfgNp+RGn2sX0uLrff62qlK1rZgP6JHPC2vIOfF
anFS1fDvKLtuOLUF0J/L7P+hhCP69dfy1H/V15FK+EeZUDz7PxGL2OU=\
\>"],ImageRangeCache->{{{0, 287}, {287, 0}} -> {-4.4574, -4.39039, 0.0297797, \
0.0297797}}],

Cell[BoxData[
 TagBox[
  RowBox[{"\[SkeletonIndicator]", "Graphics", "\[SkeletonIndicator]"}],
  False,
  Editable->False]], "Output"]
}, Open  ]]
},
WindowSize->{839, 824},
WindowMargins->{{Automatic, 529}, {Automatic, 32}},
PrintingCopies->1,
PrintingPageRange->{Automatic, Automatic},
PrivateNotebookOptions->{"VersionedStylesheet"->{"Default.nb"[8.] -> False}},
FrontEndVersion->"9.0 for Microsoft Windows (64-bit) (January 25, 2013)",
StyleDefinitions->"Default.nb"
]
(* End of Notebook Content *)

(* Internal cache information *)
(*CellTagsOutline
CellTagsIndex->{}
*)
(*CellTagsIndex
CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
Cell[557, 20, 1853, 49, 172, "Input"],
Cell[2413, 71, 1337, 48, 132, "Input"],
Cell[CellGroupData[{
Cell[3775, 123, 9919, 278, 492, "Input"],
Cell[13697, 403, 134, 4, 31, "Output"],
Cell[13834, 409, 14132, 805, 377, 6514, 677, "GraphicsData", "PostScript", \
"Graphics"],
Cell[27969, 1216, 134, 4, 31, "Output"],
Cell[28106, 1222, 134, 4, 31, "Output"],
Cell[28243, 1228, 12851, 779, 296, 6397, 671, "GraphicsData", "PostScript", \
"Graphics"],
Cell[41097, 2009, 134, 4, 31, "Output"]
}, Open  ]]
}
]
*)

(* End of internal cache information *)