(*CacheID: 234*) (* Internal cache information: NotebookFileLineBreakTest NotebookFileLineBreakTest NotebookDataPosition[ 0, 0] NotebookDataLength[ 166701, 3305] NotebookOptionsPosition[ 165304, 3257] NotebookOutlinePosition[ 165861, 3277] CellTagsIndexPosition[ 165818, 3274] WindowFrame->Normal*) (* Beginning of Notebook Content *) Notebook[{ Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ RowBox[{"(*", " ", StyleBox[ RowBox[{ RowBox[{"NOTE", ":", " ", RowBox[{"FOR", " ", "SIMPLICITY"}]}], ",", " ", RowBox[{ RowBox[{"INITIAL", " ", "COVERAGE"}], " ", "=", " ", RowBox[{"0", " ", RowBox[{"(", RowBox[{"when", " ", "beam", " ", "is", " ", "turned", " ", "on"}], ")"}]}]}]}], FontColor->RGBColor[1, 0, 0]], " ", "*)"}], "\[IndentingNewLine]", RowBox[{"(*", " ", StyleBox[ RowBox[{"(", RowBox[{ "inital", " ", "coverages", " ", "can", " ", "be", " ", "calculated", " ", "by", " ", "setting", " ", "f0", " ", "to", " ", "zero"}], ")"}], FontColor->RGBColor[1, 0, 0]], " ", "*)"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", " ", RowBox[{ "This", " ", "code", " ", "was", " ", "tested", " ", "using", " ", "Mathematica", " ", "v", " ", "10.0", ".1", ".0", " ", RowBox[{"(", RowBox[{"Platform", ":", " ", RowBox[{"Mac", " ", "OS", " ", "X", " ", "x86", " ", RowBox[{"(", RowBox[{ RowBox[{"32", "-", " ", "bit"}], ",", " ", RowBox[{"64", "-", " ", RowBox[{"bit", " ", "Kernel"}]}]}], ")"}]}]}], ")"}]}], "*)"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", " ", RowBox[{"Documentation", " ", "in", " ", "the", " ", RowBox[{ "paper", ":", " ", "\"\\""}]}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{"(*", " ", RowBox[{ RowBox[{"by", " ", "Milos", " ", "Toth"}], ",", RowBox[{"Charlene", " ", "Lobo"}], ",", RowBox[{"Vinzenz", " ", "Friedli"}], ",", RowBox[{ "Aleksandra", " ", "Szkudlarek", " ", "and", " ", "Ivo", " ", "Utke"}]}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{"(*", " ", RowBox[{ RowBox[{"Beilstein", " ", RowBox[{"J", ".", "Nanotechnol", ".", "2015"}]}], ",", "6", ",", RowBox[{"1518", "-", RowBox[{"1540", " ", RowBox[{"(", RowBox[{"open", " ", "access"}], ")"}]}]}]}], " ", "*)"}], " ", "\[IndentingNewLine]", RowBox[{"(*", " ", RowBox[{ RowBox[{"http", ":"}], "//", RowBox[{ RowBox[{"www", ".", "beilstein"}], "-", RowBox[{ RowBox[{ RowBox[{ RowBox[{ RowBox[{"journals", ".", "org"}], "/", "bjnano"}], "/", "content"}], "/", "pdf"}], "/", "2190"}], "-", "4286", "-", "6", "-", RowBox[{"157.", "pdf"}]}]}], " ", "*)"}], " ", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ RowBox[{"**", " ", "INPUT"}], " ", "PARAMETERS"}], " ", "***)"}], " ", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"L0", "=", "50.0"}], ";", " ", RowBox[{"(*", RowBox[{"defines", " ", "beam", " ", "radius", " ", RowBox[{"(", RowBox[{ RowBox[{ "see", " ", "equations", " ", "for", " ", "Gaussian", " ", "and", " ", "top"}], "-", RowBox[{"hat", " ", "beams", " ", "below"}]}], ")"}]}], "*)"}], "\[IndentingNewLine]", RowBox[{"\[Beta]0", " ", "=", "30"}], ";", RowBox[{"(*", RowBox[{ RowBox[{"abruptness", " ", "of", " ", "top"}], "-", RowBox[{"hat", " ", "beam"}]}], "*)"}], "\[IndentingNewLine]", RowBox[{"f00", "=", RowBox[{"10", "^", "3"}]}], ";", RowBox[{"(*", " ", RowBox[{ "electron", " ", "flux", " ", "at", " ", "beam", " ", "axis", " ", RowBox[{"(", RowBox[{ SuperscriptBox["\[CapitalARing]", RowBox[{"-", "2"}]], SuperscriptBox["s", RowBox[{"-", "1"}]]}], ")"}]}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{"tmin", "=", "0"}], ";", RowBox[{"tmax", "=", "100"}], ";", " ", RowBox[{"(*", " ", "sec", " ", "*)"}], "\[IndentingNewLine]", RowBox[{"rmin", "=", "0.001"}], ";", RowBox[{"rmax", "=", RowBox[{"L0", "*", "20"}]}], ";", RowBox[{"(*", RowBox[{"(", "\[CapitalARing]", ")"}], "*)"}], "\[IndentingNewLine]", RowBox[{"k0", "=", RowBox[{"8617332478", "*", RowBox[{"10", "^", RowBox[{"(", RowBox[{"-", "14"}], ")"}]}]}]}], ";", RowBox[{"(*", " ", RowBox[{"eV", "/", "K"}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{"T0", "=", "300"}], ";", " ", RowBox[{"Tg0", "=", "300"}], ";", RowBox[{"(*", " ", RowBox[{ RowBox[{"sample", " ", "&"}], " ", "gas", " ", "temperatures", " ", RowBox[{"(", "K", ")"}]}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{"P0", "=", "0.1"}], ";", RowBox[{"(*", " ", RowBox[{"gas", " ", "pressure", " ", RowBox[{"(", "Torr", ")"}]}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{"Z0", "=", "208.33"}], ";", " ", RowBox[{"(*", " ", RowBox[{ RowBox[{"TEOS", " ", RowBox[{"(", RowBox[{ SubscriptBox["SiC", "8"], SubscriptBox["H", "20"], SubscriptBox["O", "4"]}], ")"}]}], ";", " ", RowBox[{"mass", " ", "of", " ", "gas", " ", "molecule", " ", RowBox[{"(", "amu", ")"}]}]}], " ", "*)"}], " ", "\[IndentingNewLine]", RowBox[{"sp0", "=", "1"}], ";", RowBox[{"(*", " ", RowBox[{"physisorption", " ", "sticking", " ", "coefficient"}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{"Ap0", "=", "100"}], ";", RowBox[{"Ac0", "=", "100"}], ";", RowBox[{"(*", RowBox[{"adsorbate", " ", "areas", " ", RowBox[{"(", SuperscriptBox["\[CapitalARing]", "2"], ")"}]}], "*)"}], "\[IndentingNewLine]", RowBox[{"\[Sigma]p0", "=", RowBox[{"\[Sigma]c0", "=", "10"}]}], ";", " ", RowBox[{"(*", " ", RowBox[{ RowBox[{ RowBox[{"x", "-", RowBox[{ "sections", " ", "for", " ", "dissociation", " ", "of", " ", "physisorbed"}]}], " ", "&"}], " ", "chemisorbed", " ", "molecules", " ", RowBox[{"(", SuperscriptBox["\[CapitalARing]", "2"], ")"}]}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{"Ed0", "=", RowBox[{"510", "/", "1000"}]}], ";", RowBox[{"(*", " ", RowBox[{"desorption", " ", "energy", " ", RowBox[{"(", RowBox[{"physisorbed", " ", "molecules"}], ")"}], RowBox[{"(", "eV", ")"}]}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{"Ec0", "=", RowBox[{"855", "/", "1000"}]}], ";", RowBox[{"(*", " ", RowBox[{"activation", " ", "barrier", " ", RowBox[{"(", "eV", ")"}]}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{"ED0", "=", RowBox[{"1415", "/", "1000"}]}], ";", RowBox[{"(*", " ", RowBox[{"desorption", " ", "energy", " ", RowBox[{"(", RowBox[{"chemisorbed", " ", "molecules"}], ")"}], " ", RowBox[{"(", "eV", ")"}]}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{"\[Kappa]p0", "=", RowBox[{"\[Kappa]c0", "=", RowBox[{"\[Kappa]D0", "=", RowBox[{"1.0", "*", RowBox[{"10", "^", "15"}]}]}]}]}], ";", RowBox[{"(*", " ", RowBox[{"pre", "-", RowBox[{"factors", " ", RowBox[{"(", SuperscriptBox["s", RowBox[{"-", "1"}]], ")"}]}]}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{"EDp0", "=", RowBox[{"Ed0", "/", "3.0"}]}], ";", RowBox[{"(*", RowBox[{ "physisorbed", " ", "molecule", " ", "diffusion", " ", "barrier", " ", RowBox[{"(", "eV", ")"}]}], "*)"}], "\[IndentingNewLine]", RowBox[{"EDc0", "=", RowBox[{"ED0", "/", "3.0"}]}], ";", RowBox[{"(*", RowBox[{ "chemisorbed", " ", "molecule", " ", "diffusion", " ", "barrier", " ", RowBox[{"(", "eV", ")"}]}], "*)"}], "\[IndentingNewLine]", RowBox[{"\[Kappa]Dp0", "=", RowBox[{"10", "^", "11"}]}], ";", RowBox[{"(*", RowBox[{ RowBox[{ "physisorbed", " ", "molecule", " ", "diffusion", " ", "coefficient", " ", "pre"}], "-", RowBox[{"factor", " ", RowBox[{"(", RowBox[{ SuperscriptBox["\[CapitalARing]", "2"], SuperscriptBox["s", RowBox[{"-", "1"}]]}], ")"}]}]}], "*)"}], "\[IndentingNewLine]", RowBox[{"\[Kappa]Dc0", "=", RowBox[{"10", "^", "11"}]}], ";", RowBox[{"(*", RowBox[{ RowBox[{ "chemisorbed", " ", "molecule", " ", "diffusion", " ", "coefficient", " ", "pre"}], "-", RowBox[{"factor", " ", RowBox[{"(", RowBox[{ SuperscriptBox["\[CapitalARing]", "2"], SuperscriptBox["s", RowBox[{"-", "1"}]]}], ")"}]}]}], "*)"}], "\[IndentingNewLine]", RowBox[{"sc0", "=", "1"}], ";", RowBox[{"(*", RowBox[{"sticking", " ", "coefficient", " ", RowBox[{"(", RowBox[{ "for", " ", "chemisorption", " ", "in", " ", "the", " ", "case", " ", "of", " ", "a", " ", "zero", " ", "activation", " ", "barrier"}], ")"}]}], "*)"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ RowBox[{"**", " ", "define"}], " ", "function", " ", "that", " ", "performs", " ", "parameter", " ", "substitutions"}], " ", "***)"}], "\[IndentingNewLine]", RowBox[{"refreshSubstitutions", ":=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"sub", "=", RowBox[{"{", RowBox[{ RowBox[{"L", "\[Rule]", "L0"}], ",", RowBox[{"\[Beta]", "\[Rule]", "\[Beta]0"}], ",", RowBox[{"f0", "\[Rule]", "f00"}], ",", RowBox[{"k", "\[Rule]", "k0"}], ",", RowBox[{"Ed", "\[Rule]", "Ed0"}], ",", RowBox[{"Ec", "\[Rule]", "Ec0"}], ",", RowBox[{"ED", "\[Rule]", "ED0"}], ",", RowBox[{"EDp", "\[Rule]", "EDp0"}], ",", RowBox[{"EDc", "\[Rule]", "EDc0"}], ",", RowBox[{"\[Kappa]p", "\[Rule]", "\[Kappa]p0"}], ",", RowBox[{"\[Kappa]c", "\[Rule]", "\[Kappa]c0"}], ",", RowBox[{"\[Kappa]D", "\[Rule]", "\[Kappa]D0"}], ",", RowBox[{"\[Kappa]Dp", "\[Rule]", "\[Kappa]Dp0"}], ",", RowBox[{"\[Kappa]Dc", "\[Rule]", "\[Kappa]Dc0"}], ",", RowBox[{"sp", "\[Rule]", "sp0"}], ",", RowBox[{"s0", "\[Rule]", "sc0"}], ",", RowBox[{"Ap", "\[Rule]", "Ap0"}], ",", RowBox[{"Ac", "\[Rule]", "Ac0"}], ",", " ", RowBox[{"T", "\[Rule]", "T0"}], ",", RowBox[{"Tg", "\[Rule]", "Tg0"}], ",", RowBox[{"P", "\[Rule]", "P0"}], ",", RowBox[{"Z", "\[Rule]", "Z0"}], ",", RowBox[{"\[Sigma]p", "\[Rule]", "\[Sigma]p0"}], ",", RowBox[{"\[Sigma]c", "\[Rule]", "\[Sigma]c0"}]}], "}"}]}], ";"}], "}"}]}]}], "\[IndentingNewLine]", RowBox[{"refreshSubstitutions", ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ RowBox[{"**", " ", "define"}], " ", "function", " ", "that", " ", "evaluates", " ", "equations"}], " ", "***)"}], "\[IndentingNewLine]", RowBox[{"evaluateEquations", ":=", RowBox[{"{", RowBox[{ RowBox[{"physisorbNumeric", "=", RowBox[{"physisorb", " ", "/.", "sub"}]}], ";", "\[IndentingNewLine]", RowBox[{"chemisorbNumeric", "=", RowBox[{"chemisorb", " ", "/.", "sub"}]}], ";", "\[IndentingNewLine]", RowBox[{"dissociateNumeric", "=", RowBox[{"dissociate", " ", "/.", "sub"}]}], ";", "\[IndentingNewLine]", RowBox[{"sol", "=", RowBox[{"NDSolve", "[", RowBox[{ RowBox[{"{", "\[IndentingNewLine]", RowBox[{ "chemisorbNumeric", ",", "physisorbNumeric", ",", "dissociateNumeric", ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"Nc", "[", RowBox[{"0", ",", "r"}], "]"}], "\[Equal]", "0"}], ",", RowBox[{ RowBox[{"Np", "[", RowBox[{"0", ",", "r"}], "]"}], "\[Equal]", "0"}], ",", RowBox[{ RowBox[{"Nd", "[", RowBox[{"0", ",", "r"}], "]"}], "\[Equal]", "0"}], ",", RowBox[{"(*", " ", StyleBox[ RowBox[{ RowBox[{"INITIAL", " ", "COVERAGE"}], " ", "=", " ", "0"}], FontColor->RGBColor[1, 0, 0]], "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "r"], RowBox[{"Nc", "[", RowBox[{"t", ",", "r"}], "]"}]}], "\[Equal]", "0"}], "/.", RowBox[{"r", "\[Rule]", "rmin"}]}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "r"], RowBox[{"Np", "[", RowBox[{"t", ",", "r"}], "]"}]}], "\[Equal]", "0"}], "/.", RowBox[{"r", "\[Rule]", "rmin"}]}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "r"], RowBox[{"Nc", "[", RowBox[{"t", ",", "r"}], "]"}]}], "\[Equal]", "0"}], "/.", RowBox[{"r", "\[Rule]", "rmax"}]}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "r"], RowBox[{"Np", "[", RowBox[{"t", ",", "r"}], "]"}]}], "\[Equal]", "0"}], "/.", RowBox[{"r", "\[Rule]", "rmax"}]}]}], "\[IndentingNewLine]", "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"Nc", "[", RowBox[{"t", ",", "r"}], "]"}], ",", RowBox[{"Np", "[", RowBox[{"t", ",", "r"}], "]"}], ",", RowBox[{"Nd", "[", RowBox[{"t", ",", "r"}], "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"t", ",", "tmin", ",", "tmax"}], "}"}], ",", RowBox[{"{", RowBox[{"r", ",", "rmin", ",", "rmax"}], "}"}], ",", RowBox[{"MaxStepSize", "\[Rule]", "0.1"}], ",", RowBox[{"MaxSteps", "\[Rule]", "100000"}]}], "]"}]}], ";"}], "}"}]}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ RowBox[{"**", " ", "set"}], " ", "up", " ", "equations"}], " ", "***)"}], " ", "\[IndentingNewLine]", RowBox[{ RowBox[{"F", "=", RowBox[{"P", "*", RowBox[{"13332200", "/", RowBox[{"Sqrt", "[", RowBox[{ "2", "*", "Pi", "*", "Z", "*", "1.66053873", "*", "1.38066", "*", "Tg"}], "]"}]}]}]}], ";", " ", RowBox[{"(*", " ", RowBox[{"gas", " ", "molecule", " ", "flux", " ", RowBox[{"(", RowBox[{ SuperscriptBox["\[CapitalARing]", RowBox[{"-", "2"}]], SuperscriptBox["s", RowBox[{"-", "1"}]]}], ")"}]}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{"f", "=", RowBox[{"f0", "*", RowBox[{"Exp", "[", RowBox[{ RowBox[{"-", RowBox[{"(", RowBox[{"r", "^", "2"}], ")"}]}], "/", RowBox[{"(", RowBox[{"2", "*", RowBox[{"L", "^", "2"}]}], ")"}]}], "]"}]}]}], ";", RowBox[{"(*", " ", RowBox[{"Gaussian", " ", "electron", " ", "flux", " ", "profile", " ", RowBox[{"(", RowBox[{ SuperscriptBox["\[CapitalARing]", RowBox[{"-", "2"}]], SuperscriptBox["s", RowBox[{"-", "1"}]]}], ")"}]}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ RowBox[{"f", "=", FractionBox["f0", RowBox[{ RowBox[{"Exp", "[", RowBox[{"\[Beta]", " ", RowBox[{"(", RowBox[{ FractionBox["r", "L"], "-", "1"}], ")"}]}], "]"}], "+", "1"}]]}], ";"}], RowBox[{"(*", " ", RowBox[{"Top", "-", RowBox[{"hat", " ", "electron", " ", "flux", " ", "profile", " ", RowBox[{"(", RowBox[{ SuperscriptBox["\[CapitalARing]", RowBox[{"-", "2"}]], SuperscriptBox["s", RowBox[{"-", "1"}]]}], ")"}]}]}], " ", "*)"}], "*)"}], "\[IndentingNewLine]", RowBox[{"sc", "=", RowBox[{"s0", "*", RowBox[{"Exp", "[", RowBox[{ RowBox[{"-", RowBox[{"(", RowBox[{"Ec", "-", "Ed"}], ")"}]}], "/", RowBox[{"(", RowBox[{"k", "*", "Tg"}], ")"}]}], "]"}]}]}], ";", " ", RowBox[{"(*", " ", RowBox[{"sticking", " ", "coefficient", " ", RowBox[{"(", "chemisorption", ")"}]}], "*)"}], "\[IndentingNewLine]", RowBox[{"kp", "=", RowBox[{"\[Kappa]p", "*", RowBox[{"Exp", "[", RowBox[{ RowBox[{"-", "Ed"}], "/", RowBox[{"(", RowBox[{"k", "*", "T"}], ")"}]}], "]"}]}]}], ";", RowBox[{"(*", RowBox[{ "physisorbed", " ", "molecule", " ", "desorption", " ", "rate", " ", RowBox[{"(", SuperscriptBox["s", RowBox[{"-", "1"}]], ")"}]}], "*)"}], "\[IndentingNewLine]", RowBox[{"kD", "=", RowBox[{"\[Kappa]D", "*", RowBox[{"Exp", "[", RowBox[{ RowBox[{"-", "ED"}], "/", RowBox[{"(", RowBox[{"k", "*", "T"}], ")"}]}], "]"}]}]}], ";", RowBox[{"(*", RowBox[{ "chemisorbed", " ", "molecule", " ", "desorption", " ", "rate", " ", RowBox[{"(", SuperscriptBox["s", RowBox[{"-", "1"}]], ")"}]}], "*)"}], "\[IndentingNewLine]", RowBox[{"kc", "=", RowBox[{"\[Kappa]c", "*", RowBox[{"Exp", "[", RowBox[{ RowBox[{"-", "Ec"}], "/", RowBox[{"(", RowBox[{"k", "*", "T"}], ")"}]}], "]"}]}]}], ";", RowBox[{"(*", RowBox[{"physisorbed", "-", "to", "-", RowBox[{"chemisorbed", " ", "transition", " ", "rate", " ", RowBox[{"(", SuperscriptBox["s", RowBox[{"-", "1"}]], ")"}]}]}], "*)"}], "\[IndentingNewLine]", RowBox[{"Dp", "=", RowBox[{"\[Kappa]Dp", "*", RowBox[{"Exp", "[", RowBox[{ RowBox[{"-", "EDp"}], "/", RowBox[{"(", RowBox[{"k", "*", "T"}], ")"}]}], "]"}]}]}], ";", RowBox[{"(*", RowBox[{ "physisorbed", " ", "molecule", " ", "diffusion", " ", "coefficient", " ", RowBox[{"(", RowBox[{ SuperscriptBox["\[CapitalARing]", "2"], SuperscriptBox["s", RowBox[{"-", "1"}]]}], ")"}]}], "*)"}], "\[IndentingNewLine]", RowBox[{"Dc", "=", RowBox[{"\[Kappa]Dc", "*", RowBox[{"Exp", "[", RowBox[{ RowBox[{"-", "EDc"}], "/", RowBox[{"(", RowBox[{"k", "*", "T"}], ")"}]}], "]"}]}]}], ";", RowBox[{"(*", RowBox[{ "chemisorbed", " ", "molecule", " ", "diffusion", " ", "coefficient", " ", RowBox[{"(", RowBox[{ SuperscriptBox["\[CapitalARing]", "2"], SuperscriptBox["s", RowBox[{"-", "1"}]]}], ")"}]}], "*)"}], "\[IndentingNewLine]", RowBox[{"A2", "=", RowBox[{"(", RowBox[{"1", "-", RowBox[{"Ap", "*", RowBox[{"Np", "[", RowBox[{"t", ",", "r"}], "]"}]}]}], ")"}]}], ";", " ", RowBox[{"(*", " ", RowBox[{ "limit", " ", "coverage", " ", "of", " ", "physisorbed", " ", "species", " ", "to", " ", "1", " ", "ML"}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{"A3", "=", RowBox[{"(", RowBox[{"1", "-", RowBox[{"Ac", "*", RowBox[{"Nc", "[", RowBox[{"t", ",", "r"}], "]"}]}]}], ")"}]}], ";", RowBox[{"(*", " ", RowBox[{ "limit", " ", "coverage", " ", "of", " ", "chemisorbed", " ", "species", " ", "to", " ", "1", " ", "ML"}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{"physisorb", "=", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "t"], RowBox[{"Np", "[", RowBox[{"t", ",", "r"}], "]"}]}], "==", RowBox[{ RowBox[{"sp", "*", RowBox[{"(", RowBox[{"1", "-", "sc"}], ")"}], "*", "F", "*", "A2"}], "-", RowBox[{ RowBox[{"Np", "[", RowBox[{"t", ",", "r"}], "]"}], RowBox[{"(", RowBox[{"kp", "+", RowBox[{"kc", "*", "A3"}], "+", RowBox[{"\[Sigma]p", "*", "f"}]}], ")"}]}], "+", "\[IndentingNewLine]", RowBox[{"Dp", "*", RowBox[{"(", RowBox[{ RowBox[{"D", "[", RowBox[{ RowBox[{"Np", "[", RowBox[{"t", ",", "r"}], "]"}], ",", RowBox[{"{", RowBox[{"r", ",", "2"}], "}"}]}], "]"}], "+", RowBox[{ RowBox[{"1", "/", "r"}], "*", RowBox[{"D", "[", RowBox[{ RowBox[{"Np", "[", RowBox[{"t", ",", "r"}], "]"}], ",", RowBox[{"{", RowBox[{"r", ",", "1"}], "}"}]}], "]"}]}]}], ")"}]}]}]}]}]}], "\[IndentingNewLine]", RowBox[{"chemisorb", "=", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "t"], RowBox[{"Nc", "[", RowBox[{"t", ",", "r"}], "]"}]}], "\[Equal]", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"sc", "*", "F"}], "+", RowBox[{ RowBox[{"Np", "[", RowBox[{"t", ",", "r"}], "]"}], "*", "kc"}]}], ")"}], "*", "A3"}], "-", RowBox[{ RowBox[{"Nc", "[", RowBox[{"t", ",", "r"}], "]"}], "*", RowBox[{"(", RowBox[{"kD", "+", RowBox[{"\[Sigma]c", "*", "f"}]}], ")"}]}], "+", "\[IndentingNewLine]", RowBox[{"Dc", "*", RowBox[{"(", RowBox[{ RowBox[{"D", "[", RowBox[{ RowBox[{"Nc", "[", RowBox[{"t", ",", "r"}], "]"}], ",", RowBox[{"{", RowBox[{"r", ",", "2"}], "}"}]}], "]"}], "+", RowBox[{ RowBox[{"1", "/", "r"}], "*", RowBox[{"D", "[", RowBox[{ RowBox[{"Nc", "[", RowBox[{"t", ",", "r"}], "]"}], ",", RowBox[{"{", RowBox[{"r", ",", "1"}], "}"}]}], "]"}]}]}], ")"}]}]}]}]}], "\[IndentingNewLine]", RowBox[{"dissociate", "=", RowBox[{ RowBox[{ SubscriptBox["\[PartialD]", "t"], RowBox[{"Nd", "[", RowBox[{"t", ",", "r"}], "]"}]}], "\[Equal]", RowBox[{"f", "*", RowBox[{"(", RowBox[{ RowBox[{"\[Sigma]c", "*", RowBox[{"Nc", "[", RowBox[{"t", ",", "r"}], "]"}]}], "+", RowBox[{"\[Sigma]p", "*", RowBox[{"Np", "[", RowBox[{"t", ",", "r"}], "]"}]}]}], ")"}]}]}]}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"Print", "[", RowBox[{"\"\\"", ",", RowBox[{"T", "/.", "sub"}], ",", " ", "\"\\"", ",", RowBox[{"Tg", "/.", "sub"}], ",", "\"\< K:\>\""}], "]"}], "\[IndentingNewLine]", RowBox[{"Print", "[", RowBox[{"\"\< sc = \>\"", ",", RowBox[{ RowBox[{"1.0", "*", "sc"}], "/.", "sub"}], ",", "\"\< \!\(\*SuperscriptBox[\(s\), \(-1\)]\)\>\""}], "]"}], "\[IndentingNewLine]", RowBox[{"Print", "[", RowBox[{"\"\< kp = \>\"", ",", RowBox[{"kp", "/.", "sub"}], ",", "\"\< \!\(\*SuperscriptBox[\(s\), \(-1\)]\)\>\""}], "]"}], "\[IndentingNewLine]", RowBox[{"Print", "[", RowBox[{"\"\< kD = \>\"", ",", RowBox[{"kD", "/.", "sub"}], ",", "\"\< \!\(\*SuperscriptBox[\(s\), \(-1\)]\)\>\""}], "]"}], "\[IndentingNewLine]", RowBox[{"Print", "[", RowBox[{"\"\< kc = \>\"", ",", RowBox[{"kc", "/.", "sub"}], ",", "\"\< \!\(\*SuperscriptBox[\(s\), \(-1\)]\)\>\""}], "]"}], "\[IndentingNewLine]", RowBox[{"Print", "[", RowBox[{"\"\< Dp = \>\"", ",", RowBox[{"Dp", "/.", "sub"}], ",", "\"\< \!\(\*SuperscriptBox[\(\[CapitalARing]\), \ \(2\)]\)\!\(\*SuperscriptBox[\(s\), \(-1\)]\)\>\""}], "]"}], "\[IndentingNewLine]", RowBox[{"Print", "[", RowBox[{"\"\< Dc = \>\"", ",", RowBox[{"Dc", "/.", "sub"}], ",", "\"\< \!\(\*SuperscriptBox[\(\[CapitalARing]\), \ \(2\)]\)\!\(\*SuperscriptBox[\(s\), \(-1\)]\)\>\""}], "]"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"evaluateEquations", ";"}]}]}]], "Input", CellChangeTimes->{{3.545593622605394*^9, 3.5455936520679007`*^9}, { 3.545593700138701*^9, 3.545593780877733*^9}, {3.545593818629559*^9, 3.545593845890605*^9}, {3.545593966416913*^9, 3.5455939666898117`*^9}, { 3.545593996844634*^9, 3.545594008906681*^9}, {3.54559414291831*^9, 3.545594149119533*^9}, {3.5455941982730217`*^9, 3.545594301290709*^9}, { 3.545594333115694*^9, 3.5455944080062513`*^9}, {3.5455948283381042`*^9, 3.545594835205947*^9}, {3.545594879111733*^9, 3.545594946739607*^9}, { 3.545595014873361*^9, 3.5455950201507998`*^9}, {3.545595410738702*^9, 3.545595481808715*^9}, {3.5455955465341167`*^9, 3.54559554976226*^9}, { 3.545595969461195*^9, 3.545595977775858*^9}, {3.545596017169383*^9, 3.5455960217810507`*^9}, {3.545596082540064*^9, 3.545596189998969*^9}, { 3.545596305713407*^9, 3.545596362245133*^9}, {3.545596392331855*^9, 3.545596451744137*^9}, {3.545596483417747*^9, 3.5455965494989243`*^9}, { 3.545596635195951*^9, 3.545596684380025*^9}, {3.545596811629291*^9, 3.545596857619356*^9}, {3.545596933158187*^9, 3.545596977707073*^9}, { 3.545597016880925*^9, 3.545597030263378*^9}, {3.545597090534534*^9, 3.5455971077510366`*^9}, {3.545597726047943*^9, 3.5455977377213917`*^9}, { 3.545597807689041*^9, 3.5455978889357977`*^9}, {3.545597942702602*^9, 3.5455980452901907`*^9}, {3.5455981214984617`*^9, 3.54559815783892*^9}, { 3.545598363057526*^9, 3.5455984036390467`*^9}, {3.5455994549813967`*^9, 3.545599524657728*^9}, {3.5455997857375517`*^9, 3.545599886108986*^9}, { 3.5455999543837423`*^9, 3.545600025285009*^9}, {3.5456001149321938`*^9, 3.545600118834983*^9}, {3.545600166827819*^9, 3.545600263618778*^9}, { 3.545600314068585*^9, 3.5456003323402967`*^9}, {3.545600502157552*^9, 3.545600504685534*^9}, {3.545600581373583*^9, 3.545600631339213*^9}, { 3.545600680983746*^9, 3.5456007503544064`*^9}, {3.545601309070656*^9, 3.545601315613141*^9}, {3.545601463321438*^9, 3.545601488835772*^9}, { 3.545601610658228*^9, 3.545601623231358*^9}, {3.5456016830066147`*^9, 3.5456016853766127`*^9}, {3.5456017212504807`*^9, 3.5456017562327347`*^9}, 3.545601992783464*^9, 3.5456020240959473`*^9, 3.545602186821157*^9, { 3.545602269828196*^9, 3.545602518763485*^9}, 3.5456025812799873`*^9, { 3.5456026121250553`*^9, 3.545602706184432*^9}, {3.545602841901168*^9, 3.545602844943697*^9}, {3.545602876210368*^9, 3.5456030697569723`*^9}, { 3.545603165359054*^9, 3.5456031728623343`*^9}, {3.545603293013042*^9, 3.5456033736418743`*^9}, {3.545603528802059*^9, 3.545603719675035*^9}, 3.5456037588351793`*^9, {3.545603827517521*^9, 3.54560397045362*^9}, { 3.5456040028195333`*^9, 3.545604021547737*^9}, {3.5456044528959417`*^9, 3.545604499453834*^9}, {3.545604539388179*^9, 3.545604589167062*^9}, { 3.545604668971417*^9, 3.5456047036136093`*^9}, {3.545604734395595*^9, 3.545604810325037*^9}, {3.545604850980444*^9, 3.545604858225995*^9}, { 3.545604889754655*^9, 3.5456049468707*^9}, {3.545605066124174*^9, 3.5456050752910852`*^9}, {3.545605110184072*^9, 3.545605110425456*^9}, 3.54560514610603*^9, 3.5456051810785437`*^9, 3.545605647769458*^9, { 3.5456056825324593`*^9, 3.545605760087854*^9}, {3.545605864441763*^9, 3.545605931969748*^9}, {3.5456068917009897`*^9, 3.5456069239292*^9}, { 3.545610517272328*^9, 3.545610521840197*^9}, {3.545610552094595*^9, 3.5456106747096987`*^9}, {3.5456107289846973`*^9, 3.5456107324473257`*^9}, {3.545613703341503*^9, 3.545613780002509*^9}, { 3.54561384090661*^9, 3.5456138464215813`*^9}, {3.545613876766473*^9, 3.545613902461652*^9}, {3.5456141814986677`*^9, 3.545614181888014*^9}, { 3.54562090892423*^9, 3.545620997932675*^9}, {3.5456210363165827`*^9, 3.545621039232995*^9}, {3.545621069954479*^9, 3.545621073949615*^9}, { 3.54562117767115*^9, 3.545621182105699*^9}, {3.545621232446577*^9, 3.545621241898546*^9}, {3.545621280690489*^9, 3.545621305225215*^9}, 3.545621422687517*^9, {3.545621463716329*^9, 3.545621464081686*^9}, { 3.5456215227784357`*^9, 3.5456215440517197`*^9}, {3.545621650663321*^9, 3.545621675868897*^9}, {3.545621803217785*^9, 3.545621809006225*^9}, { 3.5456218390718184`*^9, 3.54562183928249*^9}, {3.5456220356704082`*^9, 3.545622036039263*^9}, {3.5456224158320208`*^9, 3.5456224195430813`*^9}, { 3.5456228396397257`*^9, 3.5456228430636387`*^9}, {3.545623856582357*^9, 3.545623857904948*^9}, {3.545624426848063*^9, 3.545624430809279*^9}, { 3.545624502285872*^9, 3.54562452288525*^9}, {3.545624567547442*^9, 3.545624571042581*^9}, {3.545624679336718*^9, 3.54562468199264*^9}, { 3.5456255176858892`*^9, 3.545625546742899*^9}, {3.545625976390609*^9, 3.545626193052737*^9}, {3.545626225443667*^9, 3.5456263303533278`*^9}, 3.545627138819399*^9, {3.545680647156466*^9, 3.545680649771125*^9}, { 3.5456806830729103`*^9, 3.5456807163192453`*^9}, {3.545680815658016*^9, 3.545680847311594*^9}, {3.5456811332612247`*^9, 3.545681137834345*^9}, { 3.5456812047503443`*^9, 3.5456812184880543`*^9}, {3.545681549513342*^9, 3.545681563117752*^9}, {3.5456816047815638`*^9, 3.545681612564296*^9}, 3.545681686441505*^9, 3.5456817271136827`*^9, {3.545940582858685*^9, 3.5459406463166428`*^9}, 3.545940680926219*^9, {3.5459407126853437`*^9, 3.545940719161971*^9}, {3.545942981759048*^9, 3.5459429830024977`*^9}, { 3.545943064179339*^9, 3.5459431060248547`*^9}, {3.545943172704026*^9, 3.5459431817086563`*^9}, {3.5459432735256042`*^9, 3.545943274409772*^9}, { 3.5459433089910507`*^9, 3.545943329550262*^9}, {3.545943642534419*^9, 3.545943653467512*^9}, {3.545943764469323*^9, 3.545943857589327*^9}, { 3.545943992702998*^9, 3.5459440945349407`*^9}, 3.5459441308188477`*^9, { 3.546031953619293*^9, 3.5460320044780416`*^9}, {3.546033722892148*^9, 3.5460337251166983`*^9}, {3.546036647092533*^9, 3.5460366482093277`*^9}, { 3.5460379439214907`*^9, 3.5460379440944233`*^9}, {3.546038093775237*^9, 3.546038428607135*^9}, {3.5460384735379553`*^9, 3.5460385182194347`*^9}, { 3.5460391657033453`*^9, 3.546039165908293*^9}, 3.546039206098564*^9, 3.546039313535611*^9, {3.546039435325387*^9, 3.5460394601600246`*^9}, { 3.546040328471211*^9, 3.546040389812194*^9}, {3.5460404212498302`*^9, 3.546040437850378*^9}, {3.5460404713989983`*^9, 3.546040564439208*^9}, { 3.5460406761987123`*^9, 3.5460406985769253`*^9}, {3.546040737375806*^9, 3.546040793815825*^9}, {3.54604088907795*^9, 3.546040889731887*^9}, { 3.54604094780586*^9, 3.546041058945307*^9}, {3.5460411525958242`*^9, 3.546041272660152*^9}, {3.546041324788903*^9, 3.5460414144857187`*^9}, 3.546041460273478*^9, {3.5460414912760878`*^9, 3.546041496962871*^9}, { 3.546041562318124*^9, 3.546041592432583*^9}, {3.546041683407056*^9, 3.5460416837587223`*^9}, {3.546041746319212*^9, 3.546041770498487*^9}, { 3.546041837175954*^9, 3.546041856706306*^9}, {3.546041898410812*^9, 3.54604202774501*^9}, {3.546042076913718*^9, 3.5460421825857773`*^9}, { 3.5460422226248503`*^9, 3.546042226294868*^9}, {3.546042272145211*^9, 3.546042306277852*^9}, {3.5460423510376177`*^9, 3.5460423789597063`*^9}, { 3.546042461856044*^9, 3.546042467242606*^9}, {3.5460425011392727`*^9, 3.546042519011558*^9}, {3.5460427174761467`*^9, 3.546042740986926*^9}, { 3.5460549580721607`*^9, 3.546054959110705*^9}, 3.5460555288044167`*^9, 3.5460567371222153`*^9, {3.546058240490342*^9, 3.546058265643917*^9}, { 3.5460583021105757`*^9, 3.546058302333075*^9}, {3.54605834248949*^9, 3.546058342649762*^9}, {3.546059604346424*^9, 3.546059633477109*^9}, { 3.546061002035707*^9, 3.546061002551758*^9}, {3.546061055037258*^9, 3.5460610555895348`*^9}, {3.546465018359*^9, 3.546465020194607*^9}, { 3.546465051087666*^9, 3.546465051807393*^9}, {3.546465100791939*^9, 3.546465137219553*^9}, 3.546476554836768*^9, {3.546477254997637*^9, 3.546477279983939*^9}, {3.5464774105188713`*^9, 3.546477411224106*^9}, { 3.546477448208378*^9, 3.546477448525716*^9}, {3.548310466146838*^9, 3.548310468670226*^9}, 3.626907646656703*^9, 3.626907700443508*^9, { 3.626907742382634*^9, 3.626907766526469*^9}, {3.626907803088305*^9, 3.626907900128058*^9}, {3.6269079456305037`*^9, 3.626908096683073*^9}, { 3.626908175901203*^9, 3.626908235818717*^9}, {3.6269155544674463`*^9, 3.626915557463131*^9}, {3.626915589140777*^9, 3.6269156390282927`*^9}, { 3.626915677475625*^9, 3.62691568770885*^9}, {3.6269157590453873`*^9, 3.62691576938783*^9}, {3.626915812772231*^9, 3.6269158554366426`*^9}, { 3.6269158914928007`*^9, 3.626915957657825*^9}, {3.6269160417244987`*^9, 3.626916063790874*^9}, {3.6269161674872103`*^9, 3.6269161863446627`*^9}, { 3.626916371949788*^9, 3.626916393781735*^9}, {3.626916708707982*^9, 3.626916717140033*^9}, {3.626916765469495*^9, 3.626916777519163*^9}, { 3.6269169470029917`*^9, 3.6269169488429193`*^9}, {3.626917017950015*^9, 3.626917078435646*^9}, {3.6269171487464733`*^9, 3.626917391306452*^9}, { 3.6269174504638767`*^9, 3.6269175250958757`*^9}, {3.626917580053486*^9, 3.626917584618492*^9}, {3.626917661411779*^9, 3.626917730936715*^9}, { 3.6269177704106627`*^9, 3.626917900223935*^9}, {3.626917946646202*^9, 3.6269180325527782`*^9}, {3.62691820315666*^9, 3.626918215827236*^9}, { 3.626918840370656*^9, 3.626918846376515*^9}, {3.626918879712248*^9, 3.626918995001247*^9}, {3.626919323738812*^9, 3.626919357133163*^9}, { 3.6269193953314257`*^9, 3.626919402771151*^9}, {3.626919440093689*^9, 3.626919592673963*^9}, {3.626919663300047*^9, 3.6269197102478323`*^9}, { 3.626919800100881*^9, 3.62691986413664*^9}, {3.6269201772226467`*^9, 3.626920179267064*^9}, {3.626920834432741*^9, 3.626920873628264*^9}, { 3.626920904816889*^9, 3.6269209131200323`*^9}, {3.626921035710155*^9, 3.626921037458549*^9}, 3.626921301686514*^9, {3.62692170836084*^9, 3.6269217111015263`*^9}, {3.62692174609816*^9, 3.626921746703608*^9}, { 3.6269217786618643`*^9, 3.626921780041256*^9}, {3.626921820676948*^9, 3.6269218208285837`*^9}, {3.626921854263542*^9, 3.626921854398919*^9}, { 3.626921888127891*^9, 3.626921926053954*^9}, {3.626921970446602*^9, 3.626921970551551*^9}, {3.6269220502336817`*^9, 3.626922139676819*^9}, { 3.6269244748514147`*^9, 3.6269245275160418`*^9}, {3.626924855616342*^9, 3.626924904925267*^9}, {3.626924944514759*^9, 3.62692495756844*^9}, { 3.626925010255196*^9, 3.626925028968481*^9}, {3.626925191146215*^9, 3.626925200168665*^9}, {3.626925265397274*^9, 3.6269253242216454`*^9}, { 3.626925500455103*^9, 3.6269256047449827`*^9}, {3.6269256414614573`*^9, 3.6269256422955008`*^9}, {3.6269256768295193`*^9, 3.626925706149239*^9}, { 3.6269257623954573`*^9, 3.6269258322616367`*^9}, {3.6269258657868423`*^9, 3.626925933154717*^9}, {3.6269259677844763`*^9, 3.62692600043366*^9}, { 3.626926951508894*^9, 3.626926952658229*^9}, {3.626929315041554*^9, 3.626929332892797*^9}, {3.6269350141770287`*^9, 3.6269350339136868`*^9}, { 3.626935068680478*^9, 3.62693507443615*^9}, {3.626935108211314*^9, 3.626935147231041*^9}, {3.626935245648781*^9, 3.6269352465114*^9}, 3.6269352845261908`*^9, 3.6269353410174026`*^9, {3.626935410862153*^9, 3.6269354114195423`*^9}, 3.626935529046129*^9, {3.626935637517907*^9, 3.626935638369143*^9}, {3.626935937302784*^9, 3.6269359392548733`*^9}, { 3.626935992690716*^9, 3.6269360397090282`*^9}, 3.626936927972978*^9, { 3.632597223877179*^9, 3.6325972242683887`*^9}, {3.633107185443132*^9, 3.633107319304924*^9}, {3.633107745401699*^9, 3.6331077620660963`*^9}, { 3.633108065685701*^9, 3.633108065854156*^9}, {3.633109006011837*^9, 3.6331090339066668`*^9}, {3.633109082136031*^9, 3.633109115939452*^9}, { 3.633109188404313*^9, 3.633109189237743*^9}, {3.6331100309092903`*^9, 3.633110032908628*^9}, {3.6331102180101957`*^9, 3.633110218511095*^9}, { 3.6331103954264603`*^9, 3.633110395543529*^9}, {3.633120983636935*^9, 3.633121026779766*^9}, 3.633121129531597*^9, {3.633121182890818*^9, 3.633121187230744*^9}, {3.633121467061058*^9, 3.6331214822831593`*^9}, { 3.6331218014711103`*^9, 3.633121814540042*^9}, {3.633121931998868*^9, 3.6331219382594213`*^9}, {3.6331219965182962`*^9, 3.6331220052786713`*^9}, {3.6331225729930162`*^9, 3.633122581265952*^9}, 3.6331226478302717`*^9, {3.6331227025154057`*^9, 3.633122705491934*^9}, { 3.633122932514207*^9, 3.633122935228766*^9}, 3.633123130222575*^9, { 3.6331232512329903`*^9, 3.633123251688735*^9}, {3.633123344929991*^9, 3.6331233584803123`*^9}, {3.633123430961438*^9, 3.633123468752013*^9}, { 3.633933543317293*^9, 3.6339335433785343`*^9}, {3.6339336474904823`*^9, 3.633933648126875*^9}, {3.6339336952124233`*^9, 3.633933695808023*^9}, { 3.633933728345982*^9, 3.633933758964115*^9}, {3.633933952338616*^9, 3.633933952714878*^9}, 3.633934593367742*^9, {3.635439015038554*^9, 3.635439144701791*^9}, 3.6354391917491302`*^9, {3.6354392282356462`*^9, 3.63543925858496*^9}, {3.646002625432864*^9, 3.646002626105742*^9}}], Cell[BoxData[ RowBox[{ RowBox[{ SuperscriptBox["Np", TagBox[ RowBox[{"(", RowBox[{"1", ",", "0"}], ")"}], Derivative], MultilineFunction->None], "[", RowBox[{"t", ",", "r"}], "]"}], "\[Equal]", RowBox[{ RowBox[{ RowBox[{"-", RowBox[{"(", RowBox[{ RowBox[{ SuperscriptBox["\[ExponentialE]", RowBox[{"-", FractionBox["Ed", RowBox[{"k", " ", "T"}]]}]], " ", "\[Kappa]p"}], "+", RowBox[{ SuperscriptBox["\[ExponentialE]", RowBox[{"-", FractionBox[ SuperscriptBox["r", "2"], RowBox[{"2", " ", SuperscriptBox["L", "2"]}]]}]], " ", "f0", " ", "\[Sigma]p"}], "+", RowBox[{ SuperscriptBox["\[ExponentialE]", RowBox[{"-", FractionBox["Ec", RowBox[{"k", " ", "T"}]]}]], " ", "\[Kappa]c", " ", RowBox[{"(", RowBox[{"1", "-", RowBox[{"Ac", " ", RowBox[{"Nc", "[", RowBox[{"t", ",", "r"}], "]"}]}]}], ")"}]}]}], ")"}]}], " ", RowBox[{"Np", "[", RowBox[{"t", ",", "r"}], "]"}]}], "+", FractionBox[ RowBox[{"3.5127238523759204`*^6", " ", "P", " ", RowBox[{"(", RowBox[{"1", "-", RowBox[{ SuperscriptBox["\[ExponentialE]", FractionBox[ RowBox[{ RowBox[{"-", "Ec"}], "+", "Ed"}], RowBox[{"k", " ", "Tg"}]]], " ", "s0"}]}], ")"}], " ", "sp", " ", RowBox[{"(", RowBox[{"1", "-", RowBox[{"Ap", " ", RowBox[{"Np", "[", RowBox[{"t", ",", "r"}], "]"}]}]}], ")"}]}], SqrtBox[ RowBox[{"Tg", " ", "Z"}]]], "+", RowBox[{ SuperscriptBox["\[ExponentialE]", RowBox[{"-", FractionBox["EDp", RowBox[{"k", " ", "T"}]]}]], " ", "\[Kappa]Dp", " ", RowBox[{"(", RowBox[{ FractionBox[ RowBox[{ SuperscriptBox["Np", TagBox[ RowBox[{"(", RowBox[{"0", ",", "1"}], ")"}], Derivative], MultilineFunction->None], "[", RowBox[{"t", ",", "r"}], "]"}], "r"], "+", RowBox[{ SuperscriptBox["Np", TagBox[ RowBox[{"(", RowBox[{"0", ",", "2"}], ")"}], Derivative], MultilineFunction->None], "[", RowBox[{"t", ",", "r"}], "]"}]}], ")"}]}]}]}]], "Output", CellChangeTimes->{{3.546041160958767*^9, 3.5460411732740393`*^9}, { 3.546041216861188*^9, 3.5460412732127037`*^9}, {3.546041327265106*^9, 3.546041415085876*^9}, 3.546041462673644*^9, 3.5460414974686737`*^9, 3.546041593678466*^9, 3.546041685484968*^9, {3.5460417554197702`*^9, 3.546041771406828*^9}, {3.546041847425962*^9, 3.5460418599824047`*^9}, 3.546041906659306*^9, 3.546042033971017*^9, 3.54604212612502*^9, 3.5460422269955063`*^9, 3.5460423104497833`*^9, 3.5460423815216417`*^9, 3.546042478255501*^9, 3.546042520755836*^9, {3.546042718404578*^9, 3.546042742043247*^9}, 3.546043053447414*^9, 3.546054970626151*^9, 3.546055531699061*^9, {3.546056616331687*^9, 3.546056626779685*^9}, 3.546056738760666*^9, {3.546058242405678*^9, 3.5460582668955717`*^9}, 3.5460583075386744`*^9, 3.546058345250922*^9, {3.5460596068863497`*^9, 3.5460596340682163`*^9}, 3.5460610129970713`*^9, 3.546061062229313*^9, 3.546062488427413*^9, 3.546063446271009*^9, 3.546068130192952*^9, 3.546068270801525*^9, {3.5464650214546757`*^9, 3.5464650525822287`*^9}, { 3.546465102418089*^9, 3.546465138165887*^9}, 3.546476555867*^9, { 3.546477256226651*^9, 3.546477280519018*^9}, 3.546477411663375*^9, 3.546477449617937*^9, 3.546542438559313*^9, 3.548310549047262*^9, 3.626908268343809*^9, 3.626916068751648*^9, 3.6269178261765957`*^9, 3.6269179614666033`*^9, 3.626917993523202*^9, 3.626918034693242*^9, 3.626918216879718*^9, 3.626918859409236*^9, {3.626918906696721*^9, 3.626918999782312*^9}, 3.626919365026513*^9, 3.626919405711473*^9, { 3.626919441763557*^9, 3.6269194646820173`*^9}, {3.626919514469885*^9, 3.6269195939389*^9}, {3.6269196659456587`*^9, 3.626919677159478*^9}, 3.6269197112306767`*^9, 3.626919800866536*^9, 3.626919831888047*^9, 3.626919884173455*^9, 3.6269201800111027`*^9, {3.62692084541776*^9, 3.626920875742865*^9}, 3.6269209141062403`*^9, 3.6269210386619453`*^9, 3.626921303994268*^9, 3.6269217119876413`*^9, 3.626921747823307*^9, 3.6269217804941072`*^9, 3.626921822079536*^9, 3.626921858695078*^9, { 3.626921888746777*^9, 3.626921926630911*^9}, 3.626921971153295*^9, { 3.626922052547948*^9, 3.6269221407162457`*^9}, {3.626924990522007*^9, 3.6269250430124893`*^9}, 3.626925208080092*^9, {3.626925277970195*^9, 3.626925328600566*^9}, 3.626925501973529*^9, 3.626925545495945*^9, 3.626925575582925*^9, 3.626925605617323*^9, {3.626925678900807*^9, 3.626925706689249*^9}, {3.62692574877633*^9, 3.62692578301332*^9}, { 3.626925813781763*^9, 3.626925832966322*^9}, {3.626925866472302*^9, 3.626925933665123*^9}, {3.626925968492372*^9, 3.626926001693112*^9}, 3.626926955354505*^9, 3.62693462371273*^9, 3.6269350345663013`*^9, 3.626935075622611*^9, 3.62693539276084*^9, 3.6269356397341413`*^9, 3.626935943262567*^9, 3.626935996746237*^9, 3.626936051153778*^9, 3.626936426117701*^9, 3.6269369310290947`*^9, 3.633107768937594*^9, 3.633108074253151*^9, 3.6331090867297077`*^9, 3.633109122811103*^9, 3.633109197439884*^9, 3.633110033933173*^9, 3.633110219561577*^9, 3.633110396508984*^9, 3.633120878513995*^9, 3.633120963511161*^9, 3.6331210346757402`*^9, 3.633121130270924*^9, 3.633121188732094*^9, 3.633121491041224*^9, 3.6331218156737022`*^9, 3.633121938900758*^9, 3.633122005868532*^9, 3.6331225889818907`*^9, 3.633122657458334*^9, 3.633122707355876*^9, 3.633122801232727*^9, 3.6331229393243523`*^9, 3.633123133056655*^9, {3.63312325250319*^9, 3.6331232622585163`*^9}, { 3.633123359190971*^9, 3.633123368176626*^9}, 3.6331235445195513`*^9, 3.633123680617591*^9, 3.633933554677339*^9, 3.633933759999969*^9, 3.633933970997134*^9, 3.6339343849756536`*^9, 3.6339345959828033`*^9}], Cell[BoxData[ RowBox[{ RowBox[{ SuperscriptBox["Nc", TagBox[ RowBox[{"(", RowBox[{"1", ",", "0"}], ")"}], Derivative], MultilineFunction->None], "[", RowBox[{"t", ",", "r"}], "]"}], "\[Equal]", RowBox[{ RowBox[{ RowBox[{"-", RowBox[{"(", RowBox[{ RowBox[{ SuperscriptBox["\[ExponentialE]", RowBox[{"-", FractionBox["ED", RowBox[{"k", " ", "T"}]]}]], " ", "\[Kappa]D"}], "+", RowBox[{ SuperscriptBox["\[ExponentialE]", RowBox[{"-", FractionBox[ SuperscriptBox["r", "2"], RowBox[{"2", " ", SuperscriptBox["L", "2"]}]]}]], " ", "f0", " ", "\[Sigma]c"}]}], ")"}]}], " ", RowBox[{"Nc", "[", RowBox[{"t", ",", "r"}], "]"}]}], "+", RowBox[{ RowBox[{"(", RowBox[{"1", "-", RowBox[{"Ac", " ", RowBox[{"Nc", "[", RowBox[{"t", ",", "r"}], "]"}]}]}], ")"}], " ", RowBox[{"(", RowBox[{ FractionBox[ RowBox[{"3.5127238523759204`*^6", " ", SuperscriptBox["\[ExponentialE]", FractionBox[ RowBox[{ RowBox[{"-", "Ec"}], "+", "Ed"}], RowBox[{"k", " ", "Tg"}]]], " ", "P", " ", "s0"}], SqrtBox[ RowBox[{"Tg", " ", "Z"}]]], "+", RowBox[{ SuperscriptBox["\[ExponentialE]", RowBox[{"-", FractionBox["Ec", RowBox[{"k", " ", "T"}]]}]], " ", "\[Kappa]c", " ", RowBox[{"Np", "[", RowBox[{"t", ",", "r"}], "]"}]}]}], ")"}]}], "+", RowBox[{ SuperscriptBox["\[ExponentialE]", RowBox[{"-", FractionBox["EDc", RowBox[{"k", " ", "T"}]]}]], " ", "\[Kappa]Dc", " ", RowBox[{"(", RowBox[{ FractionBox[ RowBox[{ SuperscriptBox["Nc", TagBox[ RowBox[{"(", RowBox[{"0", ",", "1"}], ")"}], Derivative], MultilineFunction->None], "[", RowBox[{"t", ",", "r"}], "]"}], "r"], "+", RowBox[{ SuperscriptBox["Nc", TagBox[ RowBox[{"(", RowBox[{"0", ",", "2"}], ")"}], Derivative], MultilineFunction->None], "[", RowBox[{"t", ",", "r"}], "]"}]}], ")"}]}]}]}]], "Output", CellChangeTimes->{{3.546041160958767*^9, 3.5460411732740393`*^9}, { 3.546041216861188*^9, 3.5460412732127037`*^9}, {3.546041327265106*^9, 3.546041415085876*^9}, 3.546041462673644*^9, 3.5460414974686737`*^9, 3.546041593678466*^9, 3.546041685484968*^9, {3.5460417554197702`*^9, 3.546041771406828*^9}, {3.546041847425962*^9, 3.5460418599824047`*^9}, 3.546041906659306*^9, 3.546042033971017*^9, 3.54604212612502*^9, 3.5460422269955063`*^9, 3.5460423104497833`*^9, 3.5460423815216417`*^9, 3.546042478255501*^9, 3.546042520755836*^9, {3.546042718404578*^9, 3.546042742043247*^9}, 3.546043053447414*^9, 3.546054970626151*^9, 3.546055531699061*^9, {3.546056616331687*^9, 3.546056626779685*^9}, 3.546056738760666*^9, {3.546058242405678*^9, 3.5460582668955717`*^9}, 3.5460583075386744`*^9, 3.546058345250922*^9, {3.5460596068863497`*^9, 3.5460596340682163`*^9}, 3.5460610129970713`*^9, 3.546061062229313*^9, 3.546062488427413*^9, 3.546063446271009*^9, 3.546068130192952*^9, 3.546068270801525*^9, {3.5464650214546757`*^9, 3.5464650525822287`*^9}, { 3.546465102418089*^9, 3.546465138165887*^9}, 3.546476555867*^9, { 3.546477256226651*^9, 3.546477280519018*^9}, 3.546477411663375*^9, 3.546477449617937*^9, 3.546542438559313*^9, 3.548310549047262*^9, 3.626908268343809*^9, 3.626916068751648*^9, 3.6269178261765957`*^9, 3.6269179614666033`*^9, 3.626917993523202*^9, 3.626918034693242*^9, 3.626918216879718*^9, 3.626918859409236*^9, {3.626918906696721*^9, 3.626918999782312*^9}, 3.626919365026513*^9, 3.626919405711473*^9, { 3.626919441763557*^9, 3.6269194646820173`*^9}, {3.626919514469885*^9, 3.6269195939389*^9}, {3.6269196659456587`*^9, 3.626919677159478*^9}, 3.6269197112306767`*^9, 3.626919800866536*^9, 3.626919831888047*^9, 3.626919884173455*^9, 3.6269201800111027`*^9, {3.62692084541776*^9, 3.626920875742865*^9}, 3.6269209141062403`*^9, 3.6269210386619453`*^9, 3.626921303994268*^9, 3.6269217119876413`*^9, 3.626921747823307*^9, 3.6269217804941072`*^9, 3.626921822079536*^9, 3.626921858695078*^9, { 3.626921888746777*^9, 3.626921926630911*^9}, 3.626921971153295*^9, { 3.626922052547948*^9, 3.6269221407162457`*^9}, {3.626924990522007*^9, 3.6269250430124893`*^9}, 3.626925208080092*^9, {3.626925277970195*^9, 3.626925328600566*^9}, 3.626925501973529*^9, 3.626925545495945*^9, 3.626925575582925*^9, 3.626925605617323*^9, {3.626925678900807*^9, 3.626925706689249*^9}, {3.62692574877633*^9, 3.62692578301332*^9}, { 3.626925813781763*^9, 3.626925832966322*^9}, {3.626925866472302*^9, 3.626925933665123*^9}, {3.626925968492372*^9, 3.626926001693112*^9}, 3.626926955354505*^9, 3.62693462371273*^9, 3.6269350345663013`*^9, 3.626935075622611*^9, 3.62693539276084*^9, 3.6269356397341413`*^9, 3.626935943262567*^9, 3.626935996746237*^9, 3.626936051153778*^9, 3.626936426117701*^9, 3.6269369310290947`*^9, 3.633107768937594*^9, 3.633108074253151*^9, 3.6331090867297077`*^9, 3.633109122811103*^9, 3.633109197439884*^9, 3.633110033933173*^9, 3.633110219561577*^9, 3.633110396508984*^9, 3.633120878513995*^9, 3.633120963511161*^9, 3.6331210346757402`*^9, 3.633121130270924*^9, 3.633121188732094*^9, 3.633121491041224*^9, 3.6331218156737022`*^9, 3.633121938900758*^9, 3.633122005868532*^9, 3.6331225889818907`*^9, 3.633122657458334*^9, 3.633122707355876*^9, 3.633122801232727*^9, 3.6331229393243523`*^9, 3.633123133056655*^9, {3.63312325250319*^9, 3.6331232622585163`*^9}, { 3.633123359190971*^9, 3.633123368176626*^9}, 3.6331235445195513`*^9, 3.633123680617591*^9, 3.633933554677339*^9, 3.633933759999969*^9, 3.633933970997134*^9, 3.6339343849756536`*^9, 3.6339345959965763`*^9}], Cell[BoxData[ RowBox[{ RowBox[{ SuperscriptBox["Nd", TagBox[ RowBox[{"(", RowBox[{"1", ",", "0"}], ")"}], Derivative], MultilineFunction->None], "[", RowBox[{"t", ",", "r"}], "]"}], "\[Equal]", RowBox[{ SuperscriptBox["\[ExponentialE]", RowBox[{"-", FractionBox[ SuperscriptBox["r", "2"], RowBox[{"2", " ", SuperscriptBox["L", "2"]}]]}]], " ", "f0", " ", RowBox[{"(", RowBox[{ RowBox[{"\[Sigma]c", " ", RowBox[{"Nc", "[", RowBox[{"t", ",", "r"}], "]"}]}], "+", RowBox[{"\[Sigma]p", " ", RowBox[{"Np", "[", RowBox[{"t", ",", "r"}], "]"}]}]}], ")"}]}]}]], "Output", CellChangeTimes->{{3.546041160958767*^9, 3.5460411732740393`*^9}, { 3.546041216861188*^9, 3.5460412732127037`*^9}, {3.546041327265106*^9, 3.546041415085876*^9}, 3.546041462673644*^9, 3.5460414974686737`*^9, 3.546041593678466*^9, 3.546041685484968*^9, {3.5460417554197702`*^9, 3.546041771406828*^9}, {3.546041847425962*^9, 3.5460418599824047`*^9}, 3.546041906659306*^9, 3.546042033971017*^9, 3.54604212612502*^9, 3.5460422269955063`*^9, 3.5460423104497833`*^9, 3.5460423815216417`*^9, 3.546042478255501*^9, 3.546042520755836*^9, {3.546042718404578*^9, 3.546042742043247*^9}, 3.546043053447414*^9, 3.546054970626151*^9, 3.546055531699061*^9, {3.546056616331687*^9, 3.546056626779685*^9}, 3.546056738760666*^9, {3.546058242405678*^9, 3.5460582668955717`*^9}, 3.5460583075386744`*^9, 3.546058345250922*^9, {3.5460596068863497`*^9, 3.5460596340682163`*^9}, 3.5460610129970713`*^9, 3.546061062229313*^9, 3.546062488427413*^9, 3.546063446271009*^9, 3.546068130192952*^9, 3.546068270801525*^9, {3.5464650214546757`*^9, 3.5464650525822287`*^9}, { 3.546465102418089*^9, 3.546465138165887*^9}, 3.546476555867*^9, { 3.546477256226651*^9, 3.546477280519018*^9}, 3.546477411663375*^9, 3.546477449617937*^9, 3.546542438559313*^9, 3.548310549047262*^9, 3.626908268343809*^9, 3.626916068751648*^9, 3.6269178261765957`*^9, 3.6269179614666033`*^9, 3.626917993523202*^9, 3.626918034693242*^9, 3.626918216879718*^9, 3.626918859409236*^9, {3.626918906696721*^9, 3.626918999782312*^9}, 3.626919365026513*^9, 3.626919405711473*^9, { 3.626919441763557*^9, 3.6269194646820173`*^9}, {3.626919514469885*^9, 3.6269195939389*^9}, {3.6269196659456587`*^9, 3.626919677159478*^9}, 3.6269197112306767`*^9, 3.626919800866536*^9, 3.626919831888047*^9, 3.626919884173455*^9, 3.6269201800111027`*^9, {3.62692084541776*^9, 3.626920875742865*^9}, 3.6269209141062403`*^9, 3.6269210386619453`*^9, 3.626921303994268*^9, 3.6269217119876413`*^9, 3.626921747823307*^9, 3.6269217804941072`*^9, 3.626921822079536*^9, 3.626921858695078*^9, { 3.626921888746777*^9, 3.626921926630911*^9}, 3.626921971153295*^9, { 3.626922052547948*^9, 3.6269221407162457`*^9}, {3.626924990522007*^9, 3.6269250430124893`*^9}, 3.626925208080092*^9, {3.626925277970195*^9, 3.626925328600566*^9}, 3.626925501973529*^9, 3.626925545495945*^9, 3.626925575582925*^9, 3.626925605617323*^9, {3.626925678900807*^9, 3.626925706689249*^9}, {3.62692574877633*^9, 3.62692578301332*^9}, { 3.626925813781763*^9, 3.626925832966322*^9}, {3.626925866472302*^9, 3.626925933665123*^9}, {3.626925968492372*^9, 3.626926001693112*^9}, 3.626926955354505*^9, 3.62693462371273*^9, 3.6269350345663013`*^9, 3.626935075622611*^9, 3.62693539276084*^9, 3.6269356397341413`*^9, 3.626935943262567*^9, 3.626935996746237*^9, 3.626936051153778*^9, 3.626936426117701*^9, 3.6269369310290947`*^9, 3.633107768937594*^9, 3.633108074253151*^9, 3.6331090867297077`*^9, 3.633109122811103*^9, 3.633109197439884*^9, 3.633110033933173*^9, 3.633110219561577*^9, 3.633110396508984*^9, 3.633120878513995*^9, 3.633120963511161*^9, 3.6331210346757402`*^9, 3.633121130270924*^9, 3.633121188732094*^9, 3.633121491041224*^9, 3.6331218156737022`*^9, 3.633121938900758*^9, 3.633122005868532*^9, 3.6331225889818907`*^9, 3.633122657458334*^9, 3.633122707355876*^9, 3.633122801232727*^9, 3.6331229393243523`*^9, 3.633123133056655*^9, {3.63312325250319*^9, 3.6331232622585163`*^9}, { 3.633123359190971*^9, 3.633123368176626*^9}, 3.6331235445195513`*^9, 3.633123680617591*^9, 3.633933554677339*^9, 3.633933759999969*^9, 3.633933970997134*^9, 3.6339343849756536`*^9, 3.6339345960058804`*^9}], Cell[CellGroupData[{ Cell[BoxData[ InterpretationBox[ RowBox[{"\<\"T = \"\>", "\[InvisibleSpace]", "300", "\[InvisibleSpace]", "\<\"K, Tg = \"\>", "\[InvisibleSpace]", "300", "\[InvisibleSpace]", "\<\" K:\"\>"}], SequenceForm["T = ", 300, "K, Tg = ", 300, " K:"], Editable->False]], "Print", CellChangeTimes->{ 3.6331091228322163`*^9, 3.633109197460887*^9, 3.6331100339536133`*^9, 3.6331102195825787`*^9, 3.633110396530241*^9, 3.6331208785351954`*^9, 3.63312096353194*^9, 3.633121034697925*^9, 3.633121130292019*^9, 3.63312118875313*^9, 3.633121491062508*^9, 3.6331218156985807`*^9, 3.633121938923326*^9, 3.6331220059006968`*^9, 3.6331225890028877`*^9, 3.633122657478825*^9, 3.633122707376273*^9, 3.633122801254363*^9, 3.63312293934739*^9, 3.633123133081477*^9, {3.633123252529714*^9, 3.6331232622812033`*^9}, {3.6331233592123737`*^9, 3.6331233681970673`*^9}, 3.633123544542708*^9, 3.633123680639062*^9, 3.633933554698657*^9, 3.6339337600255947`*^9, 3.633933971023872*^9, 3.6339343849973516`*^9, 3.6339345960151043`*^9}], Cell[BoxData[ InterpretationBox[ RowBox[{"\<\" sc = \"\>", "\[InvisibleSpace]", "1.600495876142215`*^-6", "\[InvisibleSpace]", "\<\" \\!\\(\\*SuperscriptBox[\\(s\\), \\(-1\\)]\\)\"\ \>"}], SequenceForm[ " sc = ", 1.600495876142215*^-6, " \!\(\*SuperscriptBox[\(s\), \(-1\)]\)"], Editable->False]], "Print", CellChangeTimes->{ 3.6331091228322163`*^9, 3.633109197460887*^9, 3.6331100339536133`*^9, 3.6331102195825787`*^9, 3.633110396530241*^9, 3.6331208785351954`*^9, 3.63312096353194*^9, 3.633121034697925*^9, 3.633121130292019*^9, 3.63312118875313*^9, 3.633121491062508*^9, 3.6331218156985807`*^9, 3.633121938923326*^9, 3.6331220059006968`*^9, 3.6331225890028877`*^9, 3.633122657478825*^9, 3.633122707376273*^9, 3.633122801254363*^9, 3.63312293934739*^9, 3.633123133081477*^9, {3.633123252529714*^9, 3.6331232622812033`*^9}, {3.6331233592123737`*^9, 3.6331233681970673`*^9}, 3.633123544542708*^9, 3.633123680639062*^9, 3.633933554698657*^9, 3.6339337600255947`*^9, 3.633933971023872*^9, 3.6339343849973516`*^9, 3.633934596023819*^9}], Cell[BoxData[ InterpretationBox[ RowBox[{"\<\" kp = \"\>", "\[InvisibleSpace]", "2.7063022917423276`*^6", "\[InvisibleSpace]", "\<\" \\!\\(\\*SuperscriptBox[\\(s\\), \\(-1\\)]\\)\"\ \>"}], SequenceForm[ " kp = ", 2.7063022917423276`*^6, " \!\(\*SuperscriptBox[\(s\), \(-1\)]\)"], Editable->False]], "Print", CellChangeTimes->{ 3.6331091228322163`*^9, 3.633109197460887*^9, 3.6331100339536133`*^9, 3.6331102195825787`*^9, 3.633110396530241*^9, 3.6331208785351954`*^9, 3.63312096353194*^9, 3.633121034697925*^9, 3.633121130292019*^9, 3.63312118875313*^9, 3.633121491062508*^9, 3.6331218156985807`*^9, 3.633121938923326*^9, 3.6331220059006968`*^9, 3.6331225890028877`*^9, 3.633122657478825*^9, 3.633122707376273*^9, 3.633122801254363*^9, 3.63312293934739*^9, 3.633123133081477*^9, {3.633123252529714*^9, 3.6331232622812033`*^9}, {3.6331233592123737`*^9, 3.6331233681970673`*^9}, 3.633123544542708*^9, 3.633123680639062*^9, 3.633933554698657*^9, 3.6339337600255947`*^9, 3.633933971023872*^9, 3.6339343849973516`*^9, 3.6339345960346947`*^9}], Cell[BoxData[ InterpretationBox[ RowBox[{"\<\" kD = \"\>", "\[InvisibleSpace]", "1.6945097137469445`*^-9", "\[InvisibleSpace]", "\<\" \\!\\(\\*SuperscriptBox[\\(s\\), \\(-1\\)]\\)\"\ \>"}], SequenceForm[ " kD = ", 1.6945097137469445`*^-9, " \!\(\*SuperscriptBox[\(s\), \(-1\)]\)"], Editable->False]], "Print", CellChangeTimes->{ 3.6331091228322163`*^9, 3.633109197460887*^9, 3.6331100339536133`*^9, 3.6331102195825787`*^9, 3.633110396530241*^9, 3.6331208785351954`*^9, 3.63312096353194*^9, 3.633121034697925*^9, 3.633121130292019*^9, 3.63312118875313*^9, 3.633121491062508*^9, 3.6331218156985807`*^9, 3.633121938923326*^9, 3.6331220059006968`*^9, 3.6331225890028877`*^9, 3.633122657478825*^9, 3.633122707376273*^9, 3.633122801254363*^9, 3.63312293934739*^9, 3.633123133081477*^9, {3.633123252529714*^9, 3.6331232622812033`*^9}, {3.6331233592123737`*^9, 3.6331233681970673`*^9}, 3.633123544542708*^9, 3.633123680639062*^9, 3.633933554698657*^9, 3.6339337600255947`*^9, 3.633933971023872*^9, 3.6339343849973516`*^9, 3.63393459604564*^9}], Cell[BoxData[ InterpretationBox[ RowBox[{"\<\" kc = \"\>", "\[InvisibleSpace]", "4.331425657527805`", "\[InvisibleSpace]", "\<\" \\!\\(\\*SuperscriptBox[\\(s\\), \\(-1\\)]\\)\"\ \>"}], SequenceForm[ " kc = ", 4.331425657527805, " \!\(\*SuperscriptBox[\(s\), \(-1\)]\)"], Editable->False]], "Print", CellChangeTimes->{ 3.6331091228322163`*^9, 3.633109197460887*^9, 3.6331100339536133`*^9, 3.6331102195825787`*^9, 3.633110396530241*^9, 3.6331208785351954`*^9, 3.63312096353194*^9, 3.633121034697925*^9, 3.633121130292019*^9, 3.63312118875313*^9, 3.633121491062508*^9, 3.6331218156985807`*^9, 3.633121938923326*^9, 3.6331220059006968`*^9, 3.6331225890028877`*^9, 3.633122657478825*^9, 3.633122707376273*^9, 3.633122801254363*^9, 3.63312293934739*^9, 3.633123133081477*^9, {3.633123252529714*^9, 3.6331232622812033`*^9}, {3.6331233592123737`*^9, 3.6331233681970673`*^9}, 3.633123544542708*^9, 3.633123680639062*^9, 3.633933554698657*^9, 3.6339337600255947`*^9, 3.633933971023872*^9, 3.6339343849973516`*^9, 3.6339345960545197`*^9}], Cell[BoxData[ InterpretationBox[ RowBox[{"\<\" Dp = \"\>", "\[InvisibleSpace]", "1.3935592395694324`*^8", "\[InvisibleSpace]", "\<\" \\!\\(\\*SuperscriptBox[\\(\[CapitalARing]\\), \ \\(2\\)]\\)\\!\\(\\*SuperscriptBox[\\(s\\), \\(-1\\)]\\)\"\>"}], SequenceForm[ " Dp = ", 1.3935592395694324`*^8, " \!\(\*SuperscriptBox[\(\[CapitalARing]\), \ \(2\)]\)\!\(\*SuperscriptBox[\(s\), \(-1\)]\)"], Editable->False]], "Print", CellChangeTimes->{ 3.6331091228322163`*^9, 3.633109197460887*^9, 3.6331100339536133`*^9, 3.6331102195825787`*^9, 3.633110396530241*^9, 3.6331208785351954`*^9, 3.63312096353194*^9, 3.633121034697925*^9, 3.633121130292019*^9, 3.63312118875313*^9, 3.633121491062508*^9, 3.6331218156985807`*^9, 3.633121938923326*^9, 3.6331220059006968`*^9, 3.6331225890028877`*^9, 3.633122657478825*^9, 3.633122707376273*^9, 3.633122801254363*^9, 3.63312293934739*^9, 3.633123133081477*^9, {3.633123252529714*^9, 3.6331232622812033`*^9}, {3.6331233592123737`*^9, 3.6331233681970673`*^9}, 3.633123544542708*^9, 3.633123680639062*^9, 3.633933554698657*^9, 3.6339337600255947`*^9, 3.633933971023872*^9, 3.6339343849973516`*^9, 3.633934596063753*^9}], Cell[BoxData[ InterpretationBox[ RowBox[{"\<\" Dc = \"\>", "\[InvisibleSpace]", "1192.1969897594615`", "\[InvisibleSpace]", "\<\" \\!\\(\\*SuperscriptBox[\\(\[CapitalARing]\\), \ \\(2\\)]\\)\\!\\(\\*SuperscriptBox[\\(s\\), \\(-1\\)]\\)\"\>"}], SequenceForm[ " Dc = ", 1192.1969897594615`, " \!\(\*SuperscriptBox[\(\[CapitalARing]\), \ \(2\)]\)\!\(\*SuperscriptBox[\(s\), \(-1\)]\)"], Editable->False]], "Print", CellChangeTimes->{ 3.6331091228322163`*^9, 3.633109197460887*^9, 3.6331100339536133`*^9, 3.6331102195825787`*^9, 3.633110396530241*^9, 3.6331208785351954`*^9, 3.63312096353194*^9, 3.633121034697925*^9, 3.633121130292019*^9, 3.63312118875313*^9, 3.633121491062508*^9, 3.6331218156985807`*^9, 3.633121938923326*^9, 3.6331220059006968`*^9, 3.6331225890028877`*^9, 3.633122657478825*^9, 3.633122707376273*^9, 3.633122801254363*^9, 3.63312293934739*^9, 3.633123133081477*^9, {3.633123252529714*^9, 3.6331232622812033`*^9}, {3.6331233592123737`*^9, 3.6331233681970673`*^9}, 3.633123544542708*^9, 3.633123680639062*^9, 3.633933554698657*^9, 3.6339337600255947`*^9, 3.633933971023872*^9, 3.6339343849973516`*^9, 3.633934596072872*^9}] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"{", RowBox[{ RowBox[{"Plot", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"Evaluate", "[", RowBox[{ RowBox[{ RowBox[{"Np", "[", RowBox[{"t", ",", "r"}], "]"}], "/.", "sol"}], "/.", RowBox[{"t", "\[Rule]", "tmax"}]}], "]"}], "*", "Ap"}], "/.", "sub"}], "}"}], ",", RowBox[{"{", RowBox[{"r", ",", "rmin", ",", "rmax"}], "}"}], ",", RowBox[{"PlotRange", "\[Rule]", "All"}], ",", " ", RowBox[{"Frame", "\[Rule]", "True"}], ",", " ", RowBox[{"FrameLabel", "\[Rule]", RowBox[{"{", RowBox[{ "\"\\"", ",", "\"\\""}], "}"}]}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Plot", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"Evaluate", "[", RowBox[{ RowBox[{ RowBox[{"Nc", "[", RowBox[{"t", ",", "r"}], "]"}], "/.", "sol"}], "/.", RowBox[{"t", "\[Rule]", "tmax"}]}], "]"}], "*", "Ac"}], "/.", "sub"}], "}"}], ",", RowBox[{"{", RowBox[{"r", ",", "rmin", ",", "rmax"}], "}"}], ",", RowBox[{"PlotRange", "\[Rule]", "All"}], ",", " ", RowBox[{"Frame", "\[Rule]", "True"}], ",", " ", RowBox[{"FrameLabel", "\[Rule]", RowBox[{"{", RowBox[{ "\"\\"", ",", "\"\\""}], "}"}]}]}], "]"}], ",", RowBox[{"Plot", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"Evaluate", "[", RowBox[{ RowBox[{ RowBox[{"Np", "[", RowBox[{"t", ",", "r"}], "]"}], "/.", "sol"}], "/.", RowBox[{"t", "\[Rule]", "tmax"}]}], "]"}], "*", RowBox[{"(", RowBox[{"f", "*", "\[Sigma]p"}], ")"}]}], "/.", "sub"}], "}"}], ",", RowBox[{"{", RowBox[{"r", ",", "rmin", ",", "rmax"}], "}"}], ",", RowBox[{"PlotRange", "\[Rule]", "All"}], ",", " ", RowBox[{"Frame", "\[Rule]", "True"}], ",", " ", RowBox[{"FrameLabel", "\[Rule]", RowBox[{"{", RowBox[{ "\"\\"", ",", "\"\\""}], "}"}]}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Plot", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"Evaluate", "[", RowBox[{ RowBox[{ RowBox[{"Nc", "[", RowBox[{"t", ",", "r"}], "]"}], "/.", "sol"}], "/.", RowBox[{"t", "\[Rule]", "tmax"}]}], "]"}], "*", RowBox[{"(", RowBox[{"f", "*", "\[Sigma]c"}], ")"}]}], "/.", "sub"}], "}"}], ",", RowBox[{"{", RowBox[{"r", ",", "rmin", ",", "rmax"}], "}"}], ",", RowBox[{"PlotRange", "\[Rule]", "All"}], ",", " ", RowBox[{"Frame", "\[Rule]", "True"}], ",", " ", RowBox[{"FrameLabel", "\[Rule]", RowBox[{"{", RowBox[{ "\"\\"", ",", "\"\\""}], "}"}]}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Plot", "[", RowBox[{ RowBox[{"{", RowBox[{"Evaluate", "[", RowBox[{ RowBox[{ RowBox[{"Nd", "[", RowBox[{"t", ",", "r"}], "]"}], "/.", "sol"}], "/.", RowBox[{"t", "\[Rule]", "tmax"}]}], "]"}], "}"}], ",", RowBox[{"{", RowBox[{"r", ",", "rmin", ",", "rmax"}], "}"}], ",", RowBox[{"PlotRange", "\[Rule]", "All"}], ",", " ", RowBox[{"Frame", "\[Rule]", "True"}], ",", " ", RowBox[{"FrameLabel", "\[Rule]", RowBox[{"{", RowBox[{ "\"\\"", ",", "\"\\""}], "}"}]}]}], "]"}]}], "}"}]], "Input", CellChangeTimes->{{3.633934555936432*^9, 3.633934558349945*^9}}], Cell[BoxData[ RowBox[{"{", RowBox[{ GraphicsBox[{{}, {}, {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[1.6], Opacity[ 1.], LineBox[CompressedData[" 1:eJwl1nk4lF0UAPApJVJUsqTsRCKJfLLNsRchImVnbDP2fReyZZkRUSRKUdNC lpRUUkRUlhDZQsmSUiIlfPeOv97n99z7vPfcc+573ivs6G3qvJZAIASuIRDw cznu7NjYg2PEuozp46GydGJAfrxUUdk7IuFkpBV2+alt/x2hjxLNi4SLsKU+ DffUhk4TLdsMxMKQTR6cVNtZNEt8e3b6PXZqBFBPpC0QmbtKasORmzQkh84F LhGLxJ36IpBjmVguju1bA6+rfkhFIQuNhcO6a0ygcFiz5DTy06bv48I8zNBv peUcg2x9m3SOmMICG/1Gjc8g/017f8hmZSNU8m/1ike+6GMwEua/GeZPP6pN RFY8Xpt88QsHrCy81k5GnszN2dEnsxW85xWWUpGTIjc/X7jKCRefl23IRH7v pZe9oX87BD/LOZWNvNs+hsLNzQ1o4mAOcr3m3DaFZF4on2uLvorMqSD7RbN+ B5RfYM0vQnYUJ9eYLPNB1HzrNB2ZwDJA8vbjh8emZ8UqkI3/cCtF3RGA56XK bA+R8yePbUobE4TMpHnRJ9gujpbmMsIQ0rg42YiseqR7rf9VUchim2seQv6k MesRpi4GOgcfq40hpyhveR/TJwYnG/WGvyJ/2Kt/O51rN6hYzFT/RQ5hf3q8 5Kwk1Ajx3+Hdj/K7oe/J/d17YPfV4gIh5MaV3xJPXuyB/g3WzyWRuX/I/WtZ kgLSHZfzh5Ar3xVdn/CVgaavEU42yNavn7P/YN8HcQPfm12QmRqGQhZu74PH a2/a+iCbVu0w3DAmC39CBjfFIYe8fhm2TUYO1gWMRtzF7y9VFt1/VR5YdGvd WeToRGn79QlG8/LA70BL4ULW2No27mGgALsj+fpEkD38nUvocwrw5c6jDerI df+lHxLVV4Rj9wxSgvD4s8/G3LNKwGfE2/sd+UV7esQ/bXVoEBDXJsjTiT2x VkN8uerg63MudBvyN/ndmoe+q8PdqrhWMWTe7JoNQTlEUB789OEI8n8y/q9+ BwGUOZbZZyGn/bhs5tuiAQ/KTO7JKdCJSmGzFKcAbcg7OJcefpBOtO9ryxXO 04aNvbIkGnKSaknz4AttWCbf1byG3LPsJnWKUwea5u5ItCCHnBmcMCzXgbpW SuRORTrxYeort/9mdOGwqej8E2SlggKXjR5HILxwRmiDEnK9geM9khF0NpTJ nFemE88PejIVJxvBQKpY5Q3kmQXa9UtlRmCw+YlsDfINmc6xhBUjYBHRXj+C zH3B2t3mkjHoX+cTkVVB30ulonI8+RhcGBaaeInck6indeCqCej1lW+cUqUT mbN6OO9WmkDmpcTH/5AVCsmfJJpMQExC25pdjU5Mf5wSz//dBDi9XjrJIev9 aG1kUTMFo2zrrCDkKsuTR4d6TCGpcv3xJeQsGbJ56hYzUG3Ssl1UpxN/6ZHb 74qbQWvlqzY2IjovjmTDVmUzyLoWtWcXMvsFss42ZzPYGymQpoqcRKAcvFht Brm3OHZGIIe9o3BddzSH3WtGtOaRe6Yp5xqCzaEqS2/rekD1Y3Hf/CXVHPrs 5l9wIv9SdV8v9cAcCg14e/cjexa7z5WynYBnr5bqyMj2oR5dNZUn4LtXdVo3 8tNMD5OBV2j8Y1vJKPKuEo83y4MnQMlW+f4Mcu+IR4MGqwW8vyLit1EDxX/U 836jjQWYVh69q4qsI+iV9Y75JMTxpMjnIUs1eJtPnTwFxV895vU0UX8Zvd12 zeMUSKQGHDRBjls7bmAdfQq6WffbWSIPEu0139w4BfVRfP4eyBmPjsmWzp+C BH/FAhryn1I5Vv/zluAuaczfgVz81jNu701LsHKO3fYB2XSavjJaYwkLilOz w8h3pETmzUYtIZmtMfwHsn3RtlHFA1bwJTirkEML9ePc2cd/W61g0vGy02Hk wGpZpYpRK9jAP73HGFmkx73C/bcVvB2RGTBHjuD6RO8XsIZfLfObScj70zuz n3pag9F876UI5Ivx931i2Wzg9K13sXeQda7/mFIWtAE78Q0Hy5F/PpdxnT1g A5z8G94/QD5KKLZxsrSBtOTPk8+RCeHZ+rp0G9Dk9TTvQXb1CRbbqGcLM+z/ HSNo04naeSIGZGtbINma+61HFml649vkawvWwfQzG5H7BcVqE/JsQbIhNWA7 smlr2ymmn7ZAfeyTKYGsvk+K9i/PDvYfmBvTR95p2XXfqtwOqGpG7MbIC/HR /Y8a7cCiR1niOHLFQPee0J928CHIcZ8V8vmXGiN/Re3Bo3E6i4K8MehbRHCo PTQ3J08kIP9h094iEWcPczKCKsnI41dzrnVT7SHqdFx0GnLDG+3mg9ftIcnc 4EsmcrT4JZ5fb+2BayVa8gqyV83MrWu99lBraL7rGrKNia768U/2MGbOsr4Y WTnyh1P5H3sgl6Tdv40816lX7iPmAIkXC7KrkD9RLusIyTpAgOKcQjVyB2G2 p/WQA3QclXpVg3xPOn9ln7EDEKVL3z1DpsT9Ojod6gA8JpEBzcgf5a9+Ibc6 QNSw8kof8q4FvQtfeh3Ad1yGMIhs8fibrvMnB3iYIfpnCPmttmqx/R8HuFUY 9W4U+Yn5eycLUUfoUH4qPYXzuSNqe5eMI8S5Z8x8RVYYFKs3VXIEIyX5u9+Q 77j4iRoZOkJlhMrWn8i5wZtHtIMdoe04IXEBuVul8tzzGEdwSe/k/Iu8lWCl AamO8I4sl7uInJR084rKVUdYahvMXEYOztGyO9DiCJdJvmrrdOhEs5rQfkFB Eoh1s0SwI6efFkq9vIcEasMRtzmQW7QaVXYqkOCneFPXFmTN19svcR8hof3s 38mJLDdQemqzPwm+dR5350H2uHqCNSWSBP/S0vx5kW86Lz1kSSKB/RO54B3I Qt/0edddJsHJwys+O5HZVz53/31JApWY1P2CyPovUhNC2knQ/nKBSwg5IVFe cb6PBJcXzX9jL3HEZP2YIcHaepESEeSvQrvMxvmcwEnt4bQ48itN0/YuLyc4 Hd5StxdZmvUCoSDECbS9JxykkamtfbJusU6wVePICraZtTP1b5YTDLQvyO1D /hgYYiD4xAm825RC9iNrqT4JG3/pBPcbEpnkkIvXrr1V1uYEHH/IqdgetBQW 7U9OoOnHfuEA8sLN/AY3NmfYQBlIV0C28h79JcflDOFjr1kPIj89KCm2KOAM zMScaOy452WxaQecwUF4ylUReUt/PbpDOsOVh3YCSsiSHFPVizecwS/nnJwK ckqX7ER9mTNUe4imYn+7FMBLrXGG11u2fMaulFwOEmp1htwyrgxVZNDcqqAz 7wz/IL1XDfkaywkSO8EF/ik+kFBHZm7NzXjP6gI+pl4B2K+txH6Q+V3g8kgR KxH5ZOB/JVRtFyC1j4oCco1KxICFkQvMrxx0xRZYW7dJ+KQL3BvSo2N/ouqj hugChL5nezSQfW7aSPZkuECHUf4uTeTEvjOFwsMusPwg9K0WcqxktMTTKReg 1Vuv00aOCoy4YznvAlyK4oewAzgCqzLZXCHULKIA217LpXm9oisEFfTY6eD8 pjsaF4Ir1F2NSMM+MWDbqW7gClm1so+wDYMtBoPtXaEyrHuLLrLy7cM/J5Jd oSD0RgX2wQXt4IQsV7A/rfsBe7+Oxj+RK65wtZuXoIe8e+gQs/V9V6Bwuh3B 5uTcy/d2yBV6WoTeYX8N26xZruAGElnEl4eRvzSyNhoR3eBDwtAw9sh25qNT R9zgEmH6H3ZvybK5mJ0bOHRYyx1BfjnynZx91g28zo9kYtfJfv124LwbFPVq 3MZ+HDHu35rvBkH3xZ9jl3MPR7JUugHhbvw37AL9jnNhg27gLzKtoY+ce+Et N8+EG5CZHppjZ39qvlQx6wYtYjvJ2KlRL4q+spDhH2cFFTukvLLaVp4MazKd u7BN+S4MayaR4ST7OVMDnH+y3JhUBhnygz/ZYV942DK5LY8MESoLHtj9Jwi/ RkrJUMHskoDtkklmPvOeDK43I6uwk0aY2NyHyXCD83cd9m25fI7jU2T4nav8 BnumtYNXdIUMm93FRrHDNqnufbGbAvLtVzYdRc6z6pa9vZ8C88xnubFrb/ko ZCpTIOSalhD2uiNFaiQjCkCHvDw2NZ79GFMQBWiwwwK7cPljgFYDBTaJV1zA rjcMD93bSoGL7ZIF2F/yuKI4eymw2B9ZjC2top84+pUC+2ubKrGrgityzmx3 h9ay2VbsRa7xwuOS7jBHG+jHhspdd0RV3eGoktUEdvNM/NMXJHdYMRVdY4jM QXvUmBnsDoPrgzZhm8l8byOluEPmBk8e7EHyyVGmCneg5p2Qxv45IsWivdYD ojiDTLHbB9bo3+PyAOFCASvsez09Kbv2eIAGNZGE7fU2gWPO2AN2HLrujz1R PcJdfNkDAi31zmEXl6bnRtV7gITKt3xspyJ1AYspD2C2Hb6N/TE9V5zlkCco Bw69wM5POEz/aOcJp4+tacW2jpiXrk7wBHa3y73YPa6mCpROTyhzcJvGzrYh PNRc9ISpoBvzjP0dL1HZKeIFccYxK9it6hu1Xnt7QdGIwBYj3K+Msvl/5nhB k8t5XuxNdiILPPVeEO9RIoStf1r5LonXG7I4vshiJxaYOpZ6eEOGxE817Ppa Cs/iM2+Ydfypj73GR8Pl2kYfKJ1fZ4EtFP0GXin4gHG2piO2zZXPc9vP+sCh OVoQNm/1xFu3ez7QYCF5GruzffrG4/c+MH1LIxH7KNP8KafdvmARuSubsZ7C MtumQF8g8Dtcw1Z1YX5a8cIXhF21SrGDXjfzz/P6QfDul4+wSw/QIpW8/KA6 YUMD9vjF4wNhL/wgPUTmLbbICo/aE15/8PU+2Y3tdK+iTvSZP8z4zoxiFzsY 6ya7BsD1f73fsG0PttTfZAoEv0Du39hcrHpajQWB0C7cuoR9TFeFf+eRIBCg VDEZIyefkf3t9TMIdHgDWLCVR5lawtKDIegRyybsSc2e/IR9IXDM9hc7Nv8m 8beNvSHAyRS3FftYl+8SS3woqMplcGKbnmn/sVcmDASey3Fhm8vJjRl1hcHz oWhu7NdrfDv3+IVDb0cUD7Z2x73n6zgi4EW1ES82cRN5E1d1BLC2rt/BiEdX +IQ4KRKSdHIYvlVYnTO9Jgr2LbLwYfOtmAzcvxIFfgZODFvC0mc71dNgWHSX 4ZyYm99Ye06D6PAEw/u4XegBEA1O/II7sdOngq0+nY8GSwF9hqU7QjfeG40G liYKw00Pw6vDD8TA9bR4hnd3HuIeSYyBTonLDJ/5/tvv8EAM1MndY/hwJLFc UC4WHAxrGd7MlvhjPi4WSEktq771VEbqXSx0vO9c9ZF5so3wGdCO7Wf47a7J 43uDzoCJ3uhqfDMDan+az0BJ3TjDqV11YqJ8cbBt4ivDSY+K2AzJcVBoNsPw 162cXV+q4uAB1yzDxuTo/Nh18dBkOcdwwByd6+HJeHC2+c1wbsy71Ok78fBn aYHhvwLThNOL8TCi/Jdhy8fMgVv0E6AIFhmOoPZnqxYkgNDufwxfti9/6PYr AegfV/1HK+T9jFYirPVeYthcQn0+JDMRHEZXvSMy7bfvcCJ80VhmeKCjf4Ei mwSztFU72ozfWD6TBO7dqx7/MnsioycJ9NlXGL555vvaWImzcEVp1W6CUyW+ QWch+tSqJ78XsvxrOQvJwat2f2bpmCCcDK0ZqzZjysuPCUwGyo1Vq+sOfIh4 lQwslat2zGXf3smTAjvrVp3wjWi41yUF7FtX7REso8BfkwISg6s2IezcybEl FWSZCLuwfXMXlq3tUmFL7KrPKXSP3CpJBenAtQzzaqjRyf9SIYNvI8NXDK97 S+qngUCOJMOT1MbRmPw0UAyoYli+bdKi72ca2OyQF8QODA3YoshHBWGKnwj2 A5HlpnQNKiiTlySxT/7WFFc3p4KPmc8+Rj1aEmOm3KiwzllakVHvK68HLkZQ wXmrhAa2SuBWZd10KqQ2Pz6G/WxvQ5fGJSoUiQtZY+uOhPiqFVNhDF1gGeft iSmx5jYVfq9d9MVuuSi9+VAZFaoiW8Ow2QOY+6qqqGApmBrH6A/GH28qPKbC zdrDNOwMqUdB5XVU0KULXsLuWn9ee38jFSQ/yNzEDpqN3vv9FRXWp8iXMvI1 7Lmt5DUVgvUzq1bPo97HvR1UmFD2f4m9SFdonOykgoXI0lvsvAvCJfT3VNif 8us99pDfYrjEAMrXDs0p7Gj7ccexIRTP5utz2CJGXUeKRqhQuCeFcAz31z2l PKLjVNDpZ+LFXs+Ttzw8SQXz1mti2MXrzn6+Mk0F0u3PctgTQ44VArNUyFzw NsJOfmOcOzBHhc0fX9lgS9eoxuQtUKH/xrgntlc2tzHfMhU6mvPSsTnimBR7 CTTocNC7hn3Pd2bXRSYaVNgMV2HPHm2e5GKlgSjP9mHs88oP2jvZaEApfvkb W1Hy+sNMdhq0G+ZxmCCHMEUlbN1OA+rclCb2jh8UzzZuGghYxdtiPxq0MKPt oEF4VXQ49lK1nMhmQbSe0Odq7PwbAqyvhWlQYB3Qhw1ZbDPJYjRoWylbxo71 +fyERYoGn9to+qbIYrYd1xulaZBOsfXHbjCoTUmQpYGDnVI+NotEzql1B2nQ nRLyF5u+PQFe/EeDhoM80sfx/3utv0SsMg0mNQ7YY3/9bseuoUYD/YyJbOy0 gaNzK0Qa1F61bcP+HzVcceE= "]]}}, AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], Axes->{True, True}, AxesLabel->{None, None}, AxesOrigin->{0, 0.049190000000000005`}, DisplayFunction->Identity, Frame->{{True, True}, {True, True}}, FrameLabel->{{ FormBox["\"Coverage [physi, tmax]\"", TraditionalForm], None}, { FormBox["\"r (\[CapitalARing])\"", TraditionalForm], None}}, FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, GridLines->{None, None}, GridLinesStyle->Directive[ GrayLevel[0.5, 0.4]], Method->{"DefaultBoundaryStyle" -> Automatic, "ScalingFunctions" -> None}, PlotRange->{All, All}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], Scaled[0.02]}, { Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}], ",", GraphicsBox[{{}, {}, {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[1.6], Opacity[ 1.], LineBox[CompressedData[" 1:eJwd13c8ld8fAHDS1yo7kuy9omGH87ElO2Rm771l770aRgpNoaKMIqOySYUI UVnZXGQ2+D3P7597X+/XPedzzvM54/NcLjtvQ8dDREREvdgH/r0fnzI7+0of 0bLNvbyyTYoCihKEH734jKiFe6TDMFeZ0UtfKJtGB5FLoX2YhWcmR95cXUHn vHJDr+yQIoNXpgonH/1CR4ll5fh2SVF6OGSaZOyi1uM2b3j3SFGXkuCPa4H/ 0M59czqr36QoloQ8f1aMGI428ct+/EOKOGfD4PADEjjH56EU8o8UNXcR5rmO k0JidKiUxQEpsnxifw2lkYPoliZ/MDEZ+p0xLGt1QAkhFkGcvSRkKN/n4lSo PxUQN12QMiclQ1KX3qTmz9EA5+HqUC4KMrRYcOvE2Ck6aP948RD3UTKUHEHV snuPARTvdkl+oidDw14auWTjx2BaX5YhnIkM8dvEuDExMcHmma1cOxYy1Ka8 RS+RygzFuXOk37jJEIOE+Jxy2wlIXuQ76ytAhuz4XBsM9llA5URLDBIlQ0Tk 3+y9/dhAcnSaPU2KDOntMclEPmWHp39Y68nlyVDRov7RjFkO2Bxgp3unhNnJ ztz4FBc0mv0qmdIhQ/IXvhzyv8cDEsZWcasuZGhG6ZdHqCIvSGwpndDwIUNp crTDMWO8EBb35tdYMBn6KqL1JJuRH5ZzNywakshQCHXzpYoUQVA8tvLocjkZ 4iQba6rlF4Jfo7VEt6rJUOfBjkBTqxDsWu8XMDeRIab1M3/f/xOGbSGlys99 ZKjm86OHC76ngKba44nSHzJk2dtCvU4tBl9VBi5EkJIjkvYfIbtPxMBIYvXO Hh05Mnx5QodsVhwiD/rf1QqRo5DejlD6U2dAKbqCTd2SHDFVyvGcvncOdgUe 9rN/JEeiNv8l6m6fgwvfJIKmv5MjJbq+eY+LEvD8nGHfHwI58vB3rCjbkoDs zbCTwgwU6J10tiyPlhRMqJw4nGVFgb7Mm99RKpYCkdsskiS+FGj5Ft+B9aYU CFmT2PTFUyCmv6/b7hRJA+wsJYU8o0Aeb3/qMf2SgamaXhFGEkoU6/u8SkJT Fj4N03E4naBEedxhjJcKZcG4Ok+S6TQlaomnHcvSkANum+PCeVcoEfOF804U d86DR0jDA4m3lKi1Pzv8r6oiHJ1ZNKjMPYJGYi1+sBQowvuIWE6b6iNo9Ry/ sixBEU7S5oVE9R1BzLkNZEG3EJiUlCLqo0eR9Cn/7p0ggGPp6YXpyUdRxnqh ke97JQA9mdtc+VSIWYskkWhbCXhbaiW0G6nQ/fsur7I4leG9qUvF3gQVqrt0 jqUiUBnSwo7yTItQo6narh+LHCqw1GlUyNJFjWRCf7k5BKjCN7V28VYqWmQz 1lfAdUcV9NgdKj5w06Jk+Yqe762qMNhj1c4qQ4tG9l2EzRjUQPrk0GiaPS0K ifu+oFOlBsPW9SxtTbSoLr3bRXpNHSSJxJssounQxEpJ/uZxDej7s7vJUECH yPXiu14gDSAny2hir6FDpnRIUDRLA/Sn1/+JL9Ch3ZyaOU4xTShnPkF25TI9 kikudqL0uADDbTrh46oMyIYoIrfzxgXQNXtFpejAgJJtzTviGy6ASKLOscPx DGiEh5H/gFIL9oTiC1vaGFBIaerPX2VaoNV2IU3s4jFU9yLQ4dvcRSj/L+/M Hw9GNEF/6WYBjTZQF+uUat5gROQBp9suS2tDk39OKt1rRmQqtcQzkKgNmnYE HlYKJrT72ma6g08HJNk6eFWfMSGZtot2z+11wbz981s/GmZ087snSUmqLpi1 R5BdUWBGa7tZD2+/0IWAqfv64+7M6PGpwdnEA11IGaSau9XDjJjyLN2tbuvB vH3hV8OsE+h3jZRcgqs+1Es6cJRIn0SCLZ2URBH6oG0putPifRKZfDIdC83W B/oYw5bc0pOoaiE03OeVPtSZM8d4srIiV/Y3zRb/GYDgg5e83FRsaCRJQ+Xs PQNQ5ffs42LkQKQ5IwzPagxg7itF/G8zDiRx33VGoMsAQtwbS+uKOVB2Y1oC G8EA2i+uGewxcSKN9U+d5AqG4NlHSf2jnBO9NDfV/jFiCL2iTMFbi1xoxnmB 1XzZEDbuyAQ6MnIj+sDQlcEDQ4gwOuXiBNzIK+tOZg//JZgzEf/Jk8+N+Nsm +moDLoH+26e2vbo8KOeUq3E6rRF8ODl7aPUrL9rUcO1/xmcEIVSu8f8d40OG dq46n+SM4KjIQ89tHT5EneeqRu9oBEf4ptj82/hQMpGbZH69EeSoRfkqN/Kj WRa3F/UfjaD/1k+prL/8SFXS7dTYtBEk+QVmDSoIIGI3Nz52amP4ynCU2LxV AIV+dmN8aGcMVt7ar95/FUQjK27X2oON4bJ1nKUpjxCSJnenmks3htG/El+I PYXQprz7f8KvjGHrHNnJNyTCyLPEfavyiAlsciiL+iMRZHPVY6ihxgRyxre4 b2+eQs03PAy+dZsARwizTaSBGGKt8Piw/90E7gt+OPK1UgyNTnm0K1Fchutf 0xsZfcWRobZnbafVZWC3e9J+Ju40eu7keWbB7zLUKvx3eu7VaUQT4/mMMvky zOkcqQpcOY16az0f6VRh/QlfvpyyOIPUOLxyPpOawqEbebyRSmfRQ1kvuq2T plAol6vmHXEWHTLyymA6YwppgWWWFq/PouZkrwQzC1MQ/C+IUlr6HJLZ8Ar8 UWkKo8kP2OMVJJBwu7fxkqkZyMh8sqSMkULD00/6HniYwffaEum+bikUf2j+ omW0GTSf/tXfwCCNviMb5Q+PzcA0teb8iSfS6PprffHKbTPQ/O4UlTAvg9Bo erkzpTns1Ioo052XRcs7XXyc7OZwd/lIOCFTFqlLKrFeUzOH0drm0QY5ObRX eYbC/6Y5BMla9as/OI9KPnrGi5Saw9b0YzpmYnlkuFJ2MN1gDnTNh7l9bOTR U2HubaNpc2jg1PXp51FANo/op6XOWoAna4uUcLMi6ir41fj7kwVM8bCVc/Mq ocB6cZnqaQswyRFQZ7FVQtwj7tXuOxZwq9GHg7lYCYUzzpSNs1uCDpWqpxy7 MjqdPZjb7GkJTjwm+eVCKuhbBS19cIwlMBLash28VVDqB+0M8RxLEK/0stZ7 qYJmKNvj7jZawmsd+X8fNVRRfkKtT+wRK3gU1trBFaqG1B6uL8lxWIE2w6wQ VY8a2mg55fzrrBXsfOZotTipjrSJSqwczK3g979ed8UWdUQUlqulXmYFxjwM 2zNcmsjZJ5iXUuMKCPIfOVoofhGp3uG+6Gp5BRZ7JV+o3r+IuLs++Hb5XgGz c56nBI9ro3EO3jeJd67AS7NUyiEyHWT4qc+MZOMKLPGR35Ih1UOn/4RF25FZ Q5DD+DnxdD1EJSDw+B2rNZAubHg6U+qjrsiIzSgNa3i7X6DDk6ePFMWEs/7e sQaLI8OBK+8M0EnzoVqLKmvY0sgBT1pDtJsQPf660xo2KNuF420MUfW3L0JX N6zBPfHvjzv/XUI3O5SmfvPYwIbGjk+mgxGiDFoND75qA1/FBEOIoy6jvSOq tALxNlB2SYNmYekymr9368GXTBvYQZ6kHBamqP2Dao/kQxs4VNi2WAlmKJrv 9vHNjzbAO9XTTi9sgbwa1sofjNpAwzXFheNPLJCVgbripRkb+O8i/FoUs0Ry EesOVXs2wFJ9iUcVWaGtQY0qH15bYHWY8Z2Nt0YzboVqnOK2kFFzwlCBxgYN EP0a+SRrC+fNXx28sbJBz0WLDsT0bOHJbeln7ES2yC1+U3vlqi1c/httVWJh h8xYtCbuxNuCwrPTeXmv7JDm82J/7SxbODyuY/SU0R7xjWsVPHloC8c5C3Oi RuzRxLl7c66fbEFM6OyX8lBHxLqrkTc3agsyV3+LJ845osuNq+qOM7ZgUjpn /cfECX1UlS+x2bMF5jn3isOKzqjJeNjhMo8dULQFxf0Vc0W7JyKPDZ2yg7Il +13Kalck8Z23zVDGDlxf0Hp7yrmhp05+PLo6dlDFZtRedMkdFQRTTakG28Fo 2HEeympP9OV8zbWWGDuQiXtlQG7sheiILJQg3Q7iOJ5VWv7xQsnJpXfP37MD vl/uMgPCPij4lor12fd2YLXvpPnkvi+qslqkfj5kB466FDwGZH5oleta86kJ O+itCHw+5OWHnMq/swlt2cFYMrKbU/dHRg1Xxzk47IEmbpXFgT0QZUdxphcK 2YM2Y5WleGEgeq/Sef6khD3ojdMs9HEEIeXeY7eZLthD/kL3mvCZYBSZ3aB1 85I9DBv37J5+G4xeG9n9prtiDw7Ca0Gll0LQmW+VZlT+9sB0tFcsL/kq8rhn QpEWYQ/POd9sOAuHolLHf3XkyfagMv/ZwKo/FHGuajEfLrQHKkPVx6Hi4Yj6 4OeX3x32YBuk44jORiGt1vTEkH57oGO2eh1AHI0Sk85JbY/Zg3+VO5O0ZzT6 RxOTs75mD7lrF9lj9WKQzKCAmvcfexhjN5PX7ohBAfkfN5f/cwAzydQcUqVY tMzJajTP4gDdOxZEo8pxSPBnC4kTnwOwev+Yke2JQ/ZlrtXT4g7woiS3jNUk Hn0984r+h6oDNOez5pGEJ6BuZcP+IS8HELNj/v3+cDISpcgjKg5xANOOQaXy 0mSU+WlM3CXWAeocHU7kGKQgI0vHzN85DpBFu3aarzoVveIub2otdgA65xw9 Jo80xLKwupxe5gAfpU5WPxFORxOBIRc5mhzgYY2Rtm19BlKRbwqd73CAv7NU I/0pmajk0KHyF30OMFnXdyHJJgt5ZKWRq844wFP5hsDq7Gy0W1rU7nLEEcSG PxR8CL2OLLynN88wOkJW1fhrl/3rqFlSkPcPuyNMDOv79ifcQPEtL2IzzjrC 9cZDog53byLa8TbsP6YjeLxofXhAmof871N4h9k7AoHETTX4SR764qJbpOrp CEarfGbeRvnoztbw3y/RjvDl/bkKuZpbSJBmqf7PY0fokE0Srnx2B6UNiS+0 vXCEcsc3ebdDCtHq7QDmzAZHGI42G6/XLEI1gvtBnJ8coTCgcH1ytxiBMp2E 2rYjnHUO/J774R56QG5iT03kBIVkms1/NO8j0k8F14cpnEBfruCidud91GvB u+7K5gS6L5x+ful9gEwDpSsyVZ1g6tim3c2/j1DD+fBvl3WdYH3Dht88uwSx H3p3lMvUCb5YBvBfEniMZjK1sILkBBEDewr7V0qRT6mV4Mh1J1B56xbw33Y5 ShqLu8816QQt4fSHeB2eo1jBaIHmJSdgD6u07eh/jiIDw5+abzvBjdtsUtFK L1AATeDLG0ecIW31homSQBWyUXHq+U/KGdQWXRHb0Rok90RzYyHVGS7IUD5N OF+HJHdVgxNznEGIt+UkoacOnVZT+st91xkeSCI+b8t6xP9DltSy1hl6qvT2 yhJeIwYGEZaPP5yhkJqusmmtES2HUilXSbjAw4Xvz5gZ3qG5TopOXeQCj/M8 yBrd3qGpY6TaSxdc4NH6nMTF1ndotGLfmNfaBWKyBuO4gltQxxTBNTfFBUJy e7RMF1pRsdbAtdDvLvBA5d3Q/mYHMmTJm1ROdgVed5o3cZkfUIDrmVnh664g 9J5mz3HrA8qre79If8cVtEsX0p9YfkTjJkSbU5WusBYWVGco+gk53XAljRt2 BXO5szHDzn0o9Ki8SCu/G2S8mb/bQzeA7u9PBKi0u8GvhDgdk4AhtDElTK56 yAP2VW3aP3OPIzsbJqHfRzwAOZuqJBuPo/5vxFrPGT0gaK/kE3PyOHo+MpLG KuQB5zcm0fvlceT1MZFmS88DbnygfGVX8w0t1E8xlRR6AKdzgPng+R9oIruA j1zWEwyN+c6cPjaJ9KkT1ZuVPeG25cvGNuFJ9CbN1zlA2xOOTfj9QUqTqChR s2zC2hPy33FyL3pOIsvwbdH6RE/4txZkQtkxiUacDSXcBj0hL02c0dV3Cn1S pFTp9faCmzkGi5drptEX5Wf1xqFeACaPbml2T6Pv6vqnf8R7wbjIiAzL92m0 qpvLtnHLC4yKQn1tyGbQUWvu3eNtXlCkpyYeajqDtKLkntkze0NTfzrp+uYM anvjdvzPW29IHrzakHB8FvW2UmXGv/eGlKBVunrBWTTY+fww9RdvOAFFwn2y s2j60/Y655I3+HL84yy3mEXEPkpODyh9YErgTwlt0SzijP4A3RI+kHnU72Q7 2xyyuvtz61iKD8hNfeRtophHATykvgcZPpAUP6HRyDSP0kv4lxeu+8DWaua1 Ep559Pqp81TzHR/YyC86qqAwj5jrFz66PPeBmgOP9wHe82iwf+Vx47AP/NrM LRLsm0faJNtmDvy+8DhjRt0lbgE5JDIN6Yr4grTVWgJJ5gIKo5DWlz3tCwVH nvlk5C+gcpoQdWo5X2CdMKjxfLaAyFl/n63T8YXrar/H7L4soDaJ/SNHA33B 7ZtEhhTfIpJ3Im2ubvWFwVZzS4lXi+ju00MzZN2+sH+J8W3W20VE8mufwvKj L2S/2w382r2IeqJ2jA+P+oL7DQEdxfFFZHZrfsVo1ReIizb7lYmWUFBvD9s2 sx/MPOtbvKy2hCrPZkXIePlBOEnyEe+2JUR/Ne1Bur8fHNt9cWLxPdb+TVL3 RIgfGNWIfbz8eQkpakczpsT5gYx2YsqRqSXU6+j7bDTfD8qlb4x/2V9C8/mX voW2+kE71x8yOqllxH1wXKGJ2R8y2i+zP729jJ6Oy/vusvnDvZcuVmn3lpHU a9tH53j8oeN8oonN42WkFfiEqvyUP/DGWL5ZqlpGfkuK33OV/aFa5Z11avcy ah12jPLx8AdaRMq8vbmMHJ5Xv+N56w9aAddP/VFdQasZI1tX2v3B9OhOctWF FRTi/k+ooMcfqMo5ymx1V1A6v8Z12iF/CCzp9H18eQXV3Plq92/BH4SPcNQO uK6g/1KIDw8zBADxySGpmvQVVGKrp57qHABsdqG9B70rSBVU5Nw9AuDViWM/ kvtW0BS7tJi2bwDQFfwncXRwBbGNszNRhwWAyIPCHuKxFXTTZPXntcwAcKfd rSibX0GxFzMSbtUGgMTlOdXNQ6voiuT7tlKSQFjrHhF4cW4V/WV4U5dCHggv dT+X35BaRQUbVU/dqALhonBqjK/sKhqqLLgpejwQaMtbNDnQKtIWdnN4LhwI fGLVdKpaq0iOg+JwnUEgVHvmHtRZryJGCg2VzuJAyKnwcI9JWkX75UxTdI8C Qf1dFT9N6iqa156NtiwPhIKlQJf89FXUmJ3QvF4TCBWTrMWF11aRA3ObLGtP INx7F1Ttf3sVVQkonfbdDISxOk0O44pVpK9+nu3khSCwvCYXz9GPjT9P2eio GwR+hzsdRT+vIt7Ur+bPLwUBO9vAC8mhVbTz4Wq+2pUgCO98el9hdBUVGdcx +PgHwfewvRyeyVW04iBJ2V4YBCU/DzHorK2i1DjxHa+NIIhevd6seJSAkvk/ GlvvBIHkK3n7LioCSuj2qNH7GwQJC9uJejQEFE1T7nuaNBj4zlNbmtATUNBt 3uX1E8Ews+BUoc5MQHbVJyYDlIJB+VGfWy0PAclNk7wPzQ4G+rXh8p8yBCST eF/IPScY/nHJPOOXIyBJIaVki4Jg+Hz09yPH8wR02jtSTf5hMNj7/E36pkBA /H923/x7FQx3fWTcapUJiJ5htSb6RzCMnH8TTK5NQIvKI0WJYiFgpHdV0MCK gCTKDEsnzoWAcRLnV48rBBRB8+GFnGwIZBlY3kq0JmDvK+/aVlVCIPyouW6N LQFJBz5ZNDELgXLaa+u7jgQU/zhSSiA+BJ6B3iFhLwJWg/k+do6GwOwXJS2l CAJy8ise5voRAlEX8pd5IwlYPTkxGTYTAhb93QekUQSk+oh6U5wQAs7zb+M6 ognITXH3RP7hqzCRT6R7Lp6AXvq8d3QRvwo54uzyHakEpD/k+4884SpEkJ+k m84loLcDxxi1Uq9ChuBKaG4elo++V6JpWVchcsn7uWY+Nv/3/yyoCq5C4qXx xLJbBNT3NuU1XeVVWPAaYbG6Q0AGT+8Fs4xehYSS3eKMewRkGNe/LnIqFCqz lX25nhBQS3QAhefZUFgzbWGuwnw28jhXhXQo0BJOdik9xfJ71Ur/tHIocD2k UrvyjIA+ey1USFwOBQUHztm0SgIyMif2UIgJBWIW81MN1QRkfObMrO5QKJzu +BEX0EBAI+IPmiS/hoLeHRa7ScyWYow5rD9CIfOI+XWdRgJyENlTWZwPhWOW ais8TQTkx/fuXsLfUOjxIH7S1UxA2ScMrBp5wqCc++DMr3cE1EvsOyjkFwa/ dFDQ504sX0TTT2iDwyCx5tt10S4CGtw3itsJC4PeSE2uBMxjf2TOtieEAe0q Q55EN7Y/toiybW6Fwc0Y/oP0HgIiX8y+mPc2DATjmmJ4P2DrNfC85TBNOExp VVNt9hPQsZv7qsbHwsFPwolHZYCAZoy1Ox+dCIehy1HPr2GOH517r84bDpvf 8yVOfSag1gn2oWTZcHAP2f9nNUhAyoT0uaMO4RD9iNbq8RcCQkddjzLWh8Oy +kuZH18JiPrjy0zH5nA44PBdYB8joO9Zh+letobD6oaB6BXMkQx3GS9/DIfp w1HuY5ibWYbZb02Hg+dn2pm+cQKSF1I7w0YdAYHe56+UfsfOlzqXCZ99BDy+ JC9DPUVA7BSK+SddIuAPUQ63ImbiXvOvdJ4RIM4z9sYTc5fBzSv7QRHQu87F 2IvZxIrMeTg1AtSrj8okTGPrEbASnFIVAVSHHbsWZgio/H79rRXiSJjpT5eI miOgTMcvY9OkkXCOPtu6BLOv4C+2r0ciQSy/5OIHzDIVovc7GCOh9+YDF5Z5 AuqoLy4vFoqEkxKDb19gnupLaDAwiISO8JdoaIGAWA4MvtXejYRyrrXDG0sE xGuWd+rGo0jYoVx2o1smILHq8Qif8kigto0tPo1Z2dmZXaQmEpKCXwZ6YXb7 FG59tzMSnGXKv89hfl38eDJ1FZtv0L2Z/hUCMod/P63lo8AseuVVPAHbfwXK UgpKUcBkfz+qCLPXZlIii3oU5Gx8Zq/DHFtKLzCkFwV9757OLGIupxV00bKP gkePWHN01wjo94ThokRqFKzLLzdTrxPQrZjSVYqRKKjW9h7w3yCgtaLuBf1v URA6/qYrFbN64+JM3lQUxJzfzbuHeWNbdIxvJQqeF4i0fMTM93JkmpM4GtLk BrQFfmH3lYhVnzxTNFx3MPfvxyzG5FQWANHQ2iz04sgWAY0+3OZnVomGt/Xd CuyY488lPWxQi4bO0W/lpzF/1S8tPnQxGnLGZQWMMSemLeZkG0fDP7rsijuY fxB5xz51iwa2B6R8/NvYeVsKtpi5GQ02VisUvDsE1P6bUGeeFw3xR4zJzmL+ TeHC1H8Li5+XgRUXLH+Cpv1NRdFAFbIfaoFZ2lFGI680GrRUK7OuYf7+ffes VmM0ELse79jDLDpwlfL5dDSYvfTTatglINvJdWf+2WgQMjNv6cCcu+bafmc+ GiammAQHMBPRmEenrERDmWBs0zzmzxfltu12okHqO2Jg3COg0Pbfk4xHYqCF 8lWsG+auurD6sLMxoDJVKkLxm4AelNku80vGwDjrmgUD5sgCDY4B6RiIVWgO ZcMsEc6QIKgQA70OzvFnMN9FT/SHNGLggZ3Ie1PMwR1f58SssP4329BDzPyD skxTSTGQL3krQfwPdp7aOS5kpMZAZYhOkzTm8dr/wmUyYuCV+8oswnw9r38y 83oMvOc0oNXH/M/c9dn5Qqz9rEqzN+bByXzVnKoY8FY4e/sp5jjCjp/mN2z8 d5SbrH+x/SGyITr3IwYYzVAQD2Ybl+XZhKkYIG+IWxHCLD85Yd46FwNWuQkN Upg3B7qVFTdigHPGbVgPs9PL2/QSZLHQ36LEHo1ZMwJVcZyJhdBegyujmF/W y3o0n4uF/BvED79j5t0+x28lFQsytMMT05iJvAULCs7HAl2bGKxirrehi2VU jwXWD6J5h/4RkLDqtMERi1gIClirEsJMdSRpfTs+FgpaBYj9MP/X5ZLmkhQL daK6/wIx/4vX4vuaEgsXxqV/XcW8sk9l1pQZCyfPhffGYP6wcfNtXH4s0NoO S17DnPH1fhbt01joNDq5XIHHL28+Jfw5FjJr//LN4vGd73beHoqFSl03jwU8 Pk+sLdVILNwoqHu2jMcvVMtZG4+FFJfjXL/w+Nd6/76cjYWnyw3vD/D4V7++ V/kdCzQpLtLM+1j8C9uuVlxxkGfGcUcN89M5tVES3jio9tJL0sSslZijWc4f B+OhGZ4XMSe2SgjsiMQBA7WxiAHmfQX/mWypOJA+8dvDEvPq2bUrbRfjIKbx GY0f5o+si5dEguKgJTONvACzR4Nsa39IHJavRoc7mCnNU86GhMVBIgmhsQiz ep4gXXt0HJi/87V9gLmZzvnjlbQ48Ax9EvYUcyXpjOb1u3GgzPzodxPm7LVv Cns9cXDalUf3O+Y6GsYMvw9xcOmfDdME5gkx7fGlT3HQP/5hbBLzac/Xod8H 40BCX+PKT8yfFnJftX6PA05FCeVlzNTTemcyN+LghXh9yh7m9KF3vDws8UDW LiRBf0BANZu7/ndY4yEw1a+cAfM4w+lWRo54gGAPdkbMooZFtuS88aBnE3tw HPP7j6FFK6fi4c6V2yVsmCm7zjHXKcVD6FJumiDm5NePjui4xoPdBYUuecwq fOuT9e7xwPZNe0sB836WfB2/Vzzc7k/lRJgDHD87EPnHgwJ3oa8SZlta4ubq 8Hi4f8l1Xw2znJOlD0t2PJzyJ27XxbxMxzA09zIevNftma0xPw6/8sSoPh5U xh1pbTDbzZXFvGuIh0XfeVJbzCONIHb7bTyYT4cQ7DC3O3sl6fbEQ/w+aaUT 5qKmbtnab/FgH/dhwROznmt0UezhBGgS/2cZhvl5rawWL1kCVAw/kgvHTH/o 11Y7RQKMU40xRWAeLHDUoaBJAPapzZ5IzKa9Wn+zTiTAD18h7lh8PuKM5oVi CdCo/SAzGX/erTLGOtME6JS86n0T85CS/TsziwR4qMHFk4NZKpPV849VAgyF 3hnCvcef1aZonwA+Asek8zBHmgb4t3smgDs1Wr6FOalBsX8gNgGyOEW5ijEX xHxOX3maAPTF5C2lmBN0A5jtKhPAcWDtQhlmn5OMD7+8SICkN4f7cavXmjS8 eZkAVDs14+WYN+ZHF669TQC5evPFp5i19CfUpQYTgOfX5x/PMf9mXyGK+pMA OYfHz9dh/rmUkf7rXwLY9t16gruvTozZhSgRhE+VsdRjLjH0ETf4LxHkxt9u 4zZM/GXFQ5MIE/HrJQ2Yy1f2XndyJ8IDTcX5ZszmjaSBtFqJ8NDGcasN85Ib 45d67USIX9ozbcccfoJX2l4vEdyPzTbgLgpS2qs1SgTlmu6oDsxTp8MjLKwT gYUwftCJ2f3RekJJQCI8M+eZ6sH7Z47nyhcngoTzJak+zFQKSzs/7yWCas9k Iu4ibJysh4mwSTH/BfdbzeMnp8oSQanOOrAf82ESw+KkmkR49OTY0wHM6cGd jwe6E2FhwoR4CHOhTVWdy2YiVDETG4xirssq3ZvZToRYnokM3APNRXK2e9j4 AtY9uMnZ0hrN9hOBOAQpf8X3x6j9Wy3yJNC/e+vUGOaLhoxdoqxJoHhM4tc4 vh9UQobXVJLgZMRnhQnMx/y9mD3Vk+DAv8Mbt9h9B7MFzSTIKXW7h9uByGBs UicJOBq7SCbx9WkU+jFwOQle7M234X4sOTZb454E51u4ZacxGwsobofcSIIj 5wqXf+LPe1+zeT4nCZyrPxybxVzFeinRND8JAk68lcdNTe/CJFOYBN+ZltNw d/y9JrVTkgSb0u4Cc5ilB34GBb5OAoLM5UvzmE9EZOz4TmLtnxjGLGLu2sl7 MzmdBAIe3vdxB/ndTzKYTYIoMrNW3APOr46fWUqCgiM3Dy9hTjWclF7bTALi wRfxuP8ISIZ4kSfDx9OfwpYxfxsY33UTTwax/iyNVcxnxY1zac4mAwUTvyPu xLQP52okkiGiPzUWt5hqs9c/2WQg3n3biDuytngmSxWLtzsvRsDMmW/XV2OW DJFVnpRr+Hm2mn+8H5cMfyKu3F0/wOuvjdqDxGRojzOvw03JNDqlkZIMrx3F +nBXf+xmu5aZDJTvrxzgPgxPbvDcSoZEiwWLDcyPuL2iNCuS4fHZ71S/MM/P /TK5PpIMVVtbJpt4PtsuDVKMJUNBG6sr7of3qg1iviVDmJxAGG4bC39tn6lk kOydK8I98nFDSXc5GUz1WX/i7qpdF6UkSoELSiEeW5hL4wiHYgVSgDj3hMs2 ng8bveg9oRTI4iUNxu2gUPnPRzQFJJ3GEnBz7njtWp9JAZ2b8AB3vtvqisL5 FMhN2RvHnWywMrKnmwJd11S1dzC7cCxV+AalwOMpoZO7+H39rY6Y/WoKGMkG CuL2uZNo1BOWAk+OlUviDjnB/Zs7JgWs1/v0cCczmKkNpqXAF8vjcbjLyDrH pO6lgMPvkp+4Fwn3yf++TwHdxbbbe5i9KnwsSj+mQMZcQgnuDQ/FCqP+FFit lXiB+/fC6KVnX1LgG1h24KacoS2+MpkC69ZfCLiFRyIl322nAGNRNvqN3xdv ze0SuVLh69/JAdyxPfLy/LypEBrqMYa7YJCdqYM/FXh65qdxd81Pdf8nmgo5 Cq82cfPTuZ9JkEqF4X/PGP9gnrANI4q/mAq7FUzGuI1I7hTFBKbCdKV7D253 qsgQrpBUOCVm0Y879riN4bvQVCATRCO4X4jwkhJHp8KLrzM/cVMbPfWMTk2F O1plRH8xdz9slI8qTgWCI78EbkX1b1/Du1Ph2qL7Ddw/+kpuEt6nwrFDz/Jx R1v46Np9TAWVzZ+FuFt8SFo0PqfCQAEqxa1xW6iM/lsqTF280Yhbfy0wuHQt FR597ZjGbVdAfWzweBqc7K0U/YeZhG/kgzpLGjCKkpzB/bDyXlI9axqEDelJ 4p5tk/hTxJUGA6eGFHC7E8ynXEXSYI7+mi7uANXHzw8U0+Cl6xcv3ImrSEfE KQ26Kb+W4/5gHjw+4JIGkzQvK3Af66xwD3VPA5qbaVW4HxSzpXb7pAGVGs9r 3G/1/3Q4h6WBRgBpN+69qpfwMDsNRvke/cTtEXxKgq0hDeS1Ulj28fM57dDa 1pQGhpOlbLh/690x9HibBmJnWjlxJwse8W1oTwMl9nl+3I9G55+Z9aWBKsfm Wdzfzz8UyP2ZBtfYWbVwGxCdPElDmw7k0jMBuLlXZFNT6NNhkwSCcf8aNd0j YUyHPob8q7hzqnOHd0+kgwmDQiTuUSf6m1M86TB+2iIJt+0HCqqX0unwsHU5 H7dvwe6+pTUW3zu1HjdDgNQ3A4d04H7l0IS7ViegQd01HdKazr7DvUe0Fnza Px0eF5R34Y5xnlsjSUqHe9ephnFfk/gyVV6RDhZzzeu4zR/Jf0qsTocvs0Ob /58/04MGu7p0MBaZ3sFdteN9k6UlHd5tT/zDPfiaQj11KB2qyjwoDjAzKymU uf5Nh/2tMXbcEy8e5KgRZ4AtrQMX7jJuylgu0gxwYpzhwS13eNh8lCYDKhR6 BXFbdvocvcCTAQ5p6CzuuzoPvQW1MsDZsF0Fd03MLKmXXgaYSZCo4+6uFSyq NsoAR2FZTdwbbM96Fa0zgLU2Qxu32mqtkHFABqhPjRnhXszsnI4pyoA+b04H 3Aw7F+mpyjKgduyZM2556z7Ir84Aq0Aud9yZ4qOFFV0ZIJrX5Iv7XN/i5bGN DGC5MhqBO16OirTqbwakvwuJxj34ULwmmTQTKLz+i8MdeDWAVoolE1ZE5pNw d0znNh/lzQTpv4qpuJl06z2mT2VC9vX4dNyvuPe7spWw3/2+ZeM23VHmUzTO BB2/rZu4994nxSy5ZAIdw6d83OcD6eTUszMhPrKvGLf6VIivQkkm3I66/AC3 vt5EqURjJvi13i7Bbd6oMSEykAkM74vLcDsIVR7nmc+E/kXHp7i9cpn0WPYz gVtzrQJ3CElkIt2xLFAchxe4Y31+NpELZ0FuoFk17gzsvf4AZYFH/fla3P8D viwPEA== "]]}}, AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], Axes->{True, True}, AxesLabel->{None, None}, AxesOrigin->{0, 0}, DisplayFunction->Identity, Frame->{{True, True}, {True, True}}, FrameLabel->{{ FormBox["\"Coverage [chemi, tmax]\"", TraditionalForm], None}, { FormBox["\"r (\[CapitalARing])\"", TraditionalForm], None}}, FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, GridLines->{None, None}, GridLinesStyle->Directive[ GrayLevel[0.5, 0.4]], Method->{"DefaultBoundaryStyle" -> Automatic, "ScalingFunctions" -> None}, PlotRange->{All, All}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], Scaled[0.02]}, { Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}], ",", GraphicsBox[{{}, {}, {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[1.6], Opacity[ 1.], LineBox[CompressedData[" 1:eJwVV3c4l98btjIqOypfIZSSlcjo877vYxbZI4Sy9/gMPsPIKCuzSKiMRJSQ lFUoK9lKRiI7I5lFhZ/fP+dcz3Xd537u+3nOda7zHHXwNXFmoKOjG9hd/r9v 34iZnq4wwjzpQ1v5n/GCX2aEZN7zj1iiyqTjdhEvlFnxKOkUTmA0S5Xil7ux 5OTYQB3tBza62JKN242NKyyR//JWsUmcCpr8lBfigiDhUvwG1nLmZGzVE154 r3Zi9Jb/FuYeXh1fUsgL4YysadMy9BAyFaLvX8ALItOBwJTLCFiC38e9j3mh 9v3P70cPMkN+48ZJfB4v2Dx1vIXFsgKVpdsmL5cX/sT3q9ju7IXbjcK0Jzm8 kIa/OB5AYodpI5/4kCxeOGtadzNthhOCNnMKxR/wwlxG+uEv0tzQIUA3mp7B C9HB7O82ds/92Dg+tpbCC/0+51NZhg+AwHn9/qFbvHDcLsyDn58f7h2zULmV wAuN6us8CjcPQW3Fq4e+UbzAqyA7o954GNL/qIzcvc4LDsfca4y3BeCS9+aP pBBeoGP96uhLPAIL1cr0v8i8YLjJr3ytSAhWpBI0HIi8kDlntD9+WhgKGN73 Z3nvxi4Ol82lj0LiPFN4oiMv4HQ+M5ByxKAre+OPpj4vTKqtegWg4jAUnPAN O88Lsapc/WFfxKFdu8aYXY0Xhk7pPk3iOw7KaGusiAIvUDlqTYtjTkDpjFOq 9KHd+rJ8efPy+Enw/xfH8o6LF1p2fku8aTgJYsE78ZJsvMC/fPpf25YkROm7 vaJu8kD5x7xHswRpOMpRVsE5wAM27e84ljlkYOqEGvvFLh5gbBqlbjyVgRMC Z/VtmnnA5NVhfZZpWRDTPhJHX84D1PbmAB7p06DS7Q1X4nmAv0RVTC7nDOAe ZVQ/UOYBKbs9kQa/zoBdj7W9oxQPqHF3f/e6qAACPB/7/wnzgBfJubhwXQEs pac/FDHzwFulJBUx3bOg6yYsvb+XG7zqpwz5V5VhOYG/QMKeGxp6koL+aaKQ PS658seRCwbCrUcFMlAQDyt35TXlgsUzx9VVfqLA/kpeg0OdCw6l1rCQ0zFI k6qQfSbMBUrSpNbfZID28c9HcS84IX75gRmhTQ3u+WfZBd/iAOWAVQ8nP01w f8t/Tll2P9h96c44el8TtHl+DGTs3Q/RuOIPIw2awPQmL216ah8MbLtJWvFq wSufa59x9/cB9frIrH6ZFszY5WX+ZdkHlXGtbkpL2lDnKPxf4DAbKGdluez1 0oGngux3REJYQLnxokOpowHgKzT4oz4xQMqIN2P+TQOgHDk5uVbKAEsbiY/u PTcAUI3ooMYzwGPpT9OROwZwe7zwd6M2A/DftfG0vWcIcvzrxKBqevhTflY1 wt0IGGfa/3Tn08FA1HkN+RxjCB6g+DFIbWHMdwZ4n5UbAyuj6+p/C/8whYfu kxLvjeHaqQcvAov+YUmvYyOO/DQGgckOKy6Zf9j55a4WVsQEnuNOns5U+Iu9 umypNzpgAgXGV0frDTexO9Lu5nFcZiBxjDdW+O06tnbevefZMTNIEx6auBS5 jpk4uOt3qZqB5FSw6NLFdYzjrrsWj7MZ9PJdt9QZWMOi6TwU06rMQCox/d/9 9VUs4KMH3yMHc3iQbib/U30FG/jhcauJYg4aHKa11hwrmBKrJ/tMnDlIB727 JTW0jK3hPPdIVpjDDTmJE3+Jy5h3vud6yb5LYCMysUevcAmzo3n11ZRfgsJl pNfBeBGrTfYy/tp6CcqH10XerP3ABIu9OrZHLoHV4YeDX9N+YIPjXk1qbBag oskpRZhYwEz0vF+22FpAdrtX2qeweUxL2OfOR2ZL0HTaFykx8R2TbPI1n7e0 ApMeR7fOM5NY/8TT7lwvK0hMHQsNX53AbjB8v2gTagVNnXIivS8msBHMTr3j sRX0suocUTs7gd2uNpIt+WUFsWT/Nzrq49hmyWk2Uspl2NvX6GBD/obld3rf OFVwGX5Pq6b5Yt8wkx+FOxM1l2Ht9vRBHrZvWJGk6C+zicvw8J2dBSNuFLPL 45k4K28NyiEn82fuf8XeZ6y+/tNlDa339ri33RrC/KtklV9MWIPTcEYJl+IQ Jjrg+cLztzVs3XsuYzU4iAXxTRYOC9mAkm9G/YL4ICaX9Cm11tsG+iSeWS60 9GNpES/x4ftsgStM60bNuT5M69HyvKqwLQj1idfaLn7CVt5Ju67K28Ke9E6/ 6ZxPmB5dvq3TZVsQuUIn8GjfJ4wuMFVXu9AWWEJabz2Y7cVc8RTxveevAP5t WOJaRzemeV/0orvNFahb/2rYH92Nib7vILwnXIHm7puV+Zrd2LCweF3k/Svw pjx9hulaF2bS1W3FuHIFJGDf+nBQB4bKSCb+u38VEhwidC+2t2L/Xe57aV12 FXTpjgjF27ZiGxGhw9UtV6FltPKK/dJ77MXXzydpK1fhlM8UfanAeyylWW38 j5gdSBDez/iENWN7yYtBFJodHDEgP+hIbsA292lySdywg7w/zydRXAP2PSc9 93OCHYQ+dgykm36HNXVoflB8ZAekox9HnJB3WOixewfXOu3gw97fX7T+1mM+ NUtPcgftQH9Zoaf9WT1ma6yNmk7awaa+i0GEfT2mGrzsVLZpB/56Q79+p9Vh 65/Ol+HF7UGkKa5S3u4NNunxQEtE1h7e8hvgYvtfY710qwNdKvawkvDx4X7j 11ipVOaOjKE9jNhe3e+jW4N53FjT+0Gzh5ZvR0XmzKuwb2dyZty77IEriVPy R+tLTHDj/N2ZQXtw5bv/NtHhJWbxelHbedIeOlmDY8f+lWOdmrh8u017yDH7 nBF4thx7Y97vZCHmAMxZnhNzr8uwjcPXDvRJO8B+p4RZV4cyTGFEvNFE2QFE xq31XdnKsCIXopiBvgNcfNfW1G/9HMugsI9rUhxA7deJOwvcpdjnc+W33oU5 QNW6cUxvRAnGTWetBnEOIIsk1AXPFWPR0QXZ53IcQEnVBveu5hlGSde4Kt/m AItCx/etBz3FzGpow8LCjhAUpuoxSXiMJYWIxD046QgKRrcabv3Jx9o0Ws79 p+AIaQpcP69E5GPq7Qfu8es4wnjFngqlnDzs9NcSK3aSIyTz/9KmX87FvHIu scUGO4Jdslvth5hcrMB5q5I12hGsfvRT/cRzMZFF3UNMDxwhUtW8UvfqQ4xj Z+rzn2ZHINKPxyvOZWO6DXGR1B5HuGSzmnPmVjYWGXXm7K8vjhC4Z9lyQCUb 2+IMu7O85Aib7++KrgtnYQsigmbfBZwgLWXEpvfBfaxV3aSnz8cJfKSN+YbF 0jAptrt0WVQnyDKXknIrvIsldH2RdQt3AtMc5bgTp+9iZjbOCX/uOMHhJslU 0fOp2Dd/6kXhN05QgQZhbHEpmAbuTcD3ZifoPnTxnKZoCpbPwPDkebcT9OHv GfpWJ2NeibGsmpNOsEpebvBfuo1tFGQ2ue1zBreIu+PuxFuYte/E2mk+Zzhy Wm1K9+AtrFbxhPhfIWdYvxX8buRNEnbj3fPweHlnaMyn2jNwJWFcw41YmZUz MF4u515IiMdOcM5X/X3sDIcIi/2xf6Kx2D7Z2cbnzjCkcJDbwi8aW7zndyih xhnY5KMKKpeisPIT22SRLmcQ3z/oyL0ciYE6t4LWL2e4WfSMOsERgeWyXnLk oHMBMarJsOT9GxhzV8btfjYXYBJMaX5+6gbWbi2+7H7EBQZ0m1vNja9jlv5K xQmaLtDF9Fhr8mUYVnMu6KuFgQuMZ4WFHDALw4QY3u4/aukCOftrrZTWQrHJ BN3dB9EF/Kx5kNOqoRi+wPbEwG0X+MJrKMlSGYxFfbn+8OiYC0hMV76l+0bF wk+EStTOu0BeVt2k8Hkqds0/qOjyLxfwOiJ/Mf85BfPj9H+VvM8VBJWMSh4m kTE7DZcPe866Qoek5qsQPz/MOsnB8CG4Qol08p1/ayTs0tcrn9CLrmC/L0vR hkrC9CkWIxQ7V1gl9NNFRREx1acXVmZvusIWQ/DB5SY8prihSYm84wqU9jjD 79Z4TE5L7Z9otis4pJ0oy/ruix0fVWG2eekK0XcsjlIsfTBe3lMCnaOukOtx 84uOjyfGYSeR5THnCgZ400RqrQe295mYOMu6K4jjNnbe8XhgdOcFZWCvG7wm 8+kat7hhCwHs6mUKbrDW2lP6y9YFm2lhazHA3CCDpdI6t90ZGz/ArDev4wbD n6/QN6DO2GDxtrn4VTfg67AmcEg7Yc3jP91TY9zgT4f0yR5ZB+yt7MKifIob mB5cleeotMdeB30ndWW6QfZ/OkdkNOyxMv6xYNZyN0DeLh/rs7fDsnR7bwWM uMH+Ow9tuK7ZYhl3O/kPzrrBZAGFXrPKBkud/HDvxaob3L0qf/bCpjUWd60h b4HVHXx8H6qaRl3GqGXlVVfOuIPm8RP3YwYsMNJOKfoXcQfXNIcoUyULzEfv WcPdC+7whefBKaGMS5jzdF5Ht607vIj3fGrhaY6ZCNwdU492h/AvWdxTKqaY n/vpacnb7vDOj9I5WmuC3a1sm+O57w6VxKzWOm0TbPgS3dp4iTvkt3ydWrxi jLkkuzNf73eHY4o6y8VXDLHoccZ9nmPuwBCUJJaYbIA9PZ3JaTrvDuewyMrz HfrYUlfvIbEdd/jz477uJwM9LGA/7lTDcQ/Icm4toUXpYPetP8s+lfOAD65J kUrfLmB1T/AKyaoeIMaypUOHXMCYdPIQRwMPUL97L8uc4TyWEMFhxEj2ACRb wCmrShMr/VRgNh/iAZJsB/+CnCb2UUzD6mOMB6yd0nyCPdHADr2jOOQ+8IBy 3qtdewrUsYfb3/w0mjyAu5L+Zv57wBr1A2mnujxAqExDXtgSsJn7fNd4Bz2g mtmyoPEThkmd042aWPAABfvZgX0yKPaK8iL9+gFPUIx1qeIQOocNNOtnegp5 Ap2chLGUiyr2l+/7Q9MTnlC/gmh/L1PBoFywSAznCTeZ803brZSxD0sRtQ2O nvCa/0Kt7ZAitoCJNDz19oQk7bk74ZqKGGdidUsyxROIGUxclDIFzEz6Z7dj rCeUSHlyE9PPYCPulhOMLzwhQyOoWf3WaYyuamVm/rUnzHBNu5MOnsbEWOMX PjZ7QoLd2ERzthzmlv92PXfIEzZ8jZq5abLYyrgkqyaDF7xv1X8/JSWFOdjx n/yzzwueqLM+VPI8hfV8pdct5fOCF28d8UHFkljpwECs4EkvoOdmdXLWOIn5 dEZyrht6wQL6pDAq9zg2cpEo99TKC/w07khizMcx/VZbY3tHL7izJvmExfsY JtWokNxB9oLGq69pLtri2GzVOH/+Ay/gQ0z2VBwTxSyVOpVsHnvBKzfpef38 o9j78ipLnudeIC/49buK5FEsvyQp41qjFww8DJZ9c04Ec8pDhSzmvWD9x+LL EOYj2CdRSYx93QsSnPRr7ygLYhrZfHYN215QEnDtkhD+P0z03kKOLI83+DlQ Jf8tHsa+JWUcY1XxBlYWblHdEwcxI45I7Vp1b6hIN/MwCOfH6mIJrn563iAp ZJTS8I0Py4y8UPjtqjfMBeQ0xT85gNkE/ZKqivQGkeNLk7k+PFj75pi+b5I3 ROxdDpCa5cbOUTp8jmV4w5a9MtXYlRsTID4qvfXMG653uUrx+HBhA64mCh6f vGHcr0BqWYsduzCFmIuMeMOmLu/9T777sQqHk+TPM94wPObmkZy1D0u1patU /+sN7DDKyMq1FzMzLT73n6gPUE5lVjTIsWCN3ek2Pad8wMZUuYgQwYydMYgI jlL0gSRCoP/wyB6MR8embvWCD4xrfIh2z2LCutC9Gu2+PsC88U3zgBkD9ln9 WZV5gA98XY6xnaijx0a0jeRGb/jAtF5Ds6wcPbZokHpkJd0HOq4EZL0+Qof9 MlFJCXzkAyySHaUBijvo1qXhvXtKfGDe6l8PRWkb3X9VdONgow+UhAfz0Ez+ oQccm3xyOn2gx8T97D7Pv6igq9uU5KAPUOfCtspv/kFP+Rb3Ios+oHXjomfQ yAaqG6L6zPGQL4j97Zl07l1HTa5/Ffsh6gu0RB0fRaF11CoqNIMs7Qvp6gZv M3zXULfE5qgYdV/gDvkbek10FcUnu2/z6PvCpaXs2qfXV1Dq3f3+9y18gUod sWifXUajskwcSrx8IffdvzjjxiU0IXd9QJniCyybxs3eykto6uM0w3dhvjAx SeUctP+J5peM4PpSfaH3qGzvQdsfaGOdx8G/9b7AKhDU+/r5LNrewJ5wo80X 8mmI1InB7+inllImjs++8F9xfxee5Ts60fVrWWTeF64+OnKgmTKNzn1Md3uy 7gtE7qoUr6opdNMz8+dhOjw4nGllE6efQunxai65e/Hw4kyxP9vDCZRp5fbR 75x4+FisVzD8Zxxl9ZscluLDQ3xr85l9VuMoFzXK9JUwHjzVLzF9FB9DRUI7 oFUBDz8PTgsGzn9FxRmE/7Gr7uLbz02Jzw2jJ27gK0wwPERPdCeLL39BZaN5 ZYZ18BDcLqgidHAIld/rPCtiiId2zcuW6YqD6Nm4V4+czfAwVvvztpf1AIom Wf338woecOYs86dff0bVeZ5+PuOEh0tHjhS8+NWHaqf8u0V1xwPndkp+kVIf apCWxcrghwfDlPPliu0fUdvsqfUDMXiQVlOxMFHtQf3EmAk78XiQ+JN86diz bjQu//jC7G08uPMpapuLd6PVRa7jtffxEPTkm3YS2on2ykbbFubgwSJ3ZDNV qwOdLSsYSM7Hg/IDVTErs3b0UNVsp1spHvYuhmyLR39A5XB7dU1f4qH6XCjh TVErer5OsgmpxgNDTU+TzMB7lNzkWcPTiIdXX7IZ2tRb0E89Px6/7sfD0cYz wzfsG9EFMw6xx8N4oMX9p+FX0YAyDshk3hrDg1lIakwdTwMqP+Kb4jKPh4Xn /zk0DrxFde2TOI2X8DDjyq8jo/EWtZ8svXluHQ/Y4aQCs7J6NGluOZRrBw+E 1z1TUbg6tMCb598fRgLYOXMqxSnWonVL8pQpVgL8zW43Xjz7Bl38RfKu5iGA 6ycJkRbjGlSP8ZeV03ECuJhy/eUZq0CdIvn7DE4R4Pp9HwWMvwINZFMyUpEj AMn/yr9F41foE06qNocqAa4gxSL7h8vRd7fT3m6gBOgTa37DL1mODvJV4SY0 CBB5pddsNPgFyir4R75SnwCyvFVv1hTLUJEsgeKHJgSYFcMdmkt/jiqJnjsZ b0GABXU1j0WG56jLiSBhB3sCxFp0SDO3lKCNCtv79vsTYAn/+BHh5VN0uEIo 6heNAOys501Xmp6gq6oYw9g1ArAMPuHQGSlERdVCN15GE2Dvfw3bQccKUNXG bFJ2PAFM9a6KjJk+Ro3Pv128eZsAYw3n9p+MyUdD9Rmmrt4ngHyZ0WQESx6a 1i1qp5vzf31hw7JGj9ASU40vCvkE4Au9/WAmMxcdsbrRw1ZKgOmQD6Kv9R+i OBfm2hcNBOg+y/l3qD8LzS5imGRpJQCyGL3xviATZVzdZrPpJADrA9GcvBsP 0A8hv82ZBgmA07x3/7H1PVSmeTXQcoQAhqyPrvBeykBv71/KKZogAP5Dhd8f q3TUKv37D7NFApQT3Re+B91FX49O8hauEqDG7kWSwb1UVOT4mMrWBgGc2DRG 59/eQb+XDUbkMRLhZ5iO4ePjKSi5/cORX4eIkC73kT5L+xY6xNOioStEhNcd mm+lspJQxKrBPVOMCMSWidWmv4ko03TNS20ZIhji/NQ/pcejblKVXzLOEMG9 ymE5mxaHthHL6X8qE0GDNLrO6xSL3t4p0r+rQYSAbY4pd4sY9JdWIWn+AhHK arHU5KvRqFVcXjpmQIQv4e7LS/goVORw5tSMJRFkAwyCfz2LQEvkE4OVfYjw becg6V50OMpDi82NIxHh+ZYhR01PGEqui2r9RiWCQcBHi5dHw1BUL5Qv5joR Zi+5Hgl4EoI+vB107ms0EZjzfwjn4q+hewap9qcTiLChJBf+QD0YbXcmPBtM IwJuS+e0EWsgKlfk/VE6kwieYu57lP7S0OQV982wXCJUqgwx6W1Q0cshDlqS xURQtCuVjuCkoN/TTL8GNBDhWIHo87gCEqo3asjY9Z4IFxKnD4pPENGSY3on xTqJoDthd1jrGBEll2n6tw0Qwb+41JC1Do8ObcA94REijBbBPjF+PIpiyFvS BBFObV+9gZ/xQfe0K7ILLhKh988Bh+pwL9SNR/4MfnXXv2f46E97T7TdUsaq cYMI6hGPRLT1PNCUqeN5Xowk+OzZdqoY3FDRnYPIm0MkMH+lq1f8wAktGsYR No6QYKz470BfpyN6tto+74wYCSaelblOsDiiuv5P2Z9Ik+BbZA1dVJI9+smk W21KngQVA+8XE0bt0Cty6/4iyqTdCYyJYqdohxLn0ZFUdRIoq+Hnar/bov/e O/L0nifBf0Unb4hX26CR+dHa7PokmKWdt5a/a41m2PcWX7cgQaivSGws0Qpt 6HcOwXuRwODEjtLyQ3PU4OXNF08JJCAEDZUqNZuhA7dLZqbJJCDz/dziXjFF F/Q3DW3DSCDPs/hL2cEEJZ8SupEWSQLZIYu73/OMUTo2jcqPsSTYHPSvXV4y Qg80xonoppIgbs+PojklQzQz57lZxD0SdGQ81uj5pY+eCPkcXZ9NAobq7yv6 7/RQnKrI8tmnJJAWdTovGqyLOpW+eCtWTwIrnHTLoL82uhg/sH6liQScz+sP rMRpoVTPrZMZH0hwWUc8GXumicYdP3+bq29XX0WjOw+rBsrP5NV8cYgEH8q7 NRfU1NHssaQ/kaMk+BV54dCj62po+f0hh61ZEjTOiq1QjwCKBuykKv8kgcqd +0/2zKHoewvxNtIaCZqF3Nyj8xF0mMfnzNw2CVI/PjVv1TqH7omhZ+rn9YOY kBKJLk4lNMnluDLPYT+QGN8j0yZ4FhXQvOilL+QHO2Imd+POKKIyOymfGk74 QfT4AY4vQWfQyuEq1h1pP3g80sxZUiyPqleP4FTP+EF6hMbBz99Po5f8T+SV In6w3Fje0u0nh34z0R+cV/cD3KLPhf1xsqiHHJFd4oIfsLKvOOTiZNBr8zX+ D0z84A7eX02o+RSab2+ofdN1N79vm/GUpwSqCRqqnl67/PZLkdVhx9FxISUZ PYIfLLybVQrNPoYeGRbi5wj0A/OGy6Kxv8XQ6mqevT9D/KAj4s8eWVkx1DKd ebvrxm5+y9HwUB9RNOXS4tStBD/Qcvgyxsp4FJVXHB8kJu/mc295Um4hgnbz fu4wTfODlfA285/Owui+njcv+R76gXqUkH3ShiAafjE+Iv2lH9Dr0FOcHx9C RSTDaAHVfnDEVuaF3rODaC2rv7d1nR+QIntuT73mRzebbMyPtPrBKUrUcsXv A2jqIyOd7Q4/YP7c3IeJHkAVrmsio71+sK8fmeUz50XxIHUsZ9gPtt/GOXv1 cqMcwiKHw8d29WiO8ZgJcqNFW7zsjtN+8O/BYXVLby50pvrvmviSH4hOBn/Q Os+BXlFsayxg9IclZz6BuHI29B9vXWUMqz88O3s3ibmIFc1YKSvyYPcHr733 HGefsaB9JRkpUgf9gb2+4ZhJ1x6UmJAQzS7oD8I3jZL4F5lQLu/woEURfyDg b7HU8zGhepIeTqWS/hCmbt7tfI0BnWO9YnlL1h/6WgTEX9fSo9EzxnpEBX9Q jaPXe8pMjzY8UlFQQP2hN5RnxcRyB1EVZmOqNPaHPJftuyfj/iADW/9+p13y h2Ct7xMHKZsIeXhpnmbtD5b2/Zb83hvI8/SBj+ec/WFIYDQunvoLMaC2twh6 +INnc3aqYvw6snCpvmbLxx8coxc49Z6uIScOFOTWUf1Bp8fIQp9hFWleuXc3 O9gffhsI3IlQXUEcexJjw8L9QV2n92tzwDKSmUAhacT5Q6DnfxNiPEsIH9t5 jZYsf1B20yw1PzGPbD/hH+fO84c6To3DJ5Znke9606E2T/whw3CJMaflO/I6 KaJ2udwfQiosQxXuTSP58ua2uOpdv2JhmYp3p5CkT+L/Iuv8wZdtpK8wcxJx OtSoIvhh11/alu/vjnHEoDp5wKVrt56CWUMTa2OIso0j5fknf4jlNaNzPzaG 7MtmeKk96g8XuW+ipzVGkTW1XtNbk/6Qw/zU7/fAV2RkImfly6w/RC+8+dF9 bRgpk1CTI6z5Q+eLz0ObvweR+61cXTWb/pAoOH3wT+sAEun5zZt5Z5cf1xTr U9iPXC4JeXqPjQzCA56X7RP6EE1jQ91pDjLwt+z/r/n2J0RmVWhW7gAZvDX+ s/R8+BGhV6o93ixEBolt8tz1sR5kbiC+iUucDH+jcob3cvUgnwJsnaxPkuFH shvv5vlupKD2X87SGTIQrlU/637Ugdy2a4dzKmTYbq1S1L7QjgQx3B+NQMlg hvA44f9+QIy0zx35T4cM0jWlp8UT3iOq3/e+djYgw6Av1dPeqwURvzl0udSU DGcOHBupsmhGfnfQ0rSukKGCg27G17QR+earo5TkSIat6GD+CocG5AP34c9D bmQYicedWAh6h2SaV/LiSWTou4PTPtNdj0T/jiqrppIhCl9tbMNajxDTLYz3 XCODg+WpFLXkWkT766+EjGgy1Fsfb6xrq0HkQpqlp+J39UZP6MiGViMCR1Pb ZZPJMOrbR2zVqEJ+OCnubXpAhqDj2Kv29VfIZ+Y9hZy5u3rudYgsjb9E6gs+ nb9cQAYpt52TZcPlSMoCKeJnGRlEnehzelfLkGsJGuKqlWTY5KjgP8pVhrjJ 8TbceEOG4E7B0h9nnyM4vzI6gfdkcAtxpFPXLEGO84dnOXWQ4Yja1VidtmcI V6UxWtJLBl8lv5J6xyJk4u9SoOZXMuyR4s4YbipE2h/UCySOk0G/yHOeOaEA eYUlVQ3OkKE3WEriqdNj5OZ12d8+K2RQ9M8taVLNQ6KPd5pf/b3bf4Oa5Tad R0hEq1e54T8yXJUW4jF2zEVCOZ8Q5JgpsDl/04W7PAe5VnahW2QfBWRIEqf8 57KRQPMZGW4uCthfRuIKTmYj5HviC8uHKeA44+W3HfYA8UMbdMeFKNCgRD02 JHcfIYzZF/aKUWDDZ+fOtcUMxEsiy+WFNAUcSHy/7yenIR4fkKZceQqsZpJ9 p2h3EVfvYbEUJQqc96OcSPZKRRxeHB7zU6OAwL3RmR2/FMTuUiXmrE2Ba+HD m29ikhHbzUuZ5hcpUH5hcG6k4DZiiaVYnzWnwPQMySiM6RZyaVy++vhlClC0 SxskIQkxjeg5dPAqBaYullixsyUiBm0cn3+7UeBX602tZxfjED2fZwrfvSlg oqBGkGSKRXS49ZIHiBS4sja9o9gWg2haxBhVBVFAsUX4kV94FKL+R6KkMIwC v+s1WCiESAR70MyeEUmBv6U/+/K8IhDVCca2gCQKfP47mOoVcR1Rjnx40vMO BeqVyZNMD8MRxZNq0dYZFPgWTx5ofR+GyPle08I92sXvf/v6wJlQRIbnyCOp QgpIy089jp6/hpx6WcNwpJgCupWOP6bDgpHjfzfqtioooLQwH1Q4EoCIZ94V WnxNgUN8U4n5uTTkqNrZ4JG3FPCoPnnvI5mKCEaRVOvaKBCQSS5V0yIjApI8 6SXdFNgiuf8wx/yRgx2lv7P6KNDZ7LOKafkhPLyL5aGju36PLPOFEYkI16s4 XsIkBdRSJGjDaQSE3eoU0X529z60qLzka8UjrFlusuqrFGCJ+P3n/U0fhFmd JUF+gwIVwmf3Gh71Rhin8hZEtyjg9FdqSuu9J7ItOVHIyEKFmw91ch5ouiP/ OsJY1/ZRIfS9RlbmITdkEy/iOslFhQrly0uGf1yQtVe24k0CVGCstntpPumE rFj9C38pTIVqHXO1G/OOyM9/GWN54lSIDyZW8287IHPqA5mRMlQYuV9jYKdh jygUmhR8O0OFPMvHc2ZOdkgwZ8dzVRUqaJgqmdeIXEW4ht82LmpQ4RhlTYOL 0wa5rI7rvKBDBR0utSGj3MvIo4JX/Q8NqPCK4NZZpmOFKPk/nbtkRQXje7wv LVovIaFfjq2VXqFCzb2iP6vZ5sgHteytvU5UeO0uq+YYZYZc4bjDVedDBQlp F47BYBOkwI9T4LAfFSIvFny+EWeMLA/FiJFoVEiYqdDTf2yE3Hh87azEDSro raiVFW/pI53sm1hYDBWkhL45bfrpIQf9SDpfEqjw3ntbcB/dReQJuNkkplOB ZPLS+ZH+BWQtf9x5NpMKatPcRpc5ziMIu62vxiMqiPVf7JIf1UK6B43DfxdT oc41ap9IsQYiAO2xxuVU+DKnll/xRB1xzNe+87Rqt97vDbPJ5WrIL+K5gquN VJjsE3icN4ghMPjyeVUrFeik7R7jFVDkJiZXw9tFBY/Lo2uFj3DIkf3HOlsG qYC3ZTok+VYFcSFm9R8dpcK+rbNuJE9lpHTg8FjgJBXiejJfyEgoIZp5HGuy P6lgiXU8vtGlgCTsi9mKWaPCIlvl2ZDqM0g/gZFlcnMXj18NefJCHvFANw6n MdHgP9vxjLoOOaT8EVFshY0Gq/Sf3zwdkkW29v6Q0uOkgWGRUuusnAyS1D+G 0QnQ4LzMxubWkVPIEGKjc1mYBhzrMrZPyk4iYo8+m5SL0yD6Y7Up7+UTyCt8 m7ObLA2cjVIWLL8eQ+j6tXzfKdDg4sKcFbFCHNFB6qmCqjSgyQs212eLIcNs L2O7NWnQx7ko9OPBUeQ4XvaOpC4NYgRfFFmXiiD4z4WZNwxpcEjZix3LFEYY czOfK1+mgSWPMr/pFUFEj+1wze2rNPjwUygvZkQASfVNblxwokEdvUHJG+Jh RBIX3Z/tSwPONgM97o/8iN9DhrE/fjTgBblp3Qd8yBvW4DmzABr8aSuqL6cc QIz6CFusETSwO+tT1GnFg9T3HuDTvbnrJ4iL1cGJG5HrrpCKTaQB8xmp/9ID uRCuti1r9gwauPvOj37MYEdC32eTDLJoEO9EE3zMvh9ZatKITXxEg6mEz493 UvYi3fUx1dwlu3pfZjqLfGVBoFaq16ScBpr0Nfqb95iR0pqu2eQqGhwIm82j eO5Bkl7xHeZvpEEUIsTApsKI0JVXylm00oCn0Jo5RpEBwT+3vpDWSQN5fJJX FEaPGBflUAQGabA9eSEiemUb965QM9F6ZLff2YscZMMtnPzjmfz7E7Td/yy6 jr37i+N5KP1ZaHG3/08d4jcmN3DhWd0/rq7SoGcuta339m/cyn3SnpwNGiyz PT5w1eQXrvdulYIYYwA4lIUwrTKs4cpu7zjmsQcAx1Ag08rPZdzteK1kiUMB wFOJ2WrxLuGI0bHvCkUD4OOhby7jnQs4k+s9y6ekA6DlCXPd3q5ZnPy1g0eL lQIgo62PLCw0g+Oh2RrJqQeAHmIQIVw+iVsh5YaU6e3yv9Vr/RwzjvvoM1us YBEAmr8yBlrTvuHK3WVHXtkHABvsiTn/6isuxcmfXcUrAOhusF24eHcI53e1 BldDDgDaxcd42bZ+nNllei8kLADwyhGsVJ0+3AGj+A9qqQHAaVViQ2PpwX3S OnxS+2kAqOy/fE5WtQ2Xci4vSrc+AOQb5x6Z1jfhzE+fnjboC4DSsR5xS9u3 uAHZ3DeKQwGQuidayJdWj7OR4bsjOBoAzdd7Z4+o1+GcTm1qzH0PgN+WLC5a R1/jiMfe5kT8C4D+xJ+n7Zpe4X6JnaF50QfCtmpd7kDaS1yAaJ6RKXMgXPXy 3P8gsBwXJhyzI8IVCKwl9Y10XmW4pMPGtq/FAsH32IvpjdZnuAOHGhRyTwSC 7h5vxny0CJfGr7j/pnQgmAS3hSW2PMFl8R6usVAKBEWTugF2ngJcMfvYoVXd QPjgdPuZJD4X105P+HSSGAgK0RfC0g3ScUZ0E0+5KIFAt5A+wfX3Lu7Tttn1 34GBcFrbt/a/qlTcl7/K8k0RgaD231TxVZcU3Nw6XZJdeiAwO5UwKfom4Vjn ki7erQ+E4WXVhLMXI3CavaXvmDiDwKvZ12isloA7kLKtaX4gCMipB03fVOBx k+Z6LXmHg+D4lWMRpiG+uBuDM23a4kFg+L7QpWTFE9fwTagvWiUIfq/nvOTc dsap/4yb2e8UBMk+weK10tY4bL/7fr6qILDpPC53IUUTp6p99NIxx2CYOHxK 6XYXP05gx/jry+xrYO1ApKWK1Z9LDytYZBsIgdJbtNL9ws7nkuYp1pMpoSBJ r9SpVUt37n1lYFWgfBg4JklZ/zXIVL3+8zfxwtcwiH75wctbUE6VfV/U8q8b 4eCVHbb1wLBOhV3nl7vt0evgfa7WcA+riUrS0ldk88N1eCwS8jaY1q8cXZ23 T9/9BnDHPL/e5O+gbOgemhnOFAETImvL+FvzShlhH+N+FEWA7rEkiVR3F6XL r5n9uXQjYSRsXlL80/TZB3ZllW5rkWBV2Ho1Mc7yrLkE+ouaHAXa31vSvL50 K37tHd7wkI2GjfKqulo9bcXvM6uXbg9Ew/PMt9Pk7WcKbsLzxQRyDKjIcTBG VgooeNZfdog8ehNETz0/70ihnEG1vw4Ftd6E9cSFErHMj/KRi5j+KZdYQB/6 n1yJPytvTPfff5xccSDVkrIzkhZ9+pbC5/EnxXHwOtcte2/HuFy2/iPfE7rx UJB/bbPcCyd3pnvO4stKPLiHn9LMyLkue86fW1U7KQGYmvJfCbz6KDPssC2y JzkB6rovnvtzrkfmmtE8S+OdBCgqq91+JdopU3+qqU/tXgIwur6wPc3aIqM9 TiUg+QnQYMoVrTdZLWNk+K1A4XUCVG8/dpvTeSjjdLLkoNj3BCihvEj90YCX 2XPw/vbYXALs7fQ5PaDlLZPPFDOV/SMBiqPnNJfi3WVmRx1eCK0mwM/tUGIX 1VHGJ5XfUGA7AdjWzjPKpV+SoTJei+Q+kAjPKFpdYVdQmcPLHt7d/Ilwvcmn ROKaqkz1iIVZ4uFE2Ll0Ok1OUElmq+q0KLtwIjyg1JqdvXNaJhw/9YZVMhFC plhCz1qKy4hf6X3UIpUIE3Y6nBVvjso0XayLjZRNhBufHkHekpAMq0S6FZNi IpzkEfGqjDgoU3ggcncWSITONbY2kfADMroMJIlw1UQQ6hEUlRvjlln4eZVD DUmEE+nOgjlSnDLxX/XWd7BEWJJtvbNfep/M/wAHeuaE "]]}}, AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], Axes->{True, True}, AxesLabel->{None, None}, AxesOrigin->{0, 0}, DisplayFunction->Identity, Frame->{{True, True}, {True, True}}, FrameLabel->{{ FormBox[ "\"Physi dep rate \ [tmax](\\!\\(\\*SuperscriptBox[\\(\[CapitalARing]\\), \ \\(-2\\)]\\)\\!\\(\\*SuperscriptBox[\\(s\\), \\(-1\\)]\\))\"", TraditionalForm], None}, { FormBox["\"r (\[CapitalARing])\"", TraditionalForm], None}}, FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, GridLines->{None, None}, GridLinesStyle->Directive[ GrayLevel[0.5, 0.4]], Method->{"DefaultBoundaryStyle" -> Automatic, "ScalingFunctions" -> None}, PlotRange->{All, All}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], Scaled[0.02]}, { Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}], ",", GraphicsBox[{{}, {}, {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[1.6], Opacity[ 1.], LineBox[CompressedData[" 1:eJwV13c8lV8YAHBRVpGskD1Lsnf3fd/HDCHJ3nuve6/LvfZOmUlEIhWFQkKh kNFSkWQUKiOKyh5l/O7vr/v5fu45z3nO8573vOeIuAWbe9LS0NBI09HQ/P+7 k3Th+/dHZphY4sAOZQGPhRYnS5c9+IBpfKjf/d91tuxqhhWT2Ky475EIqqWn vg23UX5hf8ozT//vs49skCNly9i65PWs/50eBZlWGRuY9ZT/zP9+qXX0yyXS NrY0NmseSXUCHePV77J7gPYFU///Fv4eCXtv0YGuywuPKKpbX/6ZFTlMDxz1 R/ZHU+1Q5X4JS2OEX2Z7uv/334whDcddZlD7QciJofpqyOmJCCILbAv5E2Op Vj3XdvHqzEEI95/yjqP6Z2EB7+cTh0CabiQ4nurUaJaOjVIOsIk80pxI9VDQ qTyGUU6YxjlsJVEt6RLvx83NDUZ7d86mUN2lvcqufJEH/sTpq12gmkNZbka7 ixfo1ceeX6TaTcK35ewOHwyt1fumU03DOOYeTBCAgWC6H1lUn9nkVo+5JwhM x727L1Fd/NPsQMZ3IVBfmK6//L+93OwsT4jAaQrz23yqcYaDtMRSMZgZf/j1 BtVTWssBEag4MMw2WtyiOk2TbSj+szjwSYZ/LqP603GjqmwuSSgI2xSuoprM 2nqu+sJReGhBudj4f30ZPj9tkDwG30mjOU1Uv9hdl3raeQxiIPX+E6q5FxW2 eralgahA4e2kuv5D2e0f+BMQ7vTzVd//9X/TwbrIKguR661uA1TTdX8hb1TJ gsK4Ocsw1eaNvCYM3+WgVD0o/8v/4795HsF+QgH09ttH//k/fo2mmHypErTf wcewL+IxGZd9KaZrSmBgZJB1mGqtQ32zAaeV4eJ8+EN+qgOIntUVq8rw8VWw ihTVz9SyNcSMVKFP7jI/8v//7dNnuJfVARWPcQygOgFfW6dsoAGELPo8AtX5 opFc565rwD+M/iuZ6o4kts9ZpzSh+vWvO8lU8xie9GIqOgnNXD/pblDd+T47 aksXhRyRyb4hqocT7L/wFaLQ2XyI/QvVv5UktTX+oFCf3ur2/f/+eS0MYQUY eJ7mVlylWu0E8dV6GMAbVadkjiU8lrF43QLfowVWLb8mzalWj1j28wjVBR1S 15PPVLt87isUKdKFrO1TAlNUp+KqX4936kLfYdfUeaqHd3ykbTn0QPwPZ8w2 1eTE8R8mdXrw8OH0tNAyHnuc/spHbUEfcsSZiryoVi8p8WIOMISbCNnvH9Uu NNF5Ly4bwmcJY+Z9K9T4rnbPk1oMQVx78SEr1cNiXJK7zEZAN9IjLko1+e7F 6eUKIzg50xltSPXjBySPsZnTwMVqwFNItXrXabdad1M43JlwUWcVj+WOB9KV XzSFn+sJZqZUL2xk3b72wBTaGnZEbam+c2Lge8quKYR7iP0Oopo738Hf8doZ sNDPF71G9d96Vc1kXzOw2k5QWaN6+PwpHcXSs5BQcn758Roeo78yzHG//izE KbM/76Za+abvlNTLs/Aiuai6n+rsJ2nJAn/OgrBJdOc81acWe18wIuZQpFbF JLqOxxrtbIy/DJvDfd3iyEtUXznha5nOZgGpzF8MUzfw2Mop3/f3JSzg+w93 z0Kqzd18TXo1LeD1+pWH96hmzffVY/e0gD+br+bfU51K46dytckC+v3SVwU3 8VjEBz+u226WQAhKvdxF9fAvv0vd4ZZw4W0p5RPVaoz+LDPpltAwqFaxQPUK zn+f9CNLGM99NyfwF48Flvuv1uy3goPu9xWiqHahBHxsqbcCsQ9yMYb/qPvf 5YCzY6+sgCNGccqDav7qgLc741ZgtfyhPo7qkYmAbi0ma6gsZ7nRRLW5cWDD C0drsGWKm5XfwmO1XoEKPwjWcLtF7dcZqg/GB95nTrWG+GOehGCq3zQElpnU WcMGnGOupVpPKOjKB3obEKvd+1ptG4/d1gg6tHrEBtTzwo/bU01rEZTBrWAD M0c6pGKpbk0NSra1twHpD9d3X1KtvhRE+lJjA2YrL6567FC/D93BlnM2ttD+ eECybZe6v05W9d0KsIV3GUx/f1KdRDt72iHOFpg93C4dpiFg45iL9ts7tvBF RFiQSHVOs5lczZot0EwzKijvIWDYSHqlN7MdjL75VeZF9fz6SwlhQTswvbN3 XyHV+ipa/Jf07GBFbE8+HS0B26xRYCLm2oHegdWyCarL3wUmHb9rB0a3LBkE 6AiY+a+K3ckWOyjP74mzofqetOiaxaQdFPQXfeyn2qWMfVJV0R7+sGt2ftxL wF4WLj/522sP75A/okcYCBipSU794aQ9QPeuix/VosP+D/3X7SFhUkOxheoo rqmKUUEH8OLir3dlJGDy2QN5rYEOoLVJb9LJRMDGqtnYw+MdYLYP0xRmJmAX 3xpnyF1xgAefpVliqZ5i7k688cQBeBuLc7T3E7CryQ0hCfsdwWZMnThxgIDp 3V6c0xRyhM5n2pNnWAjYUscJ72VFR6B/FFPcRrUxTbmjh50jYCfo5MtZCRhN ZJ6RfoUj3Ddg9LnERsDuF/R37zyhxmufGmI/RMDsHrNqPepzhD+DnWz5VNev pqgd3XCEicpjEnfZCZh3SLg48yknsAy8PPebk4DpFome9nVwAo83js1XuKjz f/kW/xLvBOJWny4ANwEbFRJvSylygjwsqfjmYWq9e/ts6Zac4An/y91rfNR6 /IuMc2NwhqYzJnJeRwgYi5TUnWf8znD2lribCj+13jHRK7GnnMEp973vpAAB Q2Wls7aKnEHfkikyQYSAHbH72GBf5wzL9yiqFFECtpEcN9r8whme098zCRMj YA/HBo9RlpzB90elY5IEAct9rjXxV8wFWIPjJdeOEbBEh3xSpawLqGle+yhx nIARluYZ7TRcYDd/p8VRhoCdEbwq12TqArYOQeYzsgSMOex3VDjFBf6dyQ/w U6aur/26bFJJLqBRo5Q6pULAZksLbg1musCE3kSqrxoB636r+1rltgv4VU/O XtGk1tO90HG62gW82xxlURwBu7n5ZyG3yQV6DqxLLCMELE7i2uGVdy6Q61eO JWsRsKCWhcpbIy5Qw6Ib465DwBzP6qPnplxAvHTrrpkeAdOMXvSo26TGKzxj bWdIwFYHTtWFiLvC354DpzBz6vrxu64nLOcKQq2m43ctCFg/zfJwr4Yr+FK+ XJWyJmC1MsW7smdcQeNFKtnHgYAVdyznjNu6gvYgbYeMMwHLsDGUzPRwhZtV NBRmNwLml7Ri/IviCvdwPZKHfQiYLZ/R16IkV+hrru8y8CdgBrUlROMsV+gs mxAqCCJgEqNGhVW3XUG/7YhMEYmAfVUqnfHtdYWsnVc09skEjH/jVP7MiCvQ 1dZ2FV0gYNZPfut7TrnC0X7z/cyZBOydLq7cZdMVjkdHXAvOp9afadJynM4N kGuoU0AR9X1/e2GfA6sbWNwWzr9eSsCeWg55WIu5gS2zVdCde9T1wBvD+fEE tb1Nl0lyHQFTHhfvMld3AzHOHxI3H1Pfdy+CmKmJGwxfITne7iZgheEsE7rh bmDdZdUrMknABk/WX+qIdwOBWaTUZI6AHaKx14J0N5BOMlDtXyZgqal3b5ws dYPnKjJWK/uIWJfxGbOmKjeoFDUJKDhIxGgOre2qNrrBwZq3tuW8RCy8QMdZ sccNRtWNbzDIEbE6x5+stR/dYMvZnsNDk4j9FrnUeuKrG9yx9MxU1ydiXpXj AsdWqfOj37a0cyZiFi2UUSEhd/grW3tzPZ+IZccKp18/5g4XG5T9L94hYj06 L04eUXaH3pYg+kePiJj2G85r3IbucD6z+vTvESIWk91ilHvOHarervLtmSdi zRZufw85ucODGApN6w4RUxirsWUhukPKx3QPPclQLKDUiikt2h18Bod0Dp8M xe56bj9mTHWH9ibe5VKzUEz4txHP3uvu4CumMPM7OhRj3Z0e/PvcHRpNOO8/ /haKGXWmp5Dfu8NSi07mra1QLOW8kuraZ3fQvzMh78BDwrYPxl9ZXHCHlzaK UThzEjYvzG8xy+cBsfO09H29JOzodAedl4QHDNyAWq1FEuZe4ftwUs4DZO5t HkniCMM+KTxi/6LrAXuMEgZIdmHYK23z9x+DPKBEv1ymbzEMk2HKpykhe8Bk rsqpUe5wLLP3s5xPggdwcPsR03DhmIWDZ+bfKx4gzDBzr/NCOPaVRD4t9NQD XB/t0RM4TsY27hZ3++z3BHHeqrdeSRTMPnhyRYHLExSkJjMlHlCwVpWj4v8E PUE2BhcvNk7BkjoeJGQoesLDi0m6TeoRGNtoF/XO5Al3Z8b9df9EYEcPzjX9 u+MJEyJ/rH/ZRGFpH+V+dD3whNmR/o7tpCjs97VQnswWT9CVTJ65UxuF1R/d CRPu9YRtBYSliD4aA+1DynprnsBvJtX2vCoau8Vo5c5K4wVzVdunfD5EY/S9 hTlDTF4A/JIphn+jsTf24ou+Al6gLs4ZWaIXg9mQ1Kozdb2geu7D4+D3MVjL yagxa1MvuNaj2jC1GIMJ0j47IGJDjScvbqp/KBabyjSiftC8YP2Tf2WFcSx2 yjKrMIrkBQx8Z3EFPrFY5ZGBV3qxXmCzr5D1bGIsFnLX8ehwjhe4EuiPb9TH Yh+CblqXFnlBjYld7lBPLKaqMpPiV+4FJ7vX452/xWIF/443KtV6AbtsyIfU 1Vhs61nI9FaTFwSULTlL7o3DnFMbOJ93esHiD56A/gNxWIfpX52st15QyEtI 6uaMw8S5MKLNkBcUhe97t3UkDjv/OfGmyDfqeHK+10micVjC0Tip1jkvMDVy ZL1xNA6LIUXds1vzggYH/fqpE3EYpYOssE7jDQ9Hm36CYhwWepDUeHm/N8gw WZvXqcRhwQ74k/Lc3lCQrvdeVT0O86sIbH8j7A1qUZmX32jEYZ5rvnq+x73B UNRsP0EzDnPR8Xq9T9UbQo+8XZCg2j7b7cxN8IYVf2vtGWp/qzGnAfS0Nyhq 8+g2qMZh5tL2tp8tvcFPoyE2SykOMwm3Hg938YbVnQ+dJLk4zKDrnDunvzcc N48W85GOw3QPmc3WkrxBw9dl1Us8DsOcjANN4rzh48B6P0EgDtOsMlj6cdEb Bvdfyk/nisNUNnTDU654A+OQmnMDtX7yelpboje8gfVLSvJv2jjseA4S31bp DbtWTw2IC7GY5BcNeocGb4gdYJRQGInFRGRU0zbavEGi5VwXX3ssxk9RZLvy 2huSattalctiMQ6O43zvvniDg0KcBatfLMbqIlXi99MbNm+16I4YxmLM98XE GVa9QcvggeKcVCxGc4pfFph9wDypkXZ3PAabj2DRrlP2AWvatP2PNGKwmRdM L0wxH/jJtVN//kAMNsFJbzxn6AMtP5ppxseisZHqHUtxZx94ZsthCVHR2POJ P755F3zA7+AJ2Z93o7BncvO/FXN9oOPTLVgJicKeRM0Se4t9AHUif+tXi8Lq uL9FM9b7wIk+bm31jkisxKj/UsS4D3jL+ze/fx2BFea/4z78wwdqO1NT7l+M wPKmXl97uOwDYbXX7tcbRmDpMZ1l84y+oPy8lAPfTcHIdfVNTkq+8NVTn+1j PRkz58v/pp3qC3/37nhVRYVhob4K36VzfOFIr64Sn0YYlv+45yd7EbW9/4kH rqskbNSKZmWixhdaenmyCwJJmNdlX/rEIV9YbYjmjnYMxSIO4I53SvqBOsPY BX7qeaDIflCuSt4PnlZoivhQz9dtlSHKlzX9QCPX7dtaCx7ba1iGuJv6wZzE ka0lNTyWmcxqRhfmB+fDL2gtKIVgN3e+hup0+8E1z3viV2IDsC6TSMrxXj/o Sa5QHaIPwGaKuGI4RvxAdTa+TzTLH5M5aXR+ct4Pko9KuM/f9MMawx8WJHL6 Q9bbdp73Qz7Y64Xk1k53f7BS/emgHuGJzWPCnVWB/jBc1BOyn9MTO5jV/OJy uD+UnUz2EKrxwCxO/OlzT/MHcyYDsYM/3LFxX5tJuof+wFe5MCQZ4IYtTUgz 6tIGgIP6ru0TJ2fMzYX72N/9ASDbUSnN3+qEvR/bY1TLFQAfZxb1JoWcsNrh 4TT+YwHwx/lUTdFPByzoXcrB1TMBoIZPEfIsssPGTxPkq2wDIJXv22AFqx1m 8srxrKt7APx6IrCtmWiLyXQpX34bFgBNBMc8BaIN9qNpgrv8egC4754OXgi0 wmzU3qk53AmAFUEDE74lS+xlfZMN+4MA0GjjHvcjW2LlNdmFMV0B0HJlfcIv zQLzKEMFrecCIJ6j+5Xxa3Psa3ahBKNGILD53jTjMzmDmbGm6LdqBwLnhA3H Zq4p1paG9w41DgQbhk4b/68mWHGKQcVX50ConDorMRJvjDlErck0pQSCofcN 5rhfhtibzW8mwdmBMOgTG1BqZoidDH8bJFEYCI/yQ28sNxpgfITbtZfuB0K1 zqeAzfRT2LC3ubLfQCBwiyAkFUc9zGAasRQep+Zzr40ndVgXe+R2LGxwJhDa dJTuV1rpYnmONI+1/wXCxN8MH3l7HcziXPXJI6JBMDzPvLGeqIV19RU4vD8e BDeiDUITObUwJdPk6PMqQTCbql+UcAcwdkOHtmWDIJg8KKXmXIFhvSizzpvg IPCqNeM5egWHDWrfb7KMCAJ06/tBSs9JbFzfTP5LUhC4BXW87qQ/if02zRNY KgiCQYHUhvE0DeyAs+jG4a4g+MFXQvJ6q4pxuncHlb4LArGhM2fbjqpi/N4+ 09IjQXDmo4T46VQV7HhwdT/yOwg+tHyYKD6njBnFat535wmGpPM5S+08iph5 4pjYL9FgGLt2GtW4rIDZno8rDDsRDEMnGA4rH1LAfLKen7+gHQw367vmnQ/L Y+dLzN1qAoJhyq1Kvj9XBsu8tTqsHh4MHP/aEq4+PY7l3bl6piM+GLQ6jk7L zUtT18M47mNeMPx2pX+pa3cM62rzO/yvPRgk13soZmGS2JtOlsyknmDo32ml nXolgQ28qN3LOhgMxukieExUApvsXVsUngsGwzaN6I9fxbA9IVpet5hDoNwk +IVFjgi2dylHZPZgCKju+5K6ySiCMYZOjcpwhUC01p6WpERhjI18/lyjUAgY O9O4vGcQwoTj3sIr5RDoRBwkI5yOYOK0QlssmiHAxdZ/rDeJDzuaFPLIHAsB vcrb46QHvJhcKofsqGEI1O2e1mcV4MEUmT1/CJ8JgYLdJdv79ocx1fTG254W IbB0Ex3eKOHG0GzbI3+cQuC8fJHYX3UuTJu9alDJIwTedJ5r9sjgxPRzty6R fUMgQfqp/vR3Dsz0agkjbWgIvAyy9792lx1zvDG9ynkhBJaPeqTLu7NhoWL0 +N2MENBYOSy18vogll4uOf8jJwREDzEw3RhkxZrveU+0FoUAi17xWDItC8bT 9OOdT20IePKzny25w4TJ45iNzjWEQHasWCr9V0bsVJt0N9IcAvrEAwrHBBmx sG7/FvauEDBlc5XfV0WPDbz/defJUAjkSWpPMdHtxeYtWMXujIaAWVBdv5on HUY3LFt86VsIOD2yMtzzhhZTHA/O9ZoLgSRnP4aZ8j2YkWv2wbMLIaBDWnTv 5tuDuU7VXjy5So2HP+XXmUODZf9cjGPbDYEeYd1vlgK76N1A9q2/dHhQZSv4 91h8B21bUAyfZsTDhzH6zEilbfT3GjGwmR0PB9B3GaZe/1BjujVbD0k8OJ5L 03l2ZAP1SOH+aHocD3UW1+5W2ayjkUxqZhryeJChy0wmXVtDKw+S9Vk18VAp tOuzo7CKduRcfbaB4kFwo/6Sf/IKOsLVhJvUwYMSUu3LOb6MMvL/VXxsgoc1 Wd/duOIlVLiEr/qmOR6e7fkk/W/fEqomevJYhjU1n94PAwKERdTraJSQmyse ePcN7RuwXkC7lHf2HyDhoc9AKW+5ch4dfSR4fo2Ch8ln1jjTp3PosiZG+y0G D83f597sHfqJimrFbTSk4iFbkla1UugHqtl1g3gjAw8aWo8OypnOomdPPft9 MQcPiTxmnScTZ9A4E9pp5yI8LAYmuh2l+Y5e7RN1MSrFw5NmjaSKU9NozTmd z8rlePjrVvlpJXcKHbdNes9Ui4fZ2sONmjCJ4rzoWx924sFkhdv578BX9MY9 2imGV3g4syDtHKr5FaVb3mFyeIcHLMuuKNboC/o6dt1y7wi1var0kBLnGCr7 fDnSZpw6/9Mli+UMo2jOgYXSe5N4uM39GfHZ+xm1LZj9ZfEbDxyBzZLXeUbQ J1+mOCqW8aBc9PR+hNwwKiz5TWN7Aw+tvx4ejjAdQmfrRpLL6Ajg2LiV3nPr Ixr25rXAGg/V1x6rVN7uRz+xv9AxEiTAgYiH6+Gr71HEttO3WIwAQjnyzWHG 79G931sa9GUJkFY58kDxQB/qI/P4c6ESARaK4h9x/HiH9hDq9/xRJwCDXl5V WtdbNGf3nkm+DgHedH30dC/sQdf0KohzBgQgvQdxttzXqG16WQFmSoA/MXJ6 wvmvUGHe4ukZGwIUJH6rFXv8Aq1RzIpWDyLAnbxDrDaOXSg7Je1WOpEAq27c X+4VdKJhbedffSUTYJ3ldyjPWAeKGsdxXUgkQNE5rssa5GfozZyok2OpBPjW HcQd3tuO7hshuypkEqD//XulzzLt6BtP/P2RqwR4e8iLg7L0FJW/F/jhRDEB LhkMzZT2PkEvL/luxt8iwH76/qjQRy2oXaybnnQ1tf/JVaSgrAmdvXpuLKKT AL2j4bwiSw2o8ZczdL0vCfArb322ja8BrZEwPib2jgAc9KzP7U/Xo2F1uqSe YQJUM2zs+nTWoZ824JrQOAG+fq+oPcNch6IY8ow4Sa33xvIvAZsH6L43Kiz8 vwlwzIZHgMRQi/qwKyqFLBPg98Shdeb31egbG1nbrg0CZBEj1HhK7qO505Jl AXREiC+yIGg7VqGiu4eRpzxEKGLUSLxndQe9N4rDbwgQAWcnrSGAL0dVm13L lMSIMHYv5yVfbhlqRKpiqTxBBOE7wZZJS7fQAfM+rWlFIgiVMG7YnbiFOsmv koTViXDZ7tyly8E3UcIcOp6nTY2/Dy4fYSpFt166s/efIkIGu5TpD+cbaEp5 qj6LCREWVo5vSkeUoIWu/dWJ1kRgIu//d5LjOto55BkbEkCEqtI36xOvr6Km DRcfVuGJcIiF87pRfz46nFMz8z2MCHOaVc8lJ/PQeZPNM47xRECe80d9FrqC hh0XTLqaQoQStj8n95/ORWmYdB5/SCNCoOnBOseYyyhnV7qwUR4ROj90ymps XUKLSx9YJF8jAl/9dSV5/Uvo0djB1PYb1PxG9zyRyM9GcZrCi6pVRCjsyXRn LMxEPWofPhNrJ4JKGT9/Nd1F9HfG8KpTNxFkVLpCFzdTUbL/9rHC10RI0LjZ nvT3PJoueSqH7SMRXM04Eg/xpqDcewOen/5EBIMgHMMZ1WT0xrfsvylfiNB4 08vOwyEJrS/65Lb9gwjkR8f2dz5LQNGI3Tz1P0QoleMO8qNJQF9ai/cQV4jA UGlJLNOPR0fZg5R+7hDBcXL7qMf7WHTfhT17hzhCYdpmgTd0PQLN9pJUZ+cN BcaLM7rb4xSUT/d0gIlgKJTetRMveU9GZXdzBzqPhkK217HQqMEw9PFoE+Pu iVDIq6kr/jFDQrWbx3GaSqFwoOXH3X5aEmpFOlpWi4SCssT517fPEdGv5iYj c9qhUNg28mQ0lYD6yRNYpAxCYWOKZ5/sczwaM9dCum4eCoeuVlePWYeg5a5n 9C96U/t/6l9/XOyP6oKOpn9AKPV8cvB4c4YfOiGoJmuMD4VYG3sp2vO+qMCo IDdrZCg0BTffnM3zRpub2Zn/xIZC38faW333vFCbAvqd3qRQ4CJSVHN6PNFc q9/TlzJDoS3Uotla1ANVVJkYIVwOhYoV6YGntu5oH8fg23NXQ0EO7bz+7Kob uv/90waum6Gg2bF1P0nGFU04nZFc0BAKmZZzC36nHFFh6XhKRHMooJ8r93uK OKCtjKRA+7ZQ6ECcf92gt0c3ux0sBV6FQuP7CDHlRRs077aZ4c7bUDgcUibQ vmqNKifqIl/6Q+FNes30Gp01GgIyEqWjodB6TDxp9aQlyiokzJvwLRTMUou3 WDwt0HvbHCzu30Nhz86Z04S8c+hM878V8YVQcGT+9fwbmznqpNLTdZeOBMxB vEdvPTZFtzjaHl9gJIEmj36JWawJWrhUd8+PhQRkPOeanLkx+rGmMFfmMAmq H488r+YzQgmZmaks/CQQ/DBiEHTQEGULTIj6LUyC3NhP/iWsBqixtJ9HrTQJ sNXxlx3S+uhPRiebS3IkuPf8l/+Kvh6aOnPWmKBMAv2VJoQ7QBftvK2hrIyS ILH0gEtvrzaqKcS09/FZEhRILU3mzmLo8PbW+lUrEpzNav4nV4yiYaMLcxR7 EtwVqFEbdUHQBwXDH056kuB8nzbZZ/9J1JT85gW/HwkO5/4ssVjSQOet2lu2 g0jQL1M/7Duljh7lvHurjUyCL0+O1NjMqqLPl67l34gmwT7uIEXXTRXU/X1W WnwCCa46S+ktcKigxZnhRJ10EvDP8OyT9lBCuZhO6bwoIYFfXX5dsrc8ulPJ PXGojASOX1LFntjKobPG3+McKkmAXM5lrlw5gT7JTm5drCeBe3zPj3ib42i5 oqUjrpkE3qem5ISFpdHsAfGtlDYSWHp6lruvHkU9eLo0+F+ToCEzYTztuSRq 2nx52KuXBEoZ5zpsnkmg6g7u4Q8GSLAfbSwqfCGO7r9B26D/hVqPkQBC2ooo uqLVf+7SFAkyHQ2jTPlE0fHJ0qXPP0hQaW0oW20ogtZJacnjV0hAc6tCD84L oUWv2HpbNkkQvP3acIhPEE3x/xpIv0uCZg736bRWftSuJrbqGlMYSObk1qYp 8aG6Z88YfWcNA9MQDpNUOl5UdlnwhzxnGNRlu7bt/XYY3aPWKvlcMAwWbnJx Hu/gQn8OZ3SziYcB6SX3lZYuTnQgwtHD/lgYxBsIlF3t50Dvtm6VLiiFwb4W wyN6rOxojssbOKkRBgz8eJajJw+hUbRFX5LRMFDMvakag2dDzfRPChwxDAPL Tq7CZ4ssqOYs8xNP0zCoDlNwMck5gIpf/GRXe446fsKX+7e196PrbylX9ZzC 4LKozM5qLyP6NdhQLds9DOYDVj/frGJAXx/iHfzkEwYpGcNWcbn0aLHlY44Q YhioZB2Yi0nbi6aun69rJoeBMk3rk9SrdCihwPrsvpgwCKdV58ytpUX1x9Yy C1PD4LMYR2/7Lg0qH/v8xHRGGJyO19XeUKFB+UTy3shdDoO3t+/0Nv3cQX55 qDB3Xw8D39fvsoT4t5BB+n0VB2+Fgb3nAT/lt3+R9rsDp+zuhsGhmxwPLmds IrnzxOQ/dVQjh8aiNNaRmEwdcc3H1PFsjKBNbA3xkefoTHoaBhsrL3ye8K0i uNA6Gr6XYdTvd/mh2zLLiCR3QonH2zDAzs1PROkvIWyPz6I1/WGAC5vLnvdb RCb/LUTqjlHzi348a3vrD/Lmejtf1kQY2L1S0leU/I00YtlNIzPU58GmalvW PI9cTJRbD1oKg91ANFmZ6yeSKvnO0nk9DJ6xfGF0+T2LJL8KqD+zFQZdC1y1 5gMzSNzBSrw8fTgYjcaDd9c0ElNn0Ce8PxzYvzGYJL2dQiItZ2QPsYVDvv1H E6dvk0jYNfH5Rd5wmL35XoQiNYGEop1GE4LhQGF8vDlm8w3Bf3Ot6BcLh6fH WPxPXf6KBEiVeD08EQ4EFqvfWjrjiN9rpPuWYjhMqNa71PwYRbwDR8Vy1cJB REfkI1byGXF7yPstVCsc7vzkGlZVGUFcrB5jnvrhINbfLu3JOYw4bloVW54O h5dEjnA9miHEBsu1V7UMh9R30daL/wYQqwnFZkm7cBjJCpNqZB5AziW/5zns HA7mgny/BcU/IKY9rIPrPuFQXBb7non0HjEOuq88GxgOOgcnFqur+hDDQ8aX hwnhwK8JZpGDvYiu9QWzpqhwsC17cVqI4S2i/VeqpiI+HERJN3wUH/Ug2PXn LIUp4cByIIJfIew1ojlJ1xORHQ6FVsMuToIvEfWUm8f8r4TDJbravxb0LxCV Y1qp9oXh8Lju593nf7sR+eAYPdztcDhiuyO0RN+FyLIL3JapoM7nhRtnuUAn cryhhVagOhywT/9WX6IdiOS/jbbtR9R8o60pacXtiHhxvuDvJ+GQ5eVPU/K4 DRHRUo0efxYO5JLEO1f0WhH+80TNtp5weP+zsKkruwXhk2YvqOkLh4eJvbQZ Js3I4be16yUfw8FKJfTXBE8Tws7xuz7uSzjUi20OVA03ImyN6Rz4qXAQULQm /+xpQFhsjxNcf4SDwsY03qSnHmEs8ZHTXg6HDd3VGqf5OoRemyFTcSMctr7J f2JmqUPopsvmRbfDwY22smxQ7QGyIz1ZQcdAhkGDd4eZLGqQrbfxjCv7yRAg shMn8O0+shki7D3FRoY/5KgWtth7yEqjo3g3HxkK+mglr/6sQJZstxIahMhg NeTq1tl4F/mzVfitTJwMyKZb/9/sO8hP7eHiFFkyTJ166MQWWIYoV5jf/apE hg6eTdYVm9tI9MG3DzQ1yHBjTGdPkvkthG30WddvHTI8VU70ZAgoRey0ce8M DMkgiKnItF68gdy+2zh005QM0pLKmKlvCaJGqvppZUv1m4GAN2eKkLjPEiu1 TmSoccg3C/laiLzWurHN7EGGvusRaV6JBYgT6xW2tiAytL/WU3m6lYfcDT3I xxtKBqNsBk/C+yvI4qcLYkQKGe7WbHqLNuQiSXdiVKWSyCBqJC55oTwHecey icVfIMPmDy+Xb3WXkMOhRMPPmWSY5Mm4HNaTjVSCj0NWARlKTa4PziKZyEr5 hOePYjIkt25GRD5IRxAWx2Cd22R4PP7OlUkjDekbOZuwXk2GMn8CzYm4VIQP 3qSdrSfDjsM4/TxyHnEv179S1USGJ2xPu9f3pyBrhJN3nbvI8I+wLPnsYyIC Iw0Pml6RYSaE5uJ2bwJyEZNv4eglwzNma6XEoXhE4IDEuxcjZFB+FmnVsz8O 8SKUDIl8IUNTc1p0WVAMUjvM+y1yigy8xznobD9HIbplrCtyf8jQFXJE1XOR gmTuv7B9YYUMPrj6hearZGQIT8cwtUkGl506ueqz4YgfusF7dS8Fetg5dH+t hCL1twliS0wUyJW5eC13jIhsM/+SMT5IAaFAd/+sAQKSPfQNo+GjQO18jcbt nyHIJ8TB0E6IAq1P0oS8GUMQsduD5vXiFNjizx0pcg9CGkN6PH3kKFDXt3/Q 38gfoRnSC+5QpsCTZ2YduFFfxBBpJ/NrUsAlSkJ0Lc4HGWVqSOvTpYAeg7+L 1a4nIhkid0XaiALcbflhKkMeSMhgRXHSGQqoyo1qBbS6I3S3ih+o21Egru1o 6atHrogxE29LjjMFXovNyUS/dEHygi93zXtQgMWep0e7xxmRxqUO3QimgGCX NX1IsgMSepP2299QCjw7JKW4SWuPPGWM/mkRQYFT+RbTlbm2iNlH/DZjMgW8 lFX/hixYIe39nFxGFyngZ2SvJtpqicj3PZJJy6LAh5KY8znXLBC2nm17lkIK SOgbKFxMMEfiXt4gmpZQIHvezjn/4llkoVsnLes2BQo8XMyCSsyQvvYLzYdq KMB6xlXw/YgJAq0y/eb1FFCh2cqqMTBGalt6f1xuosCe7j3XzrwxQrIbuXi5 uyjAtf28tpzFAKGpfyxv/YoCarXdoj6v9JGQB/YGV99R6yF+//7OFT3k7L3S cL4RCvQnbRXpOukgHRW6WfbjFIiZzdm0t9FGFO/MlBdNUsC24JfxYRcthP3m iUHB39T+agHaAccxJKGk75fzMgWm2hPmriUhyFIRcV/pBgVoetgPTi6fRPrz m5TF6CJAsJrxnQabBqJ9xcHYgzECetc4C2Rb1JC6nF33MpYISAwQeUdHVkVy MvQuS/FEwJ5Bvs8VYsoIbdpspY9ABOi0hzp0sykhhNS0jgrRCDj9eyfQ8oAi Yp74fvH4iQjIEUwcHTsuj3TEhTIFKkaAfQ4b/UyRLKIYc1ikWi0CYi4FVwdt yiDsFEczee0I6Ka5yfVi+RiSEEbjgz8VQb1PRX62yTqKLBFvxdYZR4CEeSvl BSKFfAj6Ua1sHQFpN//F2vSKI7oB6c9JDhFwlv8gVlErhtT7yo03ukaAv9cD RLFUFMn1ILFoBERA+oGp9hf3hJG9bjwSEfgIOFmDDjamCyGhzi24lrAIEBj1 OO47LIBY2O0JQOIjoIjIJm9Tz4d0Wd9OjEmJgNSBRTslbV5E2fLUtba0CGio YO8ZmDyMcJplvNbKi4Cy2aIsEycuJMlEfiLhWgTIr1tYqatwIitGHzY7b0QA g/K1aVZ+DmRAj/eYflUEDBz3/CXDfQjR1XkC52sjwEGg7c53KTakHpxtXjZE gHYpm+CXdFYk92TZeaP2CKi23bcbZ7of2athUJLWHQEzUh4yWX1MSKjqXOOb 1xGgItfMrerNiFgqKHw3/RgBsXWeq3/f7kOG5W49VfkUAZ22q3nstXsRB1mu K/xfImBz+oFX8Q06xOP4ps7P2Qj4vGFwUaNyDzJ7zP/I+18RMBdjenXpGQ3i f3Rs6dFSBNT/iP009XoXR5B4Vpq8RV0fMqLu04VbuDUxJUrAnkh45Fa21Sjy DxchWmZ2jj4SjrgGyDe2bOLihS7sCrNFQv1au2+IxDoulT+w+jdvJGRwLTgv 9K3gsnnPOj4Ri4Scx8xbHY+WcFe5VQ5cPBEJDB3v5jgHFnAlHLwt1mqRoMzN 1a2v9RtXzrbtK6EVCUfpJXIcFOZw1SzfeJaNIqEhL5c0FDyLa2TuftFuEQlv TB+5bq5M454yVIRlOkXCtuDB2O6mSVzX3gwJB59I2NckcPXXo2+4N3vwA8cI kSAdxZOd8OELbmDHInE9MhICu0SSkNxR3Od/6ordyZGwOFfL/fruCG5ig/9b TlYkxGtEM/UyDuF+rtJkuxREAk1UmWH3vQHc5p+Xv/7di4SAjodD+8v7cIw/ s0/nt0eCPG3vzGLPa9zhKZsKxYFI2LIrK7bN6MZJjgszvJuJBO/S+o1B82e4 ytGc8fr5SHioGaX3yqsdJ/t5b+O1xUhgcnfROs3ahlMZnvXw/RcJLPeRUJGP LTjd/tqOvQejoCB7dgtsGnGcuTu6lpxR8DUn+q4gSwNuytL4RRlvFHymN+// NfAQlzQy06MvHgVtT/Z0ShU8wHV+FfyYqhEFO18b7xo/rMJp/0mfOeARBXjd 6+10QqU49geffB19o8CsoVnEQfAGboJwdP5+UBTwWddnCdkW4+LXOhdMKVHw pP8Rl9NUIa59++9mdmYUMKwM3XjOdwWHHfA9wNUUBQG2e/PmFi7gWN81Znq2 RlHzn4+87p2KG8/ae6ixk9r+2Md269UUXAzHDS7rd1GQcbqk5ZZZEq6Vb0iw YDIKVOhiXe/3xOJwx/QUBFij4UkyT5xKEBGnqS9iJeEeDb4Dex9cfOGAE2RC rx7xiQbLmOCrIpL2uD1v7D4dCoyGUKmIRoEiW9zLs7lOO2HRcGt667vUKyuc lSOD99DFaLgnMCRPYTDHEUJ/hV+oi4YpYr9CRqo+rvJmU8GvPTGQ6K3/9wRZ Ace3e3as4UYMdM4lXFh324sriL/7m2k4Fnj1Uk9nPKw8mT0Xbj+VGwemmuUv XpzQO/nycWRTpGI81FUllG7ITGom/lknGIzFg/lRwnNNj1BNlv3nF9eSEuCs +dNm4ns6TRbDNV9HkUTYrm2l2fyQp5G9MIZsvk4E+537zLWPBTRSm8v2m/gm wZqQ5EyJ8x31M75xxQl7k+GT88uv3KEK6oXxH9J/3UuGl71W+cKu99TsntCT 2IxSYE1D009yVkbtukvdY5+VFLh9fpo0y1WiaimFrpEvnwf0+CBbrA2X6lj/ 6IafXCqcap95P4xLV5mdWbbKGU6Fs5nF9y5uLyn7CM1V48MuwH3NTtq9cy7K /u12bikiF0HHx5nC+uipEvXC+Snq1UU4IJqBkIZ4lFJ+YybHvdLglYpldFhW lOJZmiNHDrKlQ9q3Qs9bEr0Kl5QHJyqr08EBqd+seSelcMPkdvBRowzw0nwZ pLgbL6/U99P681IGdX/Nl/r0+aXcSdIhTf3sTBjsqOXrW+WRG3XbEd53ORMI Ok6lH/q55GLM5hi6rmTCLdFLA0mcHHLtx7s/al3LhHMvqsp0pVnk9CfIeKQ8 E7zrKwTb6PfImZ35elf5SSZ0sF48UnZ0RtbjWM1hsdlMmP+4VftOs0F23+Gi nW8/M6FccuPyvdQ62fK9F6Zv/MoE8olB/X8namV/fHF7KLicCTwfedMU7t6V DcrjPsO3kwnJlfs/1F0vkiXTxaQc4syCcV6lXifNRFneRb/APu4sYGRInjz0 PE62edzaIos3C4orp+/k6kTLbjcpiLIIZUGbgNiTPp0w2YSQ6aeM0lmgrxXZ ytHpKyvu1H/7hUwWfIwe+8Qb7iXbfbotLUUuC4Q51S9M5bnLMkoV2O5VyQID 5Zulyq8cZSs4U6BTLQvWLATxkhu2ska0RKkEzSxIkz2N7b1tJTv/x5lVC8kC 1bw2tfEn52QzxoxXd7EsgGKXTz3KZ2X/A1o0S94= "]]}}, AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], Axes->{True, True}, AxesLabel->{None, None}, AxesOrigin->{0, 0}, DisplayFunction->Identity, Frame->{{True, True}, {True, True}}, FrameLabel->{{ FormBox[ "\"Chemi dep rate \ [tmax](\\!\\(\\*SuperscriptBox[\\(\[CapitalARing]\\), \ \\(-2\\)]\\)\\!\\(\\*SuperscriptBox[\\(s\\), \\(-1\\)]\\))\"", TraditionalForm], None}, { FormBox["\"r (\[CapitalARing])\"", TraditionalForm], None}}, FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, GridLines->{None, None}, GridLinesStyle->Directive[ GrayLevel[0.5, 0.4]], Method->{"DefaultBoundaryStyle" -> Automatic, "ScalingFunctions" -> None}, PlotRange->{All, All}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], Scaled[0.02]}, { Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}], ",", GraphicsBox[{{}, {}, {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[1.6], Opacity[ 1.], LineBox[CompressedData[" 1:eJwVV3c41e8blq0iq4zKyAgVQlnn8/k8RorM7FX2nsc5OMdxspMdZUeIEgoh o+KbVbIqoYyyU9nKKPn5/fVez/U81/Pc9/2+13Pdr7CD7xVnWhoaGm46Gpr/ n/+ibs7OPjPEpAiqscR2KhDyoqWKqz5gHE7B7gZ7cbUlp6J26RTmo/qwZ6yN ClLTE8PNpAVMcazhodBebPTMAjlavIZxx378x9NKhQQKJJklbmJGH6WHWv+j wms1iS+3iDvY4SVrVdEWKkTQMWfOSu8DMV45ReWXVBCaDQH6Ijrw6moYpn1O hZevl74J8zCCAUFSNryBCjZljreweGaIvzlpUFNHhe3EIWXb3f0wGOmrm/uU Cpl+lyfJAazQdCECp1xJhfPGzXGZc4fAu3hVKb6cCt+zs/hGznCAyr4XNqkP qRAbyvpqs4ALcEK7KS35VBjyuZjONMoNuRx8k3PZVBC3C/c4cuQIREn2jrTd oUKb+i9OhTheeHTzjv29OCpwKcjMqbfxAemPNJYfRQUHMfcmo3/8UErj42ZC pQIN85ijL/44GCh/MZ/0o4LB1hElarkAhAhjYU3uVMj7bngwcVYQGK7l1F92 2ItdHKxMzwhDU4mCQuoVKuC0B2kDCkQgK/9l2wsZKkyrrXmRUVGIDffpNhWn QrwK+1D4iCh8jlXrLTlGhc+ndMpSDovDy2tMIwRmKgSzvTR+fFMCNso44M1o KAgxjbyoFZeENA52ubPvQqFzd+Pki1ZJ2D9nGW3SHgpHVs7+fbsjBdkTNA96 y0Oh5kPx/Xn/M5AL1/Kyg0PBpvsV2wqbNCQIB5nOeYQCXfuX4M0yaZjl/Kiz ahMKV+r49JhmZUDJlyNME0IhuLuDzHnmLFjkMdnN0O31f6IiIlsgDwO38nOD r1PgtB1DjP5veZhpkwiw9aKAGkf/N6/LClDHpIXuWFDAK8D5cekvBRDTlJX2 O0uB/xRTlEV0zoOxviqc+xICXi0zBkfWlKB09JN6v3QItL5LofzVRCGlpyBF pYgEwxHWX/izURjRFHzbH0uCRXlxdeUlFPrXl9uUfEjAm97EFJiFgdSEzrFw JRIongl4sxEIkLmPJZblbTAkrtw18X+rBvvJ41nl34JAibzm4UTQhDTioa7Z A4FgN9KfLZyrCV3excOXl4gQi3vcNd6qCUdt61ny3xNh+J+blCXXBfilWebH mUWE4Mjxeb3qCzDgHRqHiRGhPuGNm+KyFmQN2GMaqgRQys932e+lDen9PS0m DnhQarvsUOmoD6FqM2X8ZG+4Pe5NVxKnD+K/GbRi1L1heTP5fk6VPnz7zOfJ fcAbHpwZmI3Z1YdbjZuhOblecCTDxtM2xwAC9UWNPP7zhO2a8yrR7oaQmhxZ /pjTA4ZvXNSQKzAC49ySBx7DLsB4Z5irosYIyiw/5FJLXECh0H365Gsj0H3A TnxDcIGU5/HRx5eM4JebWhkDpwtcXOnrZEauQMNlrmJRA2eos7LQ/TJ8BRSd hbktBhzhzhl30wR2E9Cd7Oz6ftAe1i+6v6sQMwFPC/Uj/8bt4IqDu16figkM PA8es62yA7YM9wucziZQ9uxpOZ25HcTSeJzLbDCBV8hC+OfL14D8wePwfQdT iHEV3iy7bwPDCx632oNMQWKdrjb6ig0oMnuyziWYgl3AlvBfGhtYx3kySD0z hdrqG/LN16zBu8Tz15MDZjApsSGUJ2oFdiSvj001ZqBYeKi74q05vEzzMhp7 YwYXlzWjdCPN4dhjr55/42awc3YOi1E1h0+TXu1qLOZwdpSh6k2FGVzR9a7t tDUHDcW7PLFZpnBB0OfOB0YLIHDvklMTjUGq3df0h4Ul+KelZp19YwBDU2X9 RV6W8P0UPrbJyQCiaL9dtgmzBLyjDUVpnwGMY3bqPQ8swe2kLAMTog+pjYYy T35bQn32pU+Dzbqw9eQsS8BtK1jssFRWXtGGkl7vqFMPrSA1Z3TVNUcbriyU 7k41WYGDxfO0QC1tKJc68dtkygrmjm67SudfArtizqnzctbQc7r455TVRXid vfZ8u88aghXFVnDbmkBskFF6OmUND4b0mbqrNOHEsOdTzw1rGC+NKRHz0ATK 4enSUQEbcOVO3ZAb0wDZlIH0l942QKYpXU/qVofM6Fq/iAO2kI3RxnH2AVy4 v/JDRdAWkvKccgtTAVZfnXFdk7MFVxmvzlkzAF2aElsnK1ugZqRSD7RiQBOS rqNVagvnk1JhYQcBV78g0f0Xr4LDX2Hn/moV0Mw9cdnd5ir8zh/4b1BLBU68 7vF/7X8VxDwp//RHlWFUULQ5JvcqJCXurMYcUIYrff2WdKtXoUVUTbuarAio tFTy39xrUO5XHfkjUwGOWn2sta6+BkKbRWte6gqwGR022th5DSIl3ZclFuTh 6digJGn1GlSrkmU1tOThdofa5LaIHbAUhhy4zygH+wMXKUEkO9Dx3BdIJcvA 1gFN9pNRdhDZemjivxVp+FaQVTSYZAeHsWOGXJ7S0N6j2XXuvh14bJ1o7nQ8 A2FiOTzrvXbwa5m2s8frFPg0LT8q+mQH3Z5HV4fWpMDWSAs1nrYD6dlE1RaK FKiErjhVb9nB1QYvOu7bkvBr4GK1n6g9rA7N90kMn4Rpj7sXhGTsgVHh/P4o 75PwnmZtuE/ZHoKqO3Ep9Ceh8nTerrSBPdAISX4oVhQHj6h13QWSPahjB61k q0Thq3zBnHufPbh4CGLYgjAc27yYMffJHs6tXL7wNFcYzJ8vajlP28OB7k9a ZD1h6NXEldht2cO2JDVjqVoIXpgOOZmLOEDQWTnmHT5B2OSjcn884wAe3JKG JxIFQGFctO2KkgMY39NwLKUVgHIXvIi+ngPcjCtLf75+DLKDWCc1gxzgB678 AP86Pwyq1tx6Fe4Ag5kdX3xJ/MBBY60GCQ5QoHtXaZ6GH2JjH95TLXCASdaj bJJH+CAoS+Oa3FsHKGZeNOK25AGTJtKooKAj6BDzfbNUuCHlulDCXUlH4Gay fTU5zgVvNTpVjyo4gq/odutUFBeod3PnHNF2hBS2mLvrHznh7NgTS9YAR/AM otCWx3OAV4EZS3yoI0R9ybt3EOGAh8479cyxjtCgE6Hye4kdhBZ1eOnvOkKC p6WcvhU7sO3ODG53OML2b6bOlTA20GlNiAl+5wiXD1npcfxhhZgb8ud/jziC 7J+imp9BrLBzKPzOyrIj7NMXHqwgHYSfQsdMvvE7gdjT08643P3wRv3Ku48+ TkCd5pwYMmGC0ywZNPnBThDd3/fB4C8jJPWNyLhFOIHLI/3n+cWMYGLjnLR9 xwn624ruP9xhgK/E4MuCL5xASlz6fuwretDAvSB/63CCtpmnc/NB9FBCS/uo qt8Jrs9pnZyVpgev5HhmzWknqFb3ib1VQAebD/Pa3Q44Q7DcqcTJTFqw9p1a P3vYGcpypS7qWNHCy3MSon8EnEGRftOH4zgtRL2qikiUcwaml2P190r2Afto G1Zt6QxXrGZqNl7TQEAhi2+IozM4FZ+TTb5NA4Nu+nma3s5Qe4Gip2tPA7m/ hv4OhjnDzQk5wvm/u5jEoR8Nfx44g/5jrT+3Yv9h8R9l5tuqnEFO2qv7tuw/ bDGHwJvU5AxJvefSCZ93sBqJf4FCfc6AZ9xhTJffwUCdQ+HCb2c436zms771 BytiNnNko3GBc5qmF/BP/mCMfdmpQywuYBztmO7i8gfrthZdcT/uAuL4HoOI 4W3Mgqj4OEnTBcLfMCYg3VtYkyplzFzfBWw5zoSJJWxhArT/HRS2cIGngbyr J/W2sOkknb0F6gLaDLV/jN5vYn4PbSWGU13gtK2ImMC3DezGSGSh8IQLoHHG Cl7Kv7EIibCTL3+4AL3th1V52t8YlUgpt/rtAhJajHp5b39hhEPEurQDrlAh H3hP0e4XZqfh0sVw3hXGJOreZyavYypll1bn41zh8mcJeaZ9a9hPMqt6tYIb hD2NoOVjW8bmOlk69TE3OHygz5enZQmb5GbU/aHtBuW3+C/JOy1hnx7/MxW9 5ga0nvkjBysWsY7JJff0m26gebXG0kBtAcvXeX+LPO4G5wOPtUsTv2NX+DMm 1GPdISNuAY07NoMR3M/OSqW6A/8gLk+8fxrLqH/7nTPXHQ511XEqRk1jo2Y0 65NP3OG+t7BZ88IU5pLmzhg55A7i2hHP6zsmMfJB3KlWcQ/4mPPCnpr6Fcu1 HpQpk/UA9YT+9ST9r1jzIz+FNBUPaL9B16584CtGr12MOOp7gE4dZ2jXwS9Y UjSbIV2gBzyhNK2GM49hhf++EjTaPeD3MieDA/oJa9MLIZ3q84DjIwWRgm+H sbncw1SuTx7QIjRrr2g5jJ1W1bkx9dMDXs/7rJBIQ1hd0NOsSG5P4OGap1h3 fcS6lqNftjp6QpbMmcqcivfYT0yotczbE3LrxYQFDN9jh5IbO9OCPIG2+G/x 5to7zOTMUr9jvCes0Fysq8TeYePuFlN0Tz1h+SUpi763D1udlGLWpPUCyYO/ WRnmujAHuyOS2we84Kjyxhpq0YW9G9unU3nYC2jIffH9b99glcPD8cckvcAC FQ6ZbXiN+fTGHPpl4AW18VNi2lUd2PhlvGyZpRfw3ttSq1DowPTe2BrZO3pB oVXIMNLYjp1uU0jrCfQCqyzjCz1v27D5hskjJXe9YHvNwnWXqRWzUOxVtHng BR+3606eyH2Fva5psOCs8oKz439S1eReYSVPUrKpbV7Q4nvyqa3Tf5hTMSpg /sMLyu/eoTS8bMa+pmSLMSt7AycXV+eqaSNmyBaj9XLPpx6t3+Zfe9aANcf7 uxJ0vSE2bV+36PEGLC/mUunXa94w8fTtl+/LzzAbyu/TDTHe4Cy3IVP2vBbr 3prQ803xBpkSmYgv52sx1aAeH7Fsbwi1e0Uz/bQG48ffr7xV4Q2OYUR96bqn 2LDrFQWPAW+omh+tifhchV2aQUyFxr2hKNTXadW9CnvmIBk4OOcNeWdikME/ lVi6LU29+h9vODhUZNgrXomZGD9WPXrCB9q3o18WylZgbf1ZNu9O+YCYSxOL C6Eck9ePDr1xzgceTzfvd31ehnFq2zSvXfIB725dnXcWj7A+dL9Gt68P3Hgu Lijw3wNsUL2iwZTsA4kcb8YjeB5g41qGsl+ifGCIbmv9NL4EW9RPP76a5QN1 zvJH1+WLsYPXTmzytPlAcg7HrcHZQozbsd2noNcHysLnB3/YFGLHXN1mpD75 wP6NVL87gwXYKd/H75FFH7h9sbbBeOAepnNdpcKR1xeeadIrFi/exa5Ejoks nPAFd6oc2/NDdzHLG2HZgWd8YURQsKn9fC7mltxx46a6LzR08BNF0rOxG/lX HJ54+cLTBc6DOukZWFLRr2GlIF9AKqwiFabSsfQHmQavwn3B6dtJC8Zz6Xvv YRz3Md0XNnibrszO3sbamj14/rT4go3Tow6nsFSsu5U1KeqtL3x7FcRsvHIL G+ispGcb9IW0CaVoTZdb2FTf7xWhH74gQnhI12Wdgu3zU3Mp2u8H21J38GYz CRj9aqrwt0N+8OKEP8PGvgSMmTA9evqwHyAbdNzHxeIx9uAbxnWCfnCO3zVL l3oTEwrrgTcKfrB+ST/naVAMJkor+JdVxQ96h4Yt1lqjMYkov2dXMD/AMzB+ DzwcjcnEckmPavsB863p5obOSExuv/O8kIEfGGr+pyovEYmdT6i772ziB41d zStOiREYmmJ5dOmqH3SnHXH3cQ7H1DnLBuWd9vox/upmHA7DtG7/vRXs7gdu ZS4Ph/XDMP3MfGZagh+IbzAUOd2iYrb3Zn5x3/SD21JORMMBMkYQYfTfTdzj 4ynjRGUgYwkl4j/nU/1AQVjLLRFHwhrLXSdf5vrBYY57U5VNQRhvw3yvW6Uf mO3zLljeImCyuP06xrV+wCI/akdnRsAuNku1I417fK4H0n2oC8AC2z2bONv8 gOud+IGTMXhs4N3Cg+dDfnDXKfA2WPhhP03YRB6M+sFxQsjRkgpfjG5YOu/W hB/w3tCYcKr2weTGfW+7/PCD5ff3dEbeeWE69imHjJb9wK72zvqpn56Y/XRl nOovP/icm+d7idUTS/m+Esa+uzfvk+1PUUd37KE3599tOn+o3bWli81ww5qX 5YJmmP3h5sVjzDvvXLHF3wHejZz+wDqZOehr4YLp0v22dBL3B4OGuKHtEkfM KebIR/1Te/m7siRXJkcshEXRUFnWH5plRzsfeDlgjw4Fa7Gp+IPCt2tXeS7Y Y69SM//bRP1hQFFjgbbeDvt0uAE3pbFX3yFYriJjhzEf25ar1/MH556IeWGT q5hQPv/jwiv+4ORR7jpjZYspnlCVTDT3hyWLQEZ9dxvMRYIi6GDvD5az8fvP 5FphbQr/Dhwk+oPkTb86HRNzbPSZwI3fJH8QuaF7wyTVDFtTwWgnqP5Q5Z/J 7TJoip1QC9usjfUHayOFxB++JphK272Ae4n+MPSOUYK53RgzuvjfYlyqP6yX mvWGChpjYXq0M9dy/WE7ojD3/ZQRltl/wk6nwB+0qKv/OeoZYU+MNUYUSvzh 6dG341VNhti4ZdQ7lkp/sIumuM5fNsBwLowvn7b6w8KIz1KN1WXsXjntNNMb f5hT+Kq0dlUHo1v7x2LT6w+nKWIHpzy1sa7rG6b0n/zhNk12ck3eRUy6Yy3E YtwfXDn2he5v08JSDy4XlE/t8dV7qbe9fAGzzPq2YLLoDx8yW90f2Gliz79M c5Wu+UP5xG7OfKEGJiQ+obyz6Q9Jze/s+36oY9+qP0UX0+FhjNdE4X6KGhbY 3XX8Ny8e2Ke+jpioodhnzk4NHQE80KVkT7iIIhhi2eqeJ4KH2WGhuVscOIx+ tqlWSxoPuPL+7UFmFcztdP1ItjwepGwHGXQ4lbG3+Jp9S0p4EFSK/nJDVAlL 3S3Xy9DAA7/1wmc5h/PY7wulAT8u4UEh9/lt1sRzmGVCcRamj4c4r0Mnk5oV MCG+vJk5CzxcENpOIKrIY0/kkkOVfPBgOOcoxBgui3GS4osSAvBwx9+C17BN BgtsvvHmazAe8AJ5A8dTpTFUN+zwzUg8JBJcFF7qn8YKUymqY7F4cN958r0b dwpj+BRsfzYJDyUatMQxBSms29m/4lMmHs7qdYnlq0lgsuXeH87k4WGi66x+ selJLG3VfSu8CA8tJlYC5nhxzOq6wwWpx/g9f5gSEtMmin3LNB4jt+IhUjrX TLhNGNP9YkDX93qPn/w2Qj0sjD0R05UU6cVDyDRjtYW3EBZYrUl8O4yH668m MxSuCWCfNyFHcBwP2pL3aYTlj2MohvwXMIUHtcOTJE3OYxhD9znWY4t4SP1i bZO+zIe5ccrJ+63hQU8ykkizxIt1W0hbtm3iwTxuqpV3gwe7PSNe7EUXAG8N sNqlE0ewE7s8yAveAPg8xX36xFdOrHwU5795PADmK/f7KIpzYucb7YvlRQLg O60HCRfAgekQy1gfnQkAzvglMV5hdmzgSr/ajFwARBKH6r7THsKuyv4iCikF gHOowvO8PlYM/wMdT1cPgE8XytZU4g9gf187cr6/GADP43IdDEn7sZiSWC1W vb15ro/uN/izYNn27x9HmgfARoAygSWMCWsdcr7u5xUAd10IQpPM9Jh+bdzT Mv8A4JWwGW/B6LDh1Cdzs4F7fDxfzVyi0mI/9bYMbMMD4IXKr+PnOfZhgacE ojJjAsB92OwypzMNRsOiUf8hPgAS6ssEDlzfRbnbEoR00gNg6OJIK55tB80r qDKJzgkA8UzJJcZvf1CJ64OxLfcC4Ou3Z0eWurdRnIrQyvmyANC2bnvD9mwT dap8+p9ISwDoGDBKl+z7hS4mDv+62h4AaE/k4yGpdTTYc0cyuysA3kWPLdnb rKEJ4hdT2T8GwP1imkS1oRX0CL1Xx+XPAXBS52bSP8EV9N5EynbMl738pbdu U77LaE3uZ4ed+QAwdzZVELm0iKLk3XSlpQBY80RtnhxaQF+bi74NWA+AnDOj vaFTP9BRTh/57/8C4MS+Y9+ZHs+jDDf30Q9xESCciYB7+2oGTXERV+LkI4DI cysRja/TKL/mZS89AQK85rnCVcM4jUrv3h5olSCA3eCF3hPek2j9aAPz7hkC /PspkE4qn0DVG8dxKvIE6LbXEgtZ+4qaESWKKxECpNyJv1sk/QX9ekXv0w91 Asz6Fe2XmRtDPWTxrCcvESDw6utD78tHUeqPJuLdKwRgE1+osrL9jJbYG2jF uRJgQj59x15rENUEDRVPrz185pK/WTw+opMCitK6/gR4ejnLe/fOAHp8VOAI WwgBQpGczbsMH9DGRs79S9cJkJqn7ff00nvUIovxX18UAQ75iu8upr5Db5st ztxK2uPn26nSo9qPyp2b/IRPI0AaU2/MV/k+tJ9rsMc4kwDtw0cnA/72oAfe vag9XEiAskuFj2oq36IRlxOjs2oJ4HeiRvJrVicqJBVOIjcSIHO7me5peQf6 kpnobd1MgLFNo4jc1+3oVruN6fE3BHAZkFGy5m9D0+8bav/rIcClmEaeBINW VCFSE/nyngCjrY9q4hJeoX5wWqxgdE/fPGv918f+Q9kEhfgiJgjAleCaSfJt Qct3uFgdZwngGrLN1XirGZ1r/LMuukyAl7ceihGPv0Cvnnvb9pCOuOcf1d0L W+rRv1zN9TeZiWA0fkaMse0Zmr1aXe7BSoTo5O5OeFeHfnySffs0DxGo5I7M ZqZaFJ+UFMt6jAiclf3f9GVrUHbvCMqiEBFmneRELts/RXWlPJwqpYgwttSt rTlShX5nvmpxS4YIou+7aotFqtDYOSNdvAIR2O3NBnABlWjrfWUFBZQI8nnp a3N6j1EVQRb6eiMiHLkgsvuxuhQd3vm7kWlGBL4Ah+70hw/RwNHlHyRrImip iwtOPHyAVmUNf1B1JsLhn65uxM5iVD+4u/OYxx6/DOtb29P30Z9mLU07Pnv4 iWU21w/cRyW4HxY1BxPh7Z2KVjF8IdqxmpNxL5QIcmJ/ivOqClDHd8nx4RFE WAslkdo376F5SUEBGglEqJvSPzSinI8eZrmo0Zm/h0dV1WXZPRv99+jIJEcx ERLq6HAIkoV+050Ns3lEBCKeture8Uz0eUr0y5UaIhifmrQIoktHS+RMbXGN RCDNdDF8YbqDpgyI/o1pJsLJNqz3As9t1Im3TflYFxFY6zTKFExTUf3GtGGX PiIUNI8eGom4hSrZOAZVDRAh24yr63lDCnrgHm2t1hciDOp1dqhFJqHrau+N b00Toeun2/4ukUR0fKpgdWSeCHq/CGZ9H+LR6pNqsv7rRBi+OtpWfu0mmvuG va9pa+8+VZ75a6rEojGeX70Zd4nA36X5cEj4Bmr15HpZDksgpA9r+Dw7HI1q GhnozLIFwu0Ncb3fQlGo9JrAvCx3IIS28w9xK0ai+xRfincIBMLgZOtRzohw 9PtwYju7aCBU/KSwsdWFoQNkWydryUAQ9CQ5Xpy9jj58+bdgWT4Qfv7lUeNi C0VT7bpBVTkQKi9qtJxvDEEptLlfotG9mP1NUyqRjBpqqR4/qr3XX1JG15An GFX5tv+5s34gWI77L/r/DURF4z5bVRoHQnhsVtLlRSK60UPKvHA1EGzyTCqW fgWgX321FVMcA2HI9Wt7xf4AtIuDb/CzWyDcfRqetF8Kj+aZ1nP5BQSC4xWT urYYPzR240Z1Y3Ag8FEdFSNifFF8lrkRAzUQ9v7U+fIcPqjW2O+k7NhAmJxt zi2y8ERlr3ecmUkMBMPToWbzXB4ov3B6t0xaILyOGcL9GnNDF5zO7W+/Gwil jKXlbTku6CAjQ+mhokA4XTjwXjfJGW15OHDR6mHg3v7TeiWS6ITe/hkQvVQd CDF81dIpFQ4oNUlDVKU+EJJFZZeO99qjbrJcrVEvAgEtrg35vmmH4gjVNPyv A+FKztn4kcGrqPiRiHynnkDoOehzKcXJFmWvN0KfvA8EckW5hiGdDTr1ZzlE cywQJHOO6cz5WaLdd1v4kyf39D7oaaWPWqB1WErDp7lASFM9uPGFzxyNi5TZ 8FkNhBMYHcfWpgkaK95rem0jEG6oEX8MHDBBo9941Rj8DYRVKmlwU8IYDTv0 yF+WMQgm56d3bcOMUGr1pX6hA0HAw5Wg3tNgiIaYzklzsAfB0gE8tWXDAA3M Ef25whcENnwZnRuyeigBbdWZFAiCtQvumyXTl1H/CfvS9yJBcOBo/YvhEh3U 62S+y9MzQSAirOmpb3IJ9ehC2ovkgkBL9uCiK3oRdfUeFbmtGASRefxVjxW0 UIenfBMEtSBwCKWtrNLQRO3M6jFnrb161ZoSvLUGartllmd6OQhe7vSOu4eq oxbYbevzpkFgwLbVjBsH1GxSrlHcKgjMT1I2NI8Bahz9jpfnWhBkyH41qW9H Uf23bIMbbkEA3XcVwthxqK5PhcI37yBwvcDGXtetgmpz6KYN44Mg9vH6jlqG MqppftOwgRIEzc0rW9Mmiqj69sknpeFBMMpXKv1O6zyK3e1gzY4JAvVG3nMv NM+hKlN0b8kpQcB57ebdCAd5VCmmUNLzThAEbQcy2ofLoeck1WKts4Pgw+fW wUuPzqKyvtQLuPtBoIRN1QTxyqLSnMfvny4Ngp5g9wvDDdLoqdom2uOPg4B2 0fd+rPEZVPzPZvPOsyAoIpu5mNZJoaJ5GQKLz/f0clqmslMlUWG186Hj/wXB vHf45z5jCfTYjQCV5rdB4LLzNnFeXBzll+LMetIfBO2GzD1HRcRQnp7KjfyP QaDhw52475Qoysm1WBP2ZQ8PzsVwxPoEyl6XwOU/HQQCR3lMhyKFUVbLU3j7 +SDwHJh2SK8VQpnz3WTU14Jgv8y2n567AMqozpQktxkEfYaeY4a0x1G6meKf J3aCALfGezGn7Cj6T2qqlI4pGOSKQpvET/Ohf3vCmdcPBMOnVfe4g7S86Jaf kOs0ezAE+7XKRswcQdfrbEXb+YNB61c557P33Oiq5d+IWsFg8LdcPmQywoUu /c2eKBYNhlYJ7Y+qS5zod/XhvBjpYFgTWuj4fp4DVSi98vCrfDC8Z5ZyZ7Zk R0MP9VSpKAfDUCET38WDh1D20f/aFjWCgdZqmcHj3wHUSh3Xe0k7GFouuAdZ 3t6P3n9YN1SoHwy6Zjn6l3AsqCKx7LuZZTCclg4LePSSEQ0bEVuvvBoMDwDv GJLBgHap3dvZ7xQMVT6Xdxmu06NX2e6wN/sEw2dzl7veQbToQ8Ihfj5CMLCp tUmsxexDVz7fFAkg7eGp7MyPKKRBox5Qz5+MCgZeeY0Hfb93kF7WLSz8ZjBI PTmRf9H3L8JDCNAeSQoGkdEMNs8/28gjcLNJzgqGwp+1umM6m8h6yaTzfF4w pNcTFK4e3EAQVltfjfvBcPugacnC2C+k/5NRxMbjYHi+nd7L+XgN4YfueKOa YLC9ziUnXbaKOJZo3SlrCIbNCv8Eh9oV5Dde9eG1tmAQOs7zkmFsCYFPtVUN b4Ihf+OhF15pEYnDZJu4+oIh6YbPjlLpT+T4QbHezk9781JDz9/tmEdc8PlD wl+CIdv+AR78vyGVw3wTIdPBEK8zSrx4Zg7RLGZbl1kKhpus9+HQ4DSSdODm zs31YMiIDFCQ+28KGfKnY5reCgZO30GE0jiJeKCbfJn0JPCSc0ytHfiK1NzH i6yykMCgLHGh+NsXZGf/wmndQyR4ePJpygw6jqQMTWA0/CToPFesMnpqBPmM 2GhbCZKg7rDPuGfLJ0Tk/uCVGlESNEyVSVe6DiN1fm+d3WRIMFPbE5X5/SNC M3TB95UCCXp7TtCFtA0g2khL8DEVEpzIF9lIrPiAjLLUxvdrkiC4INpe6dE7 RNxP5o6UDgl4hfYX2T/vR/wGS/OiDEjwKD/1T1NtH0JXlFelZEUCK2M114eE bkSXha8p9RoJWpunvl9c70LSfdPafjqRgBBeXTF14w0ihYsduudLAk55BSeG uQ6EUEg7sU0gQfzrAJeSynbkBXPodxMyCf5OFVCD49oQw4/+O8zRJGBJzJhy 8XyFtLznPqwTR4KSoWOd7sT/ENn+Z6fjk0mQlSHqyZnQgrC/3bFmzSaBq7tS UXbDCyTs9b0A/XwS+B3su3Xt1HNkuV0jPvk+CXgG3mg+qWpE+ltuNnI8IUE0 cSexb+MZAi9Pv79Ss4c/5o50VW0dUtnUN5/WQIJf+nR2aFQtklJ3mO9IGwlM c44L0hg+RWhq6mXN35BASU2pteByNeJXZX0ps5cEP7j7eV6bVCFG5QVB/J9I 8DivVreP7wnyqlQz2XqcBPs2xzTliBWI3IO5ktwpEnCcsV0InS1DOAvPDAos ksDmUaX3VcZSJCK/f+HaGglObXGQxqsfIKu5AQwFmyQ4mFotd8y/BHmf0aAg QkeGeMEj7OcE7yPqd2x0nZjJwOjxxv8aaxFSnbrrWMxKhu93jg9OsxQiqYkX 0k7ykgFcuz5wnrqH0MZ/e+R2nAyDXx7b1ufmIfjY+FelJ8hg2tWEi9jORa5E vls5dYYMTXd2Z7d/ZyGvwggs3nJkyOZfXvVNy0TkqDzCjxXJcNq/QOCBegbC SbI1lFUnw1vNuJLwj7eRiEAaN/+LZPg2kqRu/iwNWQ0oul6tSwY7jj7VKw9T kQ8+848VzMmgwiPjnVWTgmh6JXQQbchgk1Ht+CU3GalxlxmvsyfD2EGF7r/f EpHbTkRWZS8y0Fk6/KG0xyH0DrxiZP89vA+CIyKMbyKEa024pkAypF+/8gL3 6wZiYrXPCwknw+FbG2oNvtFIm/n9SGoMGX5t5vGlakUhCqYXc5rjyZDfSO90 +Uwkwm2Y2KWWToZHux8+cpwMR6L0ZCcjcsggUp9MTlMKQ9Z1Pmy13iPDGd6u icYKKjJwgU9Sq4wMMwuVs6hPCKKp8RxuVJLhCFeWWuUSCamBaxava8ngGxO3 UR0djNxWLb6h00IGQtIdWYEfRIRe+VJ+fDsZFB7N6EXWExDC+R913V1kYEuu ivRPD0BMz56d1f9Ihv03noNfmD8yLFP04txnMvC3CtxezPZDbKQP3zn2hQw1 dS3jbBG+iNOpLY3v38hwUfrUe6q1F/JN0vPouwUy5KiewGfMeiCeEmOrz1b3 9DitfiMzyh3Bi/1XEP2XDFIrBHLGLxfkt4g8yWtfCEw+CjIe6HBGyCeKDY0Z Q0D1SCQx8IETEi54c1eIPQTeR+3zGEtzQOgF/gwyHQ6BF7xJBfJ59kjsMe/H i3whcP0f6z/2Wjskhc/I9rlICPSahWh1HriKcPO2KhRJhIAuOT/dOtQGyTxy 7mDcmRCYOzkhbkhnjeRz8TWZK4bA2+O7ojqXLJATnPGpKG6vPkDnpSuDOVLC vuMuphYCP68TKrg/mCKPWSd413RCYJe1Z6s71xiRO2i8/MkgBA4rdPToZFxB 6va3d7aYhICH3Zcx1Xwj5AVTaWDS1RCQvfklO67UAAHGo/pExxAwp9B9lqfV R9roE8Vs3EIgbEdpstpPF+ne5z8giQ+BTMNqnd44bcSQZqqMPSgEeP4cfmKt cAkZ+GcSuRESApVMxpH5S1rIyB8lufboEIj37+Osz9BErm4/YimPC4FCfbkz XyM0kMnNYxOpySEgseNh4kRRR77/okmxywqB5/+l2WZlAOKzjne9mLfXf8uk YsQXQ1ZXp1HpohBYL0zGvelEkK2l1wt/ykOABpUUa6xXQSiLKu2TVSHwWbzC /4aBMkKzUJ77pi4Ejns9f3lqSxFh/p5yOaMlBAqqED/R8HNIwjdaEWp7COhf DNetsFVA2OcI205dIcDyi2aMoC2P8ExblMoNhMADKRnB+5fPItmTXWF8n0Lg +0mVf+l2sojABM6CZjwEfqwXDTTRySDi40JMvXMh0GJ9oq+t5xTyaDR1vOZn CCQRN65NXZFCpEfo63JWQkDEQUpj6YcEcm74m5P7nxD4bTX3tN5UHKkftMIZ 0lDgCEuFfYKoGIL72M2lyEABcWf0cjCdKKL5vvIV/SEKSBiIOWgvCiPct/9p mnJTIGfmUlLCtBAybarbWcy3l6/UD2QaEESiPs291RKlAPb+j4gpegwxyTmn nyFJgfFE1l8J2fyIqG1k/5w0BWg8WoVG2PiQ1q8CH2OVKYBIoSvmKkeQ1EIv 808oBYrScwQYlrgRB6fGT5KaFDDB37vbWseF0H4zHe/Sp8DrhsR90iEcyPvS IrujJhSYnreqGyWyI4WeK5OelhSYOK1sq7bLhqgvJcwddKLASUI1HTP5AMJZ 9dnd1p0C/eNTqwLjLMgkXuJnhQ8Fql9Pn2azYkaqFQJ9/gVQwOgt3Aj+yYiE /25d1idRIML73C3u2wyIYT1HQD6VAkk/ecllBvSIEPnar6VICnQDxsQrQIe0 7GxvpSRR4Iltk4rMEg2S0nyJMpFGgQfbWNKLL7s4u/D0f2ezKHDGN0tg+N8O TlZjOiwijwLX6/MlN5X/4mgY5Og+FFEgTfNFRljyNq6/43q0SCkFMvlp3v3Y 2cTdi+1hIjymwLN+xLMrcgOHHXQ/eLiBAofE396J71/HsfXWJTm/pMBd0q7p 2u013HgyPUddKwUErBwqBj1XcY+NrqQxvqGA4zXSMxGTFRyV695h814KtLdU KA/rLuMEMlT5N4cp4CI5m+479BP3kn9IIGuKAol1AZ82I+ZxV/PwIiqLFCAN yR37ljyL2xFmkxjZpMCd0XhUdW0Kl1tceppCFwpLX+S5ThVN4HCSF84eZwuF xjeupzmkv+BGy7+ee8kbCqYFkWOqSSM4iixF5ZpIKLyz8X4oZjmMO1bDg9FI hwLzhuDKg4iPuCbFpxoFSqHwy/o/7e3d97ht9LvulF4oXNs4kf+ioAenoiVs JuYYClgB9p2LpxP32uj21X+BoWA13EnevvgKZ2bL5DoUFwr/NdOz/114jlMR Ei3tSQ6Fl2cY1JUvNeGOT8GP1tuh8LTg9imVxgbctBvZtzIvFPwizMv0vtbh 8ISFoJvVodDPOPOAibsaZ6a4v/H6s1CYNXlkJXigCqe8Lf6X+DwUUpu1zilx VOJowuzCHDpCIac3alEpqRyXFP8hVvVzKBjmW5ZN3CzBPSpsyFrYRwWL0C2e Z0y5uCTnwZEpRircyT7U2eOWjfOXWDv++QAV2Eq/niuayMQpPT5d2HGYCm+i dLpxh9NxHQ35j/IlqXCi/04Yi+Mt3GR/dJORERXyiTMvNKOicfy7RmO196jQ 1D/C2WLlhxO1zDiTVkyFmYpGCfp3Pjjpp6Ohfo+o4POc+4M2szdO3dVV4FQN FboMUqamW91xHn2Ua/c6qbDVGK2edskJ15j/YCJukQqOcoW7r3ktcVawM3MN dx14ZNP/HuDSwGWFP1xkGb4Oh5SX0yQ8D+NSfgRZT98Og1dWnTwf/1aqvq4P aQiRC4d3oz/P1rzSV41c2sBfGguH0g/idRNWX1VYD9xY+R0VAexmG6MSXb4q rNq/3W2FI2Gi46DqPgNalZTlMWSrKxKMD9Mm6QzeUI5tLD6g5x4FcxXZUUsv OZUN3MPyIuijwXDHOHzqX45SdviHhIXyaAgqUb5Z/uqIktVzRiK7Tgy8DldP XpPOULxrV13vth4Dp36fk9NcZFY0PYn+Dk67ATqvJCZuCoSfH3s/uukhEwv2 1++YJBT/Pvdtbs0sdTgW5oU6FBaIV8+5Cf547B94E1TX+VJ/nXir4Nli5RAj HAcXH8X+HBs4qYBqjX2mvIkDrVBfos7PSPmYRUzvlEs8FDwaSOqem5Uzojl6 9BB7AjC6Hhcd21aSu6UwOPnocQIws9XfWuFJO3tP776vhE4iGN84r7029lNW vv+7+chqInzNRwz7l+RlVYkcKlopSXBv19i2kD5KZtThnxBDWhKwkj9EFYWF y1ANfzC13UmCTZ8kq45sqkzLqfaPajlJ0D0517jmGCSjNRnsj5Qk7fnv13hf A08ZQ4OvDxWeJ0FjNM92R+oVGSfJJzwi35LgQ4SmcD2jsAwDT+6/ie9J8NHt 74vAxuMyJfQ3Z+4tJEH/T0XqyzU+mfkvDk8F1vbwLP8969DBJeOTfsSA/18S jBawCCmuMcoE01FjOLiTQZF8ST50aFGab8XDu/9IMmQ8xBqq5r5LN46bmyTz JQNdeHsXBM9J7zScPcEqmAw+XwYS1EYmpCP8Zl4wSyVDRMC5erXSAWnRq+/v d55OBqdvISKO9O+l2y83x8fIJMM1eXelGc8+aeaTWZb055KBsffCY8+pTulS 7hhoVUyGr987L7//0CatQxtwMkIlGUoYmqfcJF5J/1y6xqaGJMOu6Px478Nm 6cQx3V+7WDJ8eJz7TjerSfp/M/av1Q== "]]}}, AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], Axes->{True, True}, AxesLabel->{None, None}, AxesOrigin->{0, 0}, DisplayFunction->Identity, Frame->{{True, True}, {True, True}}, FrameLabel->{{ FormBox[ "\"Np [tmax] (\\!\\(\\*SuperscriptBox[\\(\[CapitalARing]\\), \\(-2\\)]\ \\))\"", TraditionalForm], None}, { FormBox["\"r (\[CapitalARing])\"", TraditionalForm], None}}, FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, GridLines->{None, None}, GridLinesStyle->Directive[ GrayLevel[0.5, 0.4]], Method->{"DefaultBoundaryStyle" -> Automatic, "ScalingFunctions" -> None}, PlotRange->{All, All}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], Scaled[0.02]}, { Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]}], "}"}]], "Output", CellChangeTimes->{3.633933751858069*^9, 3.633933913455707*^9, 3.6339340408955812`*^9, 3.633934455985545*^9, 3.633934560563725*^9, 3.633934941465419*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ RowBox[{"(*", " ", RowBox[{"Export", " ", "dep", " ", "rates", " ", "vs", " ", "r"}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{"(*", " ", RowBox[{ RowBox[{"FORMAT", ":", " ", RowBox[{ "a", " ", "header", " ", "containing", " ", "column", " ", "names"}]}], ",", " ", RowBox[{"followed", " ", "by", " ", "the", " ", "data"}]}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"numberOfPoints", "=", "600"}], ";"}], RowBox[{"(*", " ", RowBox[{ "number", " ", "of", " ", "datapoints", " ", "per", " ", "column"}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{ "path", "=", "\"\\""}], "\[IndentingNewLine]", RowBox[{"stmp", "=", RowBox[{"OpenWrite", "[", RowBox[{"StringJoin", "[", RowBox[{"path", ",", "\"\\""}], "]"}], "]"}]}], RowBox[{"(*", " ", RowBox[{"open", " ", "file", " ", "to", " ", "export", " ", "to", " ", RowBox[{"(", RowBox[{ RowBox[{"existing", " ", "file", " ", "over"}], "-", "written"}], ")"}]}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"WriteString", "[", RowBox[{"stmp", ",", "\"\\""}], "]"}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"Do", "[", RowBox[{"(*", " ", RowBox[{"loop", " ", "through", " ", "all", " ", "rows"}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"r0", "=", RowBox[{"rmin", "+", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{"rmax", "-", "rmin"}], ")"}], "/", "numberOfPoints"}], "*", "x"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"WriteString", "[", RowBox[{"stmp", ",", "r0", ",", "\"\<\\t\>\""}], "]"}], ";", "\[IndentingNewLine]", RowBox[{"b", "=", RowBox[{ RowBox[{"Evaluate", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{"Evaluate", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{"Np", "[", RowBox[{"t", ",", "r"}], "]"}], "/.", "sol"}], "/.", RowBox[{"t", "\[Rule]", "tmax"}]}], "/.", RowBox[{"r", "\[Rule]", "r0"}]}], "]"}], "*", RowBox[{"(", RowBox[{"f", "*", "\[Sigma]p"}], ")"}]}], "/.", "sub"}], "/.", RowBox[{"r", "\[Rule]", "r0"}]}], "]"}], "[", RowBox[{"[", "1", "]"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"WriteString", "[", RowBox[{"stmp", ",", RowBox[{"ScientificForm", "[", RowBox[{"b", ",", "10", ",", RowBox[{"NumberFormat", "\[Rule]", RowBox[{"(", RowBox[{ RowBox[{"Row", "[", RowBox[{"{", RowBox[{"#1", ",", "\"\\"", ",", "#3"}], "}"}], "]"}], "&"}], ")"}]}]}], "]"}], ",", "\"\<\\t\>\""}], "]"}], ";", "\[IndentingNewLine]", RowBox[{"b", "=", RowBox[{ RowBox[{"Evaluate", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{"Evaluate", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{"Nc", "[", RowBox[{"t", ",", "r"}], "]"}], "/.", "sol"}], "/.", RowBox[{"t", "\[Rule]", "tmax"}]}], "/.", RowBox[{"r", "\[Rule]", "r0"}]}], "]"}], "*", RowBox[{"(", RowBox[{"f", "*", "\[Sigma]c"}], ")"}]}], "/.", "sub"}], "/.", RowBox[{"r", "\[Rule]", "r0"}]}], "]"}], "[", RowBox[{"[", "1", "]"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"WriteString", "[", RowBox[{"stmp", ",", RowBox[{"ScientificForm", "[", RowBox[{"b", ",", "10", ",", RowBox[{"NumberFormat", "\[Rule]", RowBox[{"(", RowBox[{ RowBox[{"Row", "[", RowBox[{"{", RowBox[{"#1", ",", "\"\\"", ",", "#3"}], "}"}], "]"}], "&"}], ")"}]}]}], "]"}], ",", "\"\<\\t\>\""}], "]"}], ";", "\[IndentingNewLine]", RowBox[{"WriteString", "[", RowBox[{"stmp", ",", "\"\<\\n\>\""}], "]"}], ";"}], RowBox[{"(*", " ", RowBox[{"line", " ", "break"}], " ", "*)"}], "\[IndentingNewLine]", ",", RowBox[{"{", RowBox[{"x", ",", "0", ",", RowBox[{"numberOfPoints", "-", "1"}], ",", "1"}], "}"}]}], "]"}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"Close", "[", "stmp", "]"}], ";"}], RowBox[{"(*", " ", RowBox[{"close", " ", "output", " ", "stream", " ", RowBox[{"(", "file", ")"}]}], " ", "*)"}]}]}]], "Input", CellChangeTimes->{{3.633934210161578*^9, 3.633934254540154*^9}, { 3.633934497816003*^9, 3.633934524520074*^9}, {3.6339349493554487`*^9, 3.633934949453727*^9}}], Cell[BoxData["\<\"/Users/milostoth/Documents/Literature/Papers/026 FEBIP \ modeling review/data/outputs/\"\>"], "Output", CellChangeTimes->{3.633934566522747*^9, 3.633934950396406*^9}], Cell[BoxData[ InterpretationBox[ RowBox[{ TagBox["OutputStream", "SummaryHead"], "[", DynamicModuleBox[{Typeset`open$$ = False}, PanelBox[ PaneSelectorBox[{False->GridBox[{ { PaneBox[ ButtonBox[ DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "SquarePlusIconMedium"], ImageSizeCache->{15., {0., 15.}}], Appearance->None, ButtonFunction:>(Typeset`open$$ = True), Evaluator->Automatic, Method->"Preemptive"], Alignment->{Center, Center}, ImageSize-> Dynamic[{ Automatic, 3.5 CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification]}]], GraphicsBox[ {Thickness[0.0016806722689075631`], {FaceForm[{GrayLevel[0.93], Opacity[1.]}], FilledCurveBox[{{{1, 4, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}}}, {{{25.499999999999996`, 2.5}, {25.499999999999996`, 1.3953100000000003`}, { 24.604699999999998`, 0.49999999999999994`}, {23.5, 0.49999999999999994`}, {2.5, 0.49999999999999994`}, { 1.3953100000000003`, 0.49999999999999994`}, { 0.49999999999999994`, 1.3953100000000003`}, { 0.49999999999999994`, 2.5}, {0.49999999999999994`, 23.5}, { 0.49999999999999994`, 24.604699999999998`}, {1.3953100000000003`, 25.499999999999996`}, {2.5, 25.499999999999996`}, {23.5, 25.499999999999996`}, {24.604699999999998`, 25.499999999999996`}, {25.499999999999996`, 24.604699999999998`}, {25.499999999999996`, 23.5}, { 25.499999999999996`, 2.5}}}]}, {RGBColor[0.699951, 0.699951, 0.699951], Opacity[1.], JoinForm[{ElisionsDump`Miter, 10.}], JoinedCurveBox[{{{1, 4, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}}}, {{{25.499999999999996`, 2.5}, {25.499999999999996`, 1.3953100000000003`}, { 24.604699999999998`, 0.49999999999999994`}, {23.5, 0.49999999999999994`}, {2.5, 0.49999999999999994`}, { 1.3953100000000003`, 0.49999999999999994`}, { 0.49999999999999994`, 1.3953100000000003`}, { 0.49999999999999994`, 2.5}, {0.49999999999999994`, 23.5}, { 0.49999999999999994`, 24.604699999999998`}, {1.3953100000000003`, 25.499999999999996`}, {2.5, 25.499999999999996`}, {23.5, 25.499999999999996`}, {24.604699999999998`, 25.499999999999996`}, {25.499999999999996`, 24.604699999999998`}, {25.499999999999996`, 23.5}, { 25.499999999999996`, 2.5}}}]}, {FaceForm[{RGBColor[0.5, 0.5, 0.5], Opacity[1.]}], FilledCurveBox[{{{0, 2, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}}}, {{{3.52539, 1.0035199999999997`}, {2.5250000000000004`, 1.0035199999999997`}, {1.6828099999999997`, 1.0035199999999997`}, {0.9999999999999999, 1.6863299999999997`}, {0.9999999999999999, 2.5285199999999994`}, {0.9999999999999999, 23.474999999999998`}, {0.9999999999999999, 24.317199999999996`}, {1.6828099999999997`, 24.999999999999996`}, {2.5250000000000004`, 24.999999999999996`}, {3.52539, 24.999999999999996`}, {3.52539, 24.999999999999993`}, {5.523440000000001, 22.421099999999996`}, { 5.523440000000001, 13.0039}, {5.523440000000001, 3.5867199999999992`}, {3.52539, 1.0035199999999997`}, {3.52539, 1.0035199999999997`}}}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}}, {{{22.4977, 12.9016}, {17.740599999999997`, 16.8398}, {17.740599999999997`, 14.856599999999998`}, { 19.980900000000002`, 12.947299999999997`}, {17.740599999999997`, 10.946100000000001`}, {17.740599999999997`, 8.96289}, {22.4977, 12.9016}}}]}, {FaceForm[{RGBColor[ 0.46093800000000007`, 0.46093800000000007`, 0.46093800000000007`], Opacity[1.]}], FilledCurveBox[{{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}}, {{{ 9.202339999999998, 12.8969}, {9.202339999999998, 12.335499999999998`}, {8.747660000000002, 11.880899999999999`}, { 8.186329999999998, 11.880899999999999`}, {7.624999999999999, 11.880899999999999`}, {7.169920000000001, 12.335499999999998`}, { 7.169920000000001, 12.8969}, {7.169920000000001, 13.458200000000003`}, {7.624999999999999, 13.9133}, { 8.186329999999998, 13.9133}, {8.747660000000002, 13.9133}, { 9.202339999999998, 13.458200000000003`}, {9.202339999999998, 12.8969}}}], FilledCurveBox[{{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}}, {{{ 12.6227, 12.8969}, {12.6227, 12.335499999999998`}, { 12.167599999999998`, 11.880899999999999`}, {11.606200000000001`, 11.880899999999999`}, {11.0449, 11.880899999999999`}, { 10.589799999999999`, 12.335499999999998`}, {10.589799999999999`, 12.8969}, {10.589799999999999`, 13.458200000000003`}, {11.0449, 13.9133}, {11.606200000000001`, 13.9133}, {12.167599999999998`, 13.9133}, {12.6227, 13.458200000000003`}, {12.6227, 12.8969}}}], FilledCurveBox[{{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}}, {{{ 16.042600000000004`, 12.8969}, {16.042600000000004`, 12.335499999999998`}, {15.587499999999999`, 11.880899999999999`}, {15.026199999999998`, 11.880899999999999`}, {14.464799999999997`, 11.880899999999999`}, {14.010199999999998`, 12.335499999999998`}, {14.010199999999998`, 12.8969}, { 14.010199999999998`, 13.458200000000003`}, {14.464799999999997`, 13.9133}, {15.026199999999998`, 13.9133}, {15.587499999999999`, 13.9133}, {16.042600000000004`, 13.458200000000003`}, { 16.042600000000004`, 12.8969}}}]}}, AspectRatio->1, Axes->False, Background->GrayLevel[0.5], Frame->True, FrameStyle->Directive[ Thickness[Tiny], GrayLevel[0.7]], FrameTicks->None, ImageSize->{Automatic, Dynamic[ 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])]}], GridBox[{ { RowBox[{ TagBox["\<\"Name: \"\>", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ StyleBox[ PaneBox["\<\"chemi_T_300K.dat\"\>", BaselinePosition->Baseline, ContentPadding->False, FrameMargins->0, ImageSize->{{1, 300}, Automatic}, StripOnInput->True], LineBreakWithin->False], "SummaryItem"]}]}, { RowBox[{ TagBox["\<\"Unique ID: \"\>", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["83", "SummaryItem"]}]} }, AutoDelete->False, BaseStyle->{ ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{2}}, "Rows" -> {{Automatic}}}]} }, AutoDelete->False, BaselinePosition->{1, 1}, GridBoxAlignment->{"Rows" -> {{Top}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], True->GridBox[{ { PaneBox[ ButtonBox[ DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "SquareMinusIconMedium"]], Appearance->None, ButtonFunction:>(Typeset`open$$ = False), Evaluator->Automatic, Method->"Preemptive"], Alignment->{Center, Center}, ImageSize-> Dynamic[{ Automatic, 3.5 CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification]}]], GraphicsBox[ {Thickness[0.0016806722689075631`], {FaceForm[{GrayLevel[0.93], Opacity[1.]}], FilledCurveBox[{{{1, 4, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}}}, {{{25.499999999999996`, 2.5}, {25.499999999999996`, 1.3953100000000003`}, { 24.604699999999998`, 0.49999999999999994`}, {23.5, 0.49999999999999994`}, {2.5, 0.49999999999999994`}, { 1.3953100000000003`, 0.49999999999999994`}, { 0.49999999999999994`, 1.3953100000000003`}, { 0.49999999999999994`, 2.5}, {0.49999999999999994`, 23.5}, { 0.49999999999999994`, 24.604699999999998`}, {1.3953100000000003`, 25.499999999999996`}, {2.5, 25.499999999999996`}, {23.5, 25.499999999999996`}, {24.604699999999998`, 25.499999999999996`}, {25.499999999999996`, 24.604699999999998`}, {25.499999999999996`, 23.5}, { 25.499999999999996`, 2.5}}}]}, {RGBColor[0.699951, 0.699951, 0.699951], Opacity[1.], JoinForm[{ElisionsDump`Miter, 10.}], JoinedCurveBox[{{{1, 4, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}}}, {{{25.499999999999996`, 2.5}, {25.499999999999996`, 1.3953100000000003`}, { 24.604699999999998`, 0.49999999999999994`}, {23.5, 0.49999999999999994`}, {2.5, 0.49999999999999994`}, { 1.3953100000000003`, 0.49999999999999994`}, { 0.49999999999999994`, 1.3953100000000003`}, { 0.49999999999999994`, 2.5}, {0.49999999999999994`, 23.5}, { 0.49999999999999994`, 24.604699999999998`}, {1.3953100000000003`, 25.499999999999996`}, {2.5, 25.499999999999996`}, {23.5, 25.499999999999996`}, {24.604699999999998`, 25.499999999999996`}, {25.499999999999996`, 24.604699999999998`}, {25.499999999999996`, 23.5}, { 25.499999999999996`, 2.5}}}]}, {FaceForm[{RGBColor[0.5, 0.5, 0.5], Opacity[1.]}], FilledCurveBox[{{{0, 2, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}}}, {{{3.52539, 1.0035199999999997`}, {2.5250000000000004`, 1.0035199999999997`}, {1.6828099999999997`, 1.0035199999999997`}, {0.9999999999999999, 1.6863299999999997`}, {0.9999999999999999, 2.5285199999999994`}, {0.9999999999999999, 23.474999999999998`}, {0.9999999999999999, 24.317199999999996`}, {1.6828099999999997`, 24.999999999999996`}, {2.5250000000000004`, 24.999999999999996`}, {3.52539, 24.999999999999996`}, {3.52539, 24.999999999999993`}, {5.523440000000001, 22.421099999999996`}, { 5.523440000000001, 13.0039}, {5.523440000000001, 3.5867199999999992`}, {3.52539, 1.0035199999999997`}, {3.52539, 1.0035199999999997`}}}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}}, {{{22.4977, 12.9016}, {17.740599999999997`, 16.8398}, {17.740599999999997`, 14.856599999999998`}, { 19.980900000000002`, 12.947299999999997`}, {17.740599999999997`, 10.946100000000001`}, {17.740599999999997`, 8.96289}, {22.4977, 12.9016}}}]}, {FaceForm[{RGBColor[ 0.46093800000000007`, 0.46093800000000007`, 0.46093800000000007`], Opacity[1.]}], FilledCurveBox[{{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}}, {{{ 9.202339999999998, 12.8969}, {9.202339999999998, 12.335499999999998`}, {8.747660000000002, 11.880899999999999`}, { 8.186329999999998, 11.880899999999999`}, {7.624999999999999, 11.880899999999999`}, {7.169920000000001, 12.335499999999998`}, { 7.169920000000001, 12.8969}, {7.169920000000001, 13.458200000000003`}, {7.624999999999999, 13.9133}, { 8.186329999999998, 13.9133}, {8.747660000000002, 13.9133}, { 9.202339999999998, 13.458200000000003`}, {9.202339999999998, 12.8969}}}], FilledCurveBox[{{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}}, {{{ 12.6227, 12.8969}, {12.6227, 12.335499999999998`}, { 12.167599999999998`, 11.880899999999999`}, {11.606200000000001`, 11.880899999999999`}, {11.0449, 11.880899999999999`}, { 10.589799999999999`, 12.335499999999998`}, {10.589799999999999`, 12.8969}, {10.589799999999999`, 13.458200000000003`}, {11.0449, 13.9133}, {11.606200000000001`, 13.9133}, {12.167599999999998`, 13.9133}, {12.6227, 13.458200000000003`}, {12.6227, 12.8969}}}], FilledCurveBox[{{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}}, {{{ 16.042600000000004`, 12.8969}, {16.042600000000004`, 12.335499999999998`}, {15.587499999999999`, 11.880899999999999`}, {15.026199999999998`, 11.880899999999999`}, {14.464799999999997`, 11.880899999999999`}, {14.010199999999998`, 12.335499999999998`}, {14.010199999999998`, 12.8969}, { 14.010199999999998`, 13.458200000000003`}, {14.464799999999997`, 13.9133}, {15.026199999999998`, 13.9133}, {15.587499999999999`, 13.9133}, {16.042600000000004`, 13.458200000000003`}, { 16.042600000000004`, 12.8969}}}]}}, AspectRatio->1, Axes->False, Background->GrayLevel[0.5], Frame->True, FrameStyle->Directive[ Thickness[Tiny], GrayLevel[0.7]], FrameTicks->None, ImageSize->{Automatic, Dynamic[ 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])]}], GridBox[{ { RowBox[{ TagBox["\<\"Name: \"\>", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox["\<\"/Users/milostoth/Documents/Literature/Papers/026 \ FEBIP modeling review/data/outputs/chemi_T_300K.dat\"\>", BaselinePosition->Baseline, ContentPadding->False, FrameMargins->0, ImageSize->{{1, 500}, Automatic}, StripOnInput->True], "SummaryItem"]}]}, { RowBox[{ TagBox["\<\"Unique ID: \"\>", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["83", "SummaryItem"]}]}, { RowBox[{ TagBox["\<\"Binary: \"\>", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["False", "SummaryItem"]}]}, { RowBox[{ TagBox["\<\"Open: \"\>", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ DynamicBox[ToBoxes[Options[ OutputStream[ "/Users/milostoth/Documents/Literature/Papers/026 FEBIP \ modeling review/data/outputs/chemi_T_300K.dat", 83]] =!= {}, StandardForm], UpdateInterval->1], "SummaryItem"]}]}, { RowBox[{ TagBox["\<\"Encoding: \"\>", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["Automatic", "SummaryItem"]}]}, { RowBox[{ TagBox["\<\"Format: \"\>", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["InputForm", "SummaryItem"]}]}, { RowBox[{ TagBox["\<\"Page width: \"\>", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["78", "SummaryItem"]}]}, { RowBox[{ TagBox["\<\"Number marks: \"\>", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["Automatic", "SummaryItem"]}]} }, AutoDelete->False, BaseStyle->{ ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{2}}, "Rows" -> {{Automatic}}}]} }, AutoDelete->False, BaselinePosition->{1, 1}, GridBoxAlignment->{"Rows" -> {{Top}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}]}, Dynamic[ Typeset`open$$], ImageSize->Automatic], BaselinePosition->Baseline], DynamicModuleValues:>{}], "]"}], OutputStream[ "/Users/milostoth/Documents/Literature/Papers/026 FEBIP modeling \ review/data/outputs/chemi_T_300K.dat", 83], Editable->False, SelectWithContents->True, Selectable->False]], "Output", CellChangeTimes->{3.633934566522747*^9, 3.633934950410363*^9}] }, Open ]] }, WindowSize->{1366, 842}, WindowMargins->{{0, Automatic}, {Automatic, 0}}, PrivateNotebookOptions->{"VersionedStylesheet"->{"Default.nb"[8.] -> False}}, ShowSelection->True, Magnification:>FEPrivate`If[ FEPrivate`Equal[FEPrivate`$VersionNumber, 6.], 1.25, 1.25 Inherited], FrontEndVersion->"10.0 for Mac OS X x86 (32-bit, 64-bit Kernel) (September 9, \ 2014)", StyleDefinitions->"Default.nb" ] (* End of Notebook Content *) (* Internal cache information *) (*CellTagsOutline CellTagsIndex->{} *) (*CellTagsIndex CellTagsIndex->{} *) (*NotebookFileOutline Notebook[{ Cell[CellGroupData[{ Cell[422, 15, 37472, 824, 1840, "Input"], Cell[37897, 841, 6178, 132, 160, "Output"], Cell[44078, 975, 6053, 129, 115, "Output"], Cell[50134, 1106, 4443, 76, 55, "Output"], Cell[CellGroupData[{ Cell[54602, 1186, 1057, 18, 26, "Print"], Cell[55662, 1206, 1091, 19, 29, "Print"], Cell[56756, 1227, 1094, 19, 29, "Print"], Cell[57853, 1248, 1097, 20, 29, "Print"], Cell[58953, 1270, 1085, 19, 29, "Print"], Cell[60041, 1291, 1206, 21, 29, "Print"], Cell[61250, 1314, 1200, 21, 29, "Print"] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[62499, 1341, 4130, 112, 285, "Input"], Cell[66632, 1455, 75290, 1293, 199, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[141959, 2753, 5135, 131, 465, "Input"], Cell[147097, 2886, 185, 2, 45, "Output"], Cell[147285, 2890, 18003, 364, 96, "Output"] }, Open ]] } ] *)