(* 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[ 70555, 2674] NotebookOptionsPosition[ 69707, 2646] NotebookOutlinePosition[ 70193, 2664] CellTagsIndexPosition[ 70150, 2661] WindowFrame->Normal*) (* Beginning of Notebook Content *) Notebook[{ Cell[BoxData[ RowBox[{ RowBox[{"(*", " ", RowBox[{ RowBox[{ RowBox[{ RowBox[{ RowBox[{"[", RowBox[{"Fe", RowBox[{"(", "CN", ")"}], "6"}], "]"}], "4"}], "-", " ", "computation"}], ";", " ", RowBox[{"coordinates", " ", "and", " ", "radii", " ", "from", " ", RowBox[{"FeCN6II1", ".", "exe"}]}]}], ",", " ", RowBox[{"05.02", ".2012"}]}], " ", "*)"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"t", "=", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0.00000", ",", "0.00000", ",", "0.00000", ",", "1.31529"}], "}"}], ",", RowBox[{"{", RowBox[{"2.65478", ",", "0.00000", ",", "0.00000", ",", "1.33949"}], "}"}], ",", RowBox[{"{", RowBox[{"4.24130", ",", "0.00000", ",", "0.00000", ",", "0.24703"}], "}"}], ",", RowBox[{"{", RowBox[{"5.33126", ",", "0.00000", ",", "0.00000", ",", "0.84292"}], "}"}], ",", RowBox[{"{", RowBox[{"5.33126", ",", "2.14351", ",", "0.00000", ",", "1.97351"}], "}"}], ",", RowBox[{"{", RowBox[{"5.33126", ",", "0.00000", ",", "2.14351", ",", "1.97351"}], "}"}], ",", RowBox[{"{", RowBox[{"5.33126", ",", RowBox[{"-", "2.14351"}], ",", "0.00000", ",", "1.97351"}], "}"}], ",", RowBox[{"{", RowBox[{"5.33126", ",", "0.00000", ",", RowBox[{"-", "2.14351"}], ",", "1.97351"}], "}"}], ",", RowBox[{"{", RowBox[{"6.39012", ",", "0.00000", ",", "0.00000", ",", "0.21594"}], "}"}], ",", RowBox[{"{", RowBox[{"7.67414", ",", "0.00000", ",", "0.00000", ",", "1.06807"}], "}"}], ",", RowBox[{"{", RowBox[{"0.00000", ",", "2.65478", ",", "0.00000", ",", "1.33949"}], "}"}], ",", RowBox[{"{", RowBox[{"0.00000", ",", "4.24130", ",", "0.00000", ",", "0.24703"}], "}"}], ",", RowBox[{"{", RowBox[{"0.00000", ",", "5.33126", ",", "0.00000", ",", "0.84292"}], "}"}], ",", RowBox[{"{", RowBox[{"2.14351", ",", "5.33126", ",", "0.00000", ",", "1.97351"}], "}"}], ",", RowBox[{"{", RowBox[{"0.00000", ",", "5.33126", ",", "2.14351", ",", "1.97351"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "2.14351"}], ",", "5.33126", ",", "0.00000", ",", "1.97351"}], "}"}], ",", RowBox[{"{", RowBox[{"0.00000", ",", "5.33126", ",", RowBox[{"-", "2.14351"}], ",", "1.97351"}], "}"}], ",", RowBox[{"{", RowBox[{"0.00000", ",", "6.39012", ",", "0.00000", ",", "0.21594"}], "}"}], ",", RowBox[{"{", RowBox[{"0.00000", ",", "7.67414", ",", "0.00000", ",", "1.06807"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "2.65478"}], ",", "0.00000", ",", "0.00000", ",", "1.33949"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "4.24130"}], ",", "0.00000", ",", "0.00000", ",", "0.24703"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "5.33126"}], ",", "0.00000", ",", "0.00000", ",", "0.84292"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "5.33126"}], ",", RowBox[{"-", "2.14351"}], ",", "0.00000", ",", "1.97351"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "5.33126"}], ",", "0.00000", ",", RowBox[{"-", "2.14351"}], ",", "1.97351"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "5.33126"}], ",", "2.14351", ",", "0.00000", ",", "1.97351"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "5.33126"}], ",", "0.00000", ",", "2.14351", ",", "1.97351"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "6.39012"}], ",", "0.00000", ",", "0.00000", ",", "0.21594"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "7.67414"}], ",", "0.00000", ",", "0.00000", ",", "1.06807"}], "}"}]}], "}"}]}], ";"}]}]], "Input"], Cell[BoxData[{ RowBox[{ RowBox[{"x", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"t", "[", RowBox[{"[", RowBox[{"i", ",", "1"}], "]"}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "28"}], "}"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"y", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"t", "[", RowBox[{"[", RowBox[{"i", ",", "2"}], "]"}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "28"}], "}"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"z", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"t", "[", RowBox[{"[", RowBox[{"i", ",", "3"}], "]"}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "28"}], "}"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"r", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"t", "[", RowBox[{"[", RowBox[{"i", ",", "4"}], "]"}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "28"}], "}"}]}], "]"}]}], ";"}], "\[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[{"[", "10", "]"}], "]"}], ",", RowBox[{"y", "[", RowBox[{"[", "10", "]"}], "]"}]}], "}"}], ",", RowBox[{"r", "[", RowBox[{"[", "10", "]"}], "]"}]}], "]"}], ",", 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[{"[", "11", "]"}], "]"}], ",", RowBox[{"y", "[", RowBox[{"[", "11", "]"}], "]"}]}], "}"}], ",", RowBox[{"r", "[", RowBox[{"[", "11", "]"}], "]"}]}], "]"}], ",", 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[{"[", "12", "]"}], "]"}], ",", RowBox[{"y", "[", RowBox[{"[", "12", "]"}], "]"}]}], "}"}], ",", RowBox[{"r", "[", RowBox[{"[", "12", "]"}], "]"}]}], "]"}], ",", 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[{"[", "13", "]"}], "]"}], ",", RowBox[{"y", "[", RowBox[{"[", "13", "]"}], "]"}]}], "}"}], ",", RowBox[{"r", "[", RowBox[{"[", "13", "]"}], "]"}]}], "]"}], ",", 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[{"[", "14", "]"}], "]"}], ",", RowBox[{"y", "[", RowBox[{"[", "14", "]"}], "]"}]}], "}"}], ",", RowBox[{"r", "[", RowBox[{"[", "14", "]"}], "]"}]}], "]"}], ",", RowBox[{"Circle", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"x", "[", RowBox[{"[", "8", "]"}], "]"}], ",", RowBox[{"y", "[", RowBox[{"[", "8", "]"}], "]"}]}], "}"}], ",", RowBox[{"r", "[", RowBox[{"[", "8", "]"}], "]"}]}], "]"}], ",", RowBox[{"Circle", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"x", "[", RowBox[{"[", "15", "]"}], "]"}], ",", RowBox[{"y", "[", RowBox[{"[", "15", "]"}], "]"}]}], "}"}], ",", RowBox[{"r", "[", RowBox[{"[", "15", "]"}], "]"}]}], "]"}], ",", RowBox[{"Circle", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"x", "[", RowBox[{"[", "16", "]"}], "]"}], ",", RowBox[{"y", "[", RowBox[{"[", "16", "]"}], "]"}]}], "}"}], ",", RowBox[{"r", "[", RowBox[{"[", "16", "]"}], "]"}]}], "]"}], ",", RowBox[{"Circle", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"x", "[", RowBox[{"[", "17", "]"}], "]"}], ",", RowBox[{"y", "[", RowBox[{"[", "17", "]"}], "]"}]}], "}"}], ",", RowBox[{"r", "[", RowBox[{"[", "17", "]"}], "]"}]}], "]"}], ",", RowBox[{"Circle", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"x", "[", RowBox[{"[", "18", "]"}], "]"}], ",", RowBox[{"y", "[", RowBox[{"[", "18", "]"}], "]"}]}], "}"}], ",", RowBox[{"r", "[", RowBox[{"[", "18", "]"}], "]"}]}], "]"}], ",", RowBox[{"Circle", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"x", "[", RowBox[{"[", "19", "]"}], "]"}], ",", RowBox[{"y", "[", RowBox[{"[", "19", "]"}], "]"}]}], "}"}], ",", RowBox[{"r", "[", RowBox[{"[", "19", "]"}], "]"}]}], "]"}], ",", RowBox[{"Circle", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"x", "[", RowBox[{"[", "20", "]"}], "]"}], ",", RowBox[{"y", "[", RowBox[{"[", "20", "]"}], "]"}]}], "}"}], ",", RowBox[{"r", "[", RowBox[{"[", "20", "]"}], "]"}]}], "]"}], ",", RowBox[{"Circle", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"x", "[", RowBox[{"[", "21", "]"}], "]"}], ",", RowBox[{"y", "[", RowBox[{"[", "21", "]"}], "]"}]}], "}"}], ",", RowBox[{"r", "[", RowBox[{"[", "21", "]"}], "]"}]}], "]"}], ",", RowBox[{"Circle", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"x", "[", RowBox[{"[", "22", "]"}], "]"}], ",", RowBox[{"y", "[", RowBox[{"[", "22", "]"}], "]"}]}], "}"}], ",", RowBox[{"r", "[", RowBox[{"[", "22", "]"}], "]"}]}], "]"}], ",", RowBox[{"Circle", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"x", "[", RowBox[{"[", "23", "]"}], "]"}], ",", RowBox[{"y", "[", RowBox[{"[", "23", "]"}], "]"}]}], "}"}], ",", RowBox[{"r", "[", RowBox[{"[", "23", "]"}], "]"}]}], "]"}], ",", RowBox[{"Circle", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"x", "[", RowBox[{"[", "24", "]"}], "]"}], ",", RowBox[{"y", "[", RowBox[{"[", "24", "]"}], "]"}]}], "}"}], ",", RowBox[{"r", "[", RowBox[{"[", "24", "]"}], "]"}]}], "]"}], ",", RowBox[{"Circle", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"x", "[", RowBox[{"[", "25", "]"}], "]"}], ",", RowBox[{"y", "[", RowBox[{"[", "25", "]"}], "]"}]}], "}"}], ",", RowBox[{"r", "[", RowBox[{"[", "25", "]"}], "]"}]}], "]"}], ",", RowBox[{"Circle", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"x", "[", RowBox[{"[", "26", "]"}], "]"}], ",", RowBox[{"y", "[", RowBox[{"[", "26", "]"}], "]"}]}], "}"}], ",", RowBox[{"r", "[", RowBox[{"[", "26", "]"}], "]"}]}], "]"}], ",", RowBox[{"Circle", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"x", "[", RowBox[{"[", "27", "]"}], "]"}], ",", RowBox[{"y", "[", RowBox[{"[", "27", "]"}], "]"}]}], "}"}], ",", RowBox[{"r", "[", RowBox[{"[", "27", "]"}], "]"}]}], "]"}], ",", RowBox[{"Circle", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"x", "[", RowBox[{"[", "28", "]"}], "]"}], ",", RowBox[{"y", "[", RowBox[{"[", "28", "]"}], "]"}]}], "}"}], ",", RowBox[{"r", "[", RowBox[{"[", "28", "]"}], "]"}]}], "]"}], ",", RowBox[{"Disk", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"x", "[", RowBox[{"[", "3", "]"}], "]"}], ",", RowBox[{"y", "[", RowBox[{"[", "3", "]"}], "]"}]}], "}"}], ",", "0.08"}], "]"}], ",", " ", RowBox[{"Disk", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"x", "[", RowBox[{"[", "9", "]"}], "]"}], ",", RowBox[{"y", "[", RowBox[{"[", "9", "]"}], "]"}]}], "}"}], ",", "0.08"}], "]"}], ",", " ", RowBox[{"Disk", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"x", "[", RowBox[{"[", "12", "]"}], "]"}], ",", RowBox[{"y", "[", RowBox[{"[", "12", "]"}], "]"}]}], "}"}], ",", "0.08"}], "]"}], ",", " ", RowBox[{"Disk", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"x", "[", RowBox[{"[", "18", "]"}], "]"}], ",", RowBox[{"y", "[", RowBox[{"[", "18", "]"}], "]"}]}], "}"}], ",", "0.08"}], "]"}], ",", " ", RowBox[{"Disk", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"x", "[", RowBox[{"[", "21", "]"}], "]"}], ",", RowBox[{"y", "[", RowBox[{"[", "21", "]"}], "]"}]}], "}"}], ",", "0.08"}], "]"}], ",", " ", RowBox[{"Disk", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"x", "[", RowBox[{"[", "27", "]"}], "]"}], ",", RowBox[{"y", "[", RowBox[{"[", "27", "]"}], "]"}]}], "}"}], ",", "0.08"}], "]"}], ",", " ", RowBox[{"Disk", "[", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "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[{"-", "10"}], ",", "10"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "6"}], ",", "10"}], "}"}]}], "}"}]}], ",", " ", RowBox[{"Frame", " ", "->", " ", "True"}]}], "}"}]}], "]"}], "\[IndentingNewLine]", "\[IndentingNewLine]"}], RowBox[{"(*", " ", RowBox[{"xz", " ", "plane"}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"plot3", "=", RowBox[{"Graphics", "[", RowBox[{"{", RowBox[{ RowBox[{"Circle", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"x", "[", RowBox[{"[", "1", "]"}], "]"}], ",", RowBox[{"z", "[", RowBox[{"[", "1", "]"}], "]"}]}], "}"}], ",", RowBox[{"r", "[", RowBox[{"[", "1", "]"}], "]"}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Circle", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"sq", "*", RowBox[{"x", "[", RowBox[{"[", "2", "]"}], "]"}]}], ",", RowBox[{"z", "[", RowBox[{"[", "2", "]"}], "]"}]}], "}"}], ",", RowBox[{"r", "[", RowBox[{"[", "2", "]"}], "]"}]}], "]"}], ",", RowBox[{"Circle", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"sq", "*", RowBox[{"x", "[", RowBox[{"[", "3", "]"}], "]"}]}], ",", RowBox[{"z", "[", RowBox[{"[", "3", "]"}], "]"}]}], "}"}], ",", RowBox[{"r", "[", RowBox[{"[", "3", "]"}], "]"}]}], "]"}], ",", RowBox[{"Circle", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"sq", "*", RowBox[{"x", "[", RowBox[{"[", "4", "]"}], "]"}]}], ",", RowBox[{"z", "[", RowBox[{"[", "4", "]"}], "]"}]}], "}"}], ",", RowBox[{"r", "[", RowBox[{"[", "4", "]"}], "]"}]}], "]"}], ",", RowBox[{"Circle", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"sq", "*", RowBox[{"x", "[", RowBox[{"[", "5", "]"}], "]"}]}], ",", RowBox[{"z", "[", RowBox[{"[", "5", "]"}], "]"}]}], "}"}], ",", RowBox[{"r", "[", RowBox[{"[", "5", "]"}], "]"}]}], "]"}], ",", RowBox[{"Circle", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"sq", "*", RowBox[{"x", "[", RowBox[{"[", "6", "]"}], "]"}]}], ",", RowBox[{"z", "[", RowBox[{"[", "6", "]"}], "]"}]}], "}"}], ",", RowBox[{"r", "[", RowBox[{"[", "6", "]"}], "]"}]}], "]"}], ",", RowBox[{"Circle", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"sq", "*", RowBox[{"x", "[", RowBox[{"[", "7", "]"}], "]"}]}], ",", RowBox[{"z", "[", RowBox[{"[", "7", "]"}], "]"}]}], "}"}], ",", RowBox[{"r", "[", RowBox[{"[", "7", "]"}], "]"}]}], "]"}], ",", RowBox[{"Circle", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"sq", "*", RowBox[{"x", "[", RowBox[{"[", "8", "]"}], "]"}]}], ",", RowBox[{"z", "[", RowBox[{"[", "8", "]"}], "]"}]}], "}"}], ",", RowBox[{"r", "[", RowBox[{"[", "8", "]"}], "]"}]}], "]"}], ",", RowBox[{"Circle", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"sq", "*", RowBox[{"x", "[", RowBox[{"[", "9", "]"}], "]"}]}], ",", RowBox[{"z", "[", RowBox[{"[", "9", "]"}], "]"}]}], "}"}], ",", RowBox[{"r", "[", RowBox[{"[", "9", "]"}], "]"}]}], "]"}], ",", RowBox[{"Circle", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"sq", "*", RowBox[{"x", "[", RowBox[{"[", "10", "]"}], "]"}]}], ",", RowBox[{"z", "[", RowBox[{"[", "10", "]"}], "]"}]}], "}"}], ",", RowBox[{"r", "[", RowBox[{"[", "10", "]"}], "]"}]}], "]"}], ",", RowBox[{"Circle", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"sq", "*", RowBox[{"x", "[", RowBox[{"[", "11", "]"}], "]"}]}], ",", RowBox[{"z", "[", RowBox[{"[", "11", "]"}], "]"}]}], "}"}], ",", RowBox[{"r", "[", RowBox[{"[", "11", "]"}], "]"}]}], "]"}], ",", RowBox[{"Circle", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"sq", "*", RowBox[{"x", "[", RowBox[{"[", "12", "]"}], "]"}]}], ",", RowBox[{"z", "[", RowBox[{"[", "12", "]"}], "]"}]}], "}"}], ",", RowBox[{"r", "[", RowBox[{"[", "12", "]"}], "]"}]}], "]"}], ",", RowBox[{"Circle", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"sq", "*", RowBox[{"x", "[", RowBox[{"[", "13", "]"}], "]"}]}], ",", RowBox[{"z", "[", RowBox[{"[", "13", "]"}], "]"}]}], "}"}], ",", RowBox[{"r", "[", RowBox[{"[", "13", "]"}], "]"}]}], "]"}], ",", RowBox[{"Circle", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"sq", "*", RowBox[{"x", "[", RowBox[{"[", "14", "]"}], "]"}]}], ",", RowBox[{"z", "[", RowBox[{"[", "14", "]"}], "]"}]}], "}"}], ",", RowBox[{"r", "[", RowBox[{"[", "14", "]"}], "]"}]}], "]"}], ",", RowBox[{"Circle", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"sq", "*", RowBox[{"x", "[", RowBox[{"[", "15", "]"}], "]"}]}], ",", RowBox[{"z", "[", RowBox[{"[", "15", "]"}], "]"}]}], "}"}], ",", RowBox[{"r", "[", RowBox[{"[", "15", "]"}], "]"}]}], "]"}], ",", RowBox[{"Circle", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"sq", "*", RowBox[{"x", "[", RowBox[{"[", "16", "]"}], "]"}]}], ",", RowBox[{"z", "[", RowBox[{"[", "16", "]"}], "]"}]}], "}"}], ",", RowBox[{"r", "[", RowBox[{"[", "16", "]"}], "]"}]}], "]"}], ",", RowBox[{"Circle", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"sq", "*", RowBox[{"x", "[", RowBox[{"[", "17", "]"}], "]"}]}], ",", RowBox[{"z", "[", RowBox[{"[", "17", "]"}], "]"}]}], "}"}], ",", RowBox[{"r", "[", RowBox[{"[", "17", "]"}], "]"}]}], "]"}], ",", RowBox[{"Circle", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"sq", "*", RowBox[{"x", "[", RowBox[{"[", "18", "]"}], "]"}]}], ",", RowBox[{"z", "[", RowBox[{"[", "18", "]"}], "]"}]}], "}"}], ",", RowBox[{"r", "[", RowBox[{"[", "18", "]"}], "]"}]}], "]"}], ",", RowBox[{"Circle", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"sq", "*", RowBox[{"x", "[", RowBox[{"[", "19", "]"}], "]"}]}], ",", RowBox[{"z", "[", RowBox[{"[", "19", "]"}], "]"}]}], "}"}], ",", RowBox[{"r", "[", RowBox[{"[", "19", "]"}], "]"}]}], "]"}], ",", RowBox[{"Circle", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"sq", "*", RowBox[{"x", "[", RowBox[{"[", "20", "]"}], "]"}]}], ",", RowBox[{"z", "[", RowBox[{"[", "20", "]"}], "]"}]}], "}"}], ",", RowBox[{"r", "[", RowBox[{"[", "20", "]"}], "]"}]}], "]"}], ",", RowBox[{"Circle", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"sq", "*", RowBox[{"x", "[", RowBox[{"[", "21", "]"}], "]"}]}], ",", RowBox[{"z", "[", RowBox[{"[", "21", "]"}], "]"}]}], "}"}], ",", RowBox[{"r", "[", RowBox[{"[", "21", "]"}], "]"}]}], "]"}], ",", RowBox[{"Circle", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"x", "[", RowBox[{"[", "22", "]"}], "]"}], ",", RowBox[{"z", "[", RowBox[{"[", "22", "]"}], "]"}]}], "}"}], ",", RowBox[{"r", "[", RowBox[{"[", "22", "]"}], "]"}]}], "]"}], ",", RowBox[{"Circle", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"x", "[", RowBox[{"[", "23", "]"}], "]"}], ",", RowBox[{"z", "[", RowBox[{"[", "23", "]"}], "]"}]}], "}"}], ",", RowBox[{"r", "[", RowBox[{"[", "23", "]"}], "]"}]}], "]"}], ",", RowBox[{"Circle", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"x", "[", RowBox[{"[", "24", "]"}], "]"}], ",", RowBox[{"z", "[", RowBox[{"[", "24", "]"}], "]"}]}], "}"}], ",", RowBox[{"r", "[", RowBox[{"[", "24", "]"}], "]"}]}], "]"}], ",", RowBox[{"Circle", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"x", "[", RowBox[{"[", "25", "]"}], "]"}], ",", RowBox[{"z", "[", RowBox[{"[", "25", "]"}], "]"}]}], "}"}], ",", RowBox[{"r", "[", RowBox[{"[", "25", "]"}], "]"}]}], "]"}], ",", RowBox[{"Circle", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"x", "[", RowBox[{"[", "26", "]"}], "]"}], ",", RowBox[{"z", "[", RowBox[{"[", "26", "]"}], "]"}]}], "}"}], ",", RowBox[{"r", "[", RowBox[{"[", "26", "]"}], "]"}]}], "]"}], ",", RowBox[{"Circle", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"x", "[", RowBox[{"[", "27", "]"}], "]"}], ",", RowBox[{"z", "[", RowBox[{"[", "27", "]"}], "]"}]}], "}"}], ",", RowBox[{"r", "[", RowBox[{"[", "27", "]"}], "]"}]}], "]"}], ",", RowBox[{"Circle", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"x", "[", RowBox[{"[", "28", "]"}], "]"}], ",", RowBox[{"z", "[", RowBox[{"[", "28", "]"}], "]"}]}], "}"}], ",", RowBox[{"r", "[", RowBox[{"[", "28", "]"}], "]"}]}], "]"}], ",", RowBox[{"Disk", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"sq", "*", RowBox[{"x", "[", RowBox[{"[", "3", "]"}], "]"}]}], ",", RowBox[{"z", "[", RowBox[{"[", "3", "]"}], "]"}]}], "}"}], ",", "0.08"}], "]"}], ",", " ", RowBox[{"Disk", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"sq", "*", RowBox[{"x", "[", RowBox[{"[", "9", "]"}], "]"}]}], ",", RowBox[{"z", "[", RowBox[{"[", "9", "]"}], "]"}]}], "}"}], ",", "0.08"}], "]"}], ",", " ", RowBox[{"Disk", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"sq", "*", RowBox[{"x", "[", RowBox[{"[", "21", "]"}], "]"}]}], ",", RowBox[{"z", "[", RowBox[{"[", "21", "]"}], "]"}]}], "}"}], ",", "0.08"}], "]"}], ",", " ", RowBox[{"Disk", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"sq", "*", RowBox[{"x", "[", RowBox[{"[", "27", "]"}], "]"}]}], ",", RowBox[{"z", "[", RowBox[{"[", "27", "]"}], "]"}]}], "}"}], ",", "0.08"}], "]"}], ",", " ", RowBox[{"Disk", "[", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0"}], "}"}], ",", "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[{"-", "10"}], ",", "10"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "5"}], ",", "5"}], "}"}]}], "}"}]}], ",", " ", RowBox[{"Frame", " ", "->", " ", "True"}]}], "}"}]}], "]"}], "\[IndentingNewLine]", "\[IndentingNewLine]"}]}]}]], "Input"], Cell[BoxData[ TagBox[ RowBox[{"\[SkeletonIndicator]", "Graphics", "\[SkeletonIndicator]"}], False, Editable->False]], "Output"], Cell[GraphicsData["PostScript", "\<\ %! %%Creator: Mathematica %%AspectRatio: .8 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.05 0.3 0.05 [ [.125 -0.0125 -12 -9 ] [.125 -0.0125 12 0 ] [.25 -0.0125 -6 -9 ] [.25 -0.0125 6 0 ] [.375 -0.0125 -12 -9 ] [.375 -0.0125 12 0 ] [.5 -0.0125 -3 -9 ] [.5 -0.0125 3 0 ] [.625 -0.0125 -9 -9 ] [.625 -0.0125 9 0 ] [.75 -0.0125 -3 -9 ] [.75 -0.0125 3 0 ] [.875 -0.0125 -9 -9 ] [.875 -0.0125 9 0 ] [1 -0.0125 -6 -9 ] [1 -0.0125 6 0 ] [ 0 0 -0.125 0 ] [-0.0125 .1 -12 -4.5 ] [-0.0125 .1 0 4.5 ] [-0.0125 .2 -12 -4.5 ] [-0.0125 .2 0 4.5 ] [-0.0125 .3 -6 -4.5 ] [-0.0125 .3 0 4.5 ] [-0.0125 .4 -6 -4.5 ] [-0.0125 .4 0 4.5 ] [-0.0125 .5 -6 -4.5 ] [-0.0125 .5 0 4.5 ] [-0.0125 .6 -6 -4.5 ] [-0.0125 .6 0 4.5 ] [-0.0125 .7 -6 -4.5 ] [-0.0125 .7 0 4.5 ] [-0.0125 .8 -12 -4.5 ] [-0.0125 .8 0 4.5 ] [ 0 0 -0.125 0 ] [ 0 .8 .125 0 ] [ 1 0 .125 0 ] [ 0 0 0 0 ] [ 1 .8 0 0 ] ] MathScale % Start of Graphics 1 setlinecap 1 setlinejoin newpath 0 0 .5 r .25 Mabswid [ ] 0 setdash .125 0 m .125 .8 L s .25 0 m .25 .8 L s .375 0 m .375 .8 L s .5 0 m .5 .8 L s .625 0 m .625 .8 L s .75 0 m .75 .8 L s .875 0 m .875 .8 L s 0 .1 m 1 .1 L s 0 .2 m 1 .2 L s 0 .3 m 1 .3 L s 0 .4 m 1 .4 L s 0 .5 m 1 .5 L s 0 .6 m 1 .6 L s 0 .7 m 1 .7 L s 0 g .125 0 m .125 .00625 L s [(-7.5)] .125 -0.0125 0 1 Mshowa .25 0 m .25 .00625 L s [(-5)] .25 -0.0125 0 1 Mshowa .375 0 m .375 .00625 L s [(-2.5)] .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 [(2.5)] .625 -0.0125 0 1 Mshowa .75 0 m .75 .00625 L s [(5)] .75 -0.0125 0 1 Mshowa .875 0 m .875 .00625 L s [(7.5)] .875 -0.0125 0 1 Mshowa 1 0 m 1 .00625 L s [(10)] 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 .1 m .00625 .1 L s [(-4)] -0.0125 .1 1 0 Mshowa 0 .2 m .00625 .2 L s [(-2)] -0.0125 .2 1 0 Mshowa 0 .3 m .00625 .3 L s [(0)] -0.0125 .3 1 0 Mshowa 0 .4 m .00625 .4 L s [(2)] -0.0125 .4 1 0 Mshowa 0 .5 m .00625 .5 L s [(4)] -0.0125 .5 1 0 Mshowa 0 .6 m .00625 .6 L s [(6)] -0.0125 .6 1 0 Mshowa 0 .7 m .00625 .7 L s [(8)] -0.0125 .7 1 0 Mshowa 0 .8 m .00625 .8 L s [(10)] -0.0125 .8 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 .125 m .00375 .125 L s 0 .15 m .00375 .15 L s 0 .175 m .00375 .175 L s 0 .225 m .00375 .225 L s 0 .25 m .00375 .25 L s 0 .275 m .00375 .275 L s 0 .325 m .00375 .325 L s 0 .35 m .00375 .35 L s 0 .375 m .00375 .375 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 .625 m .00375 .625 L s 0 .65 m .00375 .65 L s 0 .675 m .00375 .675 L s 0 .725 m .00375 .725 L s 0 .75 m .00375 .75 L s 0 .775 m .00375 .775 L s .25 Mabswid 0 0 m 0 .8 L s 0 .79375 m 0 .8 L s .125 .79375 m .125 .8 L s .25 .79375 m .25 .8 L s .375 .79375 m .375 .8 L s .5 .79375 m .5 .8 L s .625 .79375 m .625 .8 L s .75 .79375 m .75 .8 L s .875 .79375 m .875 .8 L s .125 Mabswid .025 .79625 m .025 .8 L s .05 .79625 m .05 .8 L s .075 .79625 m .075 .8 L s .1 .79625 m .1 .8 L s .15 .79625 m .15 .8 L s .175 .79625 m .175 .8 L s .2 .79625 m .2 .8 L s .225 .79625 m .225 .8 L s .275 .79625 m .275 .8 L s .3 .79625 m .3 .8 L s .325 .79625 m .325 .8 L s .35 .79625 m .35 .8 L s .4 .79625 m .4 .8 L s .425 .79625 m .425 .8 L s .45 .79625 m .45 .8 L s .475 .79625 m .475 .8 L s .525 .79625 m .525 .8 L s .55 .79625 m .55 .8 L s .575 .79625 m .575 .8 L s .6 .79625 m .6 .8 L s .65 .79625 m .65 .8 L s .675 .79625 m .675 .8 L s .7 .79625 m .7 .8 L s .725 .79625 m .725 .8 L s .775 .79625 m .775 .8 L s .8 .79625 m .8 .8 L s .825 .79625 m .825 .8 L s .85 .79625 m .85 .8 L s .9 .79625 m .9 .8 L s .925 .79625 m .925 .8 L s .95 .79625 m .95 .8 L s .975 .79625 m .975 .8 L s .25 Mabswid 0 .8 m 1 .8 L s .99375 0 m 1 0 L s .99375 .1 m 1 .1 L s .99375 .2 m 1 .2 L s .99375 .3 m 1 .3 L s .99375 .4 m 1 .4 L s .99375 .5 m 1 .5 L s .99375 .6 m 1 .6 L s .99375 .7 m 1 .7 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 .125 m 1 .125 L s .99625 .15 m 1 .15 L s .99625 .175 m 1 .175 L s .99625 .225 m 1 .225 L s .99625 .25 m 1 .25 L s .99625 .275 m 1 .275 L s .99625 .325 m 1 .325 L s .99625 .35 m 1 .35 L s .99625 .375 m 1 .375 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 .625 m 1 .625 L s .99625 .65 m 1 .65 L s .99625 .675 m 1 .675 L s .99625 .725 m 1 .725 L s .99625 .75 m 1 .75 L s .99625 .775 m 1 .775 L s .25 Mabswid 1 0 m 1 .8 L s 0 .3 m 1 .3 L s .5 0 m .5 .8 L s 0 0 m 1 0 L 1 .8 L 0 .8 L closepath clip newpath .5 Mabswid newpath .5 .3 .06576 0 365.73 arc s newpath .63274 .3 .06697 0 365.73 arc s newpath .81951 .3 .0108 0 365.73 arc s newpath .71207 .3 .01235 0 365.73 arc s newpath .88371 .3 .0534 0 365.73 arc s newpath .76656 .3 .04215 0 365.73 arc s newpath .5 .43274 .06697 0 365.73 arc s newpath .76656 .40718 .09868 0 365.73 arc s newpath .5 .51207 .01235 0 365.73 arc s newpath .76656 .3 .09868 0 365.73 arc s newpath .5 .56656 .04215 0 365.73 arc s newpath .76656 .19282 .09868 0 365.73 arc s newpath .60718 .56656 .09868 0 365.73 arc s newpath .76656 .3 .09868 0 365.73 arc s newpath .5 .56656 .09868 0 365.73 arc s newpath .39282 .56656 .09868 0 365.73 arc s newpath .5 .56656 .09868 0 365.73 arc s newpath .5 .61951 .0108 0 365.73 arc s newpath .5 .68371 .0534 0 365.73 arc s newpath .36726 .3 .06697 0 365.73 arc s newpath .28794 .3 .01235 0 365.73 arc s newpath .23344 .3 .04215 0 365.73 arc s newpath .23344 .19282 .09868 0 365.73 arc s newpath .23344 .3 .09868 0 365.73 arc s newpath .23344 .40718 .09868 0 365.73 arc s newpath .23344 .3 .09868 0 365.73 arc s newpath .18049 .3 .0108 0 365.73 arc s newpath .11629 .3 .0534 0 365.73 arc s .71207 .3 m .71207 .3 .004 0 365.73 arc F .81951 .3 m .81951 .3 .004 0 365.73 arc F .5 .51207 m .5 .51207 .004 0 365.73 arc F .5 .61951 m .5 .61951 .004 0 365.73 arc F .28794 .3 m .28794 .3 .004 0 365.73 arc F .18049 .3 m .18049 .3 .004 0 365.73 arc F .5 .3 m .5 .3 .004 0 365.73 arc F % End of Graphics MathPictureEnd \ \>"], "Graphics", ImageSize->{563, 450.313}, ImageMargins->{{43, 0}, {0, 0}}, ImageRegion->{{0, 1}, {0, 1}},ImageCache->GraphicsData["CompressedBitmap", "\<\ eJztnduOHEdyhkvTc+CZFHUgKR5mSEoUzyJFkRxSi13temEPDCywsC98LSwE 714YNtZzYfiGD+L2szTgF+ED2O8wnoqqyqiu+TInqiu7qnomG5pWM4+Rf0ae IiMi//Dz/p9/+Zef9//yp593/u6vP//bn//yp3/f+dt//eth0OSTLFt7lWWf /M9Olv8+yLLq6+Dwv+Lrdf6VZf8g/5tkH6d72f5MYrK1MuzgYJbt59n2pvKv g2xd0lWfvenHdxy8K8HnsoPZfjb/2c9mRf310j2Fv1lm4R7K33fDo0D1jCbV yGz6sSjuMMuaBE3yHCW5B9kn8x0iJezP5F9b8r2ZHXycZnuHlVdZpntS6ttw 9G5ZYkFpgdGZcJaiGRvZdL8eVWRdoLhjCHzXvslvqiyHPFCBuBYguojL/rHM NttXVjnnwrSL3kPYbq1Kafkhd5yHdK8qyvPW1Cgv07wzFkMkvDOS/7oioYaO GxV70zXIUnLf3zeoyz8Fs2664eD+itLPlCNhbjTuz773ljRxJeVRVVhWdnz+ 96INFYdtms0OPFQ4JLgzKpDLQmqcd6Skdxz8IzCipwQ3Clr3yh9LzpbB4HAq WnSmFe80B1Q+SwkvbUGWt9WA2qvCXPKMh3SwOD9V9pa9dZPPYTUljpMAmWt1 AEtq56blGrXWLvesHB4OrBaxetWHPNyuEA8luws1qz53ltW65axBZRGcHdk1 jCXgsyIgK7c3N/OvrVpUPq/kkY258riw8wOlS3WMq44x0dJHHRtp6KQ6Th4t Aw+dn0YeZiL9Q4ew5ZWXSE+kJ9IT6Yn0k0u6xIyJ4F87qgJHzTERfIKZI5Ge SE+kJ9IT6Yn0RPopJj3tEhNzJNIT6Yn0RHoiPZGeSF8a6WmrlZgjkZ5IT6Qn 0hPpkUkXxcaNPNVmD41Yd7W9XU5znuXfZ/JUG+7Xbzs04jdQ3nftSK9UbFXz VtSGt4wUPHSQfdaIzT/r+devOjTwvSs+K5Vvy8irLuJxu/aeLaOOaqgfT82D /HstT3Xdxz0S+95IEtWx60ohjv/SxT5s1+yisFLzP6t/tLult37JS5Qi7rtf /ym1TMoMH+TvPyCd5JVSyp1nFjZayKPkd9104niI7joQbkPsWRf7ukM3vHKl nIfYmy72frtuqHTQi244hH7aquV38m9Jtg2x5x1Vrzq0/IWr4yLE3nZ13G3X 8qqJlUp9Pvaszb7lKr0HsRdd7MsOzX7uSrkCsdsuloCPsDLchHTU2MuOEOs8 712HGumo2eGRFqHZX0E6GlKfQrqnHQB4Cuk+hXT3Id1XxnpbQnHdYf0AYq+6 2C7NfuxK+Rxiv3axS2riNUhHjf0c0j3q0OxHkI4AeADprhnrbQnFl5DuW0j3 BaSzLv3e/Voj3ReQ7ltI96Wx3pZQWJtohcwKhbWJVsgiQGFlfOtAskJhZXzr QIoARXjCC0+W1maHJ7zwZBmhidZFzbpIWpttXdSsi+RxUEgMEXIFMj6DdNbN kRWAe5DuJqSzbpMWlrhfhnTPewDgLqS71QGACIPhEqSjLe4tSGc9ilC9O5CO NrvPId1lY70tobgI6V5AutuQbsdIEtW7DenuQLrvIN0lY71LguIOpNs2ktQF iheQjo7NEaC4AOnowGsl3QqFFdqXkO6Csd6WUJAV4veQLjYU1gE3Qiis01xs KL6HdCRRiwAF2aGSICw2FNYVaYRQWPcBsaF4BenOGettCcVZSPdDD1BYt2w9 QkHiVpKRW7fHViis55cfIN1ZY70toaAbnzeQrov8j+q9Aem+hnSvId0ZY72m o5cVgK8h3Q0jIV0AeAPptiDdwkevkwJAhMGwCenoAvwbSEcXoVYorkO6byDd W0gXVgdIUHSHYgPS7UK62FBYZZsjhKLL/UEXKHYh3Yax3gTFolCsQ7p3kC42 FNZ7kARFgmIloOhy19gFineQbt1Yb4JiUSgmkI4U5rpcu1K91mvm95BuYqw3 QYFQSMyYALDes1sBWPgUelIAWOHBMEIo1iDdj5CuizpGgiJBkaBYEhQ/Qro1 Y70JigRFgiJB0QIKZ9zDTwBZzZtOAVIVFPXXeuiG+JTC44x0aq/xSJgYdf1e ipmUrFWYgf0zhP2TMYzy/i7/bmFCpn+1d28W68sn+fdlCZq3NXwMiZfdofnn Uv5FSrgtd1Vuegg/TrMIZiLFFDPMy+4XHdBiw0X1kuysJVKVeR4+Q7MYQqJB IEFflIXXc1RxdMsc+1CrlBAqnwVp6fHMv5N/yzAPG9mSlkpsyNT+LWyMS7T0 CNlt13ekm7LpYrd7gExNVElf5XqQlh4hUwvesA0x6TnGFr0qLWFbY6KlR8io 7zSHGh+T5ltsyJSWsJEy0dIjZDRDaI6LrhF0u93l2ocgU1q8Bs5eWnq8FfvM kUlaUVdcrLeJC0JGN2VKy1XIcS9IS4+QXYUwAo/SUVhsGMP1fgCaw3l7hJZM 9Egvi+og67bYN/xEX9MRyzzNYfp61ARQTwZ09fi5i+0DRqWFeP9BkJYeISMb OaulNFlSxYaR6LNaVBN9i0ArMUQwaa6RTZXV3pryxtZws9ZBIifKS4AufHdN gJI5EjloIn1XyhsbUKqDjpkk8qG8Sxr8pIZMYsonkJcUzClvbHVlqoMU5Z8Y 8/ao4U3yHashPuWNDS3VYTXYp7w9QkvCRauJP5UnS4wIRolgmcsu5iG0UhMt VrP/cNuiwkhk0lxrdRRApMtcJkEkcpAIMUH6NP8ldlkik6frBL0fCC/hGmb1 NDAw5rQDs3okoLxnHeZkLD9xMD536bxjdzKfjsbzBRdLxqBEn9XrAeVdxDbN 0C0EAAnZrd4RSEYjXS+7e/JtQozxyOWgLYHKDtWBDFkxXobYcCutvhiolSPs oDtlhfV0UnnF+QIOnWY19oHjcpp8dJYjbXvqFDpP0zRk7Z4XgTYuyfa7aNb6 XLqMXUJuN4p0yDeqoT445/pA5WC06F6CdOQLQf09bXEDyI686WjBV3gEWLW9 ZD2+42I33S86+dKhTKXVJOwiTDUHrSSfAy0kfv4+2B8tIRNrPPE/nM1fntMU afXKQCsNoaoeQGktJlQ/DeYgVEneQRNtK88PZ/MQ0psMIC3sp9uDTffLwJwT 94tOZuSNio4jRBWFXXO10cpKx/M1I8PqYGwkEY6X6ZYs6I/IiV66XzQElJqN kh3rhWX2OZVWC+oAvd0gcOi2lcLoNoI6QH3oVcDMt8484245FOl8oIuwehYO SJq+c1SRdy29/idM2+085rvz4Mh80FibDAxPyFt7jS5ESN4QY+cxcR1B8itd scm7VWBmeuYyErvpwYWmdf8OnruJDitEE23oaCqnrgt3e6ObdH5dcNe+1mht +aGNe9hvoqmvnjiaqUV6JqLzu/8QzOxGLEviq/aXaI0+bfAeDTit7QZwl6cL Y5+MdffRstdILO3tv6O8RPTJQiubCJIikDxpLdDVJE6j2Y5uimirQWF00iP9 khsBOqmXaeafOHTocrqJZ/6hU6XqEZDwO9DfD11G2vZaD6YUJiy97rrdK927 GQCR2Im2NTS3UidSZ9NtBh0pCB8qbxJoT3OYF4wyBxGdUnSbSECTwDJsf2vi DKuhOPEIMb93jtZjJu23vwrASVXTzQihQedkYgUKI3kn3SP62WMxaEjgSHmp Dq96qaHbA1xidTJBXUWjm5qjpzwV4Vg3rlQHsQhBQd1M9VIYSVytLNIel0ah KvjtAhNxTNhJjoljrN6caF9oXY9UQPV52bz6jJvx6ZcKogqpG6k8knPSbofC 6FKAQKJ624NEy7LuILtgRae/sCeypfMQQUvNobNZk5vKvxqnHV8u1W9lKcpL 4sU+WIoWGcKMmEu3q4RaePlaOnNZ/TGGz2Lh5tChk04Y1rzea8cFlyCCmxiN wqy7Mlpyu+BHWve08+uCH7Fc2N+mieWsTmC9l/6G5ugVhtfqqZGDjtDhm98w oxFQYTWBMKPR7E4D1cpoRIuiZt1Ad0FtRdhLZeR0irIuxGrPY9WYszJVWEga ZjTKS1hZmWojiJV1j61YEZLUR8RKYTfZzEoSY/XXTQxEpyhrI4iVrJqr1nQk 02h/LbI8purSNmIvq2Yt9SXJxchWhvafO46bAndzVh/5VkazKozSskHpVN+B xjpR0Ad7UV4anlb2opaHw8LzsaJGpXRhKpqYAguhlb1ovHqnbwkiRrMylS6n xEB9MFVIUY6upmhbTd2o9/ZWTVvvHtGrx2hln/DLISb22YEwgsfKPqrIaV0g qrfUGx3lVRWlWumceRPKzTLEZ5uTdmETVbaxKpZ+FcCBBgxdBtF5cYRMcp7x pmmLuCNjxdWlMYaG5R9STbByRZPEeR4P80LG2+0VYQOvprFXMUVnEjp+DtjZ JN/z8mNjGmsQtubjZWuvhl8UM/Vqs9n5HzXb2qvSbLn99wplNn29atVSaO6b 8g/tm2J3qYTJnoIW+i9d2yhvWIgymi4lMr3GMF4ti6YWKJDujbUywS1XSh9d L+2d+GhW5UDap+m1lNX818os4XcmozILbbxJ+XktCJTqGl9xo4UOEKp0raxk ZVdSXFses1wq2aMeNkexl3YrFoLAug/RlWaVYzGSwXEl0+iqHho1NcnrkRWf rkjaM4p1C2RhlPLT7PH8U/fPVH0uFV9YRljDm6AfIYeoIr9q0rpOz7xQNxen /NM8VI+IARqmGOSJSymQ048UQgq6S+pD69vF3j5shBGDE08oKNSlq9h9eoSx ahG07L4Wrjdj9yrVYRme8z1t7VXrprj7/Hz8zpdOc9rnlINaGa33N7Lp/tRF TfcK/8y0j+jOAkd2ORJg1f4naBob585MccdRRUf8Lqygu7DwNVKDKby7Yypl SYzifBnn/ov3lFlm+3vZ9GPhy1hmWfm6mX9t2XMun8u8eHm5bM3liM1bEkRL S2fekqDwAXGEvOUmoT3hiKzmI3tJk1CHdUilcWn1idPx64WD9Kz47LMzeSql 1amg846yfZ+fqn3ksg/7+afJGPlH6hUJCKl1rNjJjij1du66a3kT+/xDDN7j CTBm1xfpsrr9NGUTtMQVxob7da6ks54uxE0R+UBiu0gAM69LlvPelh4nQ1xh 2U57QTENkA+uq73S0DWHKZExvLSYrhaE0i3X114gsnkJ6FUXEb6RWBGhcav7 Rc9YCT9+YVVPGOcF1MVAu8MPbXjl6gsyxVgvnQUb72MeEruyl85CvfdxEK8n yR671Lp/StohSuL4tUO69KpXP9C7C/TrB8KGkopfIeXAImj+fuscFMpKsBkr R66INhh1U9h9jp0zDgKiECt7hDw0EEzLUjZWF3WEiV+L1IcJKRv3yDJdTCEI HtLA7qK1rnpJBNQYtdatPh68hh/edFoH6a8rUjQIl6m/LjGxjbes1np0vrBa llAdJ9m6xupDn9jL6s196cZbsRlND6PWRzU25nN4TY6sxqVjtwNstNfAQNfm c3jNb60mpRGMspZinWzYy1CHe03ADXX0YQZPYVYnaa0slg34ETtY34WigbBM K+Yls5xV2ZaWqz48L5DNL3XzmDwvEAa0XK2IDwarVxmry6IuXmX0jENXpKvo S8bqLKmLLxk1TOiC2gg9YrXy7iQAfFGWVS9ZSMv4qdLYfrDG5FotjJT3IfRG Dgob2A+W1bWj12iJmEA9ytVcQ887VJtLQBhQ4dYepNWbNhTL4Ry+kJrz41gg 8MHLFF+4xLRo9ujHsQ//sDdcY+v+3qtPDNew4/P7GXB7vaAP1B7dwZKPYdqB dHEsrTfJTc+4DJ11uojtJbgPJ9LVp72P4LAHzzAqLT1J09uxpEji0QGiOW07 /xYjr8aU6VX1beFOvos38e7u5In2I5jQZarAse1lpiNlkB95upCl7ov2goCm 83V127cgaLajg1aXRwNo+SStLf+rEPZ3LKxPQzTb7etiXT/oMdcID3q0e3xl C4Go/k8XXp0f8WiEWV+49zzn0cc7ikRiy96jd0CuQFUqUs7mr9uJ1raPLrZ6 U8frfJrmZyrF++CR92Thf+Zo08emjXu9+nR8UF6ZUM8HekpfXaX3qZp2Ky2e DNM+OW6I+X1fxwsL9w6Nqm3IQa+FkfcJzaGvhdGjeS0ecCvIzOxv47V/pK3L 23jhqU5ruz5PX0NFU9Pp23g61ZN0Q5XNXjnoApeGAplsXfRCKvYTg7SxCr/Z qIwY+2FBgedy/uvtMezXiPoJirU+GUpHoPAzl+2fDO38zKUBvJV7eXUbwohD 9fymtRF4tPTpNfkg4PX0GjCdpu+6thGmdOyiq2lSKdUHCjweUgZ+K3ipr2Ib Fmqd5Elq6HVjqDm8yrw6B1sf6hjJq9jW66YuL8mrbj5t3dUb7SOXjmSZ6ijl sfsV3sFan2UY4fvxXoe7jTC/mIGqnw9TPW2yXlRfCM3naaHkyXy68AY2rNHV XoQQvnteerdQ9c8hL93NkEBZpqENx7/ySzZdsv16k//anI8l+Q9RRWcmOmBb tUYjAGr1dP4M8lovu2TSqZ5grxfwxiHovfgTpHdrlVcfiaBNJlFA4loCPqxT unTgab58CnnpBseqSitbVa/yPpXyGkqhEyblJe0okkBZFVkjAE+sRlA8gbx0 IrQ+QEESgUYpMtvTDphOjkQznWzpZVfrow9Lgls3dQSy3mvTVpxuRelp9vCG nnZT4QdUCNpHQUppET4OUImxwkiVPoS8Vu1KgpbW+/BJ1AotUUDnY7o1tML9 a4dpQJREcNN2iJr9LeSlwzbtEAjupw5Gq/yEFmbqcKKebhPp5j68v4k6XVi9 Kj2AvCQupmYT8DRLhmV9VuCtHjPoREzU9wg83R99A3nbX63RHGq9n3kMpXS5 oCP9NqK+R+D1spXgVh4kjrfOoQS36qpaQVZKCdr7QUpJLXtJgFL1JPbUJ5Cp sQRtWJ8tHEarB6Uj6kmSczdI/ZLgJqGM+sUgkMOLYfvliRob1lQML9ZKPYG8 Y6yNLrmWBLfexe1ADvWCQOdGAjmswhsHZKWZLizuBGnuEVqpXoK8HjIklmR+ BO3XwYaF1a+1FJoQVNWTLg9uBintEVC9ISShjN4RbxsBDdtkaVjYFicM7W0H HmlG3QjS3CO0245Mr48miSXzb4I2bJgbhvs+lEfQ7jjwvK+9eGluCa3zszvb z+Y/4kmVZH+EPN0lSWvDjtRol0nHACvoYQvaMOiSrlBN8rk7I7uzlnhXgBZ+ 0wtvtSR4soL80BF33v0irVFCNewVIxxGd7aEKtFHSrAtYaxEoxXb7s9Kcamw 1e+lmEnJyB/k71n+fT7/93cQ+xbCbkPYLQjbDdb2HGL/Jv8WSksJzFmHwSyb zWqz/oJc8SOks2qO01bOastq5YpHkO5HSEceZi2TWe4Z2DkNd26hh0KUVkCr lwPau/aIaIt3HhKSUfYwQ0FmdY9+CiCz+h5NkLWGLAxjgixBFoLM6lYyQdYa svCurz1k7yHdkk79CbKlQWY1QT4FkJFs6T2ks0JmdUGYIDsxkEnMmICyukUN 2623B2phDZTTBlSPg9DqgmQoyN5Buh7vyt9BuqEgs96aJ8hOAmRW11FDQbYL 6XrUCkqQJcjiQkZaxbuQbijIrAompwAy605/hJCRqctbSGd1RhkbMqvWDVne 92gd1AWy2FKLFYbM6lF3KMjeQLpFjP8khoCiu+E3kG4ooKyaWlagFj6CW4Gy ugWPLdO3AvUa0i3JbNpqP2iFLPbNkVVVbYSQWZ/JGAqyHyAdqUtGgIy0yMgF i3WbGfsW3Kqb9wrS0fNkESAja1GyNLVCZoXHCplVxWqEkFnXNStkVo0eK2Tk r2xJzkzIs8T3kG4oyKzpeoSMjMFfQjrrdB2GlgZ1mHusA7jpxWi+bVEhsxp0 W0mPDZm1q15AOvIE0yNklgGSf8QVCtnHyh2HxJIgQuyprkjQvOI5dYHVKxDZ D0WAjKzUrN5+hHRRAL/iflF5l12s17GNxJIp6wWogzjP6sWHvIZGgJFMmK3e edRWKPywiveV2okvVl+HpZGhsYXMdv6hiapWml6sHn7IsDAC2FYHAV4rHgny vtAlsbQtUr9uXgcca8fnJeHCxNVL48zq12cRuCWGQA57VdZ0Xis0aSydJjVW QVHvbFTvZRfr9SfktbXbhNgMqP8ArdR05Oh0YYkLrShWPzzXgEMbHD9R4PlJ Fa/D4cYkpLHaPTTPqsu88OsPmiPshyLqZGH1rUCCSzWRpg2LWu9uOQC8du2S zm0HMm2J16BZnfKEn1L4AM3SdOSvIAKqVk0rr8F7YxrVHDvzjDjxAaBTddg/ rk7LYdvuD9CORh/Gh9GqKxNmK5qc7s3DQ13gLU+BJzlre+cRVuWtCIBab5+9 XlikYTRomoLJ/KPOha1eXdQRdmMuIFkjLYU08Np7kIiKuXoyI6QV1TBGmuNu SUQ9XQUV3UuHHRiRvgRpS9MR1+vpv9EezfGNi6VlLwLY1tsQIl27gjhh28Xq uqQMbnXUpQyuGy+ClmgJ7wWsF3URQLZeBuhbBF4HK7RnaKSz+kamQweFEXfT 9QtJHrwLg2E/fM+hQefDCN2iu1uvvx0vR9FCT2KgLg8Y61bD+og77aa9a70E eX31NA7rUYHXnS5tVNXzDu2wrKotJFQX4OUME5Zu0KpAOazKV7rvD3vtITQC cFdnMrW93sumH81W7DuQjhgo/LReePKkMzLJjugcTkNHz+bUShpEdIa3vjJG lxfWy5BAvzlnDrP93FZe/mXtNHVW5vWs5D3jkXCCliZaBKSDNn2DQwaWOv82 rOtEi1c+4Z35GowmLaeFNdAZziWEuIGof3QwyZTxS15iKS+ufn0ltUzKDIXv jjcQ9imE5c4/Cg8gF405qORrjpYd90sorXsPqZw05L5QckcoJeNZnTQ8dNjS FkR3aLQZsQ4/WjpUYtF8mLH80HinjaV1ZtINAan0h908Blisgr9gsUO2mraC /7EbXFfcINyGvNbViPZkNNfSa5gVArQm0L7OulrfhjaSdPjY1XBS+HbJxAsJ zkYEsdxQ0Q0bKXZYN1mEvXVvbt1zd9ma1lctHVFZhroHEXZ9FEZ8TJtOaidN I9b3r62vvXslhbSHa6TbhnRhXKJCayWJpgNaib2PTXi3zBRmdaa5woB63Uw2 wrySJJlyKZYApZLbu/kZBFDrVprqsD7iFAaUwmh5au8GbRBArao2VAdxN71l fRAY8OFXqmiz9wHoDO9oeoTTqpBKW04abtaFyLohoDpOGLR0ZUHNIXisMFI6 GtwkRLaql68wtH4Y+UqFtlFUrlfkOy44W8nuvemacNpfpKclimAiOK32IovA KTFDgSigyCGRDlSUg+TcXeBZWFmHwqyXcCSYo2ssWbFp3K77uIxKiQ3ZkgZo F/D0etX7cqUE0e03KZu0v1McNTz3HQDel+YEvPAjPKOGx2pfSqJGvaCksWY9 EUsBZJFMd0VWy+UVQdC637BjeXDkFmDlALX6IqB7NALUKkmwpqO98SmAdtvx Fk2GVukC7Y63jYBanWOsCKAkGegCLS3hVMeKQGtVPbRCa9VEoTDKS3WQWnN7 zcFRQ0uCR1LFsUIbVuNZOWitGsikTkMcZYWWDjV0SXlKoaVmezWkDNBa6yBb 1hMGLQndKd2qQysxQwFKMzGBR2GUN9xpH4BmTRc2NdCwqCKiBOgoBz8J2+mg m6ANQktLETU7NrThZfHEQktca9X8pzDqlrBOdoK2JLYeJoRnbLKc4ExwJjiX AKfV8jjBmeBMcK44nGnuTHD2AKfEjA/E48OG2sgPIipJh84E7epBmwR8CdqT C22Xi5Mu0KY7qSC0Y72TGgDadJMaDEuqFaOENrZCUII2CK1VjY2gVRcn2xC7 IsprnRUtG2Fe9XxD2AhVLrfcP+pOR8ThiNkTTGzYd4zQnQDYnR8UiZ5ls1k3 2LuowBPsVk1srw2uTB9kJdajnnbTsU7l6Sj3VnUIvjrW+W8pcVIOAr+rm7v5 t7RsHWI3jGFrEHbPSMF/5d/kWGe6t5/tOSdcU6vbkdi8dN/1fTbvDdTrJ98j WCVDnR4Neipycz9Fh3DKv2i3YsW0s32dYOq1gZIgGkU9QnbUF1zmRtkAqH3j cKFlQB2CrrBhXXeb1iOOFcT7Dh0S+7BoHS1MQJL38Y9TChQt9eprl2WTGfvw sNqWj9BUf4yeD2h7d8IcSVjdn1g9Z1t9dFAdK+L+pE9HPdbz2go76ontSGqd 4WzlRorKJThpghjYjZQVTlJOIs4OwanHVZo9V9gXV2xvcRsMoneIE5xj8BUn MbFBtPowpC1jaEWnQ2cfHgyj6sNYe9PqY/NMADCvQNtQ7or41bTONVaXsHKV UghtNhyOdUzphjCW39cB8LPuH1q5Lr6Qh9ClVBenxLQj6xEo65HA6k5bVoR1 5TNYpIUNadLr4lWbzgw9wmg96tN6QSdFFV4RUCoQpLWGyiMYrbKAEcJofVCA eJAA1ScNKEeXpwVIltkjoFaRpvUJDX1ljRYMq4pKlyc06JqiR0DDb2XdcrH6 rIDOecShFyCdhnl3UBJL2kQ9QmFVsYj9fJS+mURHki6PRg0MqFX1cttb/fGA 0lzmfRKNlp1G2DbQZ7Un6hFa6/OYtO+2qivRukthVgestIW2PgzbI7RSvQxH AjTGu4gUpk74qCus7yLSA8Y9QvfUNcIrrZ/4gKJ6KSz8Lqo+BkgPvy8ChcRY AbA+du99x9Q7pJth/MJMdvx7prQCWbGKKmH5DvKSps1de3vpgN9cF31Q0xDT twRfDjuwXjjgvW9gS6x6lw2/+awHLpqUda/3athmv3KEkD2Sbk6bR6D805jB G7PvBLhHdUhpf6VHqtfDgvLa0X8GYm+4WK8SeGOCbuybvBtRBYAET8pRb4eF Z3eeyRux+kwynQY3XCNolrw4P8waseddLB2k9DD0flh4pPqNOe4vIj9zEdT2 My6W2Coce9HFNjdUBasdfn41LCi/cRRKL4qPfCrvkksXfs+RELwKdfx22Gb/ VLJmPezw7/w8Eze2Y+fnO1Jjr7lYegewHU1Laup8WFiFNxzWXmozSBPD4rJT 1cQ4wszUxFoTJWYVGxb1HDOmhvXIlOGrjdTE1MTUxNTE1MS0aKQmDtzE+kv2 1afFU+or3PJN949Ztr8/c9HT/an5mfPYze/xrOUsLfenZZTAIC0Xucv/SUmT kicKe80bEHYdwv43/ya7ziWz2QiP7XNstlfDei8+m1mbb7Vqj8hmDTPK2C0P 27cP0vLYi4e1iVbXG6mJQzQxrEh0qpoYRytpkCaGtZdORBPDWkThsPYKUIM0 8TGUZ1U1aa+INEgTn0B5VrWj9gpDgzTxKZRnVU972qHeHpv4DMqzKjc+61Dv cU2UmC4NC+tEhcPaK3Fp2NKF/KLAtJaX5tUWkNj2ukODMOBLRzCpRpB6/Io0 7BWUR3oKZx3D/LAaDfvB9Rg1Z8vFttfIGaQ5bxzBXk+AEvRuNZojikiX89La a7cMQjBVFbu8RHoiPZG+UqR33gDGJnjpG7vEHIn0RHoiPZGeSE+kJ9IT6WmX ODzCifREeiI9kZ5IPyWkjzOscreXy+jr77Dkn+Itljz+43RvTYIm7gmL/I8M Z+nugsLIGVMf6VId46pjTLT0UUc54CovO/nzHtWQqrywqn7vgbyqMjtgj1Sp y1Idq0pL70Ntc26oFX+i0l2NxNm+rneysIlDA/m6mX9tLVzaQVHa4V+hSFiZ 1MvYLoqZlARP96ps+WJcDH3N/mgu+0Gpme+yHwZ/nGaV0vb+7EBzFrpvtaJe l0V98v/Qdx4e\ \>"],ImageRangeCache->{{{0, 562}, {449.313, 0}} -> {-10.7145, -6.58566, \ 0.037287, 0.037287}}], 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: .5 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.05 0.25 0.05 [ [.125 -0.0125 -12 -9 ] [.125 -0.0125 12 0 ] [.25 -0.0125 -6 -9 ] [.25 -0.0125 6 0 ] [.375 -0.0125 -12 -9 ] [.375 -0.0125 12 0 ] [.5 -0.0125 -3 -9 ] [.5 -0.0125 3 0 ] [.625 -0.0125 -9 -9 ] [.625 -0.0125 9 0 ] [.75 -0.0125 -3 -9 ] [.75 -0.0125 3 0 ] [.875 -0.0125 -9 -9 ] [.875 -0.0125 9 0 ] [1 -0.0125 -6 -9 ] [1 -0.0125 6 0 ] [ 0 0 -0.125 0 ] [-0.0125 .05 -12 -4.5 ] [-0.0125 .05 0 4.5 ] [-0.0125 .15 -12 -4.5 ] [-0.0125 .15 0 4.5 ] [-0.0125 .25 -6 -4.5 ] [-0.0125 .25 0 4.5 ] [-0.0125 .35 -6 -4.5 ] [-0.0125 .35 0 4.5 ] [-0.0125 .45 -6 -4.5 ] [-0.0125 .45 0 4.5 ] [ 0 0 -0.125 0 ] [ 0 .5 .125 0 ] [ 1 0 .125 0 ] [ 0 0 0 0 ] [ 1 .5 0 0 ] ] MathScale % Start of Graphics 1 setlinecap 1 setlinejoin newpath 0 0 .5 r .25 Mabswid [ ] 0 setdash .125 0 m .125 .5 L s .25 0 m .25 .5 L s .375 0 m .375 .5 L s .5 0 m .5 .5 L s .625 0 m .625 .5 L s .75 0 m .75 .5 L s .875 0 m .875 .5 L s 0 .05 m 1 .05 L s 0 .15 m 1 .15 L s 0 .25 m 1 .25 L s 0 .35 m 1 .35 L s 0 .45 m 1 .45 L s 0 g .125 0 m .125 .00625 L s [(-7.5)] .125 -0.0125 0 1 Mshowa .25 0 m .25 .00625 L s [(-5)] .25 -0.0125 0 1 Mshowa .375 0 m .375 .00625 L s [(-2.5)] .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 [(2.5)] .625 -0.0125 0 1 Mshowa .75 0 m .75 .00625 L s [(5)] .75 -0.0125 0 1 Mshowa .875 0 m .875 .00625 L s [(7.5)] .875 -0.0125 0 1 Mshowa 1 0 m 1 .00625 L s [(10)] 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 .05 m .00625 .05 L s [(-4)] -0.0125 .05 1 0 Mshowa 0 .15 m .00625 .15 L s [(-2)] -0.0125 .15 1 0 Mshowa 0 .25 m .00625 .25 L s [(0)] -0.0125 .25 1 0 Mshowa 0 .35 m .00625 .35 L s [(2)] -0.0125 .35 1 0 Mshowa 0 .45 m .00625 .45 L s [(4)] -0.0125 .45 1 0 Mshowa .125 Mabswid 0 .075 m .00375 .075 L s 0 .1 m .00375 .1 L s 0 .125 m .00375 .125 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 .375 m .00375 .375 L s 0 .4 m .00375 .4 L s 0 .425 m .00375 .425 L s 0 .025 m .00375 .025 L s 0 .475 m .00375 .475 L s .25 Mabswid 0 0 m 0 .5 L s 0 .49375 m 0 .5 L s .125 .49375 m .125 .5 L s .25 .49375 m .25 .5 L s .375 .49375 m .375 .5 L s .5 .49375 m .5 .5 L s .625 .49375 m .625 .5 L s .75 .49375 m .75 .5 L s .875 .49375 m .875 .5 L s .125 Mabswid .025 .49625 m .025 .5 L s .05 .49625 m .05 .5 L s .075 .49625 m .075 .5 L s .1 .49625 m .1 .5 L s .15 .49625 m .15 .5 L s .175 .49625 m .175 .5 L s .2 .49625 m .2 .5 L s .225 .49625 m .225 .5 L s .275 .49625 m .275 .5 L s .3 .49625 m .3 .5 L s .325 .49625 m .325 .5 L s .35 .49625 m .35 .5 L s .4 .49625 m .4 .5 L s .425 .49625 m .425 .5 L s .45 .49625 m .45 .5 L s .475 .49625 m .475 .5 L s .525 .49625 m .525 .5 L s .55 .49625 m .55 .5 L s .575 .49625 m .575 .5 L s .6 .49625 m .6 .5 L s .65 .49625 m .65 .5 L s .675 .49625 m .675 .5 L s .7 .49625 m .7 .5 L s .725 .49625 m .725 .5 L s .775 .49625 m .775 .5 L s .8 .49625 m .8 .5 L s .825 .49625 m .825 .5 L s .85 .49625 m .85 .5 L s .9 .49625 m .9 .5 L s .925 .49625 m .925 .5 L s .95 .49625 m .95 .5 L s .975 .49625 m .975 .5 L s .25 Mabswid 0 .5 m 1 .5 L s .99375 .05 m 1 .05 L s .99375 .15 m 1 .15 L s .99375 .25 m 1 .25 L s .99375 .35 m 1 .35 L s .99375 .45 m 1 .45 L s .125 Mabswid .99625 .075 m 1 .075 L s .99625 .1 m 1 .1 L s .99625 .125 m 1 .125 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 .375 m 1 .375 L s .99625 .4 m 1 .4 L s .99625 .425 m 1 .425 L s .99625 .025 m 1 .025 L s .99625 .475 m 1 .475 L s .25 Mabswid 1 0 m 1 .5 L s 0 .25 m 1 .25 L s .5 0 m .5 .5 L s 0 0 m 1 0 L 1 .5 L 0 .5 L closepath clip newpath .5 Mabswid newpath .5 .25 .06576 0 365.73 arc s newpath .63274 .25 .06697 0 365.73 arc s newpath .71207 .25 .01235 0 365.73 arc s newpath .76656 .25 .04215 0 365.73 arc s newpath .76656 .25 .09868 0 365.73 arc s newpath .76656 .35718 .09868 0 365.73 arc s newpath .76656 .25 .09868 0 365.73 arc s newpath .76656 .14282 .09868 0 365.73 arc s newpath .81951 .25 .0108 0 365.73 arc s newpath .88371 .25 .0534 0 365.73 arc s newpath .5 .25 .06697 0 365.73 arc s newpath .5 .25 .01235 0 365.73 arc s newpath .5 .25 .04215 0 365.73 arc s newpath .60718 .25 .09868 0 365.73 arc s newpath .5 .35718 .09868 0 365.73 arc s newpath .39282 .25 .09868 0 365.73 arc s newpath .5 .14282 .09868 0 365.73 arc s newpath .5 .25 .0108 0 365.73 arc s newpath .5 .25 .0534 0 365.73 arc s newpath .36726 .25 .06697 0 365.73 arc s newpath .28794 .25 .01235 0 365.73 arc s newpath .23344 .25 .04215 0 365.73 arc s newpath .23344 .25 .09868 0 365.73 arc s newpath .23344 .14282 .09868 0 365.73 arc s newpath .23344 .25 .09868 0 365.73 arc s newpath .23344 .35718 .09868 0 365.73 arc s newpath .18049 .25 .0108 0 365.73 arc s newpath .11629 .25 .0534 0 365.73 arc s .71207 .25 m .71207 .25 .004 0 365.73 arc F .81951 .25 m .81951 .25 .004 0 365.73 arc F .28794 .25 m .28794 .25 .004 0 365.73 arc F .18049 .25 m .18049 .25 .004 0 365.73 arc F .5 .25 m .5 .25 .004 0 365.73 arc F % End of Graphics MathPictureEnd \ \>"], "Graphics", ImageSize->{566, 283}, ImageMargins->{{43, 0}, {0, 0}}, ImageRegion->{{0, 1}, {0, 1}},ImageCache->GraphicsData["CompressedBitmap", "\<\ eJztndty3EaShmE2SUk8SKTOsiyTliXbOllnidJOeOyIiV3ezNXG7r1jdrwz G7GxG7O854vwXfgoehQuUQ1UAtVfZie6AbBpATHqoVEHZP2ZVZWVlZX1518P /vbX//714O9/+XX3X/7x6//+7e9/+b/df/6ff5y+Gn2RZUvvsuyLu7tZ/vdJ lpU/J6f/G//s5T9Z9m/h/0bZp6P97OA4pGRLxbuTk+PsIC+2fxT+6yRbDvnK Z//o0571ei07OT7I6s9Bdjz+frV2pfK3XVb+wXo9Mx5jki9KVknMjj6Nqzst shRejfISBbl5XTWGhBoOjsN/XQi/q9nJp6Ns//TjZZGj/VDrOzt5r6hxTOkY o4t2kTfhP1ayo4Nq0rjoDNW99xHYuMmjIAMliEsG0StjcP+9KHZ8IKKyFt8J iz7Au73KJ0PLT6VjHfK9KinPW1OhvMjzwVnNR4OEaeS/LUmooBN7xf7REhQp pO/PCXX5MxbW1dgd4r9x7ReL8rXeeHD8Uq1pFGvKk8p3WcH4/N+LJlSctun4 +ESh4o3NjBLkopKK5E3U9IFff6yQWkKt1BB7QWOu/Gsh2aEzRJzGLbroFN8P 2KHyUSrI0gUo8q7sUPvlu5g94y5tVqdLtL9l7+Pgc/qZAseRQeZKFcCC2tqw XKF2gmF7/FqZORQJLCex6qdPZbhZJYrwvZ+pWdWxs/hsnM4SKlfH8E1oDYvy 4ub4RVaoN7fzn7VKUj6u5InJWFl9t+7Mt0hlF4mWoezvh28Xh64zlF3MsotE S8Ou8zO8+2PL+eYp6yL9EKo9dOaz62v+jYH0gfSB9IH0gfTPgfSQskgE/xSp Mpaai0Tw71g4BtIH0gfSB9IH0j870p/lv9fzXL9A6ruYuqeRFFKfNyNuvPSv mu3DnsMFJ82P89+Q7WqSmj9hi+snKPY6FrukkRZevYWyf4ip2aj40jhxOyY8 bYbBRpE0ueU1HYCH+e9KnusGpC7F1A+Q+mNM3YCvrcfUF1D2fUxdhtRrMfX7 ZlCM2VFsL2bVR8RiOf/Pv+Y1Bv4+iH/9Fv/aDt8bFUUPw78tyCdl/yP/K1Bc 6KCjClPKJ90yzZPC39WN2+k8242C8hWkBgiWNOl7FMteg69djWVJBF/FsuuQ +mUs+20znq0VXXjMs1M+HTVC4+v43R1IXY+pryH1+5hKg9z1mPoYyr6IqZch 9auY+k0zNEpoy42/vEN7obgH+QiUzUjcS0j9DmoheG7GWn6AWp5DCQLKZl8L 09JXkG8X8l2BfD9CvoeQ7xa8uw3vHkJ9P0K+K5BvF/JR/28BMrsrb8VUgufb mPolfO1OTCUonsbUdDbO/30TUztq9h3IRwBchXxPIN99yEeg3IV396G+J5CP gPoW8t2BfC1ARkL+APLRZEOD6jeQj+ChTk0D7WPIdw3yPYB8tyFfC5DJsEm6 jT3n7MTUr+Fr92IqQfFDTL0JqQ9jakfNvgH5CACqj/IRAPRux8x3CN+gWc/O R6pzC5Bdh3w01dLs8x3ks9UDmh0zKHsI36CZ8BBoTnSr9iGjceYR5PNOzrby QGOPPTmT8kAd7hHko3GrBchoNqOxh2ZHGuppuCZ4aHa8C/XR0EyzGQ31NDtO gyykEFCi9zyDVNGZCJQ7kJooGSGVALgfU0minsRUauzMWyOkDVOzvROxrShQ J7Q7iLfDPYN8pF230JEuQz7SkGkYpgUJDesEj3cY9g7rtCChlVsLkG1CPjIA eiGj7xI8XshodiTloUfIyNRGBjZbF5J8tl5mvyP9yPtdsg9sQr4BsrOAjDzq yFbk7SC2Kmu/I+3aOyC8gHwbkK9HyLzDsBcyUhVJu/ZC9hLykb23BcjIl/PV HJDZ2n9zyLzKTY+Q0X4TWba9+pGt/dvvaEHitWW9gnxrkK8FyMh6/gbyeRck 25CPTHNecx2ZBMnsuICQkaXxS8jnhewpvNuG+ryQvYZ8lyBfC5DRhittwHkh 23LC44XMu3x/A/kuQr5pkIWUeYDyrvu9QNFKcAvq8wL1FvJdgHwzL8E/N6Ba 6ISrkO8d5PNaGWwriLzz7uF5zY7vIN8q5BsgOwvIViDfe8jnhcw2HDWHzLsf sICQeQ0zXsi8XgheyN5DvhXIN0B2FpAtQz7yNvQaZmzzpLwjKwMZZrx7m3uQ j9zkBsjOArIR5CP3SC9ktnmyOWRknqRt4wGyAbLPEjKvkdkLGZn/yMjshewD 5BtBvgGy1iELKQTUEhT8CPm8QNm7Bc2Bot0CcnzxAjWz1eJzA6qFTjhA1hlk 3p0eL2Rkg6edHi9kHyHfEuQbIBsgGyAbIBsgGyAbIBsg6xuyeK6WQ3x7TxsP iCanXutRu8m5Z4DRd1y2Er07JIVT3n8K1YwKUR2f4/4N3t2Hdy/h3StnWfrG L/lv0xPi8q8SVHs2AQkeXFfCq3rcAXLtSqUkfy7nPyQWwb6/BTWT9aYqB+Wz mf/QJvGso5QdA3sW9CROQthxXc3/ItPrdsxHprCQQD4Xj2MxssitxVTycPSS NtMApQTEng3E3UipGmxCPSOzCQjZI1jYZAyvaBwU1EgsNorGV79RUkfObNIy NZyF2rIeTSRy2J5czpZjI3agrERSIHcwNQTritZsOfREPYXsUCOzb0nbyMPv htm2HlkggSHs4B3kri2p5PdJLJBID+TdKifqyTmAWHARKKC22QFCqG09bnDI YTw6qkAwkr/pBZBfqYUklEAmadyJNZPLHn2NmEEDtbSctvTI3Z1a3iOryPuL mLYRG0YEk4+bl2lXYs3EKjq642UaDah2y4lpcuj/jFklcQ3oiMTlmEp+Qysx lfzZiC3bsQQNJjIQ0fkGglEGShIWaRs5wu6Ybetxs1uCR9hxW0gvH8VU8h4n FohWQ4c+ZLSn1SCxQHoaOSVJ2+zYMNS2HllACro3hgy9IxXCyyCCgoYVcuT2 Mm1My0otXwBRYYU3Xg1h0aMLHOn43rg2VDbpCMm44+CbN8IUlSW+XTX4Ro3y Bs2hxvfINxlD7OA6EmvR68QoUwCxQlK987aMnllpNBkXkGHajtPTFtIhxYsv qbDeKD4yxZITPGFOWNLA5O0w5MZ8I1JFeps3AhBRT07OM7vVkDc4jfne+EBU 1us1TmyhMYNYRWWJLdKhiAJvlCG2wTXvIzMyiJaS3mhEaxEAOstFoNA0TtMo sYrKep3+qZXemEaq3a59BpFeTxsu3thHVNZ7IIrqo/Gc2EdlvQeniGZvLCUq 2+OZNFojU9BF21RDZk9iENVC8wMxjcqqDEoMllSLlKAj04RLj2wh4znFDqYl oqz6A7Rhf4mYQWUvxRJee10Yzjbj1yqp+UPtoMP/tHlj49IqC4hMmnm8obrS JWz+BF1mVIf2sFIiy1DdUTl8IX8zXscu11LLNBv7ZEpcltrqhMmub0pd/hBI 3nhhVLZH/pIerscVu5BCXINhPfKWZvdRhJBGJJKfVY1/oU+oG5rEXYmaT8PX Rkwt9yWrZZXPeKObUdlZYh44GEzDNdl49ChoEy2n4jLjkbGIGObphOOvZTzm XoocJ4usEES7c1cgtfrJyfq8UdiobEcRQMbZ2aRCUY1kw5KIlN1rMr1QZ0mm v6SXS6qM79QNl2Mqjf7b5ndV6/9zA5qeAiXlDwVKsrkgVnGyBMgODk0RtyJW VDN1oXS5mj/hv0iXF9JoKKe193LxW61eYVh6Zit/Ooqb1ohRk9QT8qpNb2mM qFIivKLZ1nvnbKrkFA8hQSJhm6eWkz5U/f9dKPkylmyBceEQ/3r+htpNo5sy WakdhWYEZcQQ2xANQquRVEpdjmWzutmVrCLEJG/ADVJ4LU6ReIVW0AFag1Oh sqCWXYoUHFalMdVA8of621fQAKsLke1jy+CiGONJJ0p8qWh+IiJSlufPNYMI 2o66XdSUcK78fxIKUjSl/wXdZ6WQOZ7FKUbShJH+eazxSsLa4l9lAJsQPGLx XQOZtJn5o0fDm/gcdSdpLi0vLsRUMX36dqmEGPFvWTJKku5IE57YJ8gkKUup F3XKuV96g/csu5pAI+5d5oToCXr8x4lCsgm1ljQOWLqspV42WkCboV8a+e1l pNRhqZpUB7FWnFXo7Lox+NoX2KwmfbRellZ8tAAjkw1x9hpzVtq2ZiClXmun TAjimbhp1Epev+InMmKCGy3iwytautOlRS6WPo4FSWJl0PJaab7kVlqdncT8 OlcjfnDCEaLMawGgsjTHbjA5pIjf4awK90my1XW+6hpr39jkkgPvWZoL3A4C cif/XaunpoJCfd8vJTeYGNLhdcvyRI8PJJMiT+9IWqyRRxcZ35iuCU0gmjyN FEWdjET2LVYuMfLGcGDziu+deD/KwRHPTKLVRzuENwyWqNodioZrRS8Xkarb kBXzIZNFy0zVsKLMc1XJKh8BmQyf1sBOMkYXgLkkyxsIiiSrkSRM+MGWj6RS fTQC0prxpgGYKkXJlKfmS/QDfeiSWpgSopyEiVZjJZWi+mzX3zk4YS9+UzSn S4ohWN4Ak94ZgZojJh1SnMUAqyo0Xum6ZfCUeoa690c2JL0CFgDPbm7+NEIR GzwvV2JDxxXLPcG66auJImmTSwJoyKs37K5HW9GaI96b16NASc0l37yGX/oq 9TAv2Op+kjp0eruUV3LUnqB+jWrxYtCca3QuhhYJtI3SqL2OKYLk1RBvb7h3 r3jTTGL7IBMAMiJQfTTQedUxFvCMR0+xnqnGf4dEeyzLVF/+ePujPjk5ZVtm S9VEqV7x7qDPnptalWjvlRjEPtLlxOJJ3mQk0VIiSP5Ik2NafFB99n5tojWQ BHrsLlo+VcrtXhNUFCpLgwuxkWoWoxyxguRJ1j8yCBFVxAoyo9i3VHQunzaZ 8o481Umy9HMALo8orwATaiLAXkV5Hon1WiO9vccrxbqDFpvSHSJNnyF+q6E/ HGJu34jkEnPv/VdeMokzlI8UAZIcxfHP2+u8Yi6TazJOty253v6plh1pzafB ic5IWXZYL5e9izhbkPsR+JAyj5irx1VUN35S89TjDRX9mZninSVsuU7+cjCF Wkb4NBNpNop4Feg2hFyWC7bN2hZt4R1xlmSGBJqcMXej1BqeBd6rHr0C7T1j QDOqbuYnQZlPyC1vAa8VjUYbr2B7RrS6kFEtXjFehy6jSBw1lPbEaZWietS1 KNU0Aht6yTzyTbLknZ+98p3aHFgi7YP+9rwmlavOxro76hyCLF9TR2Z915no 89vd7bW+LcP2qG5r3lKzffmvS3J34R25s3glVxzovBOi5bNjnVfwSmvqc1Y8 gaPLGqHUNK+s0jB4YtlVXP5ETSVW3H6850vI66Wkm/ofMeCMpdR2WU+Gk/CK RulUIovH2rinj+jCWJ98yR3nxDgc49U+U5tL8XjWeflDLqi017BhwCI40xGa VOCKh/qeV9bsG+RdsrYD7wgLr6yFlodG0ugn3dTqzPOIl6rbLmtgewVM3IvV b4yaSNImdIQSmOTIZzK7hnpIRgi48yQ3ynCs7hWrSlAbg5c4benrJf/04ZWy S2a7VIvXUluSN9UxQqq+aZJK+u85kU/aGVHXpUkU6MMoZyvjH4XtlTP408f+ WcVTI5e3BvIHDKyrWgnVp2wGYax31fLv8Gl1Bl+pQyif2TLJ1s9FTBdMii5K ktapYE700FXhHJARYFqv/zUhkVGM+OBJkp/crEUevRtAQl1F7PJnU6OzTYlT ETB0OxeUJ0aYBRpZSIIXTM6KhzzHg3is19srlad9LX/EOJuMNgSOKmkO+SIG XI7kklx3M6JV/z81V+UPBSNUSaz0sImuynEuF1O6Ev9gKrtWzzcpj42GphkF hkLXqM7ZqouL+rVGgnWZ2S4diiSJFkl04rgj4WlwaUUfMqVvr8w38c0jXSNT phI2kXSpyl4b0kUWWzJvEAzil207uc0pXSvZ0cFRTDraH9/dRDsD80+K0ITw ijhO1jZVZwivFL+WfkVRyLGdxdoUO9b/Q057cyVtPBsWCQSeXecWyXjlUX7N 0b6I5fHBfnb0aXzlUWhh+Lmd/6z5S54feR4zYqXGz/LvQZ5nl+fl2JB+5DkO sftBCrPK9V3dDLGyMS88azSf68Np8Zyp+C1pFPQkfrKe0W+cOfNBtNQaw71x BdcO+La9duRtfq3xTGTLXol0LWUNVyLUZOJoRzLVtZU4f2h5ry5tk3xnbxdR g35YAtXp0tZrLjnjRW4fdt5MNfsE7OgeUcVDTT0t24egbURibZt7UvNcBt78 waM2qTiVz6bQp/j3nWvb22TvVoO7SdRgucrUcmESvc278dvOXkIS3XgtUlCh uDtRm4aFenzRh6y6v3OuthPq72wXR/s2Wtv/worv0ebev0a75eCkCsKM35pz x1+WJnZkTvsKXf1o0PTev4CbrLp3Sn3iCGjSUSnZNW/NyUnlEbmyqfHivT4o F2MDuvd0ItrpBNONSNMZOz5R9nmcMyVktXr9cFKiW89MEI8lrWavQBHL7EN0 bYjWUl3IpCLy6D9jN0yvVHkd08VZUXf5rXNfWSyctauv54xU/njOgmqC1dTZ 3OPnW/8qSdICOpR7pct2UtSPPaSNzbo/8zD5upsDENC0rLfTD2I6anb6AYg+ 46MPnRwtU1eS7R4oa3ZMMhW2bNqBsk5ORrZ+oMywNs1zCtI+QeY9+3jGAkpk Cs9J8Bqd6K0s1bo7x6te1+ANHTD/Yd6JEV3MzR2c57UD9TQ6xavW0uXZ3ZDS SYgFFQp55w22YC1pugsnYlmKvJeTzh90gbQOV0yV1uItOBjpjbzgbWbnMRja DhHVTewcf6SXcxFAp1E8OFsdcbCuWbAo/5R4ngLotCj1BJ0whdbrJH9JCZI6 e43SXLxl+p/1woQm8myb6+mGGludmzXkWfF4Q57JtWWXTRJ7jOLnjZs6z6hC W09kQlAd6tRwh/NEUE19LIrHGzrGuynqjc6nvvPOGXrU+OmYkZM7baaTEJJF 2PYesiWIOk6Pgj5PgGCCjLbWuwsVTFMk+6dlvkDr84q1utmqTnKeQxiavHvD ustsRcGAyax2ToIG9xblHd+d43jvDrE9P5HfvR3Rvt1TvnFOYsB7r+Twap7U HFHh5Ca5wyjqGV9K7I0i4Z3CvfXZtxs06x8TipI6d6t6OX3QGye8OX/UoARJ OJPmsHZ0Q0cfVxXdjgBISPf0rsHZ5JSMXqqEifohMddG8R2VCK9Um9DUyG3e i4lsX365yimpyr483ruJ2dFNRX1crhaavRI5uJyJOJWf0G/um179THetVYQC cK74c/Lxrqy+5FIrqmyIzXfDmoq1OCYlCO+otfRws9qjWJCESTmZQ6NJ2M0L oXhIL2jjwsfrRn7xUrIDFo8ilY3i/Ff8n5re7Dh1/yGKRVJcYhvRolc1RNM2 Wgt3Oz6J36O7qe2d6cZXxbpuSrWuPk9t0fnjdeP0Xh8rq8/0rFaDq2LrJJJo NLoiONnWlxJyCd+zZnyn7FvwAQpoQ8NEnzdBkwBQl9EvhE6lpVaLdQN4p7dB K51EvRrawVJDAgIF4dV5uNJdJgLaK7pUT62cxGvnIncaT6gZUy9yD1XMd317 SHkZ/9qAymQSoZjyr6EEHWqGducPTeHCJ0KKDK/kX6uaPSUmqrD3qgE1TWWy tirGr8qXSdEl9qasifQm6zMpIU7GL+pt4D75JlYWJHqVAGnCwhppskhKStpn pOSdGMHV3beR4Os/oyWqGN0QX6ZtA+W3CvEgIbD6Lo3IL+vYjwvAZBhE7u2U Tpokvct/L2UCQFkrOXnQoHqP+ycpu6SUbMa20dxNxgHVsnIxIkQlwiuqTz1R TevGytA10eRdjXVJ5esR8o/NePUzfCBtb/5QH/w6obl4RMCJOd5rtW6ZTKRp UQlXGzLZ1/0Ra8imnPpSVv9f5VT4As1bP8MXGnKKzodazGpka6V5RWYk1Z2h HEqqABHTw7uAJfm52D5ih0CkXTbQ/A1UQLNcp9zy65bCMuogxAC6mtvrvBa4 EESJ3Ps3ImvpcJPoz8QjWbbxfr/CGUu9pM+0xqHpugGt/5RJS92Hquh19YoS W3RSVqybNJuuRSbSoVn1WjPHeosUM2obnadSV/oOWlrgqtcLjCw89wwhVO0u 4ZW6zgyp1Cs5YmJmWPnUoOFUlVz5Qsb9jZiaBlctmksMa2TWOTtm03D3DMoS amTCkalrLaklf9SLJWg/JkjETY3JVEICTyfatYTPpngnhAGt+siuQmXJAbwF 9hEKxNKnUJbQki25MAtt5H/R8KYivaFxk7SW0OfX49cSFlA7yL7wFPLZuHTO ApqJnkBZAkXmM/I8puU41UJMI1OLypbku2IhoaGYKH0C+dSduPbZ4j1w8BjK ks+i9y5UcigmkIkZ5KxDtBCDZAFIig5ZdmgziFrZI4OI9EeaNBJzVTMWsYWg JRbQoonK0rqYnEuolSRKj5xlyWQ8jUEhxcsWGs9/gLLUWCpL2+rEIGIzMYOM D1SWGCS38BAFRCk5ZVAriS0/RewNQy+xhRRw2RYgZoixTAzw1BxavspgQvRJ zdQLKL7g9dhsm5bv6jST8tf+QOSNy/pQaxiWnbDz0e4gYU9k0zvqbJSP+KFs oNrOolKcnDt7ZBgtj4j0B1CWho/xVOzfDLTPgdscomGJTOLENWUflGSQjJHk UeI9KdIR1yQIGvFKDGGqx7JqFSIeib8UKWTiIejlh4xldtuIGffNtvXIAmos mRftwMxEuq2vEoOocxKraPVJAwAxzRu5nnAhHxgKaHHGLLVDGElZ0R+8btuk QBEjpeeS+ZvsRsQ+2leQzUp7e9MWvh2z5bRX3xGrwhQRXu1o0KoDljhXk5wT WyRe+w6k3ov10axAzEgcMNW2kdjcM9vWIwvEQ4vMs7KqVMOvqxs56jZeeEUD x26sj4YpYkHi3KS2jcreNdvWEQtUj4tRXRakhOwR0CZNessZSGhSQqSWNKL7 8Wsq+5JvrMYS9DVpm30fMbWtRxaI5Nm3BZPUikyTqYhAkVMjdNDmoSnTxAI7 zoK0zb6Gl9rWIwtE8tTwzSGVglRciamqo1lSQjZVycz0fayPrPByV7x846S6 wFdbpkZCVlvWkAHxEqjjg6z+hCt3qDVe/gSxDFuIAc/g60TnebZjviC+wc2I jOGPY74MvPlD9aQQe8mgQ3QGcGVXG98zOL6fiKzBXrTCrox6sSnJnPj31aQq 1PEa8r+Mqd7YBmRKDhU8h8wN8Sv7WCl4B8dFUliv/ylUMypE8TD8+w3e3Yd3 L+HdK2dZ+sYv+W9lOzaOqPnVVMfHlUl3RtZ/hHw6w6cPVeTB9wrekQ7mFQPy A2woAXHoyS9divfPxdu+BkRnHJNcl58OSHamlwyQDZANkA2QDZANkA2QzQqZ N5SDFzJ6R6YRL2QfIF+Pxo8BsgGyBpCFFAKKLPwfIJ8XKDIC0yFcL1C0rUje O16gZnYo+tyAaqETeiHzRoPyQkbvaMvPC9ke5Otxe3qAbICsXcjIVWEP8nkh I7c8MhF7IbMjgQ2Q/b4g88ay9EJG71RPZgdk7yHfLC7kDsjImfw95PNCRru7 dIDOC5kd+nGA7HxARp5g7yCfN8Iy+d7QOT+CUT07leQjZ/J3kK+jwzcDZJ1B 5o1W74XMG4zNCxlFp5nlaGRIIaBoo/Mt5PMCRR4ldObTC5R9I0FzoGZegp8V UPSOAih5gXqjSkrrnZC2ft9APu9FPuTpSr46XsjsO4g+K8joHZ3U8EJGLkDk UtkjZN5rAb2Q0YlcOjzihYy2VdIQDC1BRq5iFFfJe/8nnQcgeLyQ2Vc/nglk 5NxKcY12IR+5qpOzIG3UeTfv7NteJZ8aYK19yOxti+aQ0bYFGby9kNk32S80 ZDuQj4ITeSHz7ht4ISPDUUeBx2yLqeQjl/0dyEcWU7KreW1t3u/Skp5sbS1A ZtuymnPbe0eM1wrilW5an5IVpAXIbMNMc8jIMEPLdy9k3jG0R8jsJXPzmYuW zLTY8lpBvMoNrVTJCtICZPaaUPJ59SNaE9LKwbtm9arQtACjxf00yEIKAWXr 6JLPq3tTPmqsd9nlzUfrClqpzmy1sDVzW1LIekCSRx3JKyleyaOVA61PW+iE tmZuj0dkwqPxjYZr73jkHd9IDabFVguQ2WqmPevRdgTNojtOGGnW886ipAbT yqEFyGw1U/J59wlJzbRVT1u38qq3lI9WDi1AZquZNrQkjQQFSZ5Xg/cuokga CdoWIJPQUASUBD2huXM3pqphIUIqKR72nVUPYioN9S0029Z77NmRoKDZzBvq hODxWltJjegIMlsDknykeZGKapNuw0is8tr0bVa1CplEZCCgwqoqVEJLa+oC ydw00rrts1iWANiJZWkmbKHZEiOBBkGJgkLW0e9iWTtUHelbz2NZO0LJLqQa zS5vVpBji/vZ0Sf3AVAaJSVV4l3QjoSMkmpUMHV0fhVT7WAhJJoGGvF08fFB fngz/JcXCgkcYAcGoX34JzGVBhi5Q5UMCG9iqh20g9YzBhTxhHA4FVx9REDC cfH/zGssRK/867/iX1fC90ZF0fGh7suQT8qGY+DVI9/lydr8sHp+Ur1gjvdk rYSHsENV/BOkyl1HZGeVO5Gos3+IqXYgCersBl9KNMZ8OeXFUSM0wkoyoLsV //oJ8r2OqST/dH+QlP0DfIMmyanD0mh8Pj0LJ6lxp5OaGEbKrZBN+56824uZ 6YhKtUT55NKLuxItTC5/nELDZD67vubfGEgfSB9IH0gfSP8cSA8pi0TwzJb+ RUV4IH0gfSB9IH0g/TMhPXOS1DzfPGUN0vX7VqfnW6Syi0TLUPb3w7eh6wxl F7TsItEyreuEkMHh53b+Uyzvsi/+Hym783I=\ \>"],ImageRangeCache->{{{0, 565}, {282, 0}} -> {-10.8444, -5.58797, \ 0.0375462, 0.0375462}}], Cell[BoxData[ TagBox[ RowBox[{"\[SkeletonIndicator]", "Graphics", "\[SkeletonIndicator]"}], False, Editable->False]], "Output"] }, Open ]] }, WindowSize->{755, 824}, WindowMargins->{{544, Automatic}, {Automatic, 32}}, PrintingCopies->1, PrintingPageRange->{Automatic, Automatic}, PrivateNotebookOptions->{"VersionedStylesheet"->{"Default.nb"[8.] -> False}}, FrontEndVersion->"9.0 for Microsoft Windows (64-bit) (November 20, 2012)", StyleDefinitions->"Default.nb" ] (* End of Notebook Content *) (* Internal cache information *) (*CellTagsOutline CellTagsIndex->{} *) (*CellTagsIndex CellTagsIndex->{} *) (*NotebookFileOutline Notebook[{ Cell[557, 20, 4176, 114, 352, "Input"], Cell[4736, 136, 1341, 48, 132, "Input"], Cell[CellGroupData[{ Cell[6102, 188, 26277, 740, 1072, "Input"], Cell[32382, 930, 134, 4, 31, "Output"], Cell[32519, 936, 19308, 901, 459, 7096, 698, "GraphicsData", "PostScript", \ "Graphics"], Cell[51830, 1839, 134, 4, 31, "Output"], Cell[51967, 1845, 134, 4, 31, "Output"], Cell[52104, 1851, 17450, 786, 291, 6196, 599, "GraphicsData", "PostScript", \ "Graphics"], Cell[69557, 2639, 134, 4, 31, "Output"] }, Open ]] } ] *) (* End of internal cache information *)