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

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

(* CreatedBy='Mathematica 8.0' *)

(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[       157,          7]
NotebookDataLength[   1507916,      34831]
NotebookOptionsPosition[   1506634,      34785]
NotebookOutlinePosition[   1506974,      34800]
CellTagsIndexPosition[   1506931,      34797]
WindowFrame->Normal*)

(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[
 RowBox[{"<<", "HighEnergyPhysics`FeynCalc`"}]], "Input",
 CellChangeTimes->{{3.543120070902274*^9, 3.543120104658553*^9}}],

Cell["Loading FeynCalc from ", "Text",
 CellMargins->{{Inherited, Inherited}, {1, 0}},
 CellChangeTimes->{3.543120105309779*^9, 3.543122044977566*^9}],

Cell[TextData[{
 StyleBox["FeynCalc",
  FontWeight->"Bold"],
 " ",
 "8.0.0.beta3",
 " For help, type ?FeynCalc, use the built-in ",
 ButtonBox["help system",
  BaseStyle->"AddOnsLink",
  ButtonFunction:>(FrontEndExecute[
    FrontEnd`HelpBrowserLookup["AddOns", #]]& ),
  ButtonData:>{"Short Overview", "intro"},
  ButtonNote->"Open the help browser"],
 " or visit ",
 ButtonBox["www.feyncalc.org",
  BaseStyle->"Hyperlink",
  ButtonData:>{
    URL["http://www.feyncalc.org/"], None},
  ButtonNote->"http://www.feyncalc.org/"]
}], "Text",
 CellMargins->{{Inherited, Inherited}, {1, 0}},
 GeneratedCell->True,
 CellAutoOverwrite->True,
 CellChangeTimes->{3.5431201063138103`*^9}],

Cell[TextData[{
 "Loading FeynArts, see ",
 ButtonBox["www.feynarts.de",
  BaseStyle->"Hyperlink",
  ButtonData:>{
    URL["http://www.feynarts.de/"], None},
  ButtonNote->"http://www.feynarts.de/"],
 " for documentation"
}], "Text",
 CellMargins->{{Inherited, Inherited}, {1, 0}},
 GeneratedCell->True,
 CellAutoOverwrite->True,
 CellChangeTimes->{3.543120108431073*^9}],

Cell["FeynArts 3.4 patched for use with FeynCalc", "Text",
 CellMargins->{{Inherited, Inherited}, {1, 0}},
 GeneratedCell->True,
 CellAutoOverwrite->True,
 CellChangeTimes->{3.543120108575716*^9}],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"<<", "FeynArts`"}]], "Input",
 CellChangeTimes->{{3.5431201256746273`*^9, 3.543120133330229*^9}}],

Cell[CellGroupData[{

Cell[BoxData[
 FormBox["\<\"\"\>", TraditionalForm]], "Print",
 CellChangeTimes->{3.543120133739546*^9}],

Cell[BoxData[
 FormBox["\<\"FeynArts 3.4\"\>", TraditionalForm]], "Print",
 CellChangeTimes->{3.543120133751276*^9}],

Cell[BoxData[
 FormBox["\<\"by Hagen Eck, Sepp Kueblbeck, and Thomas Hahn\"\>", 
  TraditionalForm]], "Print",
 CellChangeTimes->{3.543120133754279*^9}],

Cell[BoxData[
 FormBox["\<\"last revised 3 Feb 09\"\>", TraditionalForm]], "Print",
 CellChangeTimes->{3.543120133755348*^9}],

Cell[BoxData[
 FormBox["\<\"patched for use with FeynCalc by Frederik Orellana and Rolf \
Mertig\"\>", TraditionalForm]], "Print",
 CellChangeTimes->{3.543120133756071*^9}]
}, Open  ]]
}, Open  ]],

Cell[BoxData[
 RowBox[{
  RowBox[{"t12", "=", 
   RowBox[{"CreateTopologies", "[", 
    RowBox[{"0", ",", "5"}], "]"}]}], ";"}]], "Input",
 CellChangeTimes->{{3.543120140855307*^9, 3.543120160644905*^9}, {
  3.5431201993310843`*^9, 3.5431202267140627`*^9}, {3.543121198037013*^9, 
  3.543121216145132*^9}}],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"AA", "=", 
  RowBox[{"InsertFields", "[", 
   RowBox[{"t12", ",", 
    RowBox[{
     RowBox[{"{", 
      RowBox[{
       RowBox[{"V", "[", "5", "]"}], ",", 
       RowBox[{"V", "[", "5", "]"}], ",", 
       RowBox[{"V", "[", "5", "]"}], ",", 
       RowBox[{"V", "[", "5", "]"}], ",", 
       RowBox[{"V", "[", "5", "]"}]}], "}"}], "\[Rule]", 
     RowBox[{"{", "}"}]}], ",", 
    RowBox[{"Model", "\[Rule]", "\"\<SMQCD\>\""}], ",", 
    RowBox[{"InsertionLevel", "\[Rule]", 
     RowBox[{"{", "Classes", "}"}]}]}], "]"}]}]], "Input",
 CellChangeTimes->{{3.543120218432667*^9, 3.5431202946495647`*^9}, {
  3.543120347365218*^9, 3.5431203700811443`*^9}, {3.543121275034584*^9, 
  3.543121302118024*^9}, {3.543121708531583*^9, 3.543121732410749*^9}, {
  3.5431217791992617`*^9, 3.54312178014989*^9}}],

Cell[BoxData[
 FormBox[
  InterpretationBox[
   TagBox[
    PanelBox[GridBox[{
       {
        StyleBox[
         StyleBox[
          DynamicBox[ToBoxes[
            FEPrivate`FrontEndResource["FEStrings", "sizeExplanation"], 
            TraditionalForm],
           ImageSizeCache->{407., {3., 11.}}],
          StripOnInput->False,
          DynamicUpdating->True], "Panel",
         StripOnInput->False,
         Background->None]},
       {
        ItemBox[
         TagBox[
          RowBox[{
           RowBox[{"TopologyList", "(", 
            RowBox[{
             RowBox[{"Process", "\[Rule]", 
              RowBox[{
               RowBox[{"{", 
                RowBox[{
                 RowBox[{"V", "(", 
                  RowBox[{"5", ",", 
                   RowBox[{"{", 
                    FormBox[
                    RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "1"}],
                    TraditionalForm], "}"}]}], ")"}], ",", 
                 RowBox[{"V", "(", 
                  RowBox[{"5", ",", 
                   RowBox[{"{", 
                    FormBox[
                    RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "2"}],
                    TraditionalForm], "}"}]}], ")"}], ",", 
                 RowBox[{"V", "(", 
                  RowBox[{"5", ",", 
                   RowBox[{"{", 
                    FormBox[
                    RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "3"}],
                    TraditionalForm], "}"}]}], ")"}], ",", 
                 RowBox[{"V", "(", 
                  RowBox[{"5", ",", 
                   RowBox[{"{", 
                    FormBox[
                    RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "4"}],
                    TraditionalForm], "}"}]}], ")"}], ",", 
                 RowBox[{"V", "(", 
                  RowBox[{"5", ",", 
                   RowBox[{"{", 
                    FormBox[
                    RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "5"}],
                    TraditionalForm], "}"}]}], ")"}]}], "}"}], "\[Rule]", 
               RowBox[{"{", "}"}]}]}], ",", 
             RowBox[{"Model", "\[Rule]", "\<\"SMQCD\"\>"}], ",", 
             RowBox[{"GenericModel", "\[Rule]", "\<\"Lorentz\"\>"}], ",", 
             RowBox[{"InsertionLevel", "\[Rule]", 
              RowBox[{"{", "Classes", "}"}]}], ",", 
             RowBox[{"ExcludeParticles", "\[Rule]", 
              RowBox[{"{", "}"}]}], ",", 
             RowBox[{"ExcludeFieldPoints", "\[Rule]", 
              RowBox[{"{", "}"}]}], ",", 
             RowBox[{"LastSelections", "\[Rule]", 
              RowBox[{"{", "}"}]}]}], ")"}], "\[InvisibleApplication]", 
           RowBox[{"\[LeftSkeleton]", "1", "\[RightSkeleton]"}]}],
          Short[#, 5]& ],
         Background->GrayLevel[1],
         BaseStyle->{Deployed -> False},
         Frame->True,
         FrameStyle->GrayLevel[0, 0.2],
         StripOnInput->False]},
       {
        RowBox[{
         ButtonBox[
          StyleBox[
           StyleBox[
            DynamicBox[ToBoxes[
              FEPrivate`FrontEndResource["FEStrings", "sizeShowLess"], 
              TraditionalForm],
             ImageSizeCache->{72., {0., 11.}}],
            StripOnInput->False,
            DynamicUpdating->True], "Panel",
           StripOnInput->False,
           Background->None],
          Appearance->Automatic,
          
          ButtonFunction:>OutputSizeLimit`ButtonFunction[
           Identity, 43, 23220238615418183088, 5/2],
          Enabled->True,
          Evaluator->Automatic,
          Method->"Queued"], "\[ThinSpace]", 
         ButtonBox[
          StyleBox[
           StyleBox[
            DynamicBox[ToBoxes[
              FEPrivate`FrontEndResource["FEStrings", "sizeShowMore"], 
              TraditionalForm],
             ImageSizeCache->{76., {0., 11.}}],
            StripOnInput->False,
            DynamicUpdating->True], "Panel",
           StripOnInput->False,
           Background->None],
          Appearance->Automatic,
          
          ButtonFunction:>OutputSizeLimit`ButtonFunction[
           Identity, 43, 23220238615418183088, 5 2],
          Enabled->True,
          Evaluator->Automatic,
          Method->"Queued"], "\[ThinSpace]", 
         ButtonBox[
          StyleBox[
           StyleBox[
            DynamicBox[ToBoxes[
              FEPrivate`FrontEndResource["FEStrings", "sizeShowAll"], 
              TraditionalForm],
             ImageSizeCache->{117., {3., 11.}}],
            StripOnInput->False,
            DynamicUpdating->True], "Panel",
           StripOnInput->False,
           Background->None],
          Appearance->Automatic,
          
          ButtonFunction:>OutputSizeLimit`ButtonFunction[
           Identity, 43, 23220238615418183088, Infinity],
          Enabled->True,
          Evaluator->Automatic,
          Method->"Queued"], "\[ThinSpace]", 
         ButtonBox[
          StyleBox[
           StyleBox[
            DynamicBox[ToBoxes[
              FEPrivate`FrontEndResource["FEStrings", "sizeChangeLimit"], 
              TraditionalForm],
             ImageSizeCache->{108., {0., 11.}}],
            StripOnInput->False,
            DynamicUpdating->True], "Panel",
           StripOnInput->False,
           Background->None],
          Appearance->Automatic,
          ButtonFunction:>FrontEndExecute[{
             FrontEnd`SetOptions[
             FrontEnd`$FrontEnd, 
              FrontEnd`PreferencesSettings -> {"Page" -> "Evaluation"}], 
             FrontEnd`FrontEndToken["PreferencesDialog"]}],
          Evaluator->None,
          Method->"Preemptive"]}]}
      },
      GridBoxAlignment->{
       "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, 
        "RowsIndexed" -> {}},
      GridBoxDividers->{
       "Columns" -> {{False}}, "ColumnsIndexed" -> {}, "Rows" -> {{False}}, 
        "RowsIndexed" -> {}},
      GridBoxItemSize->{
       "Columns" -> {{Automatic}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}}, 
        "RowsIndexed" -> {}},
      GridBoxSpacings->{"Columns" -> {
          Offset[0.27999999999999997`], {
           Offset[0.5599999999999999]}, 
          Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
          Offset[0.2], {
           Offset[1.2]}, 
          Offset[0.2]}, "RowsIndexed" -> {}}],
     DefaultBaseStyle->{},
     FrameMargins->5],
    Deploy,
    DefaultBaseStyle->{Deployed -> True}],
   Out[43]], TraditionalForm]], "Output",
 CellChangeTimes->{
  3.543120297878849*^9, 3.5431203713076277`*^9, {3.5431217219396753`*^9, 
   3.543121733259034*^9}, 3.543121781071732*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"Paint", "[", 
  RowBox[{"%", ",", 
   RowBox[{"ColumnsXRows", "\[Rule]", "4"}]}], "]"}]], "Input",
 CellChangeTimes->{{3.5431203087010393`*^9, 3.5431203268121*^9}, 
   3.5431203774830637`*^9}],

Cell[CellGroupData[{

Cell[BoxData[
 FormBox[
  GraphicsBox[{InsetBox[
     GraphicsBox[
      {Thickness[0.005], LineBox[CompressedData["
1:eJwl1Qs8lFkfB/Dnbd1yJzFZ95Bym9ppSWkmyi2JXNciRDuu2V6h3gkhK1km
SdKgkigSBimX1ZKUS/TacltUY+m2hFBJ7+/sO5/PmM/X8zznf/7//znP0fQ/
tC9wBUVRnfiSX0qE/NFmUf986CzqdNC6U3VrWdRk7LGJAWMW9fJR7otgOL7n
FHUPfn7ZoXcNbNr2oKMWlp+/a9WuxaLEeg+LN8AV+5LNjsKsny9U98Bx2aOJ
xvDk4ImPs/AvcbHV7zRZ1Nx2bR15xBtxMlyogTVOrL5tDNf0ZcyegiPy6vc6
wbYB5+uCYUHiE/cj8J3ihnIPmGL703LhX2cqM51h9pFVvY1w6vCTGE94bOvn
7hG4vnDtQAhcMnc34TNsHW9ZeBJm1HdnyW9kUQ9K9/xQBIeGCS9owetG7Ojt
sNBr8xl9OPtZGuMN3Pp3rbEh/O9x5QgJ5PP2cEyjLjx0aaucLtynlCe1BqZ1
6GaYwh4zSdNCcKTOig4WrK1unvoG8Rm7OPrmsP1skWU3fMY0v9IAnvtCqyuH
eeOtwjKwXvHxS+lw6RCNI0B8On+44RB8dNxWthx+ey670Rm+YHLfIwxWcA40
3AbTNCQPa8NJXjbeG2DD2yYv/9BgUUtf9zurw3/SZY4nwXr3zjd+C7PZ3pu/
g+f8uibJda+GNuqROotyGZ9o0IfpQQ0uW2CPWLmm7XBJnsHBO2osKi1EaJUH
vMm3yNNBjfSLxo2C4x9VWn9WZVEpaxLacuDl1Crx3+GA6I+KpD9RDRfohcSB
Q23PyfP77/+dB3solCkKo143XF0MK2CO34CHDiwuFX7lKVxx5KzoDjjJhfZF
EvFSEgr63WC1+lBVEr//mlZ3IOym6eSeBffFplqGwTGzDg0DsF7Emw+h8Py+
djYN+QT88ZMoud+TVtBjB/c0//uLK0zNskVD4TKBxF0WvLPvJBUDL42aRJB+
m6k8awmBh9lhWWLwp9ygrF2wbGTBw0nkE96kLCoMV/RNdbTD5V5yYqWIH19E
87xBrl+/170FruDy1TLgqpVK96qRX0l/cm4MHEuZWWvAtJYZWTbcqbQx84QK
fg/ERvvAixHWHiPfoj8qnkFe8NK+66nbYO1zx9T94TEaJXZFmUVJyvDDyHrp
tFveqwALOudaE8nzd5q35qxBfSyzzfLJevS40bQRTmJYZpH+PP3jfdVLGvaD
0if3MZi7Oa76FtyTaDVK1rNGwZJENly2qil0PczR31B6DuZMFlvYk/65FZqV
wfZ9xXdCYHk/P9OnxNJWbsnwsEmojgziccy2DueSekodbHaCO2+c9CmBl1ct
2JL5tedE7S6HM3/LfzwMN2QoR5bB9O2qR9cgH3oJT7oQ/j4kuc8Gjkw4yc8k
96trqh4k7vroyoFzzI8eDYNpW7xN/Mj6+O64oRecVvzpqQW8rVS5iQ5HsJJH
yP7XjUkVeoN4POloyW9IPnl76WkwteikOo56XNnafVsRFvClah7BN8p3mKYj
vyTjWtsaWKS30mpBCflcDpS9Buuu2s1wh9n00+/yyH4b1HzIV2RRWSvtg4i1
hCcW5eGdvtklV2GxB/7njq1G3U+zQviwb3TJimkFrNdme5mHcBt3dDoaduzT
vSCAux02qyvCl/Iimkl/XK7L63etQn3W1VJ6pD8b5cPz4Wp5+k3Sn86CiLen
iFszRX6G9fqHXNLhMsdup7OwbMFluetw2lT235Xwk/dewU/hpZvc0A540Cm4
Wg7x3naI54/AiwGlGa6wr7R78WtYwEkw4MGMsA8rp+CDNtHnR+HQhytK38CM
ojIRZeTnu5zdNwZfcTTVsYLpcdSmx6T/D1M89sPtHOkHt2FFYeclP/jqn4Mv
LsLsfUtndsN6gt+kj8NivkrPyXi0re6fvOCKIXvRHlKvxuRAc7I/C0ajQuHI
6rqVGnBZwsjLGeTTv46dKEL6bbKg8RPMK9Ixn0E9Lej8d13yLKq5R8eb1PdJ
SVGdAbyTsqv9E/YovOVxSg7vy/eBjeR80do12/xKFuN5OyROwNO/u/Kd4Z7B
L/wFWFtT6E2ODM5L06FcaRJ/G4dWKY1xuK/0yfkilLX2XwtSLMrAOViO9If1
lnPgEOx7idl4iPQvqjFUBS752eB4FlyXGsf7Iknq/5pbB2cZuXfI4Hqz6yJr
EJ4zn3beA186Nj23QJ5X5HmVw7J6Tjaym7D/ZtLN1yO+19BFFS2Y556zXAU7
qkwUG8BXz74fZ2K+QsNaccZwSv+obCvMXZd6cQO8wpshqoz8KM/PnmpwOk/t
rgUsuXfTfyTgpSwdvjtsX6QlO4v4k/NiJ11hm7SpI09hbcWpqS0w97oJk/TX
JqBy+RvYNOKixnnyvpXg67IRj3EwZTAaHmt0az2P+RkEB2v9CJe0zNfykI/k
XEga2b9iNWPicagHe/VElDFZH+ssM2wksK9Xnl0k+7k/9YibkDjWX7LbE1W4
IfSRTpMY4mdHB5L1MJZrMXxCFPPtLSnfQOplNPXMUwT5RzOstsFL7i/8nIXx
3mNYBrrAvD1b9CKF8P+Wj1Nk/4g1y3W1fIP6575KJPuH1a7PtYKTQmipJD+F
MZ7S8grMq4i/e5jk3+jv+Qoes/QXo1Av7YnXN4Vwv8BOXkoTpsyHP9jCMTJr
HpmT+vMqZyvgSfvkCRc4R1apyhjxhVIuuwXCc1mZIvVwqHH5/nAy3uYxLWvM
N8DPsvQQvMjIN2qHFzsarYLg+PhjzzchP9//nin8Ee67Jql4nPhx8hlrmDP8
1558WCxAl2EEd/6qp8GFTf1fzZL1wxiZTXOAtaVehrxHPvHbf9nYj/FZewZc
emHJRGdPI3hsYiC8Cnas1JhxIfPLjAjOJvUNV967D/lwCq49iYUD7nuMGaEe
gr7Xi+R8Fsitbp6jkJfxxEvyvo5RZvr6fGVS7O3aFj6kny/SpPuWmBR3vZ6f
PzkPDtga+X9iUpTeyfXh5H3EDdBWX2RSglpxjRNw+6uBWbV5JtUpKR5Kzpu6
Kakth+eYVKS81wuyf6gljpPOLJNK+v6CwhDJZ7HxLnOGSV193HDgK3k+Rqyy
5T2T4m3bsVob+bc/oMuXw5Ndl4NIvSbfpSfPw7IBqvyfSH2lbr/LwPN1h8+E
JJLralErgzC+7KyjzQV4bL23TxjiByh9sCsh3h+2PfkDkypbtO++BVeUuU5f
xHwNZlrSiXMOswTZC0yKEdh7sxjW8Dnxly/yCzXcVZFD5pOZwfoLXnqRHE3i
2VTl31H8iPEb1L8n/dY73RVErufoavvuhiNsjVwd4OlR6xx9mCZ1v80e4ws9
zswl+5cr6D84jvmwmjp03iH/CNUICU3MV/trk4D0t0fSe5cU8ksbTfGoJ/tn
rc/+6CkmRatZbr1B6vf4i0LCa8yXv1njMty889gP7HEmFUNfFi4gz2sl1vww
xqRUOPO3rpL9smPZQvwZk3JM582Q84Y6JfeLZyeTcvk9idlGxjOzsyu5g3rU
55SR8+KfT0rj/383sf4HcqSb4w==
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], {4.696019990535815, 16.084899952679073`}, \
{0, 1}], LineBox[CompressedData["
1:eJwl1gk8VWkfB/BTEYlcUSF0yVbZk1Hk3naDuEUYqW5RbhhL0yBLMZVtNKRM
SLJMlixdbzIUjTWiyVokyy1LN7tBc4v0/p739flwP9/Puef5L8/zP4fyKe/D
p5dSFPUCv+STkiV/VJmUEPnUY1I1Hh4PXmxkUmw//R+qdJnUeNlAwm9wzpUV
l2JgrVX8ggPECtuHXODBv7Ndv6gwKaZg7MT38NhRTmAuLGAvrDSD5Tdy+xxg
nzMezN3wF0WxaFHY2P1r1BHY/7idw1NlJkX/S6rID45euN4XBDsuhjzPhEMH
VG33wJHBtyy74ZvHNdzWwqLN8ckrke+AkdO2T3QmNdt/IHEL3G79zGAATlFX
ZVvCDZteaPbCnPINRmfhfomJ78h1oYFw/8uwTYfuwAzso72Pmwg/nfbfKIH1
DU+3FmTDwRZzYVqw3j81vz2A19gZGNvA+QKrl8SdToZ252DXdXMWObChaWtf
PCwzwzJPgk8qfb+0EC4/d92DxLNX0dGtgmmuig/dYLkPZTsb4bG/088egAVT
fVH1cIrprjWq8JJdOaKlMOvuhfpF1B/Pbjlym9z/o8GmEnjX7r5SX3hKtbTW
F+6qvqJsCifKyXQZwnJeP61fQH0tP65hLoXz240eP4RFWWK2PTpMqtdF5+Jp
WM+WVV0L1ygItsrAXcHmV8rhi/5zd69uwPonXtbXwD532mP5Slgv99X0G9jg
+bkue5hiHLz3lXw/ezL8lSKT4qm+69BCvBGz120cuKH5Ya8rOS9s0w/ScGjy
f3IzYHup8LIuBey3/LPO97Bp2ejkn7DpqY8zNNRvEC/+hguLu6ob6sCP8z+f
r4Jdm8Ovk369/2t37DBx+/XMo3DWEJe/HusvNFXsJ/sdNxTr5QxzTu7J84Zz
HpUEZ8CeuoUnvODX/rPqfFgoMt3+NMzT1wjXQD1jVuEf7OCMd1LCR+FgSbnG
nXB8jFhuCMy3WC2hTNZPf3n4V3hwzylRMj/ycfqzoaQ/Fm63SlHPUoWRP51h
WqeejDfsSfeXU4LjtrWLaMB2PwyM1iE+FTnTP4D+netYZWMPszjhjTnwIEf0
Zhvqo01wYgJg6mGfFAPOyTh07Ahc+1x+PG09k9LUnmxkwkImdR1f5ZGfeMEf
JmQ9z+OlR+HQ1erT++Cxe7GBlXLY380vx4/D1qlX/tCHZfmdslfh0PQOxWJZ
zH9Hx94S4sCsMUvY5wXt0SSsmWK9ZGEdkwrgGe3SQf6LH2m0Z7CmrfdFLzhy
xb+B9+FE2f7RfFjVo9sqh9hiH32YzK/Lu30VMM3GIIjMLz2zSTAECznNOynB
PdJx/yoi3k2N6Nub4cNGIhJsWKhH5ZIubNfxMDQLZil8yNaCi8ONT47Czm9v
K6jAw7NFrZqoR0bzkDk5P5vfidj/ADPneB8nEb+bYycfAEfmTYUVwzImlfph
MP/WK2UyP4N705/7wqwBxy+aMCt6l7U53MC8FNiP+ulGXpeEYMesDpVEWP59
1U/ZiF9Kb3ewh+MmQ6K3kn75lGxTJP3bed8qH/VxH827TWpj/56IM9bCpU9S
ljfDssdY2X5rMV8DTYEVMMvB6UD7GqxD3fR8Auu0WK02IE63fNwALzSI9ifK
4PlpaRk4CFeHKCtIwKU2LcslEG8zmx51QxrrcXylyXmoVH0o0IW7AiWaAmGl
NL7S0GrMu1/hbBksWrjMqxh2bLik+AUWn89flgqznjyq+w71qxv5Z6fBiZ8V
fiPnN/RBfXcZzFmkXFPJ897J9jNZr3JBO5e8L8r/jOTQSbx4YftO2OxySLsL
zOkeke6DN9+287kPNygUWr+CzQsTLCdg3q01phWk36syEzahHspZ+c3v8NqT
xyfsYdl+7V7yvtmvqZrnC3PSUzLVyfODHSvtRxylJvEe+c++HL9+Eg5QYzsl
wS/txzsMyHVrzyUsOKOokfcR8Vgm70JXwM7edMlIOCfnoMFz9JMW5fBVkuQf
mqQUD8tvv+N+FfXR14W9PgNbz8uKjEthPyq1Dn0Pl6v1GVnBetKJbTtgi/Hi
phwa7mevfWsCK+lal4nCiXua6FZwZGZw7MAq1HPC84Y7OQ9RLnFtEuiH23r3
BDimjn33gzj2ZSpzRyMskBz9tAk2VpyQXY58OfcbL6euxP6GileQeU5MEr53
AKbbzBWQ+ZW5KiGhBhufe+xVTc5rVUXdVvL95Jk8Ady1acbei1hopZsa+se/
XCfxN8xmbVfcT+Y1rJq9H/ECNmzjO5L96ZLybIbj9Md/d4ZbhrZecka+aUdW
VrDguDiNR+9gwXm/0m0w3WxnrC3qS1SIyReHY2zLorPhtBybnzoR3zw3L7cD
plptrpL5Satezm+HORrBbw7DqglLbqWR74tce0r2x/CIQrIxzNOZfVCJfvTY
5P2Sgni0s+GaQfBYzMVIkl9phNbPpjDXfRm7E/U0JH2MEoHpzd8mn4jh+aR0
5m2fFpOycioYCV+BPDbPmdXCU0q+NntEcZ9xcVspzG2583ZhOfKvX5gohwe/
/er7lzCeH+FDyi0wb6w15HchnJ8iiW3TsFBh8KmYZchf2W2nEuLx9/dO5i5F
fZb6xXaw5+XG6bkl6G9u/63rsGOjVud5WJNvdqMVbqk/FKAJl7Z2a0qR57nD
7KIkTFV686zgvfI60xrk/ufrzoeR50tz1XF3OC3sw5c82NHJW6cZbrnfvKoR
tpM7FWGF+Cze61Hyfk6sOHaoE+Z+lYnoJvMdrV7ngny5B/elNJH1HZqFh2Ga
MKOoAH4xvPHJYdTnM6ou+QsssHO4dxcWVP+nyAIO3v2zSi1cqumoLQazI16k
lsENjSXXalAPbyR5JAjumvhHOxDe65HiswKW3Sp0TR8OYD6yIPH5O/Tp4+jf
bG3W1mvIj94pqs6FQ3Ui7K+RfiyoBIfAcRHnFj0ozGdj8wUHcv2pzJEziwxK
UJPcyoBzLoSv65lnUKxfdIO+g1nmu4dZnxn4Z7Yyywxu+Zbq3fOJQYmWxT22
I/u99/X2hFkGZZzV6BQAV3ZwQ2L/YVBdW7SDsmG9jds39EwxKPaZsgv9ZL3s
okzJSQblaD3PVCTzGqAwbDjOoPjz+j7HyP4VmJhrjzGotGHLiBTi3F6bmVHk
YxYo0wmn2dyQ8Md17uCKd+Q8s2f2jaXifq7ujvUGMC/30KI51ucNTQUeJPO5
J+loFuLH9f54wglmSeaGPJ1mULSOoEEHst8Z8dteIV9et9gEmf/QbwNDbTMM
ysfvziY1mPv+vVE66mN9/Fn4X8T3UTy7XWuOQbX4f7pD3i90Tx93F+IR9Qwy
P4Ia+egdMK2lVs8QZvbtNbmP+xtE7j0YQf2yzmEuXKw/tcP/bgbpt2/Cfhbi
M5du8ToBRwqLO8cjX0GIuYUqTE9aXi2C+qa6wz7PbEG9XckOnnwGZe6bVNwC
T91l3QwaQLzWc2LlMK9xy+u6Hlx/Vt9UAlfey8rPbGNQkS1RVBXMzFMr6a3C
+hcDP7yB//eTuPP/n1rM/wKsKK/d
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], {5.303980009464185, 14.084899952679073`}, \
{0, 1}], LineBox[CompressedData["
1:eJwt1ws8lPkaB/A3hdkuDNIaTZlBmSRNp9li0UzRdlONGi2V3SGsdJuEJt2m
Q5ludlCR1KqcENVoU3aTRhEHaaJ2lduUcS9GCeky5/c/58zn4zOfr//teZ73
eV8vdtCONSEGFEWV4Yd8UyN6fNgC6r8fKwHl3sVwLoTpb0TzXn4roKzX56Rs
g2Ud04cq4aSUmmBbWDl0PbsONvEcW1rPElCS4YY7A3BQQVxdEsxdpE2ehf2K
ZumPrYF1QzNu7YMNKkVZDOLDvOwWuHqghFtnA6us5qxlCCjVj3TtETjj0Q+b
6mDFqi8lq2HlyoAnG6wFVPrsw0ucYdWIn7IDdjprT7cl61MWTImYLKBchvpf
zCDre793H4RZrwqTPGHBe7uoHUzktzBh21ZYmLDy4gtYTvusz4DVbqp5c6YI
KM6cUyFNZL9202274F5n91smiFdYvnb9BZg3krLOmeQ7YGacD9e6GEhWkPF9
q6W58NWvhv2bYJlo440E2L3VaCQKFrgG/LYRrpxY0nuQ5O9CMazgJPn4eBms
/uh8rRTxxFHfNUbDYmlffCjsTd8YEUTmR3zwMoCj98d6eJL9Q7LvpyM/0cZx
l0g9FVGJmu9hHt/jVTXiZ6n44a9QH799kru+sGTpnfJTcFHHnG71VKyv2d7s
B/PUP1ssghUdd9u4cDbDbfE1xKXgiRbbwBm5TtWTYHGVYN80OM7DwCgWcej6
lpp5waJnkTxSZ6E8+mQM3NlcK4wk3vpWVg5vtUt/TRFPaE3k4DvP8P7LC/g9
PdT6dBoslQ5GCmGNTnudgX2d3sSzviXn/ku49yLMTFi78z36QOajcZuFOAbW
1TLaYOVAP60QzrMV9HaTPslRj/FAHrrtap0B1nN9fkq4A2eabQ91hJWZi3fa
oQ7i5bPeB8DiyffN9pPrfmjJvbNkvjs7qQQeM5V3+gXMOlug64UratzZDMSp
sVhlYoA6D18vHysifda4U0bBt74enHkE5rKDD7djflxJfGEume/ic/g2zGX0
by4h4+mdd3fB2R3a9FKYmj46mw1Lf7PY8TusrM7/pRTxetesqT0By8LFJ8Ww
4PtzKUJYJ3HXjSBfl/4BiZ7Up6tmTyp8osm9O404+q93HrDsqok/uU7crqin
fahf6pM9pRdRn4yA4rE3Ycm8A2UWpH4aaVc8LGKkBh7Efci1burZBUvbNZpO
3Mca77Sc3XCRyZ6LIljsu/BhMhzpOa770STEdaSooRz+PM3znifMimCkm+N8
Vr6xssYS5zH3l+yEda1OpeGwxCSf9xremsleZg0ry9c6kvyKgjQPmydi/riA
5R0wZ/aUlkJY6ba+KQL1eTbgG5wNK2KOf/kC51WNX5AHC437tQtRf+/7E2Mf
wPWxodXkvhLXxBzrhNV5gaduwy4L3Ywn4zwNa1moFqaJLjmug+l7n1YY4zk2
oOmvOg0L7otu2MAZrBvJz2GXsuK4mXBjznOOGfIbpp2fQ5wXzvjJC9apzaeQ
+d7PxQFbSP5FWRwazHX4/ck/Yc1KZlYHOe/UJ308vFR9edV9OO7V/CEpLKw2
d0gkzxGftwoRrIq4G/kz7PXGJN4adumsy3CCs2e8iKxCPGq7QsEg8tc8jlOH
WZL7i16QBt+aYt44gHwluVE2K+BIm8qTEaReFfZx4+Bhg/CdbRaIb/FXQQvp
JxfXWB9YYhXdXQGLfY4Z3TXHt00BtxK+dWed/3RY4zymphVeeubhoxQzjJu7
HLTEfl6fN6+3gFUh24x+gsNW826n0zG/cmj+XTg9TP5mHpxacYBmSZ5LOYmq
ClPMo4dvWQvTkz/8uBKm2/ZcOAMX/upg+8UE+1ebrmgkz8l4V83fcMXJWV/Z
qKdCM5zcAFu5iX4IgVUXCk6NwXqrcQ8rL8P154MKyH7yUT8GN5C/S7dlMUpT
8vwcmDvWFvvMfXrdHPH4KQxuO8NSpnbCGljaPKt2CSz6+6ZhEhkPrWkXwcK0
JW41sEIU88SX2L8uxgD51lsfal8OB1duaXWEabH8Ud/BKo9wUy9Y1hrxiyU8
oCifvwIOu9JW9hbxpMYa+iyAK4r0TBUsL5OymLDEX5ebAA9zJi3T4jxlybIX
G+AxSR6rU0g8lwysHUn/Va1PJvUsnPzq70+ojybcIV6O/BSt/n51pL7HuMeO
oD70+V2ZN0m/Mymn7RNQR8PGqHOkvpwmnyXj8bwRh7J+Jf34S/9u63Hoh9YS
eQKs/LbXT/cN9i3WWqXBcke75Kc09Df3H0X55Hoxi1Y9MkZ+vj6aZ3CnTWXn
cyPs8yt7rwHiy5YlXjGCqbAES1fY77FrZIAh+oZe+zIaDqs7mt80BusC43P/
gKXny0yOwtm/l84l7x2y1cy9P8P1jv6jF6N+GYEbpxH7mXGz5LCfaXtCHKx7
+vRBOaw8a6mshFmMjxzKDvUzznGaifMqFrq/mw0LHnw9fQFm8VsUvrB4X0wh
E/FZPdNrdsCUa7cuHVY07eIdgF38Io5MQn5h/GZ/Gczt9jM8BGdUKy9Ewxyt
/swzWOdlVB0Is3h7145FfVS2UVM94YoDEUeZNNKfXFcm8WDQRyOYZvZpYh/i
FU9/Maoc6/0cLvfcgzvX/PXnBrjwdR3rOCxjeOnLEE8Fa94Mf1juZhFMg9XS
ZokjzP0snuKAfFxCJi4aReZn/lHrgPwFo/dca0H9OkULgs1G4/yWw5HlpL5m
5pd7RuH8Js8hUm9u0qC+mEI+dcPTyHudeI06lKPnUzRm4O4HZNwztazjM59S
f3nZWg/rvpSfqB7h4/l/u22EvBeGirPahvl4f8s84ED6vWN/C3+IT1HVFosC
SHzxtv5tH/iU8IR+UxrM0qdymgb4lLQst6oRprT3aDPh7NXSGbaoj9DVmffk
PZ8SG78zCYM1o/uCHsECE3taHixLzHzzDeYrdeyCHnI9bN9PUMC0x6rX9vaY
P5m3yhvnZTgduOgLZ5SsH8Ud5FN0jyv++2CuY7HGEfHRajoaUmDqpeLWTMTP
zcjZlgWzDrGN2R+RT3GG+irx7nMvP8KST36LL5H5S7T+V5C/wum0PIHs1xe6
3+oTxvdcqpLAupDJ571glbQ3azmsqG3oYhMvCDSZCtMrGf++ivVLYzlz35J+
/M7VtAn7S60fRf8Jqz5wJ/2JeDhxwpVyMn4+7sYPiDfMqcPen/TXdId3x5Af
d0OwN+nnjE2r2hNRH0mAqGE8LJlw0XxzP+avcEp/j/oKQmqb+b3w5ssftcSz
jY8ndPEpqyP9fa+ID8/Ra7TIl33CoIfcX4O7u/w1fEru+3geuX9UR5c+4dXD
vCILNrk/crdsPKRGPXuGr3iT69FuPv/cQ1zfhWcTDpHxZ1zmhHzkdzPBuNju
//83ZN7737e94D+jAG+K
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], {4.475285377617156, 7.188392099638602}, \
{1, 1}], LineBox[CompressedData["
1:eJw9lgs4lGkbx8dgRBmj8M7MSyGVdHCssOW9SxTrMKh0pJJOVJPV4VuHplKy
dpGpTEgOFdG3ObRl281EJMlpK1RIJ6GpRlGUw/e8+808c10u1+963+d+7ud+
n/t//0027/ENZjIYjD/QH/0/8/MY+pkA498fF9IHm5bJKxBnLnl4I42Aw3f+
MTofhTjpYWKcJwFzvT4mLLVBLDzwhwOPgLBdyeZBr4yBIfCQeKoQQE3pGc0T
I+40d5GxCFg7FnK23oXmI8sbZxKwS5zyd+/gFGAYH9H4cTsB9tLFC9jhiOVv
D6+RErBtZV20lQpiQXhkjQUXQMJYn54zGe3/bPmui1zYaKnWfXoD4szBgnUz
eWDQZpnmZIVYsL3OvpAHUsowMJZELF95JcaWDx9qK7ysJyNu9PZ5d4UPv69e
zm+fh5hz63myAQml4Yne5oH0+pE7QSEkMC0TjFpO0+9rxizLJeE/YV0J4x4j
Ntadva6ahKylKTfCCJTf7W09E++TUOHGkuf4I+Z0GXpeJcHmfsKQSxLixnND
fgdJWGgf0BT4N+LMvrS6GSRIKk6wxC2IGTM2pJXzQXBm7XmfDnr9gi+X3fmg
7+s8oFmPWPhReu0eD2QC/Z2uF+l4ISOji3nw0LVstzQIsahLwrrFhTt25HCA
FuLCp+PtgAteovc+89JQvp0pXvFNBBiwS48F8hAXvs7YtJ+A8cmp/BcnjFA+
1UWkLQGmnMyIsA+GKJ/7kV+1CJj95vRfrt6IM3XsXo8ZQK9zyY7aQhLt7xyy
cyIBFybki4O5iDfOEF1cTMDWWY+sLOP5wLCakOkVT8CKEuacUm3ESWadre8I
sJOeMqzP4aF8r2mfC+ACM7JV4ClAbGXOm9TBhf0bxIkjeoiFc/wNtvCA43vM
OPITFz1397Tu5UFGgtTJrhsxhG9+v4MPdVsG3bb2IzbenG7azgct4fCGRfR6
q+cnnZ1IuJvUt/STMx1P2JN1goTI+nK9b9GIIYfIKyXh48lIe6fbdD7EafUH
JAx73LdZx0T5ChaF1JaT0J/4ddIrij5P+40DqSTMPHpdmPkTYmH02Y/+JOxm
xWY2SxDLTzZsG+FDqICcHVmAWHRo7qJEPlSc2JwWmke/TzSUTeRD+P0nCxN/
Q7yxM0n2Gw8m716r0beGfr/BYI4GDySrHVc10vUCh4bRGC6c6O5+fzafzo98
nKvNBbXg4tAWG5rdYrsvEfBzuPeYTj46f2Fl0rWVBFSa3XyarkfXy6F+wIiA
Qx2cUz8dIND+X5jrmQQcLHkp624xQPELin5QI0BiW6yx5wfEIo/iqKkE6Lgf
tvbN1Ufc6p0ZQMCvIw+iDxgjllt21hQT8MvnoiDjAj0Uf7v8HcmFQGc76+vu
iI3Bb+AUFw4F146dV0EsvJrL4fLAWXMae1rTJNQf+X6yDB5EuKmobPgTsdXV
n8dN5cOQ9GDVXJrlQ3M0MvjwpczDNKAeMegNfdMkoe5Cg3fuAGJhlUrhJhKu
qcxf/NYCxb8tmSfLJOGL9+f/eu1AzEjflVNJgmnbueBzdH6MeHWjWhLqeyZM
CpIhFjAJzWskbA/NECyZTp9P0y9GhNbH2T60WYF4Y7S7li1avyU5UroXMedA
/aoGPrCtLFcvikAs0H+5YC0fLN282wZ3IRYm7fN9woOUUGKx/3L6uWNVmy8P
LKgUn15NOr7ZDZ86LlQWby3fV4L2h3Pdxt5csMjuvPPGleY6l8AOAt57D/sv
qEbnE3mORYgIWC5ZH+pnT9enNWLEgQDO1VdZHRkTUf8+OuzGJiC8l9ZnXVTv
qe4RqB+fTDMMMNmki59nLcwRX6nm4PXDMap59+w5OH50sNNBuzAdvP+PS22i
9M6ycX5Rs5rWz5Jp4/wvNDZG+ezRxufbR2xaxjbTxue/4ZblfUxTG9cn8cVT
1mFDbVy/rtOSNan+2ri+qk0VAREl2rj+85vfPHGYwcbfJ6nvjl1VHht/v7ea
vAub5+jg7xt6SRxlna+Dv7+hlVXhai0Ovh/9+iXtWdYcfH/kerGOTa4cfL92
x4+OZtOsuH+Xap/2PZ3Lwffzccd2xu1hHXx/9aemnBPv1MH3+1ZFmr30Mhvf
/5u/BzN1pdq4P67pj6SvK5qA+yd7SZrcJG487q+XSxynzxVo4f57JGtv4epq
4v502xjvfrdZA/fvebONKp0FLNzfNc9Tp/ukquP+r2idY/YgXw3rQ/bgL36B
r1WxfqTUufcZeahifZHpeRx/8ZqJ9cdT4lgz/SoT69NfofdyNS4zsX59Te8r
861nYn0T5SRPlnJVsf7J4jitDiJVrI/PdEJS3b6rYv0cOMZKPHpIDevrswmR
zeOZ6lh/x8nI/eRBdazP0hrW0mMt6li/7TvZobYEC+u75FfRkRRLFtb/YvWB
Mg2ShefD2w+tnWrN6nh+1BV5BQQHquP5YpH4+G5QqRqePxbO3y4m0vVSzCcN
P/+MrB4mnl9xSQWtdg0qeL6NmJydvSODgeffp7Jc3TcVo5RyPhpOOqQ733WY
Us7PwX/EpyPahijlfHUnp/QcTv1KKedvqK9bqYV4gFLOZ4koWSem+TOlnN9r
7VkuzL2fKOV879fJ9+/a2Ucp57/v+E8WrdVySukPusvFR/48jljhH1zd2t6U
ZCFW+IvrYcdvithovcJ/tFlU8rrL6Hj/9ycZs7soYRbaT+FfTBdnm8zLRvko
/M3tuODK9oJ+Sul/jAOr4nLyUP4Kf1QpKi8POPqFUvqnXnn7mXhzdF6Fv/ow
tb/SMRaxwn/lr0g4+vIkYoU/83pFidUpxAr/ZnrmQ2BeHIqn8HdmN78nJuxF
+yn8n9ZojZrTd5Sfwh/eXTVoWm2J8lf4R7l6lvZKQ3R+hb8sLHLaYZDzjlL6
z/UlobrCqi5K6U/NG1v219W8oJT+tfMS23T3jSeU0t8KOy64GHo0Ukr/y5AN
GrTFllFKf/yvbV6VfEvpn/8HP2dmJQ==
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], {4.5, 5.0548}, {0, 1}], 
       LineBox[CompressedData["
1:eJwl1ws41FkfB/A/3STLSCtptBPby6r1TiLyir/LFoWIMmppojYspRsqaqxL
sVvYLZeihspl9ZY7MfGncgmZtaUpyohcQkYiSev9nued5+k5z2f+55zf5Zz/
eFrpfWj7fnmKoh7iHxn//9GmKdksPktpyvdq/ZuXK2lKuE9LJQx2Ltb5owAW
/GKoNQcuzWRPnII57WOOqeo0dbUy2sMCpvxCda3hGwLfvdMcPM+7HEjBKf1K
sgI430ZjXvvXNKVxftvSAzBXqafrPpzyfLE8mzxv2zTeCIeJ3CtvfgMn8Uz7
YaMDATHLYWlFTuky7OewPtgmfQXWlzakeMFiyQo3A1jMe2xfCPvWHj35lxae
K2RcZiFfceFa0TlYZvTbyDHY7fxdxx2wYL7LTy/gsEWx0SZwQngt21yDpnj/
uisxgPljndsuwQq2WdINMPPeNrkb/vFdjN9Osr+HvqrWMppiaXvERpDnkwVx
trDkmklVGSwNt8rYAfMaOxZPwDTt2uEEJxwXbzZGvqy01rJ/w0HbcmePwtRJ
h6Ip7K/36cjwLdjZY8Y6D3YwiZzpIM8vRzy0h491tEd9IfV32/g/Q/5SC9sD
yuhPENuOxYMFhz8YKpH+KfdqidEP9lnxxgmy3zXZdluYxTwvaSD9inNPvov+
OnuV5cbAQo3ZeiN4IJqjwIWlybpRFUtoKq1PN6mO1DNq/8UJ/pF63OkAC1MD
mibUaEppNFW5jo26PpfUF8DmQ1v7jGGpSe27KJgpnSsQLsd9yB7bGgTv+xhs
oAizKs6+Owrzn0odQzThqkWDF2Dp99fVh5eR83m/qxoWRWw7HAA7P9KLkkd8
N+/Jls/oQ/6YqNsN1hj3pNLhIKuA7YXwrfaL2tuJH2ZbqaOenAC1M2w4wWnT
s1PwsSinyBn0SbZy8rtXcDmzqXIM5gbzj5iiPw37rdun4aAf3prHwErKguKv
sV4aq5RyHxbFuYZbwpzUvRtH4LlP6kTHYPFpURGFdbyeuLMFMKuy33cGz2U1
tdfHYG7ObE0XXH6VKuGiHs7pqpV5cOepPD9/cg8iQ3v3wHbrJrIvk3oN37uQ
90dv6rfyezBz/Xp0PPJ1aHUJFMP52nwnVfI+SQ5bEyfsKJwfh/r5a9NDK8n6
A7EH/kH/2Or/0U0k8+8ru5N+By3r+cGFzOfcKBlZTFNRlmW3Zkh9rezVR+De
0cuLyL2XatlMzoU13mdISP+ovEwmV5WmLvofXJ+MOpm9+0J9YLsP5/5eQBze
uNYIdnZY8OAI8ubURapqwczPqu6dyJNimukVsGhsdtAO5iuWD62HJRX9FSLk
zTnYZr8f9t0SIPoPTNUX5WfBM+tuBjQib2eT2jsfYXFgbb4vnGA7z8gN+Unb
B0uXw3TkH4VlcIrZ2a4e8n2h1F2L3Mew6ds1cNCJ2Q0CeM0h04ZiWOzQ9GsH
rFF7SVYJy+rePNZH3HLji+ynMGf+GXl/OCprTfQXWGgs33IJFu8vf7AW6zi5
H67mwQI9x+lAWNCc1pJL3o+e5e//C4tFu2/Ew7xmA5cROJ8zL8CTzL9RXauL
USgbOLAEo1GB0yoPjKw5txtKMS+Ue7MknFg95tJmWBI/Z/3vMB2c89sj5GFq
3qNykZzz8t0zNrCt6fDBCJhJ+SapXJX8Ps5zI/tRtu0bv4dZq8uuLV9C4j9p
z2KhnuQQNdJPbuIXlj4ckN9k70PyvzR6KFgF93FO0s1h7CtoeqEkUkaf/cw3
+BJ/G/SPPuxrl5v1HPtKPRXS6r/C+3T7+CdbmG/hv/ci3FlfF3Yb+0q5w08S
iWcuXdCEOXEzEVVwA/NzrybiUIn2Ckuxn+RBx2Z1jJT7kEUSRpnPpJcB5vEl
HH9jzJPdclT3U0K/NgdFDMN6uq/HHi3CfRBnW3lgX57nqlc7YcGb4MEqOMc8
QVUZTkhZ5aSNvLgSBUqmCAs3p58m97MglT8NC6+YOrXCGjssfvgO8zmh21xY
5N7ot9iEwOKMVWYW5F7kud1+Saxq5rMTpqozJG7IJygufKE73LCR7fsE5p/O
9bKE9XiVf7oif85kZqIKTIfHjjXCQqvfmxsQT+CjOGSAOoUe9/UCyflEtH86
Sfq8oCVlFvk7+/ZFZsMC5deNkTCl7mZyB5Z+UP/8GfXzMh5aXYA5IcUVbzAy
Zpah1hj5SysuPkYcSakosInEj892Y0heplkh+rCU7e33AHUEpcuueeN7zobp
X3rQB7viE9Gh+J7uNTRdBTeEDq4+gpGjdKIsfiH8+qt7OzEyf/4So0tGQwsL
AwXkl2rkOopRoaXVXG4B1htVPOuH+X/MOS6ZB9eMtalgfihfKUQ0F3VUhn29
DzbNe+1YMgfz2oYyu+AU25jVj+QRb+TWm1Mkvpb6CjmY/jt9nIu8uL82ir3k
0K/uUOkELPTZtbuPwn5PGc0a1MEwkpWpFPk99mk9R+4Nd31dMMxsne9sQ/rW
orUmnCJ9+CukH84Jk13IocjfyUzFQPRTIk/ljhNbNyi2wOUZQW/dEY8u76Hk
yH3yjrnXAjO6aey5xPeTnzogP8rw5+6XmC+cCYpuhgWh1t9GwgP+N5fZoj7h
+tM60+RcOnXW5cEc+19fb4KdtfesmCb1Z4rYh5Avr+KMjj7pj2vGwpOoh7d9
d7MxzB/sUQ0i59XD01oGM5lMyC70Z0BXVvUX1tNbMyatyXkoq6nvgQXdjZ7r
0P+BDxFbakn/mo30jXEukvJ6s3+Qv0CzTsdlPmy1y2upHHm/XsjF45wU3NWT
1Uh/WCOaE4hDL/zYP/7FkmK6ErXPkby2O7be+AwnRUxtIXmkqA1t+WRJSX1z
4izg/GpB4cdJS4rTGtK0F3bmm7qLPmB+2ktRAcxSsVic+94S7/vB+O8QL0F+
0almGeYLzjyphQUbtnTtf4f93mrXHEd+fN0G3eYh+JHzmQ3In5q2eCEZxH5v
3sbORX3M1B3z3wdg2SuVFlh43CT+Y78lxR/33BWLfvCL36nJ4bn0MGXIRb+o
psQ9Qph/pMLiLkyrC0cZ7Efllntpkft0uHPWDvHoqasy8jsi9BQkaY5g/YCO
sjcsVdkoWjKK9Reyi83hfLM7fnHIn2n55kUf9uO/UqHCxiwpYYgg0Jt4us7e
CfXS7CvWRchHdopdMgYL+ja/fUXeG23TFN444r88HjqM+sRXAqtDiLnhZr2o
X0oPdW+C6YkCfiv6w61TnGKwnn+l4moZuRfCqkO9iEedP1+XRe7VminzIuQj
jFjrnYVzZ/hFcaSfzCI/52qcM6XzlfOzt3g+6ur7Cecs/bO4vq0P+UQ16O4m
btldffQ14nUf6mqbxTqV738q6sD4qjLTCaYrnig6tmF++pXO1TBVEn3iQw2+
z3d97ktMPmn3KAH5/8Os5f8AHN+CKQ==
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], {4.524714622382844, 3.1883920996386017`}, \
{-1, 1}], LineBox[CompressedData["
1:eJwd13lcjWkbB/CjZVrUtKm3tGs7dFpEZIoehTnOYEqrJq3SvprWtzglLYbm
eFucyUiLFGlTKgyK0iZFqYOWk2giTEUb0vu75486n2/XvVzX9Tz3/TlpeoXu
9xGg0Wjt+CGfNFHyaw1FUyOfihSNp6dw9IkmRWMkF21MgxXtJier4Xg7oavq
ShSNutuvmg9rlbDfN8Lc9DVr8uANB1SXfFZTtKkHoyZXYb/zj8pElSmac9rr
a+2wOT30bSFML1w0nYUjT61UNlKhaGncz5kM7M+gbXMtJY5pFg6GB89f6hBX
pWgxllGsGnjKX+a6Hcyvl+/9Ag9VZjQmEluwZqy0KNr+fbmfs8h4pQrJEzC/
0p2XAU9JaT66Ay/d19GKgNvks/a8hxnCk0+sYPqNWbPvtSmalR79mTAsGmW6
qA7biSQPNyIfzoE7dzThL++n52JhpsruM3LwksIGm82wzbVf981hPSHz5eFv
qI9Tuy6vE46oWCvVDzPpgYPZcFv1VFwTnK9/edEJzh7YUd4MN6Z52MnD3s+s
Z0Zh0dRPKY9R380jh8xWY/1GUdPtHFji4rRgMGwmt0rSAY5mH43kwfRxDW0t
mFm85HUA+Xvo7rJeQn8lZA2SJok5UimvYU6kWmG6GuarHmINweEFvCkDdayv
ZKxG4gJvA3c/gamfZ+u/alLssUJjazMN5CNd/HkN1j+XrRiQCCsGcYQc11Ds
Rbv65SZYY7mYmYn4XPSuoXnYOPFK1QDi5107AzWxruKj/AfqWhQ7L8Xvxlbi
JtMxX9TbKieSsoe8J0pNblcRtxyr2LUP5qqw7r1BPMHWU30Hcf63WRX0m1fb
3msEeySXB1hrU2w/7plKOXgiR9HiF8Rls3N8Z7C/x7QtyxvO7M6bfQRPPe9h
Is62z48IuwovrP71HubTOpfCX56GmUvmsmqIX/ft0YiCY6JVbd8hn2nnP4p9
4ca50S3VsL90XMgh2K/xlFAYLNIu+TIYzk80NmfAegmyt5Ph0r+iT75B/bf+
SBK9TPqR4copg2nLikrPYdq9i2WR8Pv0XVwF5B+zsvwRC3a6oZnjCtOnRp0M
0M+ESI+iyzBtaGFaDa7hL09/hnl/ZyZowNlGr+L2knPhHS9sgvnMk9G6eXAj
S/bOfjgzTXfuDYmLLEglwoEqpxmG5D30Ciy/ib+vczOL8IMbPjCqv8JjFVKz
OfCEqVOLNeq5W3KX3QBLu6nYnILlQ0cyHsILX2QuPoGpfQt7e+Ews+PrcR7Y
vHGZC10w9/GGOhb661z+Suw2Gc+R84+C35TYlhbBNDeuehZs4rhBPJmMZ3UE
FMKl8yvkPGGeTfyVfHh56D+9W+Eqgyr532H7p3+6qZL8/q6tD8F+RlPbLgqQ
/XN0vbYjvj9ndOcU6mAvncwSQ1w02jZyAvbrfuzSgXxF7fv738HO6bHaqZh3
bKNB4DeYfjY+h9QrmimbRNZf+G+YiyB84jeZut0w++jh9+3o366PPdOJZP8m
jfBccj6Xzx5thplcqaRoxP8IYSpLIY+GLtYq73+du9od5ggdPOCG8Zv5QqnV
8MIrqsof8a2rw1iCOqhP3Dc/Gb5rludkC0sniPDL4ZkRlV4uHMPz9xnDfN2M
3C0DsLOORdIa7Oty489EcV2M90wXIc8x3eTJpvXwxPfBYVXI38428zQL5jzd
JbMAp5ecDHaEue8+Mc3RH2pgPsIB1liVWI3nw+44GD/OJPPda/aWwOYSo2Um
cClPr7oDlnt2iy4PK17q0hhBHXM+LO2PyIdtrnJlDPEED+PCbuLkViMePC0v
ebOc5N/HDLwNu1cKh3DgCQH6GJ4/e8E/NCkO5vJS+j3gGvE65xCY/5qmro31
hzNDu4Phqbgj4i+R/x7V3WvJeOOVFYZ5qFePofo1E1YUO7jFFXHB+wprb5H1
l2vu4L6hCVj/NPwBpgqCxMhzb/apKzBA/h4teR/uo7/6NcI+kTBzuKnkMuID
8esK7sNhzU9ryTn6u4+KkdfD/XfYuq3o3/MhNOgLe/x6/HYD/ON0T109LH1K
9Nwg1qM+rZAXoGO+mt0FSeSz4fzve3bAGinHnMl7dMqyUyMe5snItuA80bwO
e/JLYJsnzPg+jM9+KRH/APZQ6n9B7rvJvo6sAVhRJ8/MC95Y/pj9gqy/7q1U
AexoJvZjL/Gn+E396J+L1fYzjXDbMxnBZfiDFz+7GO45KBGhpEOx4+s2fU6G
00ziKG24oEKg0hPmlC59VYNtigTbt8H5/NuS4uhbYtgVJ3WYryNZNo719GNl
LL6DjVUlu+uwv3WBp8Ac6ufP6ysnIL7b8/LdKT3yfg3VWsDba/+ZnYf97gUq
L6LeDJfFYxKYLyohsXgdFhbuOWEIx8zcmo5C/b/0FccdJP1oCYiwRDx5s4k2
l+TvIHJcFnEFPd2yQdjs3MD5GfT7UPmLGvpazLewyBiFXZdnE2LhUoU8Zz78
XJAl9hDmDbcx/oFXfVTfproO79PKAG/yfJZOVisEwBqFT1O2wG3n6lsrYa7m
ucPh5PvDzvHXk3Bp3djGa3BXpkeKij7ur2ipqzhPNKPRUGcKXhjh/kDunyMM
3XpHuKpq2iQN9d/VX652hzlSA1/bEb8oKinhCrO9U3fi3LP3n/lr/V6YHmrH
WA87PL+pYwq3bTL1xz3Arpdb8lGAwyJ8A71g1m/2HR+RD4/jHeINz4v97NYD
m31mJNvDq6O8zEj+YfnuWZvgkaoUm0xST+z3NithJSM/52NkfNAq5afIry6Y
eTYS9isUeZeD/By2hnVGk350xmvbIz4X3SWbClPTFd7S5P4dn31RBDOfTTp0
o/6aLmd+F8nH1uZ4Fvq3r+a9nhCpz8pfwxtxqtZIYSdss8J0DPc4O0ig4VgG
zB9uGdaFpSwdW4fgqflgX3Je3xZqrDBm4Pz2vaHRET+dUKyURPxDrBMFb39l
tNwDU0+tduD7A3v84GyHkgH629w6mIv5D5IEJw7AbflnT/EQT219afo7zB2f
3KyKelLjVXUaYD8HFx8f1NO6m/GwF2bXhwSVI27ZWPlxFG58efPSNOIv/men
NAZrDHfkG+I8uBwx9efBtNogpidc+ZhecR9uODIin4r+ZuqXbSmBmY5NBnlw
Wndn8wnYZudcbDE5f4zSn7zgUtktDX9i/ifNw68tyXj9rIRkuCetOVcT5v+Q
aegGJ80GbRWHp+xz3unDq7L0rL6i/phBKnYK+X6KnLywCDd8S5KphMNvJF8X
xHgzQwOrQPjC/PrNysTNdg101HPglZEORfJZv0J6Ev25lHKtM5zUL/CwCOeR
3aK192EFyWfDc/ff0E+b8J+MZ0m/gstzQ+CylO+OWxmi3zYPZj0wXrWybyYT
pmru/0ie9+G9z6PG4YV0rTOR8Mi2xvlNRni/Ayy+4nsFmyVtEJsEc76ETrTA
ViJ92x/A//7/gfwEyacx9X/Y2qcZ
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], {8.562492355174516, 11.154230764482548`}, \
{1, 0}], 
       {PointSize[0.04], PointBox[{10., 16.}], PointBox[{9., 6.}]}, InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox[
            RowBox[{"C1", " ", "N1", " ", "T1"}],
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->6.137505285412264],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          6.137505285412264]& ], {10., -0.5}, {0, -1}]},
      AspectRatio->1,
      PlotRange->{{-1, 21}, {-1, 21}}], {0, 66}, {0, 0}, {22, 22}], InsetBox[
     GraphicsBox[
      {Thickness[0.005], LineBox[CompressedData["
1:eJwV1As41OkeB/AX44RcxlZCiCKSCiG0mhGiYqMk5BTlhNyVikpaToTW1HYK
x2YqDrsUm1wq1ZxcQ3ZUJ1MI29jBRq41h2H2+87zzDPP5/n/39/tfd8xOBy9
5x+yhJAsfOkv6Zfio8UmChQb2cT53HPbIFgwf/mycAObXIusNnqkySaeulMS
AZxTunFYHebY7Yv6AAudONXRy9lEU2tGYQZOvvJ76HsNNuGZjYtXIJ5VT5Ke
L0y8D57xgiMGE/tGl7FJxVJt8VXYs0nOuwBOz3ho3AsTxXc/RMGFo40GGuZs
Mp0qHjsAa9pF6W2FSxxttI/CAUlrzwbDTENV9QyYnyfvkgYLMjP962HbwsSa
Qlgz9bmLMvLzX6wIfAzHfNB2OAgr2HRuaIWz0n9ecx82yQ++yIfbt2m0E/Rj
vvqcSwf1bj1nJ9jKN62lHs6vv7v/ONzgHCn8lda38KInk77PD3+fC/s+05G9
BA9tqXE5B7vl/3YxFD6tMSd3EF6qmta9Fk53VtGm/UyLck07kF8QdeT6Svhs
82JXOi+h4lwcg/b72DGlHf2I6wXjPZhPQGJbrDmd3xau61NYcqnnx4yl6Ld/
xKActg3VnR1YgnyGnm8qYLOTLr0O1OGiuno4Ky3EqugbrP9G5CCCNUPmv9OD
fc33fVRGvgCD9NP31NnkjZJHvBmtv1i11A/Wkex97knr9xjxXgUrd/wyeQoO
DrS2VoTd1+9hcGHJ5EdPFXg8LGKoCU63NZIxgyOm/G+NwGIXO+0g+NOnD4cU
LZD3/8kmxfR529WfDGDlbjfeV5rvld0mS3j8u6fdu1BfmX1BmD2curjCMR8e
OqLKoA6ds/88AI/PtjpZwIxK/yQN9CsJ8hHqw9Pnv0+xgkvaa5lKsLOPqGcz
zP/PsT1jqKescWpMF9ZnChJ/o/0y4loHES/Gqjm9HM7Z62DPgfMz1mRy4HHX
X2tWwnVLxr4/Qc9DZNL2HNQrONzu8neYVzJlJ2WyiXeZ+xF32PDhMpE/bCUv
VXGC+bc+ZwersckJ/wnFbTT+Vcd1Wqo4x+8Tbu2g5/dMcd2AMua88IXrR+P1
cr5tW4w5xtf7xdLzbpHw334l3I8Cy7JsOt9beb2m8NLtcpqVMLsl0aBcEfkK
9796B4eWJrVGw0OS8T4Z9M83W387HOb+ssFyLZwzIlG7CadvNWn0gEl9UYAU
DrA2fRIJa85qrv4n4usMD15IgxXCiodWoZ4Ww+b/5cIlI9zXrbCCmfbQHbhi
eC4+CvUPDYoDi+j+8GK4Uriu0/PoTVh8ctYiVgX77F2bmw27LRd21cA9C5Zq
ibC+cURlK8x4Hu5wCG65dKn7DlzH2TXEpvVlhlay6fp0o0X0vOSE3mPeRvwy
98li2p/Cea+N7ain5BSrU4j+PXkPjjehfn3ZzOB2ej93ZS3koT/mtTrZR/Dp
iCpNHwW892j39D06rwunzssvwr4xszTK6HzVjv+7Rh7/g9EfOuh9Z256ejeR
wSa1CcryPDh5cqv0gBzu6+Ebhm9pPnsrvRBZzLnMzmgKDpSqWhfJ4L0gubxl
dJ6yO1N1YNu4zU1bYFvz0b/xCfazsLb6CMxM+7r9GdzScOVgJu0/c13wH3Bq
/NcHFXBMQ5f7VqxPT1F+3Ql7RvsaPYEDt1WpjcK1m4IFPsjfM//7chlLnKcL
A83zsI7TtIwK7Pun8bU7qDf5seoBJlwRvXPMDv2ERpWvX0zfnwgJq4TNT6jL
LND7GanKYqB/k9fHO4fpfqmdmVsFi6PKZfi0/pGBRYpw/sPP2+/T/RF1KdH1
qfnV2VdpPf4BWgYwQ5wjioNNLCqrfJC/39jLbx+931G6+f6oTzm+l0/nwSnx
D7RBP+MvD0mNYV6/Qf2fUhbxzvLftoK+32Jl5zHPIiV/PMjWgPtv7nh5d5ZF
amtLQ7Th5M0CG1Mxi8T8ePblGjhQqHe9d4ZFGk7auNL4+m1qor4pFtEZuC/0
ofPO2HLbeZJFlOW9PE7T+JGdBVoTLEJmf379E53vJobH0XEWYXro/tBI8ymF
sdbB/ISOODrviu4Us8NwWWZC/BLML7n6i8sCXOt3rMga1ldSmPmEeDEzfTv2
0OeSZyMayK+5zGEuBA6UV4wPmmYRieG/auJhrq6XfAXqtc0Im0iEzaf3vxr8
wiIK3Gc3TtH1Ge7nRF9ZpNBOa3kE3b+KDbfz0S8j1nGvH0zsc7+dgNt93fLY
MFv9Rvtb+pwffmU1XS9oNXWBeVkMXQbMEb+Q2iOeILjLWUjnsfNt1xPkr607
pNFE+3fld75Dvd6tjRdLYXawZJSLfpjutj7X6Txrjql4j6F+HY8v9P+Bt9+Q
sXKYRczf9Z24QJ/PWBR0f8R+KRVGpND9aditn9bLIm697pLL9LwM++jqvGER
jqitgUsdW8W734x6q3hjj6gV6znOD5A/5IVNNzX9xDwhDPpryf4L6eYz5g==

        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], {2.693582427071253, 15.908114310385258`}, \
{0, 1}], LineBox[CompressedData["
1:eJwt1gs4lGkbB/AnlEnK1KIhakJLRmt81aZ1mNcidvkkh02oFdJIoshhsWjH
oqRhnSrtDimnWEpFyNRuZUvhW+tQtpxTiCSH0u73f7795rpcc/2u53nv53/f
7zvvZa13kNM+GULIPfzR738+6gxh/f+bbTuxKkiNIXF1L8rVYaHO5fN9HIa0
PM4qtYMn8qVv98COmU6B6XCRyUvV4ZUMMc4WnByDvR7ZJ8fDPdcutrmvYkjw
0+/1PoGHk085d8AV7ScUJ1SxPlX77dcaWN9rHdoIV+xqcx6HWZu7q6/DwW1O
x45pMqTTTP/LepiknMhWXo3zDn5T1QEPR7AN8mDi5vGzHOqLbfLYOmuQb+3Y
JgtY0tYdcRruPFonSYZnm4jWXzBr13hbF9y0SfWGLhd5Oba+G9DPRIn/I2u4
0WNHQyxcXV7c4gbPOgx5N8Gc9vAqL5jDMV2khPk4Kg093Q1HLMu+a0nn5ROk
tQNmy79y2A8zYxnXTGCm7PlcGMyOCuWtgYmoYzQYni0tv/KO5j1VqO8CR5hd
l1TQvNNj57gwiZiI9oVJ8z21DpzPTvSuU4eT3IN3RMKzftIbHeif2fby7mJY
GDKe+hPMEgVUnkB/wm673qMwx1HcLQM3rnC5uxsWFp6PD8H8Jg4Z/7QL9nqS
qNGnwpAcJ/GCANi4YtrMGWZrbihMh2drRzwfKDOEv7/Cr4XWD1AudoBJiNFm
beQZvq/a0/MR7tfaXn4yHLHPRzcBnv1VUPU3nfd6zqgZXGArrrZA/9JI0/uK
sK/Dxi+SYH6kc/TkCoYoeqUdbqXeO/r7K3jK49a8+lo8Jy+iawn2VyWOVXrD
EdVHLD6GWQtIwEU4uFjhkidsbHVKfwD20tXOlMCOWjy+uhb2m48pvqLnrTNR
sIE7Weq3GeTPsKou8IdZui83ZMBy/TyXeDjnm923+5VpP6LukzC3tZTDwzwq
5CJCTsFugQar/eDu9T43v4eTkvrM0uCDL8ofhFJvkk8ohuNUFVkecLCpxq1L
cIb2iKEJ3JPimnWartfdNVsJSx6Gngyi9W3fur5GfslkMscQFis0VzyAibMw
tQt5cvLkRUUwE/6XxmHY9M3a0WTY8fKqK7Poz0000H4YNh5L6Auh8+KXjO+F
+WHi2iHMM+5zt1QPuHr84nlX2G2+sPhrWKwSondnOUPq6rc/PAQPN/u1boWT
vIKVaX1SLHp9nY371x6rVw437jGPsoTnDeus/oS5bm4VDUro7w9ZcxX0E3ck
OGUNHNp5O9UFbmFbhZcsY8il0Ci/07Tf/PEL3nDuCru6XpjdWxBrCwvTyn14
2piDbOppd7ipvlIrFBabb7uTCYsOFjbWwBPfOhu9hblOx6zewcTP9cwRnKeY
/bJmow76D4y0lkW+Ts2tGb6wrWje2QXOnc/KOgGTDa0yRfCmZ7nDhTB31/Zb
c7Djndera2D2q3MrrNF/p3uaoAHOaY+qTYB9w1Jv3YCFcwfGrsNWFi5Jl2C9
N6LATpgJynqcCSfdCbw6AEue2btGwJIa5aVP4FxbwRNXer6iWe4NWJTTGM+n
59euCvkOLlDLilKAWRcuJ38KOxITmSH0lxQ2fvUP5BtQjBHcgfkfJnN8YFab
xZYSuGVpLOse+vd9/eFyFp2fasPPlzEfF40IwxS4R7v2avpShhj4n3l4AuZW
MmuCFbG/e3Qb3S9NaVnisgRzUzccKqX7NRLdbBTQ15CnqAmWrCyydlqM3AtM
j8/8r56/VjQL+TN8pnm0v692yjyQZ4jO2dj9Qlh8YUesJazht1+/FHacSTs+
vAjnbw+3m4SlNQUOtTDbMbrEZB3yPo3XplaU8WMnwC0PmMxBuDus17qJrp/R
ivkU9Rw/nl6v9DHOuzDJK4KjDW7es4PFmxULNiLPJTvPA3HUh6p6WuAJnm95
KczkjeuGI39VkKy4Cea6p/pooj/lPR5H+2g9/cGYGzCR5m0ag9lKMTetMQ9O
9n0Vau6MgvZ1uKm1uJnu9zLVrpTH/CqsSuKa6fp6Yb0RzPB8z1fBUs0966h1
IhP//oGevyQnUhZOqriSHUTzZaWqFqHegOV0xhfUN3V4XJibJOXr0Ovjsy8d
Qp6csc0/LoCDHZyNc5A/eLrmTT/m4ejVN5CP/jLe5Ks8hMWnfpfNwjxyZ17m
34R7HFZ0RGJ+U0YFAzV0fm1FpjsXInddl7SBXr/fxmWLHP39e1e2UBfztLRl
cX6AfMMozO7S3Kgtg/eESCf+I5xPTAytBQsYYn+8a60V7bekajaGMMRTlOoX
Q+fXYav2298C0rI/tq4e7olTdhr7S0D4/3pgK6uLfnL9Qw7CVs+939vBTNbG
q9tgY5mVBZmwxO9IWQQsdB1lPaXrFSoh7+E257Z5LT28T94nDvyK+nJ9PUe9
YWlUirwvzlfUW55/Bm4ZT+96B/va9M/9RvePdAf9iLz80rHt43r0/VDdbI1+
vOR6uxevxzxGn3Q8h1mFETZqcM/h1HNR6N/4W1aRJl3fLbk3CwuPiBJXwuKP
svp3ytH7vuSxPDxx8afKdDn6/4bBW1qf8d/pW0DnedfuWCvMv1PfmgwnSX4O
LKe2jv3Bgq5P9f4niXrKRKUJ9VkrjJ7TftgiczEPdtPW6zen+X99NOWDfMEm
QyOrYbH9otvf0H7mP/sgB0+ESR+God+IzcI/Jul8pbc+NGBeXvyd/S/oPNmH
5mLmBcR+38yWEep7/mVb3wmIyxrPqBnq83PbF84KCMeNNbQM9biC0dDJtwKi
uLfM3IieP2jsvnxKQCaiQrp30/mVmnwePCkg3auulv1A+y3m9am/FpDcpcOf
034lWmdeqk3g/ipa/6m8nj7vsbsHXwlIz8KcOE9YesCi+99w1dLv5C/C5FlQ
gj9ct2jf1nHq4XLhhnEBCf1arnezPuplxE5Yoh4nSrU/HGaYwAI+zrMarHe+
AkvPNR51QJ4BFZ3jQ3BPlpbKyTfIP+5nxObh+vfCgcfIPxC64StDuCe/rGTd
tIDk+O0KtoS5h1QcPGaQTyFEaA8zSt+nHMA8NBbn5HwJe/12rdRyTkCU+/sb
zen+txK1LripKkxXH467Pzq9BvOcjw0wXUb313YksGFOqfHjUeTheupHXsR+
g0G1JY00n40atxf1IzqZ+Tw47sWOwF9w/lSj5Hk0TJaPdDojn1zSlg/utD+n
gNW5yB8dVGtvTuchl9BVhH65uukVevR6btTCZMxn/s3QjVX0evbZxjOjAkJq
8y5w6PVqCYVKw8hzss+aS/drfPZJZr+AMFXxshvp/hmFkB+fYh6fjLQ5UicQ
zYZ2ATm4ME4QSV18WT69GetlkZ6l1F+lKTz7Bc/Pcc2+QWqds2cPXMXvNa2P
r4v+SZX/GC9PQCpqZHwDqbnte7eF43kceeR7jZp+4sz++TZg/gtpIXqD
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], {2.683481921675783, 9.839657665452343}, \
{1, 1}], LineBox[CompressedData["
1:eJwd1As41OkeB/CXVEMTE2I4KpcUKRRKluZPKt2ldavcioOI6SRN+9iarJWE
pnJKsTWVnCllZ0sSWqzKVFKJbit3GSrGpYxLtd/3eB7+z+d53//v9v89TLbH
eoWpEkLy8UufhEv/GDKETZ82DBGfkC1vN2CIsi+/uMCaISnh4TESWJQonhEC
e6gOVXnC0qPFIkP49Xdr/WYuQzjmHtpNC3C/Lv6iL5xyM1u/ABaINjwp12cI
V6mMSIPlfuLWGbBzlZL1E73/7X6hQI8h849nzNkHRxydsvrVdNzfc9DwF+r+
B9EM3LE5ip8DB3Nct5XowkEfRitg5lpS1BrYoq+g/xMsNCkpG9LBvUlf9I1R
n6yMNbkMlrb/2L0ZFqhr774A16/1fvQrzElhH8qFQ3W9nW5Q3/Ezq4JfZygm
vIRbljhUj8CKuq2RvbAiZqJoOfKFblq5ZgSWpyZmnYVz4l1cP8Ni9hJ3JdyY
ryxqpfOqbT7rjfql65N6/oSZzfck+XDh47ef0mEp90XTIMx+bnjaE2at3bTL
Qo/Oe064Oo13YkmmO5xgoBFeiv5kg+0d1DmnJ3+LhP2sT+6eC6/TPfoXF7Yd
1JJ/QLy4O8c9Hs/H/EbMT52EG3UXKpJg5buzvia0HnlPkQcsN8qLOYN6OQs3
axrAEu8pq1Vgz8vuJcNWDCFukxyC0D8/eV9xJ/U1fY0SbYYUX69Z1A5LXXc+
4sKNFzR+7oPFph9dE6ch/yermeqI57jUXzLOQfzqux0LYJbl6rXpsGOv/cSt
sKdjh7sjXFObyaTDWa52ywnsN7hpWiUs5i56UKPFkMx61cYBWBHU5VoPK/Nd
TGbR759/J0gd951H+6+7wRXatskMLJVcqN4Ci0LypKlwRK+eVxjdP9cjQ61w
/ZKMj8EwJ2TuDR7qzd1VqbYeNrbjKXJgI+mTJktYqRVWNkD72Zd8XEnnkz31
qBP6tS+LGC6BZXXsEzFw6IuvmXtoP1p53FRYkKIVbw6nGL4pPgJnytMn1GM+
SrvQjCh4tmd0fSIseNbnaQOLpqkkOMDFi0d8X9J8lf/165uHfKtXpOyAO16/
CL0JiziNVn/T+Wie0EyCyfuiIjd4W6rz9B2w2Oz6Fwbzqfku2b0J9jx0Ne/L
VJyvu+yxkfr2tkOFbOxfyah8K6yIvmWQMgV7ukWlYS8c3DvS8LMGQ66VL3t1
FrZdF+guVkferAFjGSy9aXpkmIX+zXr4ozCHP603BQ61PcRYo36FU8wZH7hM
e/tQEOx5ZiU/CCZ+2zXTYM63UvPzMFv9ccDv9Pz9nnhNxC9bv9uqmrpNmXYJ
HvdZFvSc7pPs4hEv1LPOy/i3Gjj43B9zNFGv57N632Jqm8pYGezscOR1JswP
/D1xD/pzbO5y2kHjFR7dqIr+JTGyAHPY9vai9ZGwgu/z8B3qr5j9gnseFrro
pB2DnyXeHc6Bba1PcZbBLUUC+yD6frVX70dL7IeDtlcn4mfu6r99Hua7tGkv
gjns7of+MJMe5rUW9XR0qRnNhIMtnQuXon5htj+3zwL5kgvms9BfxfLW/bUW
NI9NZNVk7Jt2uv1dWKqmYbJ/EkOis/QjSqmTS32XTMQeLdsQKKN+a5M9RQ39
He7ObIPFi0M8VCdgvyui6iYjn+LUnhZzVXwv7U53B+qy5H0HVPD/4/uAJJzW
Z66zYhpscaY5Pps67eXWFoK+F/J1nsC2hovSe+ChrAqVEbgiIGm/Fe7X3Nqv
Y0T372JOTTbsuPlhph2dT77apYXIx8hKd7vQfYm9qt0K+5UOejnCzJfUpzmo
72OindSMvn8pod0H9fu5FL/6TudnYB2rgv6GJqj00PzBX3sjj8EWsc6PjsFC
py7vz3DNCjs1D5jMJc2WmA83hHtlBP0Lf5JvnQOnXTIzl8BE5jivC/dzfnPl
+FJ/KG2JguMKwsbV6fxdTL1vI7/argXu9+YiX9nTuKeoj60mbEyB+RbtA2Wo
X3d2vtUW2Liz42kq+q2PtJMvpWbOV67AfCKyzVQsqd8WThr+yiN+d0yPz4WF
B0Zs4sZ4hH91wjt7mLByOTNHeCQpoC1gI81X3rpx6jCP/Oji9jIOruiWNvh8
5pGsg+q7L9L3/RRXNIZ4RB54TV4PM+9f69kN8kih1c5CFupn9OoM6wd4ZF3g
vKVOtP8daxZ+gI0HvMfCaL+FqXtjcT/361htCt2PgxdneCEee4Nkgpie6zxe
eRD5Un7JOHIFbvn8A6v5C488i2Jp5sLGJufu+ih5JMexaeqx/89vzb5HqD94
wbbGnfS+kSBhJvqr6H5xzpHe7xQ8chznEe6qaudR2k9ASIIq5tGx7PSKG7B4
+bnJkfD4v0yf7KD93NjhHAQbJS111abn/rrj7/D++OAPTpVzcG77V3YH4ifc
CF4dB4uv/ueTYBTz9Q+rtoaDD+X25aE+PndV3qA5+h+LnStE/bK+wx734Yq+
pQWG6LdRZBd8GTYe0CGiftS/N/pVJj0fEy8e/sQjguf3q07C5IqUNShHPQKD
sAs0nveZpNUdmF9Vt00ZvV9+v86qBfOVlLe10vPaLKPDb3CuEnBZC/UIk+qn
hNQjvrOOrRt1k4Kl+ZxHhF0zRvbCZKdTm9NTHol7kB72P3rOepOp9gz1d88a
q6MO+HPtrDqct24Ufab3H7jL/2jgEbVXbAGb7kNPMj/6LY+Iam/lTaf7JDzW
19vMI8qQwFotOu8G2aauNljSwB+l84upbHnSie8dE/++gcaf5ly+B/3xs7b7
X6LnY9cnXu5BvMSoW6H0/LAp1/4jj3DW/ppuRPOfVBiNw8IsO+UTOh9JyGgb
LNX4OzSB2qyk/O0HHqn54B5tBTMnuP9u6+aRCJ/Oc02zUU/PnaaJXTxiu/zk
5jPU+m92BbRj/9nb9gfCwoz5RdwmnLv1x9jCRKSncwDzM/Zoa+VQ55avungP
890bfptQ0x+hC1Gjz9nMP8XR6JA=
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], {3.646410474272569, 12.171551257677873`}, \
{-1, 1}], LineBox[CompressedData["
1:eJwl1g881GccB/AfGSbp5k9HYdfIinJXNFLd/bTIyLpIjl3rSldIRNGf1boh
yYu56UTq7GpqWehKSeLyp4RSFxUSHbX+iouhbGWfZ/N6ef1eb8/ze57v5/s8
uOnrYwLEuhRFJeGbPKm2cXxZ0dR/X1Npylmte+0QrOmbYZGLZ7tb2OdMPCVR
TpIleNZ3Xk7MsKQprVFVky4cHPHHmzEmTXGOBmV04ufu3o21YbDkgDzgNvzB
anHOrSnwq4gUMh7lMo/ygBm2zFjyPn/MX6S0oCn15DieJ6w6wL/kQmzUMSUb
bvUfi79hTlPSexddx+BDYmtBNMypGmZGoV7u3XhvR1hpXHb+Tzjkt0LPf8ww
fpU6sW4acu2cH/wU1l6eF/EQfs/uUfTAEsGeEl9rmpKJi78dhJXsnvhiuCO6
pcIM6ykOzRZ8hE+PDaYsgRkz9pYusKEpHw5ds5uMR/JbhfCcgeHJ5bDILchk
I/zxC37PMBkPrGxfBWfpv5SzkUdxanHTLDJeEtQpgrWyzJxnWD8lrTV9P8yR
5o5nwKHH+9l5MGOiY7EdfOaQ69BRmMXPMilC/Svl39xPJe+X19rPhmNkhlfW
wlvz7ZcXIr+38PIPLGLTvTqzYPaGB703UU+1/uaTSvSv8uXy38Ngrck0Ty84
qj5H8Ar56VLVt69xPqHFyUvCSL/6nFJPwRv6H/q0mMIZ16t2wWfLtlcuhEX6
cZc2wpu9CpwKPsN9MR5lRcP1RYNsBkyPZiVmwvsMwhYmM3CeCTO8G+HzwshN
ejDdXNJgif1vdcRlzpyM9b7fsGM3uXfFh/dvMcF5lFqNvoTv6bU/6ZyEe2Ls
t2o98rj7zzFPgOktlxZ0w9bdQfJFsKid7SRAP+ydLWycYbW+WW0TvNFib/Ay
8v7Zhy846OeIiTw0iYzfmGWWAptMMr5I1hd1v42pJ+c9Pljpg/2pJylmA/BU
berTGlhSdZdJ7oOyd40lF/WyhrnnBuG8cbHdBVh5N9GtGb6jXJg2CflYkS3T
M+G4hGj+fJjheWXEA36/QHPVH+bH+nHuob4DO7ldgWS+c5XFWrj5xNwdXrD0
tV+6BvkYfRnc6XD1qEfPGpJ//8+FzdiPLxZlPkJ/flYxFHNg9bly3fXwA9aP
EWLUy1orFw6h39yQhsZdyMd6MHdhNuxhED0x1hh58hJS/OCZ4mkVARPR9wJX
LytYdjt2xZdGuI+8Yz9Q8JS09PujhhivM7DQhQ3bfZOaDdD/srYOGzhtadHq
c/qo0749NoC8v//4uTOfkP6Zb5PD2x/kfqjTw346u/b8Dccxa0MomHPM7Ltw
1BvAlgaLJ6B/rRvdH8N5yWsbhnVx397U3AlF3pbGzfnnYWpy6On7cMlYRG8e
vPWKYqUv+mWsdFOdgZUq7q+l8M4DM49piB1se43Rb9fAnBAXrK/NNLEOgHcP
pqcdg1nyJicJ7NCdddMM9Sh/2jUggyO7nWyl8NZ4jpCcn2PEOz9Dkscm9mAM
XNS3ZPk2WMR3UH4Fl7Vk/94Aqzc52jzH/j5Rpvcp9INz8DUzGXaPSM6wgNWB
XqrPYOcv8hm6sMjDtk2GPJXd60LqyHqnK+WmcPXyeJ4AZmy2TJWiH4m+/Uk1
pJ65BUbmcLnIqFEH1uh9KTyBfjo3OsbbII/GYPEiGj59IzBxKvJXF71XvcXf
YeFhr0WUDuphvvm8Ak7/aKQpHudR/KE9+UfhanY+a8UHHqVwmyrOgVdJq0+O
jPEoOkq8pxi219Zll73DePidpkdw7rL8TxUjPKr6ZAXLDvsxhlbza//iUUqf
HP5eeBXL1dtxiEdp1AMrn8Pp9/rre97yKK3iyRYh6rdOMvQc0GL+UfttbbDr
1f7oIFjK9RgIQP6oylF3M1iTlxXZCP8j21djR8ZVTQXz0T+0Ke9HWN2dfTsL
5k9AGVifGr6mekTOf3eDfi9MBzqwGDgf97+XPbo5iP1Kvj7sCDPCZz6sQ32i
mxFtxOaPu/IuoX7aoLOCzLdWZz6XDSPfeqlHF9aTPdNIfJGXUxYfTvaT5pt2
NcBblTnBLrC6N6hVdxTzDXljdag3ed+L2f0YVwREj/jAes9UFsmw5MnxuBvI
2+DfvakG6/OP6HcthdOvzbh9Cvurtx85W0/6Vzihyh31MRyuuZDfJ0H7Bs99
yKNJYPj0of+CKO2KiQOo95d4xyPwi5fOOhdeIU9S5jdCWCkU61s9w/zZ123d
yfyUzstretAf/4+mzrAoKfeCfwePYnVNieGS/9NHHF7PVaNe4RVBOHFpw5ky
FcbL1Z2FzP8/F0h+q/r/84El/S9Y+/fV
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], {3.368879573271343, 5.309365547472548}, \
{0, 1}], LineBox[CompressedData["
1:eJw91A001FkfB/AbsV4zeJim0KCStKWNojD/lKIX4Wx60WoqelFpKLvs1pqe
rW1DNeslejWKZ0kxUm30NtGW8lhT0cZTjJCR0uQJRbHf33nOeeacOfd8/vf+
7/39fvfev/36HSGROoyxbPyp/d9vDPf/VhI8R1Mv4JjY2uXb7Wh5LYa30tAq
eqsrXozmWFDhsruzYW1nR0sEbPAoy7cGrezZJJ8PfI5pStetC4SF4+/9KIer
Ck2sKtAqLceGi9GyHDvNFLSuR88neaL9cPrm/TRrjLcWptPzSVa36wetOCZd
1NDmAcdXl42JglXOJ6vWwOpLeeLWf8BX1YkZ5MdXerbCnNdQeDP5UH70F9T/
trrfHXFUVVSeuGqJ+H5vWpwOyy+sX7wX5gqc9XrhrNqV89fDQbqJF0OQ1y/n
nWaHwdJ18/TyKc+UDaoo2LU401QLe8jszx2m8UPLYieiXhob5b5Ksov3mYVw
fHTjGj2sr7Y68SkINnh858QyWHukoZuj8bmHF5+CJapofT6sMvVe1gkr8jp7
H9P6BbdPTkW+vEHDQwnwB2+bbzfDSifPXCOKp2VcdirVY+uiT0mUz7WEQwVw
0BWt5TDy91jxVHYOlkRXv99KdS/Z+i6N+iMXDzxBnT9s36AbCQsH+9L9YP8D
h6ba0XpNN0xuoGV5NzuViEd2ju/nC8taZ52j+GXH0/c3oN0cefdeDfLVzloe
8DPlJWgIFcFK9RH+Ylg6dc5AvgXGz23b6AwbJEqLzGBVSEWKPSyuj/813hzx
hOSUfQXzSlzyNTy8VzJdJwz2v9idFwFrf7aPy6Q6jfCIbjHDuG92e7VRnRwO
nhXCiliX+14Un9trm5RRyOdcvv5JWJGeY+UEq/ceS/9E50hvZ1GPKZ5n3dFd
hXyDNN3qNzCLK7I8D4sFRslWGC8VOHZryVa5qRGwstAw3JHO68iwcXWwxMRq
WETntkqoCcP6EpF7xHxYVujwaw8sDraeMQ3O8uo2Woj4VbviZjA4qCnENhUO
unE6+CrNH7tKWk/9C/rTKJ74xtJkE6qHi9HIDsT7i8OgwwxYZWaTEgF7cIFt
frDEqPrBE+Sv0SkO9IWF0SVNvnTuD25pmkjjf1szpQj7UCWdZ/dfzC9/5Gxv
BysuFZ//DVYY3ujNxD5wex+4LYDV7jWxQlhr/vzKGcTP2lvLr2EeeY7E9xjy
Zdfjx26HeQHH4+JRr6Dfd3fMpHX2B1UEmOC5ZGjNGFhRyvfgG+N5kUUmn+KK
6zLvMsT8/jkpX8IyOx/fWgM8b3e0WQ2Lh6fr1HwBL3noeBxmFsZbXuvDDxzy
OmHt2wSeG6zeJOyZR+em6M/7+Xror495cRaWrly/aakexdtgOpLyWyc/6UB2
32+4FlavEvRNhLV1u/KK6V5W9XeGwqrLS5zewZINNuwCzCV2JY6j8zd7LM8B
62kLtyXMonvbGJZ6AXZtTP7PTDqvn/9gCxCveGnNPhv6rlhe8m2BXWsCv9PQ
d8Izclwc8uM9KH56gtY3birph1mdebsH9TvyG9aiHpK9d+orEL/YY292Hize
c+26N6wu98+ogJV7toUWUT39VwouwrzUcXUCqnfzs0MxMNO1yNlP96KvL47B
0lzTRd3YN3X2gh/EVN/MAdMO7JtCxzIsA/Exv4PtQ9g3cemLa7nIR1qpX+UN
u+ptfJOB/KXb+T0F2EfX5qSMmJEYLx84vRBWHtkUOFcX8+WlPB0NKyxDPc10
0F/qJLaFuXuWKe0M7x+MKgmh8W0fPU8Oi5h80h92l2DpcqOOs59FTLjmgP4c
rMepyyrfDaK/3NquGZZ+n7UydQD9c/tqj9I9fRi27/BHOHxX/grkI3dby+/6
IGIKJ/5GY+SrFNmeyofFS9PL6LsgNTQOrYTZ9n0lF2E2SrB+Bt5Xlf1UoqVz
faZf8AZWXJvziM6n9JZLWgvWk3NnTKeaU342AcOIR+Lts24Sndfn2a1fIV7Z
8e42A7KVt8XmIRHjWUyvr6V7dHZnbBLyY5W7ZD/SPX61Zc485C+pPnqAD/Ni
VzjkweL3kvleiF/ILRC1wlxqkOuX9N2ImJnQD8udJ/xkjPxVK0elPoeFttOU
Lbg33JProWnU77TlbrkR5nGcdnU0zHb4L8+hfd86nNmMeOS+zanZ2GfpsYIt
nohXnlWVdRP7zKX3vlyEfNjtXhN9Oqe6p/wckT/b/O7BD9h3ZvDRt65PxNQ7
JDmOsHjyw9Ux79Hf4OA0TPemYOOrUT2wWXG+KZ2Tv8zS/vlWxJTuua5L6H1N
7b1ZXSImdTYsuAwrY1vLxB3odzS2mkfrJxQdGduGeEZ7q7vIvVEfE1sw35Q2
0b/oHpTvCPBqxvpGI85sonyijht9eob93jx5wgTkyyoae71hpUenZR3ZWlDy
FhabCsOjjOn7fTmruwnjk2yNm8lulrkjMb9w19LsyXT+Yl62sVasv8cghs4v
V5Qx2b8dXlWhmU5O5HxKEa94560CDdV7fkuI4BXeX7s/ZxvMOmsfB7/G+gEr
PitpfdtHrjO7MT7YXZ++Y5zP6rSzqAf7uq/tHeWzsNrNR4t6hDsEN9E9+/iy
8WtYKBs/tRz1kSdnGI4in54xVkb3LHFDxL8xn3ro5UAU7hl3OH78dVovoea7
5bhnnOHg8t5OxPvN7uRVdM8iU8yTXuL9oVhT6Qj4z9yraS+wfnl9oIrOxfno
wg1Un+9j7y2je7hRu838sYhxGdf/GkH90UnccAW8lvnV0rmlX9YNphymn+hv
Xa2GQA==
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], {3.527475467186978, 3.580402102952143}, \
{-1, 1}], LineBox[CompressedData["
1:eJw9lgs4lGkbx4eKaKn1Fd6ZeXNs3pnxOhXFlrolOdSEWp2UQyGRz3SiRRqy
WxalUjmlsSqiZUiJ7UApYRmlvpA0pRxWhf2iJHzP+23X47pc7/W73ud55n7u
977/999gW9jaAGUWi3UN/TPPf/7YUK37z5MlXd5SnknAQ80tYr1IxCktxxNE
BHQKN9dUT+UASxxxzZYg4PQSg9fhmYjdV6eJlAjgznteZGvLBZaC7/hOhYC4
alPlolaG45ybBQQsaacat+0jgaUfp7oqiIDcU0EOc1TnAmuwJ3bTHQIqiNsP
hxIRu++LrhOyIaNgfqx8AnHKc+fQi2yQwWTu9i16KL7PhV4CDsg+jekE/4bY
PajRRsaBL67N/tVyxIOeV+IXcMG+qkt64A3iZjeP/itcMPSyK2l6hXjWrZcn
tUnwyCt/a1jP7B+/tz2EBBt/seyZlFmvFu+UR8KHy7tf84MR639Pe9WScKaM
2P1JiLhqR59WPQk+fwQ5J/ei+GZ1c0XFJJgdH525JR9x87nRdQdIaLLerVIZ
hlg6lNlIkVBTm2MmdUDMorZmVnNho3bE6C4+s3/RyGVXLsh2XvQtMkAsHrhT
9pADY09uqo9YMueFjE/Yc8Bq/K/TFZsRS7rTVG6xwU5hfwKyEMvaZ1gBG5Y2
vJmSM4xYcXZN4iMCSg9pFdX7o3hlb7L9wglor3eKlHYz+ast4SwgYE9u6Z7j
i/VRPPXRn9QJYOlZ3H1wFLF0ptWbSV0I1rD+bUsr4maHkGAtAmZ481ZlUAbA
8qUkF+0J4HULFzbuRWzxnXRNIgFPx0/vCKpEnGKsaO0nYP2lmD6jUcSSMo1z
3mzoTLo2pGtmiNbziX91suHI01Mb2jYgFptu0PbngKPHQpvY/cx7V5HlXxz4
vP7WQPUviGHftvc7uVBiI1W8TUSsvy3L8AUXtCqnPP/zZ2b9yxMOS0kYq1Xy
eMXsF4v7co6ScG7RkRcq3sz+XJ38GyS40ueH4wCxROf0tD9JUCuv7lLoIXa3
C2moJiGuLSPw8QRznxflERkkxBhPDddUIBbHpA9sIOG/jy7Umj9APHhCvmOc
C3XRN4tTrzL3O2Rmd5wLlRZ/99kXMOt15Le1uMCTrymtK2TypUh5l8yBB+xT
fjYVzHq5tqkqB4KvrY1WbUEMtvKJeDaUtbx+ovP/fHGe5mmwYcX5GWpXhUy8
Lkd6LxEQ03jJJTUQsawmpcyTgKtzN7I+FzD3t20aJtH3UMo9WTLM3H9EeYsy
AVUpn6xXrjBC5xeWLJ5KwM2TxxJmpCKWrC49aESAVTcv2vk1w61uUm8Cdjst
61lPG6P7mSvqSlH9hKZDTRhii6DBfg4b7hFUU1gBYn1YN5zKhrahgJ4L7YjF
xXmzdDlQYctmWUwiripY9y6bAz5R7w+E6sxD+4sjpxtxwcHr0CEPI8SDo6aq
2VyITnI4F8QwzB79okbCeFLbh2ZdxOL7SjI/EjJMdTfS0xBXpVm/k5LAm/T3
SfoLnc/KCs2tISE5ROXyxgaGE6eRDSREzLMUWTLxuSvrqJWRkJP9U3hTAmKJ
2rp4CQkrrsuede5C7Bvjqr6AhINU4JluT8SzIprWy7kw0HjdXt+J2T/n9aLN
XIiN6l3nt5y5X8r+tW0c2OnVemKKC/P+h/sdazmwZOs+nydezPnG5R6NbAjx
tXqmHoUYzvXqu7Eh+9JqPcdLDDc6+nQSsD1z5tzkDma9aDJKQoB6q9KP/lwm
P61R47YE+Nc+cvnPdsSKJ7EumgQc4GsWp8gQ6xu5RqF+fKDO6DMPv5/9fsg9
zI2H98v8zK4Lsnj4/Di7icLMLh7+fUHk4Ks9RhSOb3/cVUXlJgrHb3CtgT8c
T+H7ud1IlJpcoPD9jSqpf3+9TuH8qGfoXMm+ReH8ZTm53H55g8L5nfkhfSdR
QOH8y/e48Q1OUfj79If/kmAZTuHvN3uwqbTJk8Lfd/Ly6Po8Kwp//wDtTOne
ORSuj797evJavvBw/Rw7yvvevIeH6yst6+a2sx08XH8ulRJJEcPf6tM0Q+vI
yV4ert+W528n5SwK1/dVowxdr3kUrv+6sVbLFCa+b/3Rnhd4Z3EKhfsn91WV
7uUWCvfXRvO2w+UkH/dfc9zu8I8hfNyfDfHT6yv+4OP+DZy9NXSNugD3d+tI
3qSqpwD3v6bzpush6QKsD/KEjyOrnwqwfrTakya9KkKsL4a+vx/+TAux/tz/
siu7dqUQ61PAyhLRwh+FWL8ev9HQvu0pxPp2N83BPWS1EOuf/gYvm2ZbIdZH
jaGxhCE9IdZPtSUB6aZKQqyvh72XcvUUAqy/y/t81Q/eEWB9HnhxwHA0R4D1
O0U0UTT3VwHWd+Wwr8YLIgVY/9s7fPTY+wR4PqTeXj5r6U8CPD9W1tTVxjD7
v82XabArn5cvwPOn6KirZs8jAZ5PC8NitTuYfH2bX0tNgtPOOgrxfAs0f1o3
P0mI519seVtZQKsQz0fD6Q1bcykTPD+TRuR2thEmeL4Se0TJ4hoTPH/1LDru
Fn9H4/n8Q99IfoaIxvP7fbFGjPnPNJ7vofN8yl+W0Hj+RxaoW+c+prE/0CzM
+TK1h8b+ocz3dzl/gMb+wufXFYfr+mnsPwosi3vNO2nsTy5E1n41fEhj//JR
NOXzo0Ia+xv/hgavikQa+x9YvNcpPpjG/igVao/1u9LYP4m7aqlUcxr7qy57
4+QPbBr7r7Edfnm6M2nsz0KsjxXf06CxfzszJU2kp0tjf1dGKH+sN6Ox/7Pa
zzJr8qCxP1xWFbgsTUJj/1g8PYejWkljf1nZsMp7/1ca+89Q/q70JkdT7E/X
OvdN5J8yxf51Iu4kf3uXKfa3yyMGjq2Yb4b9L8lqIc8fNMP+mK/52GnwLuJv
/plWY57m8D+s1Vfi
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], {5.5548, 11.}, {1, 0}], 
       {PointSize[0.04], PointBox[{6.5, 15.5}], PointBox[{6.5, 6.5}]}, 
       InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox[
            RowBox[{"C1", " ", "N2", " ", "T2"}],
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->6.137505285412264],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          6.137505285412264]& ], {10., -0.5}, {0, -1}]},
      AspectRatio->1,
      PlotRange->{{-1, 21}, {-1, 21}}], {22, 66}, {0, 0}, {22, 22}], 
    InsetBox[
     GraphicsBox[
      {Thickness[0.005], LineBox[CompressedData["
1:eJwl1wk4ldkfB/A3kSVZJppL6KIwpcWlotR9SaXmirTQzFWy5FYi3Gnh0rUk
k6VwSyI7Q4n+JkvZ9yilugyVqEgkyZaia77vfzxPj+fz/M573vP7/c57jjSd
PG1dxQiCaMI/6nfVu1n8aJME9cM3IKvEQqP2V8C8UT+BmwFJnouLP8qF9Se2
eOwzIPntOtZdS2Gp+8lhOzHe156V+kyLJMbdov23I75GfEMTH+YKav1ZeL5n
LMSZAU8dm7E6gPiRHWybQU2SKDM13nkCPlihtvgWLNti5nEBXt6+quMUbPl1
r3OWAUnQaVrS1nDrX0oxDxAXnvULM4JzVd+tH0J8wHtrgC6sN+kfIM8gq6wj
vztQ7ghOFaxhkAQ7te8TAx6P4TRYMUh+2c8CO0v4jJ6WwBXxAUl/0pWav+NY
wynEbSxiBkJhwSFeAB/zWc5R2nsT5r3sMAtCPCTs3tFHMG1XIcGDM0RKOlQ+
H1xbFnlg/GSnZCWBfE/6Xdl2AHG7lcubF8B6mvPzNzNIcknmagd5WKkmt2wJ
4h+/x+mKw5z6w4tEqOfEetuQj5hvRHvPhZeoH/HINage7jnZ9f4ebJ+p3xsD
c3pfz17HeOUBXeV9VL7JuWfQP370t8lFcnBJwZey46iPXYLnkSo6Sbi3pAw6
4Pktb5gvPGCuw1SNHUzGdvLUYDWGUwrVH8nzrMZrS0hCGFfk5QzrNFrPnwtX
BWuVcjHfJhNnXX8NrK80IzECTu6+kT0f7njd3JWD8Y9r/GQK1JFfsYKoGTZb
uSLMG05Um7djGOMvPM8QWcHE3JWfFJG/1CeNN1vglPdsJSP4fjOXtIVLfFxm
bGEfRY2+P2DWwmS5E+jXeVl735vw0DLzCfSHP3pw04NBuNXB4nYk4l8aqr6t
wXq4Zp9jYxB/1tUzeAo2Ilw9LyHuqfTDtwjWc8n2CoHd1H68HoDtzUVrvWGr
w6Lh+ciXE/iwhOqfz5zTx2mwbD57pyniq4pWr5OFWdaW/ovhn67ReH14PoSw
V/yG/KwXNLakw8bLF75qh1dv37PMEs6tXHanCG5V39oppPL7PmSB/vHbDDf7
U/UgZbyXBCP+6LR4QZEa3h8tGeANr4j37FeG2aEJ249ifLGY70KvxViv9Y1Z
N2r/W1g6PVbFfoxSrfSAHUvs3xnC+nKehv7wj6uGxn+pYD9z49Ni4PiobsuV
MDv8+/ht+IWaolgzjST41jO1LbAuEUbnwwpKr9xH8L6PwWzZ3TD3coKOEvK9
rKTXYArreY2qrIe3nhPvN6Pi62bP2qFeCzwc/3aA6SbuiT6I66jfYkbAJxfW
y19EPJw7mPGAel78aV484urVZ80XYD0f3g3np8IBkeek98Jqwoz/O56t+/gq
PEVvL6TG39xy6PoTuCT4wFrMR5hp1P+Ygo1ZExJc+OMDwX455M+T+emAPRxi
2CAvCwuXl+YYw9Neqk8/Y7z+UG32IviFTGxSCezyj6rOOPI34Ob2HYHHC/2m
niF/2R/Zp2ewXtpEfe9deFhjvRcPFpqZhyZg/NegEoWPP5PE3QJlkzA46pi9
vxXMvTVXigcviR8KzFmE8bt8kk7jefeNJFMC5tG5TD9YWuNV5xFlkojgbKgJ
xXiXnYm6QiV8XyHmgnjEzaddD9vCM96iqgLET/+i0tW3EPs5IEvUCjctPvY8
Gk6RC6wcxfhO6Xwje7g3+942Kr83Mb1RJvAr3/xKE/jYHxbz1sIfaoP2/45+
DLu1OlrCREOczVnET7cZLT0Jsy42aOP7IQydvOr+gjnXifAMjFd5KOwZoObr
t4vLR3yjlmrEGqzvbm5QWQFc3teT8Ac8FGnUcRvjr26ymy6Asy8MGlL9dF5d
O/MWvnxJMRDfK39dZlYmgfyFAaVPsF/4XmTQF0l4qvkgfx/Mo5dITmI8TdrR
gDofZNpKDzfBen+zc6jzo+JiVHcgnGL4W+Vn5F/l7dNEh3mXaeZUfQpk6iqy
sV6X3OfdVP/0lZti1GFxdol8MtxT7KES8hOeb9gougRvWBH8/o0i6veO7U/1
c3dFr9gmeMot/RtlS7/whAQFnHdCT240xjPSbufNhe9KDQSnIm4VlX9qQg77
kxlmXwLbCh0/y8BhCt8ahfD48J/a1gvwvbmVsidghfOOMw2y2O+3C4/SUB9J
Occ8Ljzkc4dOnTedinUJdvCUeNTNg/C2py/Y7nDv8BQzAP5UWP4pF+bGbjaj
vg/dJMlZBcwveKnMyoODBCzXKJizdNWuMvi9n1+qCtZzJysytgaO0pXwy4Jz
G0VPquADAcXpevK43wk57WLqfeX32AI48YXToiyYriKl1A1HrLx4NQqO0DEY
nYU5v8S894KJ+wM2IzBpqXFpN9yma6aUC3cMtO1YDVdFPXhjAOvvMRuUhXOM
GhnBVH22/7qVus+/TYeQGVivfmE+7QmsbnjnYQLyK5tNGaPOz+Gzz6u956Ne
m7s0M+Gx89fqDWVQL1XW9evUeRalnjIohfpmyY3GwXs1OtLSJVGvury9N+Bi
LRux4/OwP5b8E3gTnuo7yGBJoH4mBa0V8IPFf7J2i2M+p1rjTjiTGRwWNBd9
q6s5NAXvivze0ieG/vJqbqli/ZwBjmsAPE7m2ON+J2qkaY9YMP33t5cOw6EX
km/vghP1JQLx9wMxqMCYew7mx/zimwyfkllo1w6796eJiqj7KDJH71e8j943
8qIRPhP45fgzWF/1pdFT+HvDDXVHrI+l1H31Gbxnw/LefrhD0X7yIXWevfQs
dEA+vZUL7pbDjrsUzxTBUuFacdlw2WWrax9g9onMGuq+rH7vETYER4hsszyo
791ZTaccNqXZfmTBS+M2z9rBGebDDsthWm2ndzn1fr5vmxTcR9fKHcH6UoTJ
iwdRnyt7pc98RT42xU5Cqn87+H5fO+dgfdqanFL4qYQDI41AvaPvjFD3z2T4
jGaxiEmMb45fng2XWC4LXTrDJHLnrz1O9Wcm2sk48xuTkOWtS8T3S7yyfv/K
5iuT+DD23LQBTlxR/I/pBJOg+1zgvIZtNO6v9BvD+A1S76ap/dBOxKqMMgnW
lS49der+8JH8m/6FSbAP5QaT8PAVflnsCJNorVul6ULdF2PV607C2UvTVoTC
eVPztPPgErbzW5x/hLdWvRuJ511Oef6vgup30gm+MuYXCCK3Uf0QBDtzaHj/
HY956a9hubH2uwbjTKLu7bTeO/h1a81jS6zX9Nnt9G7YhpNkunWSSVj6btop
hCcbgwblkd9Jsrmsmvq+iq8dEsBG6XIzVP9CtZNaq2GL/E+/h1P5FGvPiYCz
V2d6HYPDZIv6P2K+HuNY0XZ4f/c+2R68ryz9Vscy6v212xPdsZ5Wtc6nEtT6
zqxgJGD9wunY5AHq/pow3+eLfB/tm6zF/UdYjGw9YTLEJGht/LM1VL2bRO5r
+pmEVFty2j2qX4nu/tJvmcTQl5Zy6ryTuvlFcqiTSSjsHntdCZ9Jna5mtTKJ
jvjf8h7DVV9b126sQL2SdpzoNfjv/x1EfPl/vxnkv2nH0Cg=
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], {4.922596693736967, 16.80673387473934}, \
{0, 1}], LineBox[CompressedData["
1:eJwt2Hs8VPkbB/BTUZP82qGLu9RKKmlCmlAzK6IiotZslElESFMqFMLS0pVs
SDdJorSrUk03jU2ZckmipYRKIaUhMm71+zxb88/39X59z+V5nnPmnO9zJntt
dvEZzjCM1jCGoZEZ/Ibfz3yGTWDzGe7J/iUFcA5LZ4gN88VFs/zh+C1icwtY
PqdBSx+W6jZ77oLFt1IEzVP4TKul79SncOgS9Td5sFjfxoqngv12JnvuhnOW
PN95G5aM5CmugaMcEgcWq/IZvyMKSYvhyqEEu+ewjan/AiuYf+HIH1vG8Znj
k1QkC2j7n7k3Ro3nM4Zebx2WwpJHSW9T4QLdFyeFcLzmPTedCXxG4a86RTqf
LD28Mhk2KrAMOwMbnosr6IUNzTX+KoWF563MFk/kM8w8X04PzD0i9I+AbwfU
ReggP/vSKtFxuDbQc7I1nJYa5H8GjrJhVwhh58y90cnwh4NrQkPgyiazF0Gw
0HlnYCxsWFiwm0vHc2PW7YH9olfO78b5+QasuHCYs/alfzY8frpGwgaYFba/
0RVu3paYaUPHv3UwZRisLREkqFE8wdb7C5Bva6SyqAnxOgtSft8CC3Rqv2TA
TdH1T6zg0JILGu5w4kLH2Zqw8sHdmip0PfZZH1SGhSWpfvcnIz7/9v4JMH9X
bdxOOD+hLnYerD7God0EFhR6mtLxa6cpdcj0kP/IXxT/gRWm5py9BqsXXhmY
hvi65Utr4mDRXD4nAy7e/GutJyy4s7fbAPnXhx9ItoUz3PL6r8OxDYsD5sFi
P8/Y5WqoX/xk3lyY6e1PeQszn3wDFsKJO4ebhKoj/gbVyhWwbEp33DANnLdV
9+UmmP2/IcMI8pe8M4lwvoGLXQvs/ZNJ+3Xa3le73EoT230qX/KK4js6K34X
LIm/s1AJ+fHblPmZsOhkiSMHlqxceS8fjpft0FwBy5+XtZ2DV9b1RvvD0miT
fQkwyyDyMtUr3kExQABz1Ux5UbAzY6OpDvttezKb5qNa3CvLEM/4FpsxfrCI
1We1C87yqq1fAqc55K80hMUNN0314NajVzXrkK9RWqP2B8Tr7CPbeBgO/ydc
7W/KL0h6VwDXhmYrBMCtBZ1KHLja9obqFFg62TVKCxaz2pdenIQ65jWF6MBN
npkhE8mn3rvMg6V3F+TG6uL6/DQYuBHmGAVkD+rQ9h1qV2A9872PYuB8Dc8z
qohPeLO9RhOON+BsjoPt/QuKS7SRj3gFi4V8pcZT/9oHx189tDwFVhfmX/SF
xWqPTs/Ugu3/feYOM3rZ4+/BhiNWmdG8X+H+TDeMgnunqv7AyF2UvaEZo7OS
Y81NGqWhT7xxXol8U8ogHU/+8nk1xRWzr8Jeh+7LWcZzkId907576bBgxbXl
IXBGV2T4R8qn6evls7CsTENuibHVPaXmFsY0v/3rozFKh5Va3MQY/1bgdIM8
nAnIxCiXtjU2YnQOffNqB+3n+7S3EyProeVnCzqfatdvHzE2TdiR3UXxXf1U
VEn1DIrdmwmzsvS7jtH8g47fneDWNMtrTmTH+alfkYfs667nFJ90dPulAjg/
WUM9jOLvObhtByy/IOztxsha8e2bHcbWXxVzfahOY6ZJjTDm3LKqfYw61oZN
D5oGCw1SQ7gw58ShM/Npu5ZHe7NwHWTLr6t5w+zXRZ/ovhTMdxZlk0faTE+n
/43xfMdvMGfLH7OMYMGBZLdAus6bii2qcB+kefq6v6f4s3KvHKT7Tlrovx15
5B8wV1wPq2deZ43GfZXYqZnqBPOLLq/OgGXfFpe4wg6F/xhr0X0aWS/bRMdT
Nx27Hq58YBZ5DJa/Px58lu7bE3MV6b5nV/daN8GhX+4ETkE8Dr94XFHB/8JP
dkgjGNYeOOTFpedSdKneA9goe5a3Kz3H3CsjJiI/TljRMi/6XyVxl3jCekcD
5/jAssKkjmOwvag+3wPmrolfK4X5wtOv6X/YOklo+YosnuVsDAuzq4bewMp2
zJsxND+uiP2Y/tc3Lj9upufYwYTXp2GFnsqIW3DOZ+t2D7i2IXrTYconOP3c
MPh292TtQJivty/+MOLNeTTQupS8/nQt/a84LksGOLCftCN1jzq9P9Jn6NFz
cSfXuQvPQW9x9nsNeu6y+W9Ww9zEtZaTqJ4j7Fbdx3PUubTvBO3PKpyYYg7z
LwX+tBzmpLUsvYLncFpoAisENnwZcowHMw8f/n6enis60QqNeI5bWUazWuCo
9bvn/AnfHhq6OQP5ZmRtahTSeyDnnSgYzokTP7SF48t6pIWwXhg30xqW9I61
VcJ7JWPGvvG/wqxJh3xc6T278lx1BMydcLE4ld47L5TE12j/sYWcGlhQGVQ7
CJdFLCwejfda1LbYwmWIL8swrd8UFse9O3wSrtT6R+ICi6YYuMpgmwyFaB96
D9ZdZFkhX8k+4fRAei8fmvwtHFbvcjXyhWslLb1/waFNn3e50Xu2+ZygAq4s
Sdy9EBaqFbnUwgUfflXQpePzRw8vhe1VkqfLKZ95sdFn6b1lHbzkMa0LVnB6
fKneFtaNZ2kdMhAePw628psXGAmr64SvO4/46jcpetB7VzBjdcJsWO+86/uF
sHyBbmk2vXeP2CrNpP0/6ewdDydaaa+YTPNp7UkRWOc0W9c3T4HZzuWv3mEd
5FF1bTMHDh0Y2L4KLr50V53WPYIdw1UqsI4qOMiP2Uz7JyWPWgUndtwqPwVz
OlVVOrAOUy8LPlsH+3nV6R6Hx3uOWaZF67qUz5br4O7oM+e9aJ2hd2fHQljA
ythyEc4XOdaYwoELtA37qL5Fc1fxYTPv3mWL9FGnrMNfaP+8S86BCfq0bup9
cgTmJNraPIRD2xZxa+HW+eVPmanY/86IF/qIryns9HZjWNZ2emAH7FFi0+kM
S7f6nHoIyxKE8b6w/ADzQA358l3bvm6BhSL3DA+YYeefEMFREuv7yfBxY5vZ
3lPpOovX3YBjG+17HWG+SZ3XI7jM/njWbNq/Kya1GE6b1bpwDM07uEuzYbHE
h/0G8XK+TLovgs3kJftvwFEx4g0/w/YDa82TYCbnU5wE8XVXpMcEwvKa+S1L
Yb/1mncdYb05G7QfIN9YXpDcnPIPj1tjDitEnXkz/b/j+Vzl/4Q8Qw+UToNl
izarqI7F9V58LGYOzSdF1LxXxlhV/ZsdzL9bca16DK63uZfORprXnPZ3rRKu
m/jexBTa331r+tfRuJ4jMseXw5KtGU0OMKuzKUQZ+eWfCJotZeH/HOxj60L5
W0yyC4Y5yaWWx2n+s0v9crh6je6HFlg0cXnib3DUhZhqEwPkk/n12yF4cFX+
rp2w6L1O2we49aHy/tuwcNyz9RtxvthvCz5+gSuPbTUegreV6byYNg334YGX
o04hXraLap8jLKpnTbBFPq3Pe4V+sGTmB4e3sP7ovrwdcGVSyLvtyH/wSttA
KG0ve3DvI7y/ufvTZjqeIvPM5n+ox9a8cx6w84iU7dtggdmDS3yav250IQSO
fac8qAOzJUM+y2DnMF4hxReVGXiiA8fjyO6vK4clTqs9vGBBka1vFuXXeetq
LuLxGDRfFklO7Mx8iPjN4rL915D3OJRLkV/eK6e2RXBiuIbt36hHRvSMdFPK
n+cwfc8o/N+yAtpn0faz/1zkNhLvD07ts//m/SedMFJEfVJV/7WFM0Rn2GwF
HH/u6tfrqd6OwgalEYjvZY//AZhjWrh46nC877RsfYooXreXszcMQ71S5rp+
hfN15XVVDOrZeHKlNdVvQc3ZIJjhPLHcR3Yr+mQBB8ZuP/uM6rMom5nH/Fgn
GuL8G99MENL+tI6EhS8Td19ifqwzaf5R01P9YT/WoWTTgLmXYSmtU6fj/jwq
zHUe/mMdC+ezu8K+wHq0zoUrK65nHEU+obQOpnkm3oyDfK1onQw3pSk9y4fZ
tI6GhSN8Jo5DfYS0zoZlV48+dVL8sQ6n+dycPevgcFqnk6s0omzgMlrH0/FM
3Nm9Cj/W+Yg3/zE3PQzeRn2AIdU362AF4tGnPgHmaPav6B/+o4+g7W1bx4wg
U59B2/coeMuYH30Iub7dPeUbj2mlPsWQ7qcIFYshHpNIfQzVZ+2l9439PKaW
+hy4qXtG1TE5j6mmPgjm1zBFUV94DNOHPonqLa/oONXN+95HwYymwgTWZx7T
TH0WuS+yvLiTxxhSH4b8JAYbxjXIeN/7NFgv52K7GyyiPo7qYaw03wRWpz5v
Bub7ze74wduoDySP2mr3GfajPhGWCH8b+wDHl1MfSfPlo+dUdfG+95kzEf8H
i9UjEV839aEwv3lOpFMP73ufSvOh2y8cRT421MfSvKLL28peHlNGfS4cJa/6
+gr5e1AfTNvHPA281cdjBqlPnkn914yRy1Gv/dRHw8K1N3MPwNXUZ9O80bJ7
W+Ay6sNpfmVMbg/2Z1Ofjnijcrsq1WEj6uNh/vGJVQ04P5f6fFgY0PWLE+Ib
T98BaN5f2XM78vnvOwHtP8MuxRP5cuk7ApxxoKlZF/XJoe8MMLP6otX+dtSb
vkNQvT46WVW9Qz3pOwXNe8fUz3vN+/4dg46XnnWx5AXyoe8cNL/UuvjzUx4T
T99ByBEted6PeN+/k5DPj+r7t5DHsEwatPSRH1PA9dC6yGMc6DsLmT68JPK+
f4ch0y/qDqNMoxH//01JWwo=
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], {4.508784489160852, 8.508784489160853}, \
{1, 1}], LineBox[CompressedData["
1:eJwt1wtYzNkbB/AfDSqXJkWpMBGS27Sh3JqJyK1MoVwqs0ipMBUWW4yl5D6S
CmFqlFy2hkIuZVQqJplIhWi6oFgaVNqatv/33f17Hs88n86Z97znnfM75/ws
127x8OvJMMwn/KfP//5Z8f/7ZPMZb+8e7vKRfEZR0+d8mQGfaXC7N2sN+Wnd
yGo427GlxABmBIpcNvqLp8VqCkbwGcksyVIBnPWjh3AvzFywensFdqgP3OYC
C6vLDIYa8pnY5BsGQ2CVd2JIMmw9+9Cun5Z8RpC4+eSUgXxGGljrUw9L9xzy
VMEWepE3q2GxJmd6sBH+HuVZVgdztaHXexoj/nZT3xZYrd0WchQOLl+z3QDx
FcfmFPUexGcCHqvu2sKa4uq3G+Hw+yLRCmr/uEd7A7b+elAmhkWJtrdqYL5s
reslWBCYrdsMqwZ92PUY5tzbvbEWNo10D22A5UtuP8iGpWJWRSvFyxmweAcc
y83O66R4Jpw9VrDGOPFjC9WjLFeRR/kesopXw+obTTYrKd8DWc9yqX7LqmZ8
xfwmP8+cIaF89/XeFw2z+eyxntQ++1fXiXAxO27HQJgfUbDsPepTcu5HZBHm
L4kv3X4D1i48o7cD1my8vv00XGXT1ToaVulYPE2k/tOa3Cs5sOBidA58cVWV
4RFYXOjM74TVhyd8d4FFn8+YLsN4+z1mLetP7QmyNwWwwi+fd384xpv2yHIB
8p//bpbnbzCfMT/0Bha7W3q4wpqf3O5tVM9tP5wcYU7vPNbAwahXddmb+bCa
idO/DMtlX44GwtIX3orJJphvod+FCzA32GtDBqyZ+2ZNPSx3LR5sbIp+hhm2
pshHOPEP1hpYtPL1Oj7NZ8T2q0fhNHU+z59Dv9dLzXk4O/7Vs4OwZMAk25Ow
pm7L8hSan7x0RjC8Q6YKug3zNyfPmACP7yoZnQtzc/KPvcb4DapF47JhuWH6
sZ1w44mzios0/vCmRWxY5H3l1T5Y4H2cn4L5tO9MH+RJ+Rge63KEJydMzbag
/vqKinrUo8q1/y+ZmI/o1cCY0+SmoUOGwWJnxVA/WBK29MieYehvtMh9IbVn
Tgl6OxT52fndXwRHswblz4IlznZRgXC7RdbeVAt8f4PEN5XqPWrf2KGwumDA
H13U32TK4VRz5Hd1ryoY+XCdJkfPg4VZmpZmuNFLr7bbDHX/1pK4F/NpT5o0
sBxW1N67b456CFimTvlm9DwurL4Nc7a6Ti+BVclWgUuG8BldbZn4L+of6mBQ
DbcPbt7EQXz5w7fdXvg7/0ntmnU0/tt3c3Ph+Yb9WzPI51516+NTtDVHwCBf
Rv4sZgZcpRiwwQ3mXNukdIM5bPu5sbDQWfjFmWzk7V9C7TotGcPh7Eyb1m+w
NMbGug7xBbbXWD1QH66dT5KE8iydo2xDu0C2dgMX5k7yelgGi/a2RBQh3zTu
65snKN64TB9vuCq8QGVP8TgX4ltpfSgF+wspT6PRUadhccjDTU6wZGFLhyuc
YO4w5k/E5fRNaDGBJf5f+hnAwqI/fTtRT0nkrfZgxFVveFTTAQuD5vwsoXV8
Yu9t6q9+pOqYTHUOSU53x6d169jjV9BP3K94yCVqbyyM+QWWfyr+aow4wkuS
dhV+N8X3w5/jYG5uwKloWLBla8kYjBuw8O/OVfRcmaYdfwg3BiUGzIfZL58/
9EHe8ytW5y6h51AZo2qFrZdOPLUZ5gRu8d2Heet63l+RBIsv2sQyVEd/y+31
MPPOJygAbs8Uxk2ieVVd/noLTuiTVLeH7DMvuIn6fy5yK6X8fw1O+Ac2fXD3
Az23kqj6c23UPifIzA1mlDXmL2gdv2hgbYPlcQsN4+G0i8+uRFKdA/fcmgc7
CBdPiICFgetdPiI/ud2Fryvpub96TLHbgvbFilRapxxFUYwRXHVhnX8+xmf0
HwmuYX4q+/CjS2kfqR23egmtl+ZG2TOqX6rR8Z6weteTKTOpfu4mnU9QL/kD
Sex5PDfiM1nnr9H62awfq8W+JphqZ38FTlit4Xkb03mSZPGI2v+SHcvHvqgR
p3G76Dlw1Bo70Dll0V8tQHzmN01uLvZV+efyqTm0jkozJKthDlentyPydZi4
OMwQVn1jDymldTg02qAO56LIM3SHP+avyJZlP4XlRRU3dbAvqI/ZB7yAOcbL
HRPh6BJ3pQaWLt+YboN9hO02QTgC8ZiokyMvwwFPesnWwdHWeXP0aB/nKV0y
4IBRRwJsYcXO5xHdcOOA72cX0b4VbDndDflbf6oZ5wWb9kvefwoWVc+1XEb7
WNmvBc/gBP1U3hy4/Sy7Tzu84tTSzlHwisMT+fqoj9wp96kW46tu5oXrwKLK
Gbbnad9711uvjuLFTTeaSl45JiqF6vVSUPOE9r2pPZppfOHvh6zXwfwzSYfV
dC9oDljeC9YMH1XuA7M3mrndpvW4ONBZiflr6ru4u2k96ZaMmAgLqh0MfWHm
W+7MI7iHcIWyvJXUPsB7WiXuMfyUizdDYXn9yZ0XB6CuW0sb0mCxxaJth/vT
czniZQes2Vw7LK4fvtfVneaH8cXyUmlJX3z/5kPn9/R7jHNunQyrfJ32baVz
LaT49HN95B+nvNcb9WBnnF+bCptO2FhN9dOstROlwwJfzcokao83dvkAq4OK
uhvpnEpx0nNBPE6CfaU1zm22TsvTIpgJWODqCyvcIox8kY+cnbr0AJ3zzQfn
/gMzvq93JVO72sg9EfnP/3SVlUH3AkeZ43jMrzEn7ss1ulfl2yiTyTM7/kqk
e1O5+mcrzB35I0hM94Q1TQeHoj7W87zCVlK8O2FhRnD7z+wTNrBwhIFlOfoz
mTl32+icZK2+5EvxfgRYPqT1Y60szaL65c40OErr63qj9jXV79W0uz50jkq5
2krMx8G7ynwqnbttq1KyMH+JlqWkc10x1nvz73rYB/rpvelD67Uur8FeF+vK
j/WQRfWaa2HW1pv21cVObFj64L5eXi/Esb/gZ0P1PS3tTmVhfKvUcA/yVn3d
DB3UP6ZsxAFYnTR4S11PxP1kuqyQ8t2Y7ukCq3vmRvaneg2yDqjtgXvW7seF
NH/pmN0p12Fxg/T9Jbp3poV534LZ5S8T6N7JrZk/8zPs8MTq8ky6F4Y3HVmA
eNk1h8wiyI2q/cWwoMDPIxPmjl95xwf5NI667fCWfLxS1gVXfanz+JvudZNr
JycifwnrZEVvund/8Nk8AfMTxj/L7DWS1ukdbUovugcqT7XRPbXreFEnrIn3
ev2a4qnPh45Gfar6homz6J5pebR4OLxjbPGAKPIDB/0G9Jc6BIZ50L20MnZY
KMwe5v/OguKZ3JQqMb4qp//pRpqfk4eyBfmJnmveZMPyROXsFsyHczM3RUL3
9vHLFc8xf4mZNjaU1k+PI8lncBtcYXC4UAhztNqy9H94DDP7yl1vWk+3Dsy2
0fIYB51CJ3+YX9R8+sHfPEbszw6l9SfuFy+J/MljGq/6pVK9FffSQiStPEal
dzjqDcxUZJt8+8FjNCG+pmb0XrFr1aCs74i/2PyVkO7hE0KMa7/xGH6H6O01
ure7Om/dBTfmqdo6YOlUh3ERsK7N4GoX1FM8O/2LGs42/mOpBJammCQkIB5n
iWZ1GbVHfK6IwXgSi2lLdfGeJEwawrrXwmOs75eb2MHSXk0TO5Cf9HcjKwHM
6WXs5ID8Re3HknxhhdPeX3za0X9ndRhZ3OY40wPzbW/4OY36Mw0hnT07eEwC
b/m8KfT9hlvbfOHiqq6jBv9a+80Llkolx2vpvctF9+xHfF91cb1dOsy/Elmv
D6eFrU/dQevlwZ+pBRi/WBZu60w+V6kztA3zlckMjGFhalEbB/mLWCedP1O9
fq+/TvUSVzhtLyG/HxL58St+n4h+yju0HivHD6puQnvt9NKsf99zyuzLGhDf
z9mb3luY8MdGX2uQn1lpfAX5Y+3WtgrMj6X5qCU/WNzXvJTHBJyq7J5E+S8Y
Ftys4DGmZ/yaN5HXVzs7X0V8wx8zskb+/z1UmsPo/vde+j+BBmIj
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], {4.807331579087334, 6.2756859651455565`}, \
{1, 1}], LineBox[CompressedData["
1:eJwd2Hs8k+0fB/BblOlJJmQOSYWmhIpMYlMqSj8jlWrVOjGdHCKrVKMDPYVV
0kIoipR4JKnQSIXwk+RHKSvKqJwiifT7XI9/9nq/rvu+ru/3c1/b675M2+bn
sXMMRVFzFSiKfFL9f/A3g0ON4OPYXHya9MpHYO6PTP31sP6SsT1f4a57rIx5
cOSeHK1auHmq64AqbBbg1X0DNlu6aPFXSw4V1BabEgi7luRm1sDc3WNqrODO
zje6+TC92vHv7ukcKtM63ykVVno1an8dznVXl8TBZkLNs15wj3GIvRgW1NPn
T4DP6vM0iW/vP/itdBqHmtQRl3cRdtZhexyDj2Zp7U+BWenV+Uvg6E6Jbzac
aDxJcxKcl6UbVkLqibjT/cWQQzWc8D36GqYFb1tRB+ev2UnvJPfPDop9Cntv
tW35TfqxSM4gbtjemqCGfv1XPql+CRt6eqoZwKHrOI/l8PjRw0wmLFqZ9IiG
9XJZV2hzYMb2RokFXLCZp2oGK43w322A37RrNBrBea5FzRFwW5iuhzZsFLiv
4S4sXV6RpQh/TS3VaoZHbBbsIPVZPTJQH4UtJxVZVMHldmsjtJGP9PpFxUw4
jV982QSel95InST1C2o+mJL8GgN8N8NfH3uEGcIb3OLO2ZDn4RdiNh5+1uJd
q06uD7Se0475/TNksmYLDqW5fHhLASwQHnS8AjO4901J3nLW0hpvOM/7vo89
/LVHxrSDOVzGhgHkYbVxOFgPVpIWn74Ji//R49LgtlnKt3iwLPOGVAF2TTh2
VB3m+QaylWFKMmvbxakcKsW4q0AbZg2uPKQFh86Ki58LG068l5BuwKFONMz4
5AFLw2e7usGsgRtLDpJx5jyGGtymesTkGix8cyFYPgXrxHfJKsn1o8dz38KC
63rlPbD/Ku2+drjZpCODhv4LouwX/IX7n/kMMLRgvkLFgcVw3MCuh/owI+1g
2Wl4+hGtFwYwdTnkQDNcn8Ko0CX7KcmCb416ixWrhXRYtHWGagzMH22t+YP1
em78+tMKTyg2fV0Hf50+KtRG/9IuASsB9jxPi7SGJ1gkpG+Aa+8v11kByyc7
2mrAYvu0U6thxg/26ufmyC28IZMLC8aYxhyElfTTuziGZB/OSjSD+dZlbkYw
Ta5k2DoH89g9KPmB9eXr/CTJsCh89GQ0yXfFMocdcE6Y9lwNWLiw6cs8mF4X
1xaJ/px2hCqrwl73dP36kVeVldf+72aouy9PcyPMvD73+GfY8upYj1J91PP0
6s9PcIZvRaIFzLeUj+2FhX8KjDL0OFTjJZt14zCfMPXCJUt4TxJ9uhEsiFP5
UqWLfTV5yNYZprkMmovgnMpkU3+YVaWwyxWO/K+L22WYM2lO+Dy4PIozLIXL
TQ7NI065LItug8XGYyeugJneH+MVkAer/qg4BM74fHRYC5bcWmJ3HxZrze6d
CtME0iIl1DMirbIygKkn7jM3kvo8j42jw8JVWwzvwSc0HBYMYP6CJ1OYquiv
PkfNpIbUO8OifhOcqBn/NAGmFB3VrsHCpe4RW0i9iq9Xv4ZHzIvd9Eg/Tmdk
30leK5O2vEQ+onvnWn/BVSWNtidgxlbHBDl8ti741AI4Z8hvVyHsrC//3jkb
8638u+UALHoznpEGM2Yb39GB9Z/ZeeyADTe5JaSjXkZsZ/Yc2Gtp5CYjuCDr
bb0CTOPVBMSif6sRS/mHWfg+nM1vH9HhUIWbNSNqiFd/MtkO55gmFT2HvVqi
c6oYmK/BZVw1nGH0ssUBNqP/cXsHC9qe3yrW5lBl033HD8LcLSb7uLDSfVUW
A+vRu7/lDE7GvvdxP+lA6nc/NfY+8e0t231g6Xe19hg4saLYWEzqe7HsZjjc
lmY7LR8WmT0KiobTmA8rG2CKeZb7DyyLz67vJv1OmG8rh2M9s1z+wM5vvZZY
YH2vHRNTFZEf/eSMirB/65G8GSbj0u7kN7DnNM8D7TD/x3hPK/QjjJ4Q/Qwu
mPXI5zQceoNdeZnUyy88Xw9XmYfztpH1N6/5Q0c+ZyvyeqfBYi/H8IWw2C49
6Q36Lwhtr1wFe95XKY+GfzrmnnaGJeNKxznCORGVf5vCaQ5tKv2msIwq68H8
sqmZIZlw7esla5Lh5rG1Nd6wf96Vwzaw5P0Dl9mwPJgbUoj69XXulA0x8b2K
s/OeBzPbuBmvYJElWzMJeQjfeTU9gAsinzxR+te2d27DwontPbu10I/Q/sst
mLNv0qQmTfzur13wNB+mOdZ6ucNBA3c6X8D8Q6XBTRrIz9/0QgfsfGT3tmBY
cPrxBVXUw9Wxn8+EPVlWQmtTst+p/u+TsF8iPZM3k/pvmoubYO6RLetPwYL/
eJY3wjl7tZRJv5L+TqseWFyizHoOWw7GrZ2C+Wq/VT57S66vU7rLg6v6y3o/
wVSL3u+b8FfqkF8bTK+5t4xCvYty9xxpgHsKE203wLW8z/JHZL4j9mty4a+l
juoXYdGUpeaK6N+p+ErrNpjmvCJrOZy4ybTWhNzfkOVyGI7sPPHgI/plBag4
xMM/UwffS0jeO6rvXoXpz4NLV8LiMs22GNjz57W/RmdiXDLfbAcZZxj65sIs
Sl1rKqy0NyJgN0xX/OlainoE8iMnZ8M5V01iuTD93fy8fhPkazeSWI3+goIv
pJbDzFybD/awV7rlkQxYvN5q3w3klcj/nywW9q8IzZwAO4lXv4uCU+6u0z6g
jjzinnWfNyHPZ5q6nI79mn1OJRW2/OZ2zgcOLRUnFpLrlTs6etXwHlKtnfUO
5keKY9kw/9JHuSLqE22c5VY0Eftx+rcSMzhlQ7LuPpg5d/TMGpj7JOSmB2xm
E51wGK5Vrl7nC3OF13ckwvxCtsMdOCfWVXKP+MLkLXqYXxBgx34KGx4+8iUD
zltzvrYC5lz7WGOC+goa4paUkvlanM8fg4Mq0/XuwM4G9FVNcNm893ujYIbN
9DBz9Gs0WVfGhzPy77UdhBk6p66awgU2Qcn5sNxUzusg/dmFh8vgEcYm42uw
1ErG6ofNojZtXkvyKezf203GOdNSaHBjdpi8Fu6XJF9+ZIx9MPRCIoFl7pG9
ATDnt/vl5TB9esJMc1iwlDZdhvpYQ9KQPiPktzRn3054Ed9aKoVrQ9rm3Ue/
mhpfdsfD9NMNDdHIJ0/BZJuIjKfdXMFT5VA7LtJGAmGO3dmTsybg99AsivrX
sYnBSn9hv7nrpofC/lqnw/pV8FyyLqScg8VCd7oSPHLjqEk2nJIQp29HQ38z
z6i9Iuud4DcmK2M/1Z2X/yKOO75zASz0+EY3Qv3czJbrFFxP1TWuhP1VU4xH
x6HfSz4pfsSuIYZmGG/u0P1xFs6xir96Ehaov8+9SlxIK1LEepImFY3bsGhf
TMsVeJFqaWUmnBL1ae4K1Me179W8Alsu8Bs/CqcNmheGw9KtYYI74/F9vW46
hUeud7+0n4t+6brC6bNg+ueHP5tgYc+YhV2k/6hgmSPyOfHhmFMmyXvnwCUR
LL9RdIwP96RfF4hhmfKjPRokPxenh3thHi8v9ynOKSkBIYu0YUP6AeoQ7K+p
8CMK89e+WfttHly7ScZ6jXpkYZy3fXhvpnt2Hu5Dvfz2aW8fkXMLJ07vG+nX
Q+ViDCx73KRUgzzkV4et/Mh7ukbXqmTkV8Dy3rQR5uffLNk9FvMmlE/1hLkf
725zUMJ+SeocJucg/2rrr9MU8fyZGZ8EZP7LFWsMx+C6tWru4WR8piN/sQJ+
T8KdnFJJPXShZQyF96BR3r4KMh5UMvIXzOueuZjUy1dcezXkD5uSOWdr6KEf
w2bJKweY/1jPxhGW/QzcvAveI4qbug2WqvZF9MGFr5+EHiauuXV3J+bjM8PX
nCF5Cbfc7yMOLTAQw5ThfrVLqIerMac6EqZvPrbPGfWeZcV9CCLjE/16hmH/
9vX7PGFOtkByA/3V1z2YzIT5tk3/tVci70vByr2kn12tsvuwfql1Rw4sCr7l
PQF5cZW3V/uSfjJ337GC+6V2kw1Iv+u7lMxg/6FlG2txLklp/PK1G/f33Oat
PA7n9DXYiWCZPDnKlpxzFCr1WrC+0PblNXJuEdkf7aPD/at55Q/gWhU/c33U
K/rt9z4C5psdGKEpkN9zV4+t5L39YGhdCfLhKZWoLifnwuLUT7zfbIqzJ3mP
LfG3MwZDv9iU4OF5Fovcv3hg4+2fbCrPPO7WYnIOKlofeOYHnsdQu3Admc9h
it3NfjalmTypOYjY8+ZDre9sirFjc5YEppRX+LzrZVMs7eJDUuJg48s02PD2
5LQOst6catOEHjZlFRF/UB39UaMly2Nh171NG6xhmfeXY12w/0SD1x4kH4WL
I8m4n7b64WMfmH9cdzC+D88/ZtgzEBb1TltXg/UFITeWBZBz6U5rockAm3Ja
MbF6Oxn3q5sQjfqdfjNyXMh6Q9ma3YNsymxhucsMMn+r/tv5Q2wqo8E0vJfU
W/Wrdzny6Al7X3YP5qSNTtEZZlOUMLsngIw3nDaVwCdSexyZ5Hl0XIh9AFvG
uQfkk3PU92ydA3DtBc9BXXJOFJiOeYH5Cp7U7z+Oc4rhU9+lD7Feo933yQM4
l4iYdoErkDflS0sPgjkVXdtOoV65ym6XcbDsyuvHocibcSXUI4ucU2IK1rDR
vxffZOoeWDrhR0xZN5sS154YWkLes9ftdfvRieelNqpiDXPS7/SzP+P6Ur81
DmS8bTC46gObSll0upycA0S1+yMj3rIp4eoaNzGx98Nf5+rZlPNRs+GXMPV0
3frWasw399RsA9RDLd5sf/Up5jM2LvcjTg1VipFiPvWbB0uI91gEBhaxKdHi
inZV9EvxmCPjMJ5BmzpIzsGUe5GRXRny6DFXInlQtI9jBivZVE7JOJ1UWCRR
Wt3ykk1x6WP1ssj465qFfxrY1E/pg64kYtPob5HNbIq+3FEcQvzF/PYk9EP3
UJhqQ1yfs7y4FXk5s5vfox7p/Nmt+uifJknRDyB5y6LPK8tR3/hFc3pJf6+G
r/M68LwKA+dsJ3nG8iwUkF85y6XlBc4h0uCPth8xzuz29ifnQFHryusDuF8W
b+MQh3OJVFMlYWE7+k/8eGkMcXTvpQdtqOefT6JDOuR56Iw/QfL+j07IGJhK
2jPRB3k3PixySMJ7sijfx+VlHcbnduZzYSpq07DxE+z/mLUFesTkL6WIkpP/
g2lz/g/Ge+cY
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], {5.564838559353432, 11.337722991866581`}, \
{-1, 1}], LineBox[CompressedData["
1:eJwl1ns8VHkfB/CTS7GbW2QRGkWEyCWbhzhKsmUzuYxyyZTaFVYosWU0lpDa
NYlWNyZyLxSFLRpFF9nMItFKg8j9EpVKPJ/f8/xR5/We3zm/7/fzPefM0Np7
0GW/GEVRjfhHjpQK+U+bpuTJUZ6mHgQGljSupCluR/0+STmaGq3qTfsD5i9Z
NWsiS1OGsgPXtxCHvUlNlqGpN3/n7fu8gqao7rLjOvCIl//RAlgUO2k8s5im
1FaWdnnAgvPXF0hj/bPGN0lSZD3/vS4Ljtjt5lGjhXqzDnUv4aTZM13HYPan
jzrJqMft1XbdBDPe+RgdQD+pu3V/Via23hZghH57LTzXfWDQlPD48j3FcMv2
h6a9cMgFHneNAk09Xt2o9wrmT0a3X4Vfy4x9T9blTy/rkllCU86txr1TsOCW
Uu1euGYyYqUM9hembq7IgKO2vo8xhAWP5axq4KVupuud4dIeM8t78AtPc7cw
mOfTanAFNrf+pysFZjZu0toP79H8QawYnmjYXEzqsVYYGdfCNC+8MQP9qL6t
2tBA9vs+IVcDnpnoOvkIDnkn4c5DngV2+VKV5HxOv8YX5E9hC90vEpc/udqO
+dht7KoMJf2dFS15hPm134/Tsibz+4nJbsH8VYMPLZtFPrrCnZKGr7VY/FUG
M+jVTqHf0tQrP6Po/SS/k520IvxAfcZMCWZPaSm8+4amoiPeZ55YjvXjlsvl
sB5yuSV5QBP75bEe/QybPglrZ8HUrHnaBzg6bzz+uQbu29k41zLUG7Jpa/aH
GbZNR86S54Vt/VYRpgIacpPQP0shvqpdHfUOqPieQj7rquHxCngiMadpE/Kb
pizuKIXX8s4LK+G/rn06XAvzNixz0MS8eu5tTO4n/nHLH8Fwbl/pwDLsP2H8
US0H5vUlB3vD/BMy12vg/Fu3o7Lg0urK6Cq4LWJ61QAsz4j3TINFJrrxushT
aqaa4QpndStIesETG/bpfUT9lNPfFHBgvsEP5nEw78ozl1MwT+6kFnl/1Hgm
01wyH4PLPj3IJ6Y+VOFN7P2AeRf5gxgRqprEbU7LL2E+brt6h+vJPBjPjidj
fmGtss4smL6iqp+N+b/xl0ptRj66MtukRxrnlXUp2ML8JIdwd7juidoofxlc
ftdAHJawqm/9qgablaeMSWG/oN2VXjC1Nb3uO6yP5CQfFahi3kXrK47B2zPi
rpoQ8339lFCPe6VVo1wFxx2uih3ER3NHtsECk02tNehP79L2BbPfYU4x/0pU
of+5QXn5hzDfqfpTFfIlSn88Wgiz90aVlCG/duBLp3xi/aUx6eT99eveXA3T
1k9G1mBejOynM32wvP9o4K9wpyLvowbqMTP0ggthF4tFMmxYPuTUbDXs1lrG
zYXp0EuZN+Hy+PV7huGQXw6GJcL90zf+0UMeJt9eyw7W717E2gVTz2Pz7qH+
S383tUiYUXx/UTP6U7ISmMTAfF9WQh15Pu2vPAmF6d/9BrORj5lkt92RnC/+
dZCD/AyL4OMSZF7nXU6xMR+1ntpDeagv+s3JdxfmyRvnJJmRedV2tB3G/Lkb
Cp2uIZ+gbSyzehH6uLPYVpnMbyxMzRpW8WHmHVHGerLx8PuFqOfhuaVlKeqL
MW+OwkZCpyWmxPFGgytw/uxjqdfpSrjecM3gGfg+R0tdhtjGbpk56umzGSfP
KmK/7PofKfQj0C6bMYbZw+sMh2FN/oBmH76HBO1VzW/Rv1SxeHA5zNaaDx9A
vsVfromT7z16tE35NfKvsojI45P1/kPrazAfbsmjl1Uw/5M471fMb8TT9RPZ
j5qquLoQ871bkejPIPW2Ke/0gW1iOS1+MP9AkXMkrH/RLaQQZhyq/I877Fic
tm0M5vqyJqaxH1M2O2018lAhJ/Z5wcp7do+xYHZUxWHye+Ogp10UqkTe57A/
LqA/FjtZ8QixzjnzRPQ//Wz0zB4yjzTugf3I94w12mpK1i1vSNLIn3WjQTSo
SPLFia/CvLwPMuQSSX9ZFk+0MU/5kx5f5Uj/4j8ddcT81SwvB5xAPq63hOdF
SbwvX1QWjSqQ+1NmrwPf1emycFIg35/srcMSNLV1tPxpPp47duyuoHFY03h7
lRSx7JrYtTg/MTsquVeW5LnxYyFMnfTjNSMXI/OXfHfUO13PznyLXAxB8pAe
+pmRG/6wGhYdrvRTQb/+hQ2xGcgpEDedVkae9POSOVtgrvXzCmXkVTohI6MD
ix4P/iVNntfa6nozcn7gs5IeHNtXT7GCiRUNL6Vh34HYepm/yfV2fYdV0Id2
zH22A6nHaeX7wY7tCkFNMP2w3CsMFvaZHfcmzwFrzfRGHHk83VvdOIpaOrrb
SN82G5JdSb6wtTdN4dOuVUl55Hc8y+ZvH9RxLCgqaIUpe9ule9Ev//7CgRaY
f3li/zbk0U5b8CefnK9p/pncH3N39Qvrie8I74lhHp3ORb9dQj36qmrWCOY3
cjo6kfQn0rzZOol5lwaIs1+Q3D/n6mrCjKb58TukTmT6L8fEacrJ8/pQPOow
Clq/yMMTmqHOm1BH0CPc2iuG64WX/53FfWBrTt2Zgt/Mnwq9R+6T6rkEGueL
Rv7hnMO+dL1Fax0sURy197Q4eR4vvY/E5wMOr8YLcB1lWC90wXVBsQ2T7xeg
/5xoXwfsu7PB8MVhmM//4uSAPMJHOyL1YJFDYLY9+qjzmJ6TgynqXowZ+rRX
M5rUJdfr+AolkYPXVLs7gHhhxnAJvNPzoFETTBfZWOkht5vq3gQn1KdjvErI
73N6tc+OF7Dgg6t6AHm/k1bV+6FfgcXSUCPY3qNJsh+mlWbrbmO/xv6Vd1yQ
Q3D9orUUPOPmkZMJi759+lAf/URtDF9RR5zFvqWHftkJjRlVZM4G/1rIIo9o
6MLQMZh952nFAPLbB14KkSZulDd/iGMkfWsrqc8fruOW4zhdl2v2uxh5v1am
C8jRKIH1O5nHu1MTZG68hLC5QArn69u+9SG5a5Tcf5qzpURygQ7z+Dz/1/jv
Or/YUrR0zcgrmOm4sZ/5yZb8NXvxMyyczzjY+cGWYrzZOOSC6yfs2yzTpnF9
un5gNyxoLeUkv7Ol2CXlI5dRf+1Ky+WdE7YU93xfPwf9MfNuZMuNY91yVDwc
/VOR6v3mo7YUf/yRIBz5hNetHNeM4PwLxhphuL/CglfOU8Po59PADm/Mg+98
ViYC64IU3ThdMq+pzSMZuF5QMxD0GBYV7JhzxP7cPx8Mr8N82zed98pFffpI
BecAzJQr4NRMwszxM77wzqyUdc/RLzfQoJL8nnPne/uap7BfR3huqhT5u7TH
4gry0TkvlnaifojGAUvD9/DrjogP6I8RFBLgR1x0MXEM/c88UEv6DzGt+EBI
nusue6tCXM9YnlpTiPwq3jF+pWT/4U5OEuaTH5rmwER9SvpaJQfzS5Rc7J2C
fkUftVafwbwZ5xfeX4R83BeyjZnzmFv7BY+gAeyf9PTqCdy3iUxm6rFerCee
cxV9xXUNBm31nVg3tdl9Gxbk5F7LbobjtktIzZE+dW6/qsXnH1usmub+d18p
Kn3D/48U/V9RE5iQ
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], {5.303980009464185, 2.084899952679074}, \
{0, 1}], LineBox[CompressedData["
1:eJxFmHk4Vdsbx4+xk6FIcmRI9t7O4Ths95aQtJKo3F/mTBUVoUuUITJrnkyp
KAkRMkSjBi5FjpLoGFMSLtJw1UVzfu95bs/iH8/n2fvsvdb6rvW+3+9euCXQ
3luUwWDMFmEwhP//+yNRElf4Xw4xmN4mqc0EGjlVY2a7B5jxyu1JAYF6VzPv
lYnLI4bnueADxwl0/t+escEzwEahCR/iCKRgMrdAz2gOYlR68S8mEKgrRFU3
uBPYqKk+JZVA+9svqCUEKyBGjb/++GUCsRYHhNrNmIsYQcUtO7oJRFlw6owT
gennY/KyJDLorm7hiSsihm/87pDVJBoK7xN94w08wr/dcohEnXtmr9eoAE5+
eZ56RCJNgZj4kUHgrgXxbjIUMlu5M5PBmIcY6fI8rzUUWuNT3bFHHJjmWvjF
Ar+dZIqOw/1j/eaDxRSyFfurOaMVuCU2p7aJQq6eo2KqOcCH3uWE91FIQSSo
VspH+L7tF9SGKBQy4JfgxgGuXLUw4AWF2g+xxg1HYfwuft3NDyhk3LX69/oK
4EPKE7YXKNStJOMytBe4pTTgbAiFml/K8354AXPqVj43pZB0rfnDWy5CXhha
+pNEWouW7nu3GTiOMzJxl0QqQ1rL/RKAWayaB3tI9COi8ebwbWBPrUrDpSTK
cB97IC4N44mzXrpMhETPKoqZ5juBmbc/JD4hkE/4zXLWG2DO5T+jCwnkJT5w
UykU1uOzmn8P6JntGvRVRloJ1itafRj0jAk13LCkEHhsjelS0DNNXvVsrBUL
xt8laEgB/b5acq4PAGcPSwrKYD+oitFNu5Vhfb/eFOki0Kl9OqPKU8Bj96t9
pEkk4h67+VjofMRY3foqy5JEfT7P5vV0Ao/cSBg4QKJuuSaTMkIFMTS+5C9u
JNGpA0uKbjsDJ7c9ipKi0NsBwrU1GNg36l2JFaw/w+Twq3DgGsHgaDSFSrom
k975AvdVHi27RCHxowYdHy2B4xy+9T2iUMyFKyoP5gl/b5Aw8ZJC7xupir+f
w/uN2Ozvf1NIUdP04cos4MLJnhLQM3d+v6+0J3CQ7LPtDRSq2ZWdu4UNTJuI
oDwKuY1WafC+wPzSMwNbQikUVDFR2doNzB8dsjSjUOOz1k6Jx8pC/V+bMCiU
brWfzmkHrkmoTakmkcKqO/cjJ4BH7N+6R5Fo+YUKgTMPnu8bFlFuSqIzB1sf
d0UJ379L45AoiV6l2J0+2A/s6Vad0UKghLRDUoPuMB/mqiHjIgKFuLW0JfwN
7PJjxvJEAsVFF9gaRqqC3kMRb0BP/knFEMRSg+eV+PfGw/lk+sYcvQksVx0l
A3oyZmz6a8hBHca/zaSmlEBtkVnZFiPATKPc3A4Clb+mpT8FLoDnB2g8mkmi
uVu3rx8eAuY/9uiwINEnh+KUAVIDxmcjEN1Pohbif+9VrIHlrPPtGuD+L3vj
g72B41ISLjEpNLT98tfmYGCN9JMMSwrtla5bmhsGPNLzKSyKQp+H5N6P7gAu
VB1KKKJQ4qptReQm4KBhdSnQc1PYwaVLLIX31zOiQE9GmWDAQxu4Utt0EPTc
27TwxDwpYNsB40nQk6j16e1rh/GyZMvk+BQKm2X7r8g54KBaXeN8CvUVf08L
2wHc5z4xezeFBjrrzhStA5b7tv/uchiPT1+V0wrgEc5LgQjcr8yQcl0jnP/H
S8Y1JHJOdE1P9QVmCm7+iCaRRriYftN54NVVW5eYkUi1rqGl/D2wxvqSPjES
5Tw44TwiHC/z6rkrrQQ64W3Ecd0G3HKLL36JQE9L3836fEk4HwXLCtCz+vyx
qPIJYNb6tJ+gZ6GN1VfSYiHsP0m3ZNDzavObgEcngAvv13okE+hK5JIQ6X5g
5tijOyUESsyct22jriacV7lUu3YCGf5VeNI3CJgppWzKJJGtgoXrghJgT+bE
/JUkOrJC4WTnC2CGa7neXhKNJ38/t0kc9olGXk5EPYkSBq0PzVgAPDJVOCBJ
oR/NYUuu8oC77nI8LChkXcB60koDF2rGyUZSiGm9M2SjtvC6nePmQgo5Oh08
38wC5vNllz2kkOeG4YNSIsBGgeoyoGdFpG7sH4PC8Xn1t4Oe+vxXVtL1wHK6
Jmt64Xz/lC7oyQcur3WoAT3tujOT7A4D+zqFml6kUNaKCudXO4GDvn5zDadQ
dZKkz73NwHFJastWUOipfPLdNjfg8CyHcDEKFeXaHTyyCdilMPtdLezntdq9
HQFC7lAviQU9pxZ7awqfXxMc/Gg5idoGhn0tyzWF9anHUgL2t1NZUWK/kHWP
dz8lkDvf/n6tOsynZoF8L+j5RVSiSX8rMGsR9VsSgcTWlUY9gHPGkAsM0AD9
yOvVH7S/C/mxuB2wxJac5y3WJKy/bl4t3F9nH9+meQYY7auqLyYQ7dHqfnoQ
OJ17ZFYbgcyyHdltHDgH2fzi25Ik2mMfYtroBZwul++/gkTfH6ecajwFXJih
5hNPosm7lbrnq4A9BVml90k0P+qwb0YXMP+hOUeCQoFFrZtPDgPHrbrEN4d6
tmIgamoUuPJIXFkEhTQ92l2aB4CTs7vWFFCI6q1au1sgvH64MaKRQi9Z/f88
vwPcN9mTD3qlptsWGJ0XXn+s3Ap6rlMHuxE3fT0h+bJLg+f07xfJqcsRFtPP
f7/W/Poh3en3f2jUKTBQnR7f2mHVvQzF6fHnxeplbWdNz+9LSdjpbezp+av5
Wwk8zafXh+W+w8/Qb3r9MjqO3jc8S+H13ZhZ3MXtpPD6+7/Qy/NV0cL62HbE
cF94a2H9ZjdsIvSvaWF9x4JXzOoQY2P95Xvs9xrbs/H+mK/17feWTDbeP5We
paZmr9h4fzHa7NbvVOPg/YdWsU7fsuHg/Tmu/fDMizAO3r+qvR0LtVM5eH//
m1EWHprDwfu/USdoJTefg8+HU8aX9GVZHHx+wobXFaoncvD5umezNahM+Pxf
5282d9yFdOPg8znoqV45bsLB53dLqSDuqgoHn+9rTazwiZ9sfP5rBOGeBsNs
XB9kehOP5nawcf3gxw/Tek/YuL5kBRzm//GUjetPqsW13Z/72Lg+aaSLbcn5
xp6uX8Nvt3M0Obi+3Ve8e7HPgYPrX6+f8/bTSRxcHw8ce52RK+Dg+rmllH90
XE0b11dPt7mpi/y1cf31766U6Lmjjeuz0+HgvTZSOrh+P0yc82GGkw6u78zO
hs6LGTq4/u/a4l+o1KGD+4OkVebpAiYX9w+xgJgRZZqL+8vIZsHVG9Zc3H8I
VUakgzsX9yelidkLnTy4uH9pVp37rdiFi/sbKYi/Xreai/tf10IXyVgDLu6P
CaubkmcrcnH/ZAX1+r+e0MH99Wyirmq2cLy/+u+NK+F1/Fs6uD/vH8hY35Oj
g/u3ivk/8oopOri/J6uZ1m08rIP7v161rYTBMR3sDxh0VMyxMzrYP6yUuCo/
eE0H+wu1dscdqj062H8c+fTQ8ZgMF/sT02s+e8SF8/vlX678LL/84igX+5s0
yi5bpoOL/U8h2YRMSF3sj+hNE/Uvg3Wxf3LcXtLpdU8X+6tn306fNJPlYf8l
6L3zVdaeh/0Z6em86G4iD/s3S2+ljBO1POzvQpzZ8xxf87D/O3JAU91cQg/7
w5b0Kh99RT3sHw1tlOZGK+thf7nBdj+hpKCH/efQ7zmBfmJ62J9e++dy2bq3
POxf76kkWX99wsP+diarf35vOQ/7X1WLAPbxFB72x46dWh8zQ3jYP6duHU47
sIGH/XXVXXGjw9Y87L+7OVuXJq3kYX+ev3aHg5IlD/t3uwivYk1HHvb3BRpn
+jk7eNj/kxOpIXPSeDgfnIhET4zreTg/8IdGpYIZejhf1J35OaxsoYfzB7Pk
+Z9Uoh7OJ2s1dv2Gnuvh/OL0ftBukKuP843F94aEiD36OP/0X5xFhtTr43y0
CD0VGEvQOD/N5bRHXyZonK/yfqxsNltG4/wldUN2jqUdjfOZmLthubcHjfNb
nNWHrH0+NM53Vl6Bx1v9aJz/TmXeuVazjcb5MG3WDz9J4e9/5cfIXt7VRAca
50vHj1/Md62icf4sPevt8XoxjfPpTPU8m2VaNM6vIVESU5VKNM63Nxxsj2VI
0zj/7na9Fz0lSuN8HDiRnXbvhz7OzyEHGyqmpvRxvq5dMBXzQpLG+bttcdTo
TQUa53PbSavl+4Xv/5XfzTa1HB03o3G+jxObTNy5gcb5n9mal8uNofH3gXec
0+ELLtD4+4Hjp8+LiIc0/r4gIbl0/fgHGn9/yFVqvG+pbIC/T9iLxti0mRng
7xct723G/twsvP7f942LM4V+wwD9H4/PpOA=
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], {9.0548, 10.75}, {1, 0}], 
       {PointSize[0.04], PointBox[{10., 17.5}], PointBox[{10., 4.}]}, InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox[
            RowBox[{"C1", " ", "N3", " ", "T3"}],
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->6.137505285412264],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          6.137505285412264]& ], {10., -0.5}, {0, -1}]},
      AspectRatio->1,
      PlotRange->{{-1, 21}, {-1, 21}}], {44, 66}, {0, 0}, {22, 22}], 
    InsetBox[
     GraphicsBox[
      {Thickness[0.005], LineBox[CompressedData["
1:eJwV13s8VFsbB/AdipAmd7lNqNxihJLUTHcVNYlIyuRVDSl0IpU0FZIurjFH
CKlGVKLkFBIq3aTbMUql002XkwkdRLy/xz/r87XWXut5nr323msmBIR6bJBj
GGbdCIahlvk2jL8pPIZFMOExrq+rFl6B+WZd/P8m8JhndkLrIDjK5OzKPti8
2LHXEM5rqtkxCuPdVne8e27NYxKSK0rYMCfbVi0N5n3MDFgId5it9/WGBcmf
kyLhkKTd683g5iOFVRdh0YgFggErHsMeqBwngz19nSxfwdIHMSGOpujn3Gff
g9uvzo/YA4tbhLZ11N+vVnkLPtLs9qABdgoX1aiYoX+b/VAzzPJqs3CHJdsL
N36Akz+OeXAQVlodzGewfu3L8zV/wclncm4aw66J6jvewi4mcclzYKFR5t+/
Yaegrbv+B3NMt05Tm8hjDMRHZx6A8yT7t6rDpd2fzuTCrB3GLcqwbLJ7dTlc
2b5kQR+uL6kOqaulemT8HtFG86+3WN4AO01OqboKv78oFFTDHct+Rh2l+Pj1
64vh9pubdvlT/8FC+2N0vVaSFQeWnRJbb4T7ensU5GADlyotB9iH+++2FtTj
251wk37k6xr8+3oZ1e/e5XcVcJjy047jcINF8vRQuNbwzoX98GWjjY5mVM/d
j9fugs2ft+pILXE/7IqfUL0D/5s38SgsE5ZtOQqbSc9lLoB5c2RqRXDJEpc4
ebg2M1inGdatnnOv0QL3V1oeOoLq93LHzwxYvOmPtJlwVOqf00Nhp4KQ/GhY
kPBglQdcqrgmtA5Wld9+hgdLYx/nUT2tC2vlnel6C6taD1jXcULLLJhVHecj
hqUGceOXwub15WNbYcbIJlAA6/Zp3FCfhPv/MPfnbrhxeFHiPFjQoNh0gsan
vOgKglWvhN2ohn3ujuyIhaV3q+PewFEu3Y/TYJcJua+HYGb8cGYGHFa3MV8P
+fK9q/KPwiVLXz+fApdOuvhkJ63XonR3Bixs/CLygw3qdI1dYKdzPzdOh63H
3HlrDzcWJ6So0vw60YlsuH38l8WvEX/JpleKcnDUs8bfF+Aj/8TVSLF+nzBj
4j44+1R77Gm4VjvU0huuVfHICiI7n3KzJ2urZk2C+dzOwzq0Xxt1g1+b4/n8
39rUkbBLmvvkNDhPXFowhHp7eg6oLYLDAtQPy6O/befCTYOTcb/FydmasObi
CZuuwDzlW2ftqP5mH422w1Fr7w2thhWmHgpwhpP3B0UfgflKrhWjqf+mffId
OER8avY75NkcPHr5aLRK7e6X76Blb1x3cDnaZ/2JflfRcnw3SjOpvjqrRpWh
zdtnf/8NjQsXqlI/r7bmmxnmfZ+i6neLxg/f+hQIXy6IEL2E20+H5uTAgQUm
Zb2wSOvizIdwVdW5zzpohc/28LvQug1b/ZyBVnzcqFUFeSv83Jm0BuaPv+um
Bz9z04naBTutX1YwHmZH/k5Mhzl5O/ksmDd7estZ6le2XDyA9kG/f3kZWrbK
6s42tIMjbR+Vo222jVS6itYnfdWcc2il1uVFh9FKQk1TjqMV+Yw0WYtW0zTq
egTa2qsNb6egDXn9fepSmr//s4Ch/8ezX2rTPH4DCi3IyyFj7nAr2qie64qX
0dbmxMynfcm/KfH/k+rgnyZ2RyszcilOQFt4I9JQjup+64nxAbRHYh6pV+C+
+Dh+ij5E/YUONZvhynxLhWy48eCUlRNh1pumyGuwK1v28j32iSvLSPc9PS9J
T01LYHb2/CtUV4XbvoX0HDOjBy6thFmtJyO8YdGjQ3oZsGp1w9xZcJjTH+VU
n4ZL7+bawLzHHeMn0r78dHeaJfUf0pSGwPwF6ZvpPSdws9x1CRbFqNdx6b1+
w+aSDHayLbi2Cub0BGw0p+dyp0LcH7DPvJVPVsGDOfEa6TR/Yl7SLnrPqJVz
Kui9k1xdlAqXXDqd0ULx6Y88mwvnscYo/kfjl9YcJbv9eBEwFvkLVr14R+M5
287VTqB6rdtaFA07rOgUWcHmuabL1sLzo/X8yTLvMQXTaLxpXwwbVtoVW6dM
7zXWowh6j/F7nsi3IX5WUM2yz/Qe35wlLYF7pi1LrKZ6/u6/uhf2CzLRS6B6
jImV94Zl3WoeS+BKrs53B7gytefdSKo3vzBQHzZwGqivwnvXdfXf/bSfG099
0A2HpanbnyvCHZ4+ZhNh4dwpkrGw8Lm81Ut8Z4UDSwpNYdepF/yOw5Kl+bvn
0f7u1K32ggWNtwO2kv+6qmZE32nvXXqnYKU+3dpOnAPyPr7ofQNL3zW03Yc5
DR+GTeg9ZWgvV07O399F7yW/uKWrT8Pt12dvKqN6fahILyAHVn3oh9vMx/UU
wWyTe8Oz6Lsy/uXSa7CsbczmaLhkT8u4J7DrOEe9cljpLH8LrR9WfM69HWYF
Zy1hIT5x5L8X5fAdU7CWC58KJxTcWq0Hc9wWZK2Eo2Lq201hiVFGYjgs453y
NYG3f7czT4T7kjb5acEi06SUE9Q/y6HnN+ZvSJthVwhLFS1zX8Hp+w83FVB9
XlQ6VNB370tqVgacJ6/26hCsqnTCaS+dex6GyHxhwdDwTT86F+UI3lnBsWyz
W7ZwaUiT1TB9JyUp3H7kIz7YO6kF7siOT6P82xVFTAXt518+OyPgZvl9J3Lg
bw7u/1rBrFvimCRYeDx3fDsb45vv1x+h7+Y/GfPTYc7Mt6r03Q1xOHthCSxY
cyW6GHY9GBM7Em6MvXvlAT0flY7xR42xv38av+6D2y8fW8SG+eYzJTaIt2/J
fY3bRqjf+reCEFisGd8hglmv1UeU0ndqvsWHFbC0dvu8XphjrsGdAfctX1bF
RT1LdQK502DO0PjueFip9siSRWTdU9F0ruPFuf0IgnkRBzWVcI7R/bpZ+QQs
2Tb1yiw6Z10xefY3rbfP7nwQnat2NurrIb6EPq1LiXRuYlkHr6V409ifT9I5
NKp66km40W/yLwnM1hTLv4AFM3xGn6Fzn9GMFwrI31xQei0TloTPWawFyzqd
LPfS9Zp36g3gqK7l7WvpHJgy23A8LPTfedORzmHbNdNVYSdpwC+KVxC8svwT
5i8d/tbRinzEAROt8uCwB9byxXBlwbc782DxtZDqGFi3wSX3GeUTyAvzhvvO
9Cd4wey1VdzpcJ6Wvco9Q3o/SxXYVD//sVbTYNn5zzM0YMbGbVGuAfI7oPh1
HNw8RfvzKDjsS985A1rf0Dh9uz6ur5501J6uT/iW8XU81a3JbBWdAwXer0Jh
0Y69hw7ACamGdxRg9vsywTXa/89mKpzXQ14Ket/66H5dSogKhkXRCgZ0P3TH
V0+eTf1vOKdjYVlmtaU5rOQxpPuQzvUmxy9M1qP3tMmwBn4nuJpb/3aGO3jV
natgsYN/kj8sVG0oSSOfvDI5FZZ0lsxohIUHcnqaYJ5BsKwL7vtUVzkO8flo
P0lVt8H4mpZeL8pnzA3vSXBjRvfETFjpjG/3FLjjcUZLM9xeMjvLAk5IWSUb
gnk3Fw/rwWE/5jcZoj7m92a7MbCkaGmYJaykvEfrNdYzP/z+uIk+vU89FtPv
oI4Fb/9WgCt3ZeonwLJDi8poftfyLd99aHxWYVo8LDXTmGFJ8beebJoM55W0
bBmic3zJr+QK5MP2XNDeQvVTTrnvSPl6HS2pJDPuGkW62L8bZ+UXwKX5nrs1
Yc5nc2van7oBI4KjdRDf6+VLyU7TNwV/0Mb/p/1v/ymaf/2qwZVw4xav59fh
KOWngQ+0MM9HTuMben5s+kUeMO+aY6Aa/W7rsMj5rInx/yjNXUj1fWznkQ53
yB0Sx9HvQMPWIE/Yqat4+T2Ykzh83xLmiHO0qf6N71UidGAJb1q0LyyUaUTq
wbIvt5Ty4fbn14ZsYPY4M593MNttbZgXXHteNtXYFv3htTsP0XxtA6c94Kg1
Rs53YNcxr7SjYZ/zhsHKiFc3od0zCy6dK39oGcWfLz5dAksjeapJcLPusQdl
sPmPTUl3YKe4mjHnYd1Hx+R6YNGeJsts2OkZ5zkL9eFpjFmzDxZOeaqvD3Ok
2bPX0Xot0gvUL3m5+KED3Ldl3hwZrm+8enOOIsXrGbb1L5jVqyQnRT7N2nNq
QmDhiknxRTb0O3L/SRVYyWHs7Bi48uQjHzHyURrq2OEDs1YkyLRggezCImfa
j4PvVRM0UG/L2eETaf81bX7YpY763b7opQ/7pGw46QvnOd9+b0Dj/fXHNozD
PCZKaZa0Xtz9THuYrfXDcz4sW7Bi+3kW5hduPhlE8Y3evs0R9mk6uuVPmDN9
y/GcsYjXWLD0Ccz05A72qqEuAscN6siPsyVw5x5YdKEvyxuWBRw4ZQv7KORn
nIQFVU3OarD53tfvP8H82GYLHVjTPkZRh4N4RE9OLISj5v7xYjrMvrhmYib1
xxuv9KL+pojfI7B+2Lia6K1waaffgr2wX6Zq8n5YtPvxFHnE2yg4MJDMoXhL
9BfBz956Bf0JK7VcfxcPy3IG607AHXtWWNTAqoqmU8Uwk5z/uQOWHO40SoIF
iwzPyKM+Pl1XrfbBrJfeh1SoXvzlNqEUH6srdgjjFZwdJvvCzSf4m17Cl2cN
TptH5jh15MMui0NSreAwlXvFHnBh0fUITZi3eP+O12Op7izbIdSD0dr6vZvq
1TraqZXqEzmt++sY9Pe2jKuCm0/d7X6oin2lERAhofFqlxYWqCBPhccVVN/S
DyOehivjfujEXS2geit4li0YjX38tLHtEvUfyWuepIQ4GgpUHsKiZcwxQ0Xs
s+Suom64NsBmo90oXF+/0UMd8claI/OFI1Hf819n2VJ9//JSb1TAuSUxSbIc
5q+L/ccDTrAPidlG9RhOCleGff5gpWaQ1/ku/C6PPHkyyTWqZ6Sh5iAsYPsn
vCJHVz2xxXh+wWG5ITjZVfD5AHy5uUtO3w7+70TQD7jSpvFPezt6L5z1CUM8
YS9bRy6CWV9L5Pvgyj0JVZ6wIKpwzV7EX9IRE+oH1/bLe/2GRZb/jl0Hl1bw
FgUh3/YfZo9Ww83pLq7X4WxpsgGfrjdo2fsNjhppkD+HxjvYhfXCITnOTrY0
X0yRrRQOFLV91IP5iVNSj8BOT4ua5SieT1Y8Tdjz319WX+n+ZzpcC8P6kmJl
x2eU7+gJi08j3mTfL+wbVM/uoJcVyG9w1E3WeTjPXPdxMeoT3d028iTtl4Ht
lYflcP/ctVqO0/6bzhtaNwLr+n+bnEr7texKug2D9ZWa16fD7RMMLBWHuMz8
ezcuZtP8pnU1Dwe4jEwUP3iOxq+v23mzn8s825PVXUPrOeSxfvRyGZe7WQpS
6g9MqxX+x2UEufODftL9s5v+0O4nlynVL5iibUf785yRRw+XUcjXd54Bi8ZZ
yD/o5jIdwSP818J5r/7SzoUfRGms30f1nPR+RT0sWXVgVKEdnQvaZtvj+rzA
j6YNMG+o0+MfWPIxSdJO86dFCOuwXmFkc1EfOd7Vsx7xDJoWhqhMxfzDKclP
EW+2YdAWXbjW4NXP9j4uYx7vvsGY+nse7WpFfn22M93ZZJWCruJfXIYJN1mn
T+OtI+tcUY+2/jy1cXD7LqP4Arhnm6GaHI1/KMq5AFtHHZ7VSfF238neAAvn
m51pJW+oy6rHfOIfEVvrKH5ne99GrIdzWNM5ylcicNuBeMS340ekU//j+pAW
xF8ZVzRzL12/27u3C/kOStKytlB+9UcH/+7iMn4bGX0B1fOEf0uqjMu4xo0+
5k37bdQS7dBvsEN8Mu1vHuu+8YVPXCahMyWW+pkBTQvFd1zmyPe9R+l6xnjC
gPMrLqP5bcOxULLG5TrT51ymvczdKpY8mtum8AD37xHzMIf8fY/zmFrM77Lw
7HWy8H1W7jkuw2fxb7aR6a+0mlGidirv/zyxzAs=
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], {7.307331579087334, 12.775685965145556`}, \
{1, 1}], LineBox[CompressedData["
1:eJwV1QtUzGkfB/B/KmpCk8K/kFHa6GbYMCjz10q5Nko0iJHboN4SqaYktS+t
woRlShiVyti24Q25lOkiyWVHyQ4VldOFtyi1mnTb7zPndOZ8zvN7nt/leeY0
LSDYe+cIiqKy8Ue+KfUwPpMYik1gzVACn0fFQXBD99jpWiuG6izKlby1YKgc
y8t5/TAnxumUB8zrrhliIV45FOXx0JyhDCr7e2xgUdWx3EWw1jllcCXMvZMs
fEozFGUQOi4abjjs7C2G5YVG5flwbJhbuwXMbRR698AFzq9vNU1kKL9ErYI3
naHaxPs2qGDP/QvOHIFz0qoV/4MZM3tlOcxYGF55AOf45CqMbBgqwnCc9xuY
03HRdRVc0CicpoPzBVkTvI/BDc+elPFgtY7WtABW0pEhkXCC1WW9BlisKesv
gnksd9YgnBDSa6SPfjRZ66LG/gSPMV7iAYuVTjZmcERQbsBRmJMwbw1Zp5P2
J+bBsqVDt8j+WNcBwUtY3XQ75iPMM9FvfQcnLLTjF5N8cRNdqsl5H1++lsFt
l16NvUP85tDWQBJPVf6Ig1X5R2cshmX3ZNELYeaxfyIbVu97216Pemd886pv
xjx4Z4ShwbAmVeKrgmdEUu1dmIcoxfz7VVgs9KkWwwnH68OTYIFJGa2ZgPs5
sZB3FNa85vX/AjNpIntiJjSwTjkefd4OqiLxdGCrqTWck7l4XiZxoajkshnO
GzZtJfdB26/NtoUjKsfq9MDsxKAfKlPkz10/1w71qlaeWxEEG5xJ/Hs3ua/z
cdudYMZP+0VB+oveukjflJxbs6ILpgxr27rG4R7NXsh4mK/g6rL0bpgJqo6O
gWUv8h4bIF7etvu6Cja4ef0TOY9e4NI7AFcsoL8HwDOYdVGzbRFfNvjLVTgn
417qZpju1i1thium9FkchjUqV2sH1K9drnI6A/Myw3RCYDrKIuYiLDjLmOXC
HFo7M4WYHuX3AZZ71lUmwglihqeL+Ujji/YeJOsBvPzxsKp0i2Qd3Da59bAZ
TDdGljjC7N8vmQxhv7gpbO0IWB137vEruG2H267XqJ9zqlB9Gi7ocxdmkfdV
LPVcABsEuv8qgZnw9vFq1K+KdrHzIfPIimxcD3M9OaI5sPaQv1aNebFdJL3m
sHy2wM4Nll68u88I5knD0v80Qf6KjqpRsPJAwkMLuGCUssqYnK8/TnOCjbiM
PSnWMJUcYa8La5/H1rmR+N3i2cbGmF+Yb20g3CB8wZo/FvmYwV1yWFXeGBw/
Bvl+BH6phbkP3oVpR2Nf7JlTU8h8Vu+VymC5/z2b7bZkTicjdsDSktA9CjjW
0tpmE1yQPHWoE24oS66JhAVJdqedZzBUyCTa6SGsvtnXEgp3rkjdMRn5OHVy
fQUcmzc9+iyccCxwroY4pTDJHPWJNPsnDxBfzzDLgun84Eqzmag767YXF/00
+IeWTIOZR0eT82BR9ZthK5irmPXXGPRPiSXfaVjqTsXOg1UPzE7pkf1NRtfX
wLLC/9OtOF87f7jYB/absmRZCazS+I9cCncG65nIYDpEcdwS9syIurEXVnK6
g8qRj/f7LbELLFhq/swGpuNSMo1hdXtdxBbUq0p7cqOFvJ9zL9eHoT/N+3cZ
pXBIXseVEMxD9Hl3WA4sn6lQbDBC3KvNBedhUUX8pTksvB+JPOM0LPVdPYll
iPWpF6hzMFMc/LllFN7fitHWmeT8CYWpr0aiH2lN8yNyPyGhjlX6+D1dEPxB
8lOfukq+6uF3PDVXPBH1Uc/i1nJhwaqSLAHMfmMolumi//zhVCnpRztr2A7m
JjQ418DyqLcbP43AvA2tnSdjfmqp7WAVbGD/mb8dbgj57UYz7JdUO5QNcyJz
/juFnKfnNquNzP+Rm2MYHPHIpWiaHfrPFA42w8r60fXesDQgeo0Y9aheZ5lK
YA475HE3zNN96nWe+ODo60fQjyZl4GsWzKyoXaSLfpk+48obduT/VeP4Q3Cb
YYXDNZiK0ErUMNf5bt1ZWM5bojDCvHgBG0dHwqLBo9ZWMP39udd6Ev9H1gdj
WNaUnORI1tdwJFXYT6+mWyiY+1GyfA8suluaXYV+RD8cdtWgHjkjdLwGK4s2
XjGH/SzLKiWk/0nD/gtRf4O7Xb4vHLsjPdwV/arMPVrnw/KC/3ybiXmx23sm
WJP1lwaFo3TQX8ndFPJeOXes7xcN8ylB58Amc5hqdpp1YJBPafvS3tiQee/4
7Li4n0/5ReqwFpP48SetuX18it3CidkGq1h97Rt6+VTnfoHHafL7KO11LfmH
T9Fb7xuXE/+psIzs4VPK0Ik2euhPdTz41/hu7BdYnvAg87XyZzV/41Mi8T+s
U2R9Gu/5JVjuWuNTQ+alu3mngnj5N4NJ9qjnZLqpHvarywreb4Zj4xoH5LDU
a9tNGSzynXPuIPJpV7enPifx27osQlAPxU8f2UvWvdx58d/5FKdBUDzBAfmD
6atpqJ8TflnfHo59//ipQov95T3xP5P1kcLUNPSrDb+1kwtznk63DPjBp0Ic
41ZawaJ32bYdMM+nbRmLxG9xaJqNeUWULv/rE8mXt2qlLUzX194qgeXCmNNP
EK+8TOtdID7Z4c6GxdZhentg1W6330YgX47x3DGLSH/vBe3pqE/W6RluDFPB
P63sQz/cA7Pi2zCf2B5fCRv9Mr6vllSQ91n78O9/ujDfr+5HlGSdCorb/xXz
ytmoTCfzPnS4o/ozn2rbcPHjFeK8m3VzW3D/kWF3csj8r7gvud/IpzQmLWsK
yf4v0331a1Hvwm5hPbmPnz3fbapG/jE6xgakHvnWC5ue8qmGax/muxCzDJ0u
PuRTCUK+awSx9J7l3Gy8j37W/PvE5JNTSNHk24H5F0wGwSg=
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], {3.266625733464077, 11.050973363166342`}, \
{1, 1}], LineBox[CompressedData["
1:eJwl1gs4lPkeB/A3xOTWuKwz5DJuu3Na4shl2jBTLilqLeWMc1qslXVZGZek
SMIpuSxRFmVLqJ7qlGy55TLnOK67mINCUuNy5NYYl5j0pPP9PzvP4/F8nvf/
//1/l3nfdwwDI72OyVAUlY0/8p9q/YTPNi5FIzDmUrNd4tZ4uPC01lyPEZcK
vnk8W6TDpdhNkcX34FA94bcOMCu23agQ9qsrfXlFm0sFhO96fAVuudr2VsLg
UoJbehfL4ehgmucR+EZR03gLvPWYYHfnn7gUY4u25hKcbKK1xQuWHlYsNsP5
z6smxpe1EE8ml8OHG1ILMx7BQjsVjzrYafGMZRac67xeK2uCvL4rCkyFWfy1
cHfYx8VQ4wpZb/4xKgtufmVa3Qi7zXqzW+A0U0GsFGZP6Anm4QjfiWgOzp+e
zuyUN+VSrtVjxlkwfcehla0wrXLsziAsTI/oV4CT45Z2biP1qEYui7H/0EGz
ME+4Niu0rw0+rvnX5iiYJ07qugQ/DRe3nobpvy0seME57zdFhpDr2lWTKjDD
lWe7Cxa6KJW3oT6XLB/2W5zn6Wi4/xx8uy/S8jzc0d7Uvwe23bAIUIBDSkrF
SvBVpf0BJ0i/BvPqx9HPE2Gur559hvOMXEo74OIfbx6wgIWOaVbN5PrcSEK6
JuKH31dph7d1d7pPa3ApyeaHQ6/hpbJG6yOwm+7nLjTE17q8ZWVAnUtxL5kb
O8IrpRZ2P8KsysXkJDhaPZinD4tyvnzWCo+dc9zxVo1LUWumVnTUF8hjLQ6p
kfPCknxhgb07WwRzr00+LIHFcv9TobC/UO4L+WFYxJfVsYaF36Zzaei304zF
WBwcf0mlmwV/SEvT+Dec25Xwlg3fanryRhX5St0ShXbw1D1Jog98p/iHElP4
8lUlxzzY0kE1WhZOMYjlNsA38n7x6sd5iaMpRb0wzzZXuRDeefiHig546Lmd
6hE46fn93RUw3f2AjSrJNyawJwjODWP83I562z4aRdNg0dhtl3/AfWEXevKQ
X/rddU13OEttfE0B5vsNfK8Ll9qEWkegfmG4ztwH9Luzm1nZQcf+jayCOXjE
stvYEA64tTV0HqZSp9+sq6JfI2rHN2AZ8W/FHSqohzFby0S8esu+izXKiN9p
Fv0NzNBd2/ivEr4vUY5L2TD9hZXQAM71L33TBxeuxYgrFJGf9Nl5XdSzPhWo
HwyL8nX+FQxzLSSv/GC37pWkf8K/P2GczVQk3z+7EXK/ZOy5+d0kHLCx8++G
6KeV4EOYP+Lzjk4x3WAdrmq+BPZU9db0h4V9bXkZJL/xmk3HYLOT+WUGyD9+
dfyuL1xQo+R6E2Z3/drlAEsWCuTkUS/T6rKiBnxHUfcLLvFo8uwIzneOKDno
BouG169dhe3VlWcYcOXgzBCZV8qhlMyHiMekaOVkXkEP/ZRUYJHcS0YX6hdr
7Tlpg3xYzue/zIK/OpU/YoF8a5Vr+DxYTnfq5WbUx1bdPPsXuMp70KyFhn79
nP1CB95bcHQsVgHxBJ63NOGX8pIaljy+fw3MJgM41nD/1/NymJuca9FuWJov
DPxdFn03tW4MhssTptQHZNDfd6/7foEfZPKclWHBekqHiNxvjz5jJmzCHCsn
P7KQv9+sb70xTB24Gx8D645/M7UZ5qrV6zXA8u+r2PqwZG/c/AZckKS/Kxjm
0U6xyf1xeCW1eYD4Ve6rILj+tn28H86TBm+KToELuyMurMIBjon+OXCgzpm9
OchXWjMsm0n2z3z+Tgf18GQPPDkB34jQv50Fe+4+3eQJF88wBodgkdeyuz6c
JmlgrsLMvzV7jCEfRRn9/4yS61u03cj9ru5mpED2d1y5sN0H/mnCO5yCaZec
Vcjzgh6m/sQB59OtdT/0oB+J0tqW/SS/Sd3qAnjo07K9OephBvqfC4NDstWZ
U584VC59ddGDPJ96LSq//sihWI/vdnJgD4VQj6p1DpV8sXzUCaYF7Uv4s5RD
pdcFKfqS+VUkFve+41D862025HlWeSY0sGGZQwW8m/J7RNZ7DOfILnEoSyfl
pwswP35P+68SDnXHfGHUBvne6DNKvbeA+Ey9ubNw8nXxtUEx4qXf7+6EeSaH
gydgyy79GPI+YfUY9NZhPT9eX/4gbL28b0cJ4nme6TI9C/MdPiWVLHIowShf
qwwWOA/btOJ8eur6dDWZV0h/3Hvkx+7oLaiDg3SZj/SRP7OpjH4PNom6b6az
yqEq5z05WeT+047K7If5ek9X/cj66tcs2zUOxfgqZoQ8H61Xy5ys4NztRfaT
yLfWe1nUiPXM7YaTZF65J4uPPkN8UbWZiMzrsU9FScIK+mef6aZB5mVeNl+H
/GrtH8gOkn5fH4q4jnr4A0E/VZDnz7727OR5DiW9nNFJ3mdCNVtpyBvsF58V
RsDT0Rpm5uOo70HLCzJPgcQhg/YC/Y8L2n6KzMNepsRNiHiV+2iFcPL39jXv
G7G+MqGHvG/IJ/lB4x+/X0y4/wepWTM8
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], {3.38956707251874, 8.808739015262361}, \
{0, 1}], LineBox[CompressedData["
1:eJwl1glUU1caB/ALlaWsEQQCWgiiFVEHxEqRxbzRGQVRjMwUUESjuKCgUPEI
1EMnYFWEYmNBiVokYlkqiKEsBqnwRKm0KoYaMKCjMOyrAWVHmP9tOYeT88u7
733/73v3nRfbvRF++zUJIRn4p5+kexZ/8xkyTj8XMkRav9HmPuxEjIrLYYE5
f/QwHFPyqX0sbP/UXzxrxRCh/meNDCyJmaOOh9XZCUoTmGmt6huxZIjIK6Ja
bcsQ195gDSGssDpb8hKW/lthW8PF9ydGlyhhZvBmtAMceFU13QRLwvWXXbRg
SGjqzeh+2Cs6c7EerAhReOvh+uKqhKYUc4a07PlNuhJmL6QYLoJV1/e6C+HI
svCiZ2bIW6k+lQqHZogqvoeZ8t2FtbCi29jkKCyxrVBN037yGkR7YIV+yfIV
dsg9G1IRRs8fuUYC4PHpteFJsL3G4dFoWFU7u/UunJhjZ3Hejs7jH0FjcOhU
fU86LFta1uOBPHkeF75Jow6ffncalrHO6afo+lcum57CZKbl6H5YwGxSGKI/
zv5rw25w5BGf8nUwW/1IokXrt/tVHYTzdOb5P0Je+QanL2Jh7mDjmQSY41Dx
7DjM5J9/vgYWerZ8EwiLLk7NpfP3qiBv7GAyYb8oD060rA55gfrj/p2N++AY
g5lbx2GJ2uW+Pdz9gRs0g36kh50/HeWhr470/mg6H53S5jo48FxAZsc81C2f
61QCc7UZt81wjE5lew49Xvpzo8yUIbr+N+fnwsy3a7K5sNA7fwddr4h1KEo0
wf56qS1+CsvdPmRrwZEx7dZDtJ7BjCR1LkN4O42HFyCPKk3ZtBp2rXZK86X9
nNF+MshBnYGDm0/BpOuzx1Ww2uOdp5z29/aL+T/BnHex53phrn1WB3VtTNRR
C8xHtzNgHQsLSpaEecCJ3m2+PbDXEeX2ALr/7Q5ttUU9mU72uQPU8xybQ2Du
f3b8EQrnVXbrFcCJvlXXg2EvwaWK93CggY/mP2HV692sK/qJycq7YgNzHcvs
omCxbFHOIH0erGZ2Z8JqsrOzGK6dY59WbvLn/j7/JaxOeCarhEU225Y5wLLm
hqsFsNxXmNBC55uq8kqAvVYPHE+HxWUHavgwKWh+tQ0WGh9w7UQepqUxzAR2
7ShURtN+uAbcOzbIcye2agz98g40nd0F58XV9h2i8wtjPa1h0tqryjbG88Xh
uYxbI0fqdFyEEdZvHXIfgNn1bxe6G2Iu8pQ307A4QWJgaoDvtatPLsb5Lcf0
h4g+ctwa8toHc7g3zxjqob/M8LhSWKCvsmY+Rh+hVR56yCft7BJc08X3636Y
8YRFoTbly2CvqkrnKFiw+2Fdjw7Wrft9lO4vJpn7/AWs8rGObaRu020ehhP/
yLCchcleh/7VOF+6xSXRGvPjNMcwV+CW7x+8cYZFT1yTLVBfbcX9xQ1W6Ibu
+hFm7izdtBpusQlOd0HeyNc52xbCwqQflA9gXa/Tn2vCggdJg39Hf1KH8IkG
mk8pOpIL6wodF2bS+vmdY32wwKP1zm7YKdmvWBfzEezyWWQFq9euTxvH8Uhp
1coszEMYpZTIYbVm/WsjWPE/tm8jnR+veq4I8+V8ZzmYi/rk/HjA1Ceo+4C/
5BXyirxLfzsNc869nN9L52f8vM4OZovzDZswD3H02T7VAty3GqvcIm1cL+Bk
ei7MORNxKU4L66+Y216AZfscP9k4B303bLl2ERa/qJdwP0KOS1l9xbD60kq9
aQ0cN9tb3gML012uTxJ82iXmrEI9ZkDDbwEsZgxDU2i+gV513QyfiPwaJ4dg
0aLUBfc/8AmvkLwOovtHZTZoCks57X41cMvbstpH01hf15ppT+dxLCJXBXOW
j/uJYMbtZ5+19PwK0/hHMO+Nd0Y/HFm+dnaCWjjiokS9bnWSN91PPNu9lm2z
fKJ6teTbP73FuTIB+djIrMuTWC/7OHaHKfpROHUF1cDiJWUml2GBeKL5BK13
Jd9cTxPnfR0tn0ufhw2PzwTDIn2HjMvIS34//DIZFu/7ysgU5oUFeXwHC/7W
uuYUnYd378MQmNUvlr/FvKThTkU61F1aW3fBLSZZx06iHqfxRp4S71XBrf6b
95GP+dzCIhBmT/5iVYn8xPPZvwboe5aJEpSgX3J6ubcEFrFdTiem+ETgO9Ie
ZEWf02x/8wnMK2796BrqqbD2vFE+kfFiuatg3kfjV9a95xM2zalgA73e7atd
Y0N84pTw1etjMDkWNHDnLZ+IY8wqS2B2dPFPs318wnDzgnWRh/jpb23r5hP1
tgiNQzBz1dk8phP3a3yzfz097t+29HE7nwjflN52R3/MhdOc1jbk7Sr0zoJZ
G9voUurgpuTZBfQ9JA9xx3ryPmGTL92vk6ufBHfwsQ8eaibBJF4rmXQhPztm
dJtasi1HowfXz7Csv0vX2042u9F8Ke71+XR/Mfu2nxpA/rOpdfF0/buhzCL0
Q44eqfaEhRZPC+vUuN6vKmUrvR/ynTfE6J+VX1r/JSxyDA0xGoZFYR5qOv8d
9+65wQLjcwUh8+k8i1YZwCKfjTr1dF4d0oNxdH4pD7TX0nm27glKwfXZqY2H
ZPidw2yuGft6EP2YxxeuoObcHnZBXtHKpBd38TuHbL/xcjv6UzfIl++E2SMX
C7Qwn8gDT/TNYNGI3YWKVzj/WQ3bRd/j3UtZk+e4vyscwxroe1wr48dfq9FP
st7Qf6npn/jeX59c5v9yKaX8
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          
          7.6718816067653295`]& ], {3.5883810730249346`, 6.96843785395013}, \
{-1, 1}], LineBox[CompressedData["
1:eJwd2Hk8VfkbB/BjKbKHJBpdS5aiTJmolNs2pfHjWkIL3SwxTbha0KJukjQJ
CUOSO7JVhEalIrcotHBj2oiuJGt1lUIlv88z/fN9vX3Peb7P83y/5xzS9wlx
8ZdmGMZBimFoZHrG8c+CzUho1GczvK1xfm1wWpt9xXXYT1d3fjEcqJ2UsQeO
ezLhaBgstC2YshyOdr34xQq2zPVaMkWffv6QP2COOOEWBUMsNmOkqbc7Cxa1
nNvYAVfEmaznwLES79utcIFd7n0pmElYkN1JLmviXp3NZsrLq01HYH4yE8+D
R6bN6p+K+CW/tEXNgz0TSr6x4ZF4oeaPWWxGUOw/zoPlp5kV/Asnut6zzyXX
+bOuwbw1+t9bYEmw+ZNcuj5mtYmqAZv5d11qvACWeI+9WwqnVZQezaP73dLy
AuA1b4+FXyWb2H2NgcsyFgsaYM9dXkwGHGjn3zlA90vk12XDz1ulW1WQH7vE
2ewM/OZe0uefYYHFLYdYeNeQTbIrnPbl8FyKv//cQbNQOFHi07YQlr3m4BFL
9R7bPCgFJ9sUKvxF9d7oj7qN/D2rzZIzYLXyjcr7YLe60zeTYbHlPZefqT+T
QhsOwT1ZuYu70b+HNwfyfeCIyKtlWXBc8aPL1rBNU3acF1zjFvJGCuYaqbga
wvL3Y0vvoB5m3aTdb2dgnxSmjO2DOXe9xjLhRDlzaUtYbdlgVgg8JPd4YYcZ
9t/jl+Ob4MC5fUuSYN5k9yI/WMnn6oVVMPejwpUY2MHblPlhingtKvpCmDMU
H10Ji47UXJpI+Tx/bRYDJ7ZPHLaCp9t/ClsP92wwcg6EbQ0id9vAI2d29mbC
atY/cg1hdt/Xx03wyObmUR04Yn2zkSz6sb+zq/knipdubjwX5o+/Up0NSwx8
/Jzp/LadUl0G1wWe/zcQ5lwbfuRFzpXv3wkPJD3/cgBmLY8sDIUL71tIZ8Ni
+cgbW2DNqY+ca2h99988VsKy7QacTpi354OPDjk2Jv47XNL3gdOF/DRVajuU
0Y+CyrVT82FWlmDfFFj+y46pPnCEl2R8MtyTxJWeBtd9K0yWhkV9n0Op/6z1
Pf1vqX/2AjclONnab3UVLPxnrU+0HuKfT9gdR+uN975RgMvWqtU5wVzt2v05
P6H/nr/KKtL1f87tc4Njww45Ck3Qn85tHXo0/1eL2g5YvOVrnwz85lhLuwFs
qZfmLEvzwYs8nhjDTvV6M2DRXv0JcbBA2tzYBa7xsV9uD7P3f9M7DVsNBeiq
wvytWfc//kR91bd5NRP5V/GNPZCfqUlW7Q24RKU17zblu+f8jmxYoPAs3JzO
18wPrqnkaR9vn4TrOh5+SYGZ/IT3/XBccv4mARxRVTukg36VVKXJl8Hi5p2X
foEl9m/UGmGb36pDV8I277b98gHmH07W/hWONlH/Ohn51VkXaC2i94/ZQLUV
7Mmo8lnwwGj9sBuc+Oc+tSGsN+LxWJsHS/rzPyXQ+U4p7joMM93djtow+4b6
znhYeOtW4UnUY6UzbzlZ8HPOainY8rCXSxTMu1PwcDv64ZdUY76N4is/126Z
jvO8o793FfWrYuuQIzklzlKL1rvf3CDSRb8chixeIn/u62kH/WB27dzY9P/6
166gAqfdL13LgRMXWIeLdPA+OsppkKb+zViYWwRH37+a+Y8R8ijqXJxH9o3z
8Ic5lXsE1+HEA2UJOrCkNH2sC3Zbolj6xBDrravxNEX8790TOtJgS/11V/bD
FZVRb/3hEinnFe1w4NMPmkvp+pyuv1Yj/zfBlbYGMJMr9e4ynHz38d/qcKJQ
x18H9WsaBo+owGoOEzkRsKzp+UAtmP3iZlAtXOC+Ls2E1iv4OFsG/VuZ/OoG
Gxao17aawOZH/8jbTPEffXw5D/7uuuDdIcpnUWaFAcyfpfU1h+YzN/w6jHhu
qXVz7sH8d0kxpbS+baF0J8xZZXXLlc53XiRrlK7XXramA/lumnPj0ET0g7uW
t8Ob6gkPiJkE80SFa2k/dhmYykvBjPJdX1vYz60yYAD383KkkgvQPyMz9+QH
FH/2uRIdWPahu1IWLM7fZp82Dc9L/YlnATSfxgkwhutCdPdRvTyN353rtVG/
dXr3K3wHWOyLG6LhTe9dfE7BHNO+G+th3m+Z21bC3Jj6XWthTdfDZz7Tey5X
bO+uTf00TDoPM09TK/fBfrYGd33oO932l3E5HJGfFWoIsx01GuSwflnh6L53
OPfCFA/drbCa8ekNd+i5Cq6rfwSzdRtkz9F3ufqq8ULUk8wP7U6AxYUr3LJh
/rlPr2JhgemSeBn0o2bz+yUnYJ7FwyAPeGDWkgcZNN/+wjQdVuu3arnMovfL
yvs1sNWDdetFtN4qR+4z2MgksX+Qrg+3mNEI90xhZOn3jMSjumEX6f6DLTLW
lH/Y6JQgOPq1+fp1MOvB/N4psLmNXGYQzXesHqP9eDleVBwJc8sGvWfBOceO
PT5MnpPXdxb1nUkounYAFsw7qqEE+zXJZdD94n3B58LRL7764WUcWj9pLKx7
KuJVXGZMqJ/qIpstsFVq9/WPlH/zsF6fFuLNa20sg5mexqIYuJD3h1YIzfcP
RS2CkzVnVtJ3N/H041ny8Ijf/D8u4D2itu+y9OAU5KHvZUHveb6T0PQzbBP6
x/dQnGtWTuZeDVxf92r7GzHOraDhWrY9uSUjxgtm91+anwx7TpHv7Me5LalP
Er2HS47lmiXAbJnpXDfkq32oO9keTgw5uqYKrqvPdJpO750+t1Iz1Ov5bVWA
HHlTV+0JmB3PezAJtuQ3ybyFmdXsDfoUz749wGIafc95o2thySR+xWa4vKnq
RhQsPsW9vYd8RUGhBuZNOORKjrWf1DkJ+QpHHWK8YPHNWUpOMG/pjkv0PLCu
drnGw4zMuNdTyufixUd36LujOOQcApdHlyn2wBLG0OUz8ues/e7yFWadeCwb
RLZRq/0CcyLNylupv9EFx1th7r3PhqvJiYdb8mG1mhjjK+hvmsEhpU0Uf/rj
g7PhiLGTKaPIl1X64USxJvqjePET1cP+xFL5FWapR5/8hnPGnDHs+qiB+6P2
nA0g/8YfLIfVugLbHuCcScxe9KbDAt/67Rbkgw/WpMKBsSf/PEl1FzutLoK1
9xe6j1GfG190vYTlyx6n7oYtTzfKGGA90e5DB36gLjVtdnQELDh5LTIDZg5Z
HGiFbWJStZ1ggfK8sFXIf01tZ70OLElrOVtCzrs0+AN1s/9XPX0qRpuCAdFX
jIkl7r/txBgxY2mSEt0/R368is5Lyc7NP5O/M3dG6DrT51H+FC89XJ7iqtmU
J+XQ+lMcNuhjtGkwy+2lvltJ8ZQxlpiWHZtL9XTfWtZO6161mhj633N0SS5F
i87HAs3zsCT5/GwrmP/kvW4zzF0zYF6FfOUdjGb10/xE+fBF8Ihnkt57eu+1
TpxzEfWm2WeKXsCJuVoftWDmapFpEd3fFJV5GP3jF020CKRz+kCaGVZHPqEH
pZRg0bLDp8Pgcn/DltNUj+FxbzmaF7t1TIV59+ftKpqMvudkqx9FXuJpHpO2
w7zTskrvkIfo1SrzVbB8TO4zR1iidfqfhXBE09WSUuSR+MjXyh7m9ky4p0P7
tl1VbgcsSDMai6dz8KhpQymsbfKhXB22fHHTXQbrRySr553HyF7+8ldfjIkT
PyS4Y2SyDzY/wCgsbbTTxWjJ7bSzxn2eC0YCRhBH3JhQlEX18vZnvIMlNxZv
GYd5/yxzHYX51yZPdEYenIXvx7Vxv1rHsoEEmD99yMQeFvdJscs16e8aj8Qj
tO7+sAW1sHyyc3A95bMkfM5Nqiv5eJYq5c8rqj4F89S93rrAQjWLZopfV+tg
8l99x1xCh+n8XpfKrcDIeb/x8VENqqPLugUj91brDDmM5fv7D3RiFEdVOu/F
OgVzl8g9hUXndfreIu+SzrHAEg36feDYdRfaj1MNHjtgVu6r9Go1xJvhkjed
fPSQmR3sORBjW4o4fJ/X6imqmGcCpOaT11ss/1cF+Zk+Kc+lfjRqP1kOS5IC
ninDLOv0U13K+P3KZaojD3HEYXYdt2DLxHBBDuKwz83+uwGWnBg234H7WF6b
rdUxistkVrji5+Lt3Pxo+rnL0R8cJfhMdYMe7hOc0Z29UxHrffpQ/gwW5cX3
VCmgH4r60S5YR6Ct4LsYZm9sv1YJl/gaZndPwrjheYYJ1a+iHloDMxfO+f4J
i27qb2mEeV1OqWI4cXzZWxncLwz623Em7auHX9xGWO1C9C432keNBSsaFOgc
ar/bBnM9b1W4IB8uf0bVVtp33eMt7ZSfltGs1bBoR5BRIPJnTjoWK8E843Ur
3sCcreGK1+lc9V3Ya496E29UGzjR+d6ZrpOgTH+XlLc3IX+OgvzbIljo7MzY
U33P0wIEsEAxVBREffxY/bMvzH7iUrxShf4emy73GfHZlx6uN6C4qr097rDg
erGtOvWx20MxDvkJrMfe61HeM/uK01EPk5dyxRkjf2lldwz6IbAP0LpMfVmZ
xN4kj3meDn8VLPb15hrKYX6BvYIqXVculfx2AuYjLJ3Jkk4P9xJZuDA6eCUs
OjD3yZ8ytC9VqhdgtbxHew5KY965rWAh1hP9FbE3VQrzpUtv99E+xk/b+5RB
XvnaHv8gP7YKd9FKmOU96BaL/IWD72prxu0YQVuFhjfqY4xKG3xgdm5Opynq
51pu/OANsyTzU9rIVW/sSmHuxbPfQ9Eviezvg8aIJ3yg93sbnZ8U6/okhr7P
4UeU6Py/lJqlgXwYp7P6atTvrX4zz8Li5e4tEur3nv0cM+TPyi+fdpzcarz0
Aiy8f7FuEOtZKm8a1UK93KDzirNg0TmVvVtlaP8mmC5GviW2lqonYX5Gxpw5
qEcix1xPhFkFQSeVaT/uRoZsofsVlc+/Qb/YBTXOUuQTO+ZWYR94B1kVPKzH
jtx4tYD2Ifj5isuUb+n+GYUTsd9bX6XdRz2CzXenN2Nf+NkZmXzUL+w9cWvm
BPqOrZthPWbHiEP6NS9gnwRPp0c8+Ir54/weX3KH+lfnEfTrlmq8G8xiXUp/
9dmOYW6/eLqX5gPKh2M/4frUg3rNZAeTkC2DiLfq7m4PxGdvavUdeg/fW9oz
Tm7i/rjTj/0JK3txB/nxpy4aWdGL+Dc/h6Ugf+GwRnB0N+b/HrDajvqE682v
xL6Fe3/yXEzP6e1UUwdYcM37wDAsjGrefBvmBoUYpdJzbv7LwybcL+7eqK9C
58X65RVfiv9sdLInLLxcGueM9bkRacXB5IMfI3e/Qz2OvcpO9JxWXl+c9wHx
WQ6VIxRv2jPJSwnirRloDKLn3JAjqUZ9XN7O2/Q8cO3tg3Z/RP23g5c3IF/2
tiLzDpi7uLG3jur51j7zK8w/85OI9oNVXKN7DWZej2sfoX4s/98kDVj8I5Ln
Rc+Jf9AmZepfgkzUMuwzE1A16op8GP2tIbb0nMResH2N/AXD1o6e2Gf2BG9h
G+oVXvcvzaRzvNntgH8n1tt2YqUGzKjrH1jcBuds+LYX+84PshBvakY/58U8
toUZSbjthGr8/MCRGX+Q6Z+gkhHS/1eO2/0fTAZuqw==
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], {7.550672471263241, 4.700216133007339}, \
{-1, 1}], LineBox[CompressedData["
1:eJwt1gs41OkeB/B/uY0odENMDZJZ1BlFjcuaf8iUwpwUDqusMVFK2jY7yWG2
dBe6LakkuWtbch7EOi5pjJRLG6kkRUhhRO2ION/3eY7n8czz8X3f//99f7/3
/zdGQfu3imZTFHUTv+STmiE/BjTFIDChqc3cR11RhjRVuGObwgLWuDEYpcSk
qXSNTUXucPdJl8HLsN5vxtlCOClncfvKpTQVcYP3dC+sNjSUL4UFKzZIQ+E7
YpdG/2U01SLiXPGBu7wTagdgxsrFk7YmtMT4R7rCmoXrJV430UEebGFrvg8O
ZZ+WdhnT1NypcIdrMGuyh8qCvbPy+qvhJE7G+l3GtMSu/d6lFzDDu2yVKXIl
+bTpe1hS9eRkrxEt6RHdVnyE2SNytRwjmpqeqO7ug9MX2PD3I1/Q1rmsA+bs
sEnjwWOGP/jUwhRXU3MJnNzrGZlDcsUGFoX5Te2GmadJPnnj/ScWLanuK2CH
wdxyn0GYsla39vLA58a5Z+djvGSOsDjQBm4p7q/Wh5fKrITGsCwlo8ERZle+
Mtcl63u1+9g+2PgBtXoRLM+tfX4LvhCTG8+EC9vVgl/j/md59zo5sECoIWFi
vyXrh908yf4F1vv9UY978xYdF8Nig2c//4Z8qUFKTQGpn+DweCPygzIrWT+5
/5GihAnkD8dCZsxxXQYn2J6JfuRZ2ccchGUy+0Ab9OMkz9WoiuQ/Br2lkSfM
Ds7QwDxO073VPORs//Yib5gdNmcbBznP75lWGixw7X2xEP5n7eGs13CuunX/
ED5TRQ+u6mMeK/eJbiVsnKgV4QYHHr4ijoPj/e8oH4C1F9WEuWK9gX4ev8eT
+3gcT1RBLl4ftPY63NJndbMO63pb69efQeav6thxAvX6fWdCbBpc9u+pUHfk
AS1jK8/D8kdnTA3h0eY5cdHk3IZ7ZY2jDp/ouOAgmDNqfQ7nQJJxfPewCyyO
GVFqgKcP5olWkHN/dE+WFOMzx+cuUYdT7CeOtMLKbXfcR7CuU6cHZgYw/g/5
pMFLOF3hx9TE/bo8fgpqgiXOq2lbuD7yW8FDmPXnUVE41ruxaWBZK3FTs1Ue
co/rzENvyfg+A41+mPfRbnAa1isvsCHne3Csy4msRzDl+CkQzo+mH5LnitoV
cS2Z9PevSb8LpD7soXop8k1hlWFP4dx82v8jcnN/R5bhcpxPQ80cVfy9b6o9
IASmNPPEpF8qy+veFhNXhZotghtFzJ0zMLvs1VUGXMEMTeCb0hRd3yXAviVB
yrcFZ2BJONeD7OtkzljNA7gsgM+8ivxsqrWngtjka6kQTlQtq2etoKlqky8/
rYCT9Zz3OBKnt/a8w34Lx/cNCeCkb7F1mfASx8dHfWE9V8s2Eeqlndr4dDsZ
v7O50gL5LN/NM5tgidETuQL9uKcddGwt3D06k9iMfmQalaxlkvnvxrcVwb4a
a/9BwQOPNWJuwE4j6rffYH3s8bTqVDi2r3LqPswVrFl/C9fLPlwakgenNPee
L0PuxtPWuQQr5pmWPofttnx4e5yMN05ZrYL1ZT1xE0uI9yYvIP1eJvPUILmY
mamJ50pi2poTQubLdnbGFyL/mlb15g7s2/GvzmH4kp+B11MyfphnZ4F6Znd/
M1DGen0TV04GoV4fB7eYf0/221CTfRG5ieculRi4o+Hj/ArkZ6qEXXUwa+7r
I8/gTdv1M7XMcL4nziX3w+uko/o/wB29n28NYj5fUCDPgVukR/Z3w+uO9byW
Ezfo+DfAu7R9qqzZOG/aat7ZmL9H679pB2BtlaK/xPD0RYeXWfCpzMAKJ4x3
EURZtcBJrtu9VJHXWl5pHIEZ7ZfNpNjfhfgIN+XvML5UOhSHenTuzWmYC3N6
14RsgNsCJF2acOE5P6c58HNV0fnZMKXn/K0N/QgeFW+V43op7LGGfLiBe/f9
M3ijFzvyDFygxxZWwL5XQnwi0Z8/Fx5QXINbGI4O++EB2RxFDEzv2S48BAer
viwQwh1xVeJTmP+hrofnDnNfX76C976k0X59/vfEXx4E4HmXmDofubwWlvxx
vV+J9DdO38OW1Mdpr8IBjtd1/Y8rHJHnpR4F20iYq3fCMn9uSBm8YIdu6VF4
IC5V8Bm+Ol5eVkjqeX/ewlWo113DFO4AnButsoo839mfnZrNsP+IyOTg08hL
LZ9X7IPZ3y3vzkFuIxT9XQrnRhXxypG/F7htVjZHPXZb5FbBLpcrdwvg3A8v
HpeS55XnrJYKy/kFf2fA9KDWeBecXqg/9Suuty+Qa820wPz5o+vwXpd8U7q1
yAtOucmNNYIzjGROsSQfnGT0oT/1dQda0+EW3Ufe2diPzryOLaVwaKS6Pnle
+VH55bWwosRMxxSermlKvQ+zGmzGyPuy5FjHm3K4mvOVXwxHb/hlOA+W08OC
E+hH5xfPqAvk/oPuI0L4Zcb7E5FwbrFnojvGcxwkfF+4++c9ei5w24W7DDuY
vuHdw4fp+Xq6S2HBIdsSX8y3G2nPUoU7ziyvR/8ps0Cvks/Yv/jz47rrsIZI
efYQqU8n610T5otmCfuJI46rTKhi/Q7pUr8JMt7lRJwz9uui1/5Si9z/vOuL
X5FrbZwdYUX2n21oi/+bktx8fkYAzI04MaiAWxW2py7CSQZ5gZak3+HGj1rJ
esMTt/rAa1g1FYstUY9z4W2/kO83wfP8A2HBrecH4mF7hWXUbZgrnVhzCQ7R
SX2sgJOKF5ckwGE3E9WcV+J61ZPLo+HI+tjRUzArmOEYAEe7JsbJYMajWfw1
6Pcs8r1v1f+//xnT/wN8NMC3
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], {11.09668634354053, 10.192181496648477`}, \
{0, -1}], 
       {PointSize[0.04], PointBox[{15., 9.}], PointBox[{7., 9.5}]}, InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox[
            RowBox[{"C1", " ", "N4", " ", "T4"}],
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->6.137505285412264],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          6.137505285412264]& ], {10., -0.5}, {0, -1}]},
      AspectRatio->1,
      PlotRange->{{-1, 21}, {-1, 21}}], {66, 66}, {0, 0}, {22, 22}], 
    InsetBox[
     GraphicsBox[
      {Thickness[0.005], LineBox[CompressedData["
1:eJwl2Hs8VPkbB/CTpFHSFGmKRLoQUSJCTBcMKRQlyaJNQkJEJUShXJpcSiGs
WZelkuRS1JAyCmlpY0NDLrPCCmkS+X2++/PPeb37nvN8n+f5PueoFF1O7Tsm
QlGU4SyKIldqYAY/akyKRrCOSU1+8+OXwNQcqaNDa5kUo5425Q4zpZz39sHy
Q9mx8nDgHemAzzBt2eS7ZlUmZdW4mj4Nhy70nx0L5x7S4S1HPPciOVkLsr5D
pGEnzKqa92kxHOUm3nIGjlsU96Z7PZPSbbdXLoK19jwYq4Dpv5dWjMGXftZ/
zYSjco9v36rMpFyu3qHFw1YHmgxC4dWxG/6JIetevDUvYdeGpK7rcHIdO5im
wqRGm282pRPv2P/vLvhv13TtRzAlJvnLWViy4Bmziezn2C3OgWn3JnuHYaee
toTncOGCuWOSyJeWab/0PTxgVLBWndQTUajeSdaFFSxzmDFuImyF9w4XbneG
hQ7HlvDgxZs/bfSBC/2Csgpg9Y9RoYEwe/7ujVHwnZnoCX+YHmWX5wDrldys
ciP9i/EzVYNNel9dtIL5uUsCvqM+qqPYYgPpHyv+Kal3JMSnYIbk+9046wbc
yhi+xYNzs7lxHrBVdILvFeLFKx6ZwoXnn/+zk/T792vTavBASPXEd+zTJLVu
WA6Oi3zz7C5sdepGCgM2fGUS7gwztB6lKcBN556HLIX5jRri2rD8HsP2t7gm
v8z3siX709ddj8dVeNftIzkfud0n9x8mfx6p9u0Rro2yB8M24Go3sujzKK5O
Hf2MeaQOx9up2ohrMOaT9QXnzj6ztfA8/PhZ9dYemDp1Irsadi1YG9wFjxRv
m5iLOl5FWmYK1pF9DymbwQ7+Y+5CWCFJ+Us4LOPJM1mI+KFeFmYlZA4+Wduq
kv1lVcM74b7ihhBzOJdb5/ADZil6xrnD7B+qCyTQZ4f8PqMrsLL0XQs6rPn1
nDMHpvO/H6TBEU3mfeWwblH00Die36WmMl1L+rzkmfF7uJU1qNQA8478PecB
7PczQIcHMzpi1S/BxdnvQspgZmmO2H5YUrGtNA2Oyu4QUYDtb8yiB8L85ffy
h1B/qHaAGgt28/MKewrPm6MvT+pjj3L6EuHfxpoONqJ+fmfdlC/c6taeFgkL
04Ju2sPLn+8bN4A37lq5eg+cmDT/ygjeW8GqnJTdcHdqfCoHDpzZGXgArpbQ
dD8MsxUsCk/Cvru06EthITOrhA1nlx8627YG63LJoSSfKdXTLA7MZUyyv8Iv
j31/GQiPfB+Zq0Xe04HD7w/CCuNDJQFwhmPy5+2wcl2XzlM4viKY0iHrAq7Y
HPRXMrElbQtstcAk1QzemGn7wQj2Lv0r6gqcyHRwt4ZZvh5x1apkPl5lnYAF
EW5lo7Db64xbEXBuwglvBr5brqbhqtkwY6HSNU34UsihFS/hQJtsNyY8VbdI
o4fU03+5eTus5nxN6yfMXxC3Xoc8X/RcbTHqd/KZYSnC3PvTB+ThjJbTF2eR
+1/EGCvCvKSGa23Y3yL4y+AyWOFEbUQ+ye/M5L25cJSBoPwsbHDyoPMAySf5
BccEvhfqYFkN0y+nNEnD7SndW9gwrX5feR/60y7pyrSF3S5IPyT9Wv2mZHQx
yX8g/O0dmCNeuer1apx7SfbbKDjV8+fHEJip6To3GJbXeei4GRZ0e1mGwH+p
2fD7lZhUWb6oWCy8r+92Sjos1NkwOwfu+TnGcYB55w+l1sM7/j3SqgArJATl
T8ES5hkvhlZhv4BdKdrI96rMvfQaOMp1NIB810T0ejSyyXriStHHMKcyvyEe
Ziteb6LQr3uCVvurMDd7xQFT+M/0oV0xsOATmx4NN7pvir4Jh547dasOHp8+
UvcHTJMPrqI2YN3by4Tsx307laMOu+4bE+uG7UzTG63hiGDl7lkk/1VeKifg
LfsHkxVhtodAxQ/mSHOGDGFm73CNL9wZtbDiIGznoXf6GCySIUl3hwXOdmp7
4LXM43p+pF/nXBxU4dWJ97r/s+jHllmwTPzNJR5wboB7+Z/Id/ljScsDpJ9l
39wy4MUxpSFbYN2B5F9PwjVbri+QgJXb2rUM4NDTT968R/4Ztu17F8KjxlFz
UmD+UplJAfrnZb7V7CCs66Kh+xpOPfg1WBJmnUy5XwrLB+RzqxXR/06J2/dh
Q1q56RlF8t3wLH0IDzcybVXhwlmdxjVkvVR9eY8C4r/ZMMOHi/L703+DmWbl
suLYf+JFWpEb7O1eYa8Pp+ZpNOoQn8peeAYufukouUiB9OOfzaWw0EzcZGAl
vrPWkUFTMMPzynUebPXa33cn+pNaTI+tgJUPv4+5AifbP/tYA3MrR3bXw1OM
w3YfYW9a5X5xdXz/DfaFiSK+8oU5lw3hYQs75ZWw4MiolDvMLwq6sU2BfFdW
p1yFza/Vph6Bk6OvrU+HtZotJ4NIPT5e1jmwmrum/y24tXhiVRYs0DYcLSTx
tK9qJ8C7bA9FV5HncwJTA0m85gdZdbBwFbvdBq42+ySsha1KJz6owLd3Hy58
AofGCxu+I382y8uJA7OOZMrWwvcsK6TDyHrsMvNEOKa5ZI8tzNve+vEomRdz
ix/ysNvTl2a6ZB6X9/RyUX+h5ekqKbhGf7B6C1ym4KotRD+T7zr6Zsnj9+F4
glY/bJMVrzcfpkXWdXTBnvr0G74r8L1V5TYLYI7Z59mdcsjnsv0Wch6DmYPv
rWHmr9aZsohfoBkp8acs+tjtuNEE5h8MZ7jAAosnUefgIH2lV6Kw0+uI/hKY
28FSqViO/GwitEi9VPoH5ysw28WTYYR+KGzcX+oJO+lxl0TA9dsGLx6Dy2rt
s17DEjocbV9YqPeL6QINxLd84Msm6wnsByyYM/5SvhLOkBpsPg+7HV4WMQ6P
SIYLOXBuCDdME/nk8vObq2E/p/e5vjD3Ie96C1ysEuZfCFtxF/HbYJu9/cH9
cNStOSN/wuzaFVlSqJ8/Y+/PJeav0NoEt869eicLTuV1yW+DN3bo04JhA1sZ
CW3Y+9baAmu4MIc6uxQOtZxfrwCLLmLXfkJ8esKjtiHU12r0Zddt2Dvjh8MT
mO7rsNaArKc3t0aTdRVm0GvUE8pKLXSGGaZWcrthu82PJEn/Clgu4U+XYT5k
/RvWkP49PlCoAnsfO310Kewwc+s7m4H+PJholia2oD4Kl+L9sFLnyMM1b/vb
jsF8k7x3Wurk7393NrTL4Fw6jfsOwE03xB7/AtMcb78Lh8tUHP4cWwLbp2k8
hr1NW5alwEKanJwQZs2OPX4Q5ovY++qjXm/GZJEK7BQo3nSR9Ff2jvhimOeW
U8SDPe0vxC2E1X7K1IltxPnxLcMV4KmL1M+1cPJm+uEdcJnS+b92wrQGhXc+
sNXJIhsHmDPWtzIfVmhfkXcKHjzjPmsAbqpeqX8BbhGaia5H/vQ1DvcvwcU5
a3JcYTnNS58vw57WUTEppL4FXksvwuMl1nk1sNPOkylnYAPRR6c6Ybvwadnj
MLNS5GuvDPn9O+S7H15dXkBvg1nb92cbwIV5eqdL4BpabocS3LNCv/gCnPEm
zHYe3JqZekAD5ip2cbpRf88h5vN65Bt6ZmRtMSzYO7PVDi5cVXQlmszvsqry
FmnUr6fY7w63FGbyjWHh9CFRG1jhVuCL+1LIa90LQ/I+1Lva18vAXI/4C8QG
Sp8CQhZjvVZO2RYeTNLbOrwI891/R9ELVtvxlnkc5nkdexVP3g+XButhOvq1
21eMvC82t0VuR8CBnuZmk/DUW3m2Jiy9SLdZDvVYvRcU9S9kUr/aDo0akvPh
fvG+AdOu8va4wE78o+I+sPBmSQbpd5NEo50/PL59MjeH9COZFpoOVzQmbqol
62EeCwZg+h45hU9wVLCj7Drsl/vtTOgkzAstpbvANnNm4iQ2oX/Hl6RkwjWr
srgMWJDHMOyCp/Tv8uTJur1LkBzqa9UeTSGWOLtvriWs9YTlQ+5XcGkZ9IPZ
6juekXgFX/dVXSX9GN6mM0Xm76lMTSzMNZz/tJ/M27voqfNwooybSxNc46Fr
aUPid1ZZl8IWqy5fkYEvZd5/nQZzM9qOPkc+Le/+kCb1T6VOnHUg/fuR4OZF
+iVXcZpH+ncqfsgeZkVNJzyRRJz1H3J2k/3neby5tQDr/nyv7eT9mJYM8ZBA
/s+O9JB5Y2Sfvbh1PuJ03jlJ+m8nfrxdYh7mZb+5hglMP1/lMExDX49/mG9D
4vf91O2bi3Pf084h8ywcqyz/IYZ5M2x2DIVDXxkPasFOVWXHSf52g4ouN+Zg
frYWPask+QxFUkqwH//hTj45P8uYrg+iqPdLcvls9C+57ySLCxvs3dSxFnYr
Pp3XAKdyy0+yYP452osZOPG6hv5xmOk32mKFeD1Pv2iGwd7zXtSVw27RKh7J
sHLXdJIm8ilQvqiWB/OS74YXwXRm1feHJP643PWNqMfKRzSpjJynQVJTFpwa
biZSCjO6rGtno/6MCVbkfXgk8o9aFlxffC33t03k/xdKd3jC/OxppevE2gsl
T8BWnG7BebjVp+i2PnwpdoHkr2S+MgTLuxF/tZbOS3Nyf7J3kgM8pbFr/yaY
SjLsLUB+LPleIZmv5Oja3/8i9UUq/StC7vf7Q+Ij6o8Jd7cdIf1dureofjby
lkxa2w1T5s9254ig7q0X1dvgMl6ZXcAs1LP+5qy/yLqMQZ0xhXldfWeiFeZv
njTQ+WlEBW1XVPrv+X5lmdlTRtTI7qv2X2DvfwVqM9+NqFadKQ0x7B8qHI/b
KjSiPC+0Ta6EC8tsHlZOGFGpSi87tpHz2OxMJX5FvNa/3zgSS5/wrRo3ogzW
5ORcJPVtKHA1hZviYtf9Dm881hWjBCfLTczjkfWyjzOW5P72V1L/kOfLnC89
hwtG7y2dqwmHGX/2QXzRkqMSirDV/U0JFti/bH7r4i2wk6me6M5vRlRFiGeo
sSb5vSuRvhP5XkoT79sLc88esTNAPRkGldL7yP23eIGyk7j/8d2VljD1SudQ
E0w/sfewCUznjEpZ/DCi7NI6DunCTXPFlMJgmxzr3jXkeVWvXjdYTfPrxEI4
YzRoziSed9CSuPuN1LfBoEIT5l/417CTzKfg57AU9udYrhipIfO8vm/Nb8jX
IZIncpd44snhXtTnZ+v/x02Ya78qTzBmRNUMbJq5vIn8u/R2Y/kX5Cs79iWQ
nEfa1V1vh40o3Tb2Dh/yvM5oo8SAEdWyrCHgFJwxT0fdvBf9Xva47fR/7mbe
5RtRgvgnXsEkvoVGXmEr6nm740cc6f8SLd93TUaU9xmWKDkfqjGwfvo5zj/q
RMsz4qHLfU4PsL+9Tzip57+f5Mr/XzWZ/wOLWVMp
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], {7.220763348655991, 13.940410547001825`}, \
{1, 1}], LineBox[CompressedData["
1:eJwt1AlMU3ccB/B/AQE5q5INN8aKDO04XBd1VBL3XvBYUYrAEqkCW6ciRSp2
oIAgWyM4YTJWMGT1mDQCggiZ8+BStFwCQ8cRxQNBzolWsNhZGuTY97/tJc3L
J+/f3/lat537Q6PMCCHb8KF30jmPy5El/14fs0RVlVPf7MAS9XBd7RCfJZKP
Rhek2LOketr75X1YHTD/wMuOJaaxjObHcHLyEtkLG5ZIfRzlk/CAnY1H00LE
SZ80OiOecDh6sNmaJXrVzOGtMH9DOXfaiiUy24pP8+CHF37jy2De1fM/98HS
WbnACS6ddM/x8WSJc5vuyJwl6ju/sj8NlvWNtbnjuWSUeP8B8985LkiDRfIK
qYMX4hW6thPkU173GtgEazLKfc7Bpe3vaRUwvyuN/yXqa+XMGLLg5McRBRao
n9vzhTwXZhO640pg1uro8mOwJL49xMcW/e+N85HD1k32tVmwbKFHlj+sHCjP
uQyXcr7i2dN8P/g2a2DB1q+zO1Cf6mb2nWCYXNsz9BN8abd5YwPiO1dXHgyE
lZXlB6ZRj2T7m3xHmNvd6jaPelURWnEv5lFt1c3tRX9qG4nHFXjss4LXpzAP
Ua75+Em6L/aBm3gB4tpG5uXCXBvXNmKBOhvtzU/Dat/RmSYzzMWjyrUSJn6Z
PSUc5E3orx6EFVOis9cI5vCorux95NffqnfTzzNEKHppkMIar7hfdHMMUb7Q
PauAFedI1y5YG6mLmoMF4qQzYbDELfbdIPSv5ZccuAnztnEvq2F9eJlZFuI9
nKkTPobVtrvMQ5BP77lU6OiN96U3+e4UbNo3NL0a5t0YjyxDfSaNzZUAmKTm
KLejfmGMU34grF+8cY0RJlvcR9bBygNFJ+LN0f/3nAlX2PrV018bYEGTZGoS
+Qbifjc+gTVdAUtr4Uv9MfuvwyI7+eJUuq/n9VHhMG9u1n4tfT829+rqEN/a
s2i3ifb7zaLqZ6hH2HRwRx3cOfBj3wCdlyPbf5zu0z6zUIb+VDM94mg6L1FB
dv8MQ0RrZ/1DYWmxuJ6dZoggXxcbBGsvtVZVTDGk1a/j2wiYlK9av/4NQ8ZW
NEyk0vN+uj9dDAyxXtWTcJGeVwTfDJnEPGt6zo7R8yk5S8ZeMSR5d+LnAjrv
G4Zw1wnM91Djke+o/VzfBo0zhHvfzLcDJnPiWwmwek06h86Ht8g4m4Tzycs0
xXvg4I0df7noUf8dmw3FsLQm0mIT8pHurPwemE2MTzvzmiGs8aqLCeZeHGkx
+5shsubaLdY+6Le1KWYH6i/NNJy2hPVhl1uOGhmiWPkk30D3c9c0GoN+te6k
rRPWrujj6GH2VOBVDa3HMPjC0oTz5qs1tB6eU65VEZ4rLjyVL6fvR5nE2Ih4
znk7w0bQT2ezXrsX+VRJMTVFcHC0sKAQ81Jl+LbEwooTbmIl6ueffLR1Hd1/
luLtJ+hXlSNJd/Gi+4gw2j7H+7pM0mBL978vc1HnMPbjz0mxo7/ntujD8X0M
CW4Ld/iQ+vbtRIt7+H669B79vZP8UpmyBfUf+sAlkdplTb3pCkNMEaGbK73+
/x9V1f1392b/AZj7DD0=
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], {1.455758665537993, 12.40348977476798}, \
{0, 1}], LineBox[CompressedData["
1:eJwl1AtMU1cYB/AjCJaBDhQB5bHWIpSJwhCwTvRe5lSkghVnKHNABVTm5hQn
Ew1sJQPj0AnLcKJRwUAdKBuMl9QHFFmgA1JBfM9AUensfLSikypO9v+ymzQ3
v5xz7vm+/zmpKGVb3EYbxlgyfvRmhnE8b/PMSm8Jz1RLW4dOwmUfNo03wsrS
1AnONP5ot0MGzHv89ixmCs9u2tw3zYctl/XlGybzTFC+wGkCrI1pc1jrxLOo
inWf3PbHdz74rHOOI8+2hw7Ma4OVunu1LxzwDqoKboKFkSPLWgXw7ylJGnKs
VPzDJJ7JWxomdsHO3MuMXfY8a976Smck3/46MduOZ7qxqecmY7+i5qvFlROx
zzNVegRsSHk5YANLXM9M3A6Xpbd0FNqirviOXDXVK96SsgbmY8+ev0VeeG3h
Crg2yPWEQwDmq5eu+gK2zE+NDoF722vC2mCWem7RGrhocXOGFN8XXrTflAbz
SSPNXbCy4qvVW2DnA547t6K+3uU9s1JgtuAQNx31W/QNGhlcu70nqwkWiipO
+NP89jr9MvQr8faxH6V8vVfom2GPCm3rear/QmKaPfLRPex8J4v6U38c6w/f
fC2+Ow+uDd240w22TtsruId8VI11kj6sDw50bDwM86P9UfGwxXutrRy25G3i
ztD+u/4amkLOmWbsozxz+x5f90O9MfKVV9CPwCSOOw0L5+vljeg/K8fxlwIa
T7klz7fB+T5tHMuCe7MnFcRM4FlljuBgJs13zTg+g2E932qjgvmN31hN/3Js
X8HsVYfJrv71V8c41psZeFEDa0/KZPavOCY3R/gM0/ojIe8dtHIsKumSzo3u
i1usetcox9L3uOtk1N/lnwL/eMExiUfEGxWsNVdyebC2a390Pd2f4gNSNRyc
XVw7CBsOOqjEWG/QvJtjS/k2xVmfwnymebMX3e/6O6Xj2K9W+nONBBZqs9Ok
qKeMsw32p/xHir32ol7r+/pt7uTuRUf7XnPs5ljPqZdUn96h2/YNx3S+b53X
033/9sh1+3GOlaT/GlZC9UVem9sJ99aYgxQwUzxfMhP5WA/ZLnSh9cr8xSK4
cqsivIP655bvNtF8l1JuD+WT2t/tB1uupWYFw4bKJONr5ClJnmZ6OBs+dmzJ
l6inOXd1Qg2sjCw3H0L9Qp/0uTmwSrBPnIn+dG7qqHga9yyK9kU+WQ1X/llC
FjUEaJ5x7IFL6I1Qml8d0hP9FOcRVj4ghbXqU12Gx8izg4+NJj9SKVUm7H/n
dNtmmj9sPHtsGHnKorhCmI8PEinuol5ln7wFZsI5W44O4jzth0Uj5OKg6Z53
cJ7e88r90Y/KLVkTeRvnl5BWu54sHP7IAS7aIV+wn+7b+t3Vij8x39ecWE/j
suY82wGOse9vqftovOlUqtGA+7VtkeN9GreruhB6D/tF3PA2kctdgi6hPlY4
NNVA96+022nDA9yH6ut6HeUr8rt892/k59prLKf59/crZqLfsh9XHtlBjtD5
DjxBv9/VtITTfq/W+dlZOCYdyqyjfgyNdrMiYY8n/WFV1N/xcJ8ZsCK8KCaR
8qgL9HQ2I7+qPK+plJfOfdQT33+QX32hyxde/am7EvtLCks9CmA+UrLTYsR9
tEnojKPxAK8WE/KUfO70yA9mLe3PB5GfLqDEU0CWDeUn9KP/S4NRo2LKO2RS
WDvySrbRPCfTU3Lx//93Mf8fbqc7yA==
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], \
{2.2166983570049292`, 10.540402628792112`}, {-1, 1}], LineBox[CompressedData["

1:eJwl2HtczNn/B/BPipJkQje6TDVdJBkJkWqUSxFGKSPSLG23DYmYdR3pMipf
QzZj2RrZlG5GSUkyXTap1EQStRpZSqIpdEH6vc7j55/34+nz+Zzzfr/P+ZzP
YLJzr9evEyiKWqJEUSRST8bxx4ZFKUi0YFHicvHXNpj7p41yOSy6zeVmwtIq
+vlomFIE/hYOs9uMuzbCg9+0s+eQ531nPrSE2SdFk17PZVF8U8e0KbBmNT/3
AsyJ/uD2w5xFeU7MV6yGRZvMqW9w+UO/Jd+sWZRMsOGMCu6PkUS/kBBHrdSZ
Df89p0Z9N0w/kcpaDmt4fZIyYdGOe45BcGqSSerYHMy7aqAlhdzfW/qqBZbb
U8J6eLXJ/9YVw7VH7lQqWbKooDDmggyYqkwuWAyv/Pf69lRY+oVeGAxbNaca
psOSP3PczsNiju6Gm7Dwh/7c2/CrGIuAanJ/fbqwHo7heYZ1wj0XfWjP4Yjm
5NU/Ydrg2bpncG/dBbER8uUmFO5+CCtC2DOd4ZLwW0tz4S8x1Wv84AhVt7EY
uPqg1sR9cMjLfg1vOK5S05sP05Lc7PVg1mGnxDhy/822q62oz5PBCI+Gs0a1
m4SwStkay/0w82hOoAccrmURxoE5mUqGyrAV+/EvduR6VVeGFP1f/GtPiRLM
XyKJjoFDinyED5E/fWyPgg0LD/wZGQsr7LoaLOEO+3JXJzhEXntSHT54cr3l
gBXWa8j86ygD/XDZHXkN5ghXnBiCe50nC3xhh9In78bhA4edqjRgq9NHd2nj
+c1KpttrUZd7bfT1RfAyhuHGROJtPu93wNydjau3EIezlc7CBgnxp+fBPUnP
DlXBXa0mHzRh+p+3MkZhHdeGqu9k38alymwRhV0OfZ8Rax+JPLiIknjvB0OI
XN3ihEREd+c9Jsp43uGMg3c+6efL5CRdWHj4nLQGbos+ZGIHC/y5u57Crfqr
ytjELjs3ErN8ftPYB/MWFZmT+zmcLflCmDZjWC8XNlJSWZ1HfGH6h1jY699F
l6rJvtr99L/N8DdHVlYLLH+e+nAWPHPQpbqd1Mfsv/sC9RyObrnaRvaN8Lf5
F+Ar9vHBdXDIyN+PPWFrkUuxhHh61oZJcFz/tgLSP8Gd7J1V6PfqKy4j22DZ
JovzcfCQX3CaKan3fo6JF+xswp7zGvMqPtwYsYSX2RXvuwTzTFlJk+F3bR8v
rSf7JlK1adiMReV/sxgYxzyK4XiLz7B9UM3LApjn2hT0Hf75sakwBBZN2toy
Dc/3TEstMYOzeuxt5sOleSp9bxHlmZoFWxBDQr9QtxD1Dh91i0fc6XBxDcmT
VlC29x7iy7Hi1CAyzqGX5wcQZRa6YSTvnsQpny0wbkG47v88YCGX6uTA344P
RqyDxSHP6sl+DusOViLzONzg7MuCy25drgyDme6hbyrgHf+KO2JgtsGWzCY4
XDbMvAZzqjZXy8j+tzWMJH1UnF3VWA0P8cyc3sCsTXt7c+BKY0d7ivTjafvj
OMSfGyfo6yGW0I8W+SI2avPeWiGymgM5hoi+e451MRElgWUtHRinVvG+1BZW
2zdfdBHOSgtIMIGtvBUr2aQPeQ7darDgwJ4LZD06dtG7/0Ok56kvrUG/aeVm
RndI/Vf0pQJYUesmOgZzT5+M8oaXz2t+vBym4uevtSLrtXV68ldEjhG/XA2x
bG2vcjaioDax+asp9nvizvDtcIi11lA/HJ5pOH8arMfnTR2GY/5qzK5G7Kmy
DFXH33PvdxifgAUNek/I+JXOWy+yYLZiewob1rHwb1CHheXDl0/AQ1Pr9TpN
0J9+Z14h3HFlbVA57BB0L+E9zPZiMG7AYkvuLGPk7Tdzj2saLPB4sn8TnN5w
304My1T3qR6Hb0/2+5QNi2bIYtNhq5xrSmQ87ung0TJ4Zc7SK8/JeFrbO+rh
skKzjK+wxHL3nEZ4A9/siTapO3J9MFnnSCPrikVw1oLuvBzY1KN1ujepZ5lX
BtmfB0TPYn6DZWbxxzlw/g7lKcdIfRL6O5JvSN+8d7GkP6nlA52oJ+5TTHEM
zM9tU7sMl19sO4t3i3LfpFxH1qerYHyUC5esbvqoQfqZqhh3gq3S460eIXrR
N1vTyPyfjDQSEQMTUw63IX9W2aUPm+FetbsBIhPyPtlXWMEzuQHXN5F+HPpV
T408d6c+cBIcYpn74zOi89zMNyV07Debzx/74MZnl2J+g/l+VPsgnEt7nEmH
HX6xN52I5x3GxkyLjNH/GKHIFKaV/nl1MazYfzvFAzYwFG96ZIR+XHabQuri
Nit/2wtLbd6eyyF9bU0/ZQNTna/OvCZ9CZr837gh5ttlukaX7MczDdN7YYVn
gtpamGX6YTIx02DI6RBsFbSgeQzmXR0SXoEbltEvmGI8vYH6CSVwblBgxWaY
PuXChFq4ehnfTgi3lRUer4cZ2v1bZbDcp0RRAY/4VUbRkD/LwXZXDmzQElu9
Dhbun7uPvD8hL41Lj8E9cckufrDa81/s0sn99IAIU/Ie9OqkkX5ILKNob8j7
ECacTxxS8YqfCtM1RvpT4Yg/vLdvgRvy1Tv3wXqbV/qRdVQ76jE6Dy7ZkcFs
QL8ZJoylLciPc+BR1BmYXaSfFATTrl0+5Uv27Vv3+92on36R5z+HvCf3/H23
wVLXukuqZL3qFvP+McB8OgHsQaxb9fhwrjVc8ssKzV6YFplQdHY25ndKafoE
c9PubR6dBbvWjo8TP3CfFQ5Ll/84YYDxZl40Y/bpYz2/xRe6wtV0c5tjsNph
+bkIOLyd2WMCu79acv8ayefaqZ0deljPQ01XXsAX2s9k5sG0gbbfp6FeZvSG
mj9gUUDGX67kvXl7sykZ5u17sjeCvDen+uQZcMQCi+QUcv9sgcMjWJrQNl5A
9l/+583f4JJdFrPIuRPYHz97EeaX8xZW18IXmOaTouAS9oEwKcwyOe5TRPIN
1lEn+4/e8mrVAEwLN15wGg55ar6SgXrpbq4j28h7eDWdvhYWrckfYsAj8/52
CoCt1nCZ71APL/RWMReWZ9wdv0rWa3VurCcckuf73Q/ebv37WROYV7P6xQzY
3sK2tBPzRcS+Yzehv7zbK97Hw6z72T/OEq/K+TIb5sfaOHHg5dSuC6moT7am
xMgads9iuM6A6ZPjXFVhm3k104/r4nkF89Jr7JsOX5ngjQ7qMdLPb4R5TO+d
7rDCvLH1GSxrYwTe0kb/NHxUhmBP/VaGGSxbWCrQIfMzcl5cnYnvTp37R0fi
uTLLBTD33npmKLx99pPvT2fgff1e/u0y2R8thqFJsOypbkkzrHLz0/ltcJvB
lEKy/0oMc9NWwCMpVxc6wn/Pdy12ghXhUX+FwgZ34zQ2wHrXSpOEsNTDdWAv
LClsVuTBKzV/fk6D+ePLzaRw7c51k16S619HR/8h++99+w19kp9hZAs513u2
Rpn6wSGuB9LJue/gmpKdAjO39Px3Gg6cfCqrDha6Lc7yh9sKdr8egHnP/uJZ
mpDfvSey1NAP8SalTe9Rj8j4nqoGTD17HZMBC3t65aO4X884+voOuC900cRm
2H3hxjBdUv8qd9dzMH35Ja0M9JchSgx0hOWxGSxzsj46brbNyJ/t3zn/Nt5j
kee4mw9MK9s+2RdmHHKYVj8d/RG1MzRh3nQ/0WKY0knueoX3emX2261XtLDe
N/4RPoIPJIg1lYhjl/k3wkdnDx8NpcGqLO8+WBDy4NTtach71/ogE3LuzdBz
vKmJPi99LAiDJTbugrqpGJ87o7GKnMPGzFANWNKhnGJFzq2p121/10B/F8ZK
k2G1rhOeM2D+qZPvxsn+0vJ1bp+C+wx/1i1E/SMnbKKbYK4y++FOmJ7reKMP
FjVqHU+AxWKj4/PwvJX2z2dZMKu7zDlRg/zeUjEqg/WawrvH4JIIXXoVOZ/4
U5KOIh8r/Qzb+3CW/7x7Y7DDMyObbNhqoX73IdQjLHJNIuPLDCjZa9h9z8yN
ATBbubXXDvVL1B98nQMLDntLd8HioKI3beSc3UWx9sD0YrGxFyyyyVHeAPN7
U0qryXdhmT+fgiPYOfqLyTmclW0aS+Zzk9zMIefsEN3nX+Qj7k2TWsOS74kR
pH+sXg3LEpyz8mkPUnRJv8IsjDiwwJb/+0T0g6aTNV0TbqPTaK8mY7zWiqMd
OIdrnyY5Z6thPP+06mqYd0Vt/35VXPeusHsIt727ttxtEq4fa+3rglnLl742
nYh1G18yro3xrOY5Ds1SQd3maZH+MDvFRWmhMvKcaba7CGbd8WfsmwDrTvPX
R74hJ6iXL5SQX83tuTHwiLlp1V6YzVM5qIBlCr2EhTDd82Ath3y3+Q7tZrB4
+432YjjEUbTfCZYN6zSpke9e6dZVR2Ca4/qANWS/8NtvtiqR38O+2hHE24If
rcH87HNOu/mwXN26+B+YmTRp8CDsYH5t2hrkyw3tXO8Nc/Tc3SphdvHL9Tow
U102yVaF/Ltb9UUF5re6kVh6Ehae9mgn+XHtPOuKYO5IJ6OTrMeSm0rVMO3R
mMtW2H2qeXMmzLzEdm5AP9zNb/F3wPI91/hOMO+07YZuMt9UrSMF6K/CuybK
DRaf3sFjwqIaB8ZB5CsX0APKcK73ZAq9Y0j/Gpce8SPfAd1HyQcojB+vtUET
FuI7/ddPF4qy+iP4Jc518bAKd8kPF4r1vthDqk/+3ewseDQK2+dtIeb+9DQM
HnahxPWi5hfkuxA5scL0qwslK/uvQx3jsdY21Uz97ELxOXIRm3yXWaORSwZc
KOn1SudMmBs1eJXTj+sTc9epI1/u+f6NH/pcKHng04IDMOUQbGn3wYVi3pNo
v4blG0OTmL14vrJw3AP10x8q9b5+70JJKj+ZZsNi6Yq3S3E9onB68g+Y+iPv
HQPPKwZtfixHP+Xl2l8EGJ+lVfMkGBYH/9q8+hPGG1l75DDpv2F/nqEC9VxU
D95PrudwBHTkS1OLM/ci++uO0nO9QVzv9wrVhVkupp8+wxFvt1Lkdwu/uiBI
jHrl0x4+IPuZXjHYqfnFhWI/Twx8i/yZ6ZHZdjCV1BTKhSOm2PlMgJmVBs+f
kvXoztfh4XmpepTaKvJd1/eaeh7jS0QlkXfJd3ZL2GYv5CPxGwlaDNMvn39x
DP2jefo8l5LfLSvUv1SiXnnGT2N/WDxZkH+mG/N9LWjVhOWqUbSxLuRf2Zne
hu+wtHuTXUgH1itvNr0M5n+yjpI8wfzZbg13YepzT5dzJfJLnjChmZj8yb//
//+/psv6P7lS9Sw=
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], {7.799714062886835, 7.905553834207435}, \
{0, 1}], LineBox[CompressedData["
1:eJwl2Hs8lNv3B/CHLqaLkEtCNVRuoUlCRSaVdJIzFaUUU1QUmSLpJGdKohSj
HFR0Jpd0IZLkSJrqJLnUKIluhm4O0ohEkd9nfX/9s17vefaz91pr7z1If3PQ
qi2KDMN4KjAMRaZvCP/MuMz//hlxGe3GdfqtsN/IPFaxIZfx5Zh3/Qt79IxX
CIF7NvYoJ8Mpz82srOGY3wyPetP4ByqXGVg49darKXCM+Zjxz6djHNejvnEG
3i+Pyy+EebE1J+JhjmnsSjGcubZo8SLYT9TskAL7brJY/d0U7zUucEyFVe3F
yldh9v3ItCuwZGrpFX+Y5SnWewD3cTI5ZrB0WtykT3CDmqv7dxN8vuJNugry
UV2sGFoNS/W0/e1gQeidyByYidMa2g7X3Z38IxkWHbeTpcBWY6a/jIPFl2Li
78Mav2wvi2i+eF5BK2z3yX5/KlwxEGsyEv3yO5r6NR/mnT1nrAOLLR970HoN
OjnOU2HbwZorHTBHKTuZDZutu1yogny5NWHparDvtt+nzIZb5c/39WL+0qpj
p9xg7axj157AG3zsHu+i8cuXrj8HeyzP+ieG6t80s9eHnjPSyGQ45nyWnwHc
l8cuSIVF84a1vEI/Opznz6Ln0jr1ipOwwDCRfwTO/7QqdRnsVm4xcTutxxqS
KcLGjxbmOVI+wdN+SaZhf3Ze7VSF/ZIkRkdgvd27xtejHslRDSc3WM7zv3kK
ZltPbzaDxVymajksjFuiqgYf3xwSysApwzbsVIA19NOUCo0x3+ZN6r+moi9p
Rg1+sHiS96mRNF+Um5U+LGj8rqgD2310cmxCn6SByxRs4BCnz22Z5JFl5Z4w
V//Ag2CY6TWzpfxsuzeMXAE7Cw4MXofDZ1ntngUXl7840wLLmq+468MVDmti
VVBvq7HtIT045arWBls4YLIyzwBu+HK0fD2cX26SRe8L8j5WhMDiKHOFZXRP
vhTfOgxXsPad2Er5vLzgc5TOe8JnTgycb5nz6yBcXBp64QrMWrnAZSfMfRfw
12NYIlAQucLh7pWXO2Gh8de4qbC8dFrBKNTfekw/uhP5hnl65U6CRWc2GFyD
/z2k2mYMc51cfQOp/t4KdVNYlv8qcTps3O/uyKb+qmcYvUZ/NSZEDxtD76/L
PH8Krhb1e7dRPgEWEa4w93zpyzJYVcVKQwUudandcZTy+2544IUB+lAn2bOc
xgdvi7gEs6r+KaJzb+w8P/QI3NP5bM5tnDvuOe0VQbCGYLH5Llg09d0OX3p/
QuDXaXDYocM3t8BW7x++fknn7JjKyd2wx4NSs79gj5pNzUdh/nBBtzv1yXNA
5zI8dtGJgcmwrVaiWy2ceXKwpAt1puzJ9hiEjbPXzn1CXmJXNgP5p6pfG1cM
87XLFdfDMdudPXLIfZOzomA9DZfiK3TO/hRwc2h8beW6G7Df3I6sKrgvOqP/
IY0f5dDTDJt5afQ0k1/dv/KZ+pe1do0C5S9JLSOLTyZ0075dvDUilcYbm1iE
L4Wd726zfgQPnC5M8qfvqettw7LghsgR/dGw7Ddh/x5YNNAjFP/vHKUJ7an/
42yXX4O145X9qL5pM/MeFtPzMbHSm9SfgNmVN2h+6yZN6rckalZyNuWz9MSN
6fCAUWz7CThMRdXqrT76tt5/yI/6J65WOAtvSGqOnEvfw/Ne873g/LtHzjKU
v/NDF1NY+HnO4zt0TzZab2Hg8EnpfWEwszXidTMb92Aqz9aC+lV7f/sT+GJ7
Yx3V7TzJwekRzG0KNEqiOru/sem52aeEgyvgCh8FMxlct32uxmhYtcue/ROu
UJ/XUIO8BcNYLpOxXsMCvX1nqK53gqylsDTBdNEuWOxvLAuBfW0Paq6mPuTO
PJIBazgWeHBh5xnLx9fCF7f6/LA1oPOiPeYnnKKisdMODqs9P2kKYsrsYdeX
UWTWW89HdDn/zcub1hu1LXkFokzZP3c/Ii5Muxu5SnQyFbFYS7iah8gO4NXe
QVRVc9jlgHhxu7P6O/pcd9R2A0Th3a8Kw1HfxQfVH/qxvpXkrjcb5j9pVXoI
S3iz2dbUL9+vm2P16f48P7CIzk2C9JMzLBCtUl4K29q0SBVg7StXqx3oHLuP
O1aMfqlqG1iYw7Ird5KC4EydsZPp3vKN34WawHLHh8M+Ig95vJZ27RT0m736
dgH1b17B0EZYtkoxKZSe24SvG5yM7xPTBNvZ1E9bfY0CeCBxXlob1hVJTtpG
wDGqx3vOwbKVRnWbYUnM6/hVMFtn+WfvyfQ96lOhRHm/mRcZAptd//FBgjzE
I6pTzsGZj8+NFFLeNTXLXtH4+7lKS2H+nklthsjndUPTrgmwyGiK+QE4xu9M
7XtEecvX1Y2Ikqe+9tcQW53mcXQxjtXw+XQiLNy5K4vmkb8/5hMH287pPUv9
kDf8PT0N9mAH1YvoPEY4HiuDeXnN3pfY9HNsZfAXWGxfLL4JV2v2K2shxqx5
HVSCyPkYxbZF7PtsPuUaYrg4JtsTkX2r9tBZOv/mfy2LoHpWsrr3IToff1GU
RvfA+g/nFYiMQvtdmjesmP2M5q3+6bC3EjG/d11KPtZNsdO0rKM8OaOijWC7
dIOrz2j+Div1ZPSnMMZGswKWek01Hw6z1eexKA+h3o6m4Eno1zbDjDhYZvRQ
u12PyyQWtuzfRHU6au7dCYt39pw1pTpsijUV4b63hW31WEc1K3jTJV3Uma10
YTn1g0nt3gpz4zVjb2Kd/EbDUDs4xWqEzhRYPvgwwRRmP41XiMa6TOerjxxY
Nv5qRzfm5fy3Q80V9ju1k7cdlruxi/+EG2zV7DoR5VnCrHs03xd/80hE6cRd
beMxLkzfu30GLDHfzwqAnYO0/Np0sP9KOgaPYNVolZw7sCR42MzpWJczTrnq
CiwLnG+5H+ZxHd/lwoJxuUHlMOtxjeG/MGfCqL8V6Xwyel/aYfajhxPNYPFY
fqM+1lPV4CtyYWHf17ZNlI+Fio8dzH2mVppNfVj60ZE9mX4P5WRT/hw/u/x2
zC8TffgxC3nlR2hI/oY9/nM3C4T53w8cWgD3VQ5npcIScUBHJcXk/rclND7x
201nGme99mo5omhwiV0p9aW6xOE2+YCCA/WXFTJiYRosfD0gSUberDzRqq30
3oX9FaPgilCrMRNh7hLLGVETcc4WdHcVUT31vPXjJtLv3fGBjrQvix9YXtLG
53NuXy7ToZ9/Rc88tOleD+2bSf2K7AmfAoscLhmenkj3+3Horwl4zi5yZuD8
d07De2HVXL9T/hjHiXDkj0BsWFSR3ojPBV61D0xh+W7tSjdY7mEZ6QMLFPkf
3mohf8EjrRz4YtLXmfvhfMkTN5pXPqpE3wxmSo0SPeGw3utu3ZrYn3PBsmK4
NfdOcC2cH7N6pjrybH0cMrscljPxSVvgMIXf3aWwasM7IZ0D2+ixNz7DPLtF
TTIaP5DnrUvzWwe4KaIPF90trrvD8r0q65R16d7siUqh/MR9axi41dZwZRPl
FzKx5CWdEyOTrdNRj8xG0psKi39j6W2lPuwtOuwMS48NDkuDOZnhT5qQr21C
onY5jc9errcVFpa0tL6BpZ7dW5tQv8f3yNvN5K5xNjzqd+7jG0+oX4Xrg24j
8iyHv76AyBTOmWhG8/yeOXMbPTeJtDiPvBr8Q7LUaD3jWb76cEX63EkXEWUL
Mr7no27n9YkrzGHxIPvgalgkfn4hk/rhZVkzBjFmF8tiPCJfcrTslQbqCCtd
+QdF8ztz/6W4wKekWR31DxXpPiDP52qvgJmFuvPfwCkGI7sk41FX44uQ0bQP
qg5BC2HZPPX7y8ilR+c8VUPf1uRsTNak76njNqFkR1lLJ2wcxj0zE5bxNx9Z
rkV/N7WnDqni/J7oWEx1VJTciv0Icwb1dBjU6bc4ufQdrNrpZe0Kp/AXJn2D
mY4zlnFww88j5yfSfMcjHUphrt2tDBc1+r3lkOtz6lPgtrvHaP0AkeUL+OKk
kuwnMFOVcFMCC+v7SrSQv6DXKS8BZrUqOHvC+dfmd/82gf7erSxKgSUPLnh2
Ij9tk9u3KmFpzekrEXArqynqM8xVXhM8RP1//uLTICzPGd4WAnvMmvBHP8xx
CpS8Q//EM/IK38KiVlEnD5aOqxrKofVqnSLuos/CTWolvvS+p7b7PNh2XI6V
EuXXcX7oDqKfiX5WEvJXjbsqXEP7EJSorAVzOnUNFWB2i0DvKPVn25ot9/C5
lJU7qlWF/u5sl5yl9760pxeNw+cGK4pPqNHv/X9ui1amv3f/uJcM88M/pfuM
RT5jylYXw+Ijm6a7jaGfMy6dHTRfvdUH/micp4LR9pZYj88yuSQahf5b+Ngc
pj6537rTykK+C1JdqE6ZP7s8AJbFtiXORz2i53sOToZV+4xGJlO9P+5VDSrh
vc4fl9ph7snEv1h4Lm0yemaF/gj62QPzYJ6O9PedMHeRUnA8zNl9KCmRzueb
1qFfsPjN3I5MmD/bK+og8pHbFRxMgzm/9HXGIV9pdMORAzBPWuV3FhY8jZq9
BBau1NJgoz7BfqMH37C+4Fi47ilYmh24K4HOfcS3+R2wWB7nqkuOKXOehv4w
X6ZYJtM5eL0vbA4sjWyJHkX1HvLJ0IVVfzkZ7KVzaT4UVEfz66WN/IB9EWRs
DPCGOR76Nh4wj/3f+DLkI7R2+3EZ+8QLPFzSjfwlGTt33MM+yTSyd48g39ZZ
8gv7JDzTV92PfrH3Z0f6wuyu60kNI/Hc+5lnP+XRXXn48gj6f5Ak5Tuw2IlX
HzYctuqqukH21+pyGYY+uVeVvIIF/+YPzFTEvFs7Fc0xn+SIhtBUAeva835m
wNwdP0YsZjDerm3LXOQjeVWQPGLIgZGxEm6/J++RDNYPOjBijeiEVOTPLg9T
V4TzY8L2zEB97FOn2mIGML6m59VhOpeu3SX+MPvsy7PPYYnOk2/nyEz5LLrH
/BnbD06h96WPspfTPe2o12mCmdEDd/zpHpfkND7+5cDIPzlP2EX9LTCVvkE+
nFYtBz6d17wYWTjyZc5crLam58WPupRQj8AseSN9b4hNTtUfofquz0lIo/04
ubFaDnNVpn2fRd8zCoe67NEPdn3Kpx2oRyjvPL2N+jP9g40n6uUlyJL8YK5b
sdp89EdekrKTxssGpCs0x9L/E5UdfI/52HI3hR7sa77CMz0vmr9hn1oz3ZNv
gyE5yI9dZPHoA53b/svsbOTPX2y/ZzTMLbSbU0D1KmqOWUP3Ij2XF/MTXjv0
pgb7zPeweT63H/3c27xlD8y9Z3W1odeB4XZ2T3Qln4mO39uD8UoKm9bCsttJ
ZiZf4bxnyXGwcCj37a8vWC82wfwLjZ+dFqTZgfdNn9TtpvUqXD0KWh0Y4WzX
h2rIR9i7aWHHB/ju8Yn3YWaFr92zd9gv/QydA6iHa7hkgqAF86v5l85BvYz+
s8H7zQ6MpOvQUAuda0WbwApYdr3Gaz/OPdPyZV9QC+WfPacXFj723pKJ+bhe
lXoudK9+poe7YD3Jibq5e2EhZ72N8yeMrzaKCKbndZuPhfyH8R8OPF0AS94v
4+e0Y30HL/NGmn/NNaPKz8jvRuSpxeSMr1svUb2+FopRyId/TskgUY56hv22
WEz78cA+TKML7ydZFaahPvbdspBlMHf23Y4o9IP5vW7IhHyrPGAz+sWWzjqR
j/e5Qzqz7OmezVyQV4T52UqOy9h0z/5QafXA+rKVq3Zo4p5x1y4MXd2G5x+T
Y6fTuZEYav7zEeupe4R74FwI0zMl6egHv1RyuhDnQihbsnLja+TnFxu1gM7x
7imNg08xXndbWxfOCaPAL5Ddo/3IM3lEpn+i2/8fGe7/AUmjuFE=
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          
          7.6718816067653295`]& ], {7.494640698831852, 6.058285249151383}, \
{-1, 1}], LineBox[CompressedData["
1:eJwt1wk01ekbB/CbjGVEyTLXvmS5lkSoO4Qr1VD2jGxjZMseZWRGZc8uLaKE
Swh/GY2E7CrZwh9JliwhSaWIFJrv+z9/5zjv+Zzn/b2/53ne33alnE9aurFQ
KJQ+/JORsvgdf8oMyv/+5Blht7Jkf62Hx8U81PrlGGG72+Ku/AEvGHzZKJdj
UPbO7+Glkflnh7lyYNe7/I6DSgxKmSqL3U1YyrdSJg4utH+pU4DjffbPcerA
KXm/29XD91JCE5cVGRSOY075rzBfYvrDTCXcqm8SyC/PoLTd+nkpApa09Esx
RT4BvUeEbOHBF4MWFxE3XOLR0IYNjz5s6EPc/eBQigJMZ7l7j0pjhPUaPpvZ
AfsL1bHawwc1AuxJXNJUPS8NZrh1J9LJ+XcxOztoDMr9/tRcM3J+s2vin+Em
B1dXHxIPT6rnVWCE5Tq9sEok8YWz3pLwPunR7hI41kYsGaaYuj9U7IBppUKM
7fC357X9U3D6m4HDyzjfg5fcQStwYemEWBfJJ+rilk3oB4MeVJeB8yXNSLBS
YOa75aLjsM3HQaNFzG9kOdskDY8F77AdglMc34tOkv0xZt9fAXv8Yj2XC7Ou
exVGwbNnaIc80J+52SO1RrBquoeAJuKKj42V2GBzTr9JLrh/zWhLLfKkr6zU
vcd+VNDnH/vCFB1OuTFYNt7voxhcZlK/OIr92S+7ptWNPPydvpq/hWeF5fWj
YFq25302nG8jgfUPPZhybeGjCtZvXj+1xgIbhmhpOsNeG0tpPZgXu3FPKQuj
aZJjUhFGm6F3guOIX+6ySU8m+1r15YMM+lNwOHgiFGY2HEr0JOt2WaydJXHz
XY+KET9fmzcfBTe+tbo+jXjqafvd12C6KJ/9T8jbe0/3cCmsStN6ogOP8QRk
dsKSvvGyx7B/j5iV7+bhdLkcB2eYe/fGDm6sE6ti890R80NSRtMVYQ/BZQsT
+GrxHy37YaeID4dUMN87QOLEUXjbnuOnNyNut8B7yQ4Oe9v1jeyvzNnip9ak
X9t5/7qCMaJmn9IvGL/Elo6S4/QLLhkqYUzfv8OQD+PevXG2m8n6IS0z/ejH
zW/5MqRfXwQlOzMwSvdnr17GuNAS2e6FUUHSP8cEo79atcUBzOcWv27IAg/q
HrVQxJhUVuZK7lNag4SUOOI5mf7XXOAw1y5/ScRzZ6riBGCq+jU9NcR52H58
1iGLfsnqjZjBUj6bh2Jhp4SL7/6CFRTcC03hqpD7EWXwjY21KXGYw+at4nt4
yCOj4qsM1r8rzaeG+i/zypdPwoxWP1oQqdvq18kBOJbqqfMAXnkUWE5MTxxV
/Qon1xzgnICdKsb51NHfLuWYQ0tkvbxwE+wPZV3p9nEekp+E24NoEq+NWleG
U9raWjIQ55CnXzAh8ZdV4bfg4VU/c1+4UOivwpuYnx8wXR0HL6Q2FMUgbpIc
YMSEJVldmG6Ib/URflpKjt+zdJAO8wl2BZbDDO/a0U2Yb8YTMFtC6k3RFHpM
rhOqts0N0g+LAyu4D8Joa9cvhMA2hQ+zDyDenCjVYQ5/+V1Mhx3xuApXHhHi
leZn3WT/Yt7UD6M+Wru9fA76569X33CV1FvtEX0OvvMpwsKQxLMXa93hVvXv
y192IB/DWxu/wRuhl6yLYFU2vR4XWObxvJADvM3Aki0Y63fy33nKB7de1Wm5
Do8wTZt7pfE8F72Z8gTzRVQ3LdyAacnnj35HfNro75e+cEpLZqQu8n2/6nDF
GFYVstSOQD1+fY2Re+EqjYHfniBe3XsnRQX2sKXV/Yj+6ORdYleDy9prGUZw
yY2lYh3iZEWuMPSz1/FKkyU5H5UjswT+Rc1OyQ+2eWy22AnHa+wPSSLxpKHs
MRw/sHmAvxSOVXgy9ArmyV4+8hQOlvqa8AL+eMYxehY2VzYwboKjzh+zXocb
14Qcsd+U/zRJ53Ki/saaw1k+8Bb1knIu2DzR2FeD5LNmYckCVxX/ehnPZ8rp
qOaeeRw/O5ModB/12X7WFuiAJasWVXD9hglGtt7IhJnSnSs/Yz7fwAlvN5iu
ae7DiniCvA+fDMwQTVIfRD+3uOQlD0sh3wGhyEr0u/MgXTUZrirbzZoHZ9Ad
LujCFO7wBvI83HVGU/uDJOI10dsKET8X4bmUCy/s0stpgKNoU7sd4Nl4ht8U
5mtPO2iIwT2F7H38yKftm1hZtwTiU98yTcn9ZD+xNQQOY5dWugifi1o31YUb
5RlRfbDs02FeYbhKdi6Kiv4sXovr5YZTxhoo9nAHXfT1T3D6ba65NNjhzudU
TTiY/W0Q9ovi5vBpjwu8UKljsAx3Rr79/SasylHvy0feU5b+wiPEg+Ol0oqM
sNIf+FN4kG/jqrsHeS8vnw/l3gmPF0+WCCBeS+VcPASblz/T/Yr1TrtJz9jC
20ZOxfTCSYyH4y5wuvTpaCbM58V5mFjStfueO/bTjb2I8xis+k/0gjzi5c76
qbpw8PoLs9eod8ptcVlIktxvVZRC+NPx3ut9yM/p5g9SvnDl8u1IR5IvW0k6
2d8yraD15+K4X6n6y1thT+qlnQfg4OFXZp/Q/5LhbSO3xTDv0XOFSXL/qGTR
OYjjeFzxPqNw1ZpleIni+haN2PWOPLfv3DDoF0H9yeNcHFjPe8yPeliEvD8K
nu6C3ZzjfHqE0Y+79iXO5H0W2t/mBTNtD9tkwX1K1i0isPnfWYLjsJpy9dSU
ENbdmzspg3pTfD+Et8Cz8sGXPeEY886eBriqJHO9mLyfXDpedcFMLdsdM7DT
nwmPFsh8lYNmVOxHU/BYmhTWD9v7s5YerGRS1+kAFyqzyJHvLve73UczYYZB
2idXWKObbXQUpv3TruQMBytpU4VQD9Wqm8cCntD972cjWFXcPGY3PCRuPOUN
Mx7tk+GAowcm2UPg2Pt9rP3IRyE/0DMQLmPrqU8n9/N7prA1bKj5WdcWnnA6
YiIB08+fySfXq9cZ399Iv2j5HyWG0I+t07WdpF8MmcpmJtzw2E71I+obPGfr
chLuCfHkPQG3fqIFGcKl7WzNPVTMz7Na2AlfCamgqcMeCwKqUrBRwf2oKz9h
vw5xzpPvr+MqCiorgogbhyqqwyP1q1YusNN2VX0L2EeltmlEAP3bZDUaAitP
nMw4AXv0N/Ddhf8sWtJgh51c9ILfk/uvPG2qjh/1dW7XVkM9qZV5rxNhxrDc
kSC4+pvV0UC4kdsj5AHsntPLdxq2ee5ZRO4PBV371Qtwa03CK3X0U659vLeE
zBfpTHSBz6+/ujoOz05fPRsDi9aVxovh/I1u36lZcNaZtIuOcOtDM68COOjN
VZMskq95jRwTzk1QOP8cHvSaq0iA+zIuKf6AepkOXMpesPUD+VlpmM71zz4d
uIdLmmcnnC4gI8dOvpt9hCclSVyE+1o78s0eNahew3rj0q9j4+HXtVVbGmHz
y7dkD8PU3jeh3nDhc9O0LbDW2stBClx2OXymn3xnFRTMRaCewsTA/ny4Pmz1
1Gc+7P96cHU4bMdzb94B3nbc18MLjmozs63fjudreDyVfE/rdy5uloCp7GnW
7nDkzs36UbxYb1pz40+Yx11r5+I25COQo02+xwe8Tp30h9NTa1Jb4Zfk99HW
//8+UmD8C2I/2MQ=
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], {9.103045906426606, 11.061782017479374`}, \
{0, 1}], 
       {PointSize[0.04], PointBox[{4., 12.5}], PointBox[{14.5, 11.5}]}, 
       InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox[
            RowBox[{"C1", " ", "N5", " ", "T5"}],
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->6.137505285412264],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          6.137505285412264]& ], {10., -0.5}, {0, -1}]},
      AspectRatio->1,
      PlotRange->{{-1, 21}, {-1, 21}}], {0, 44}, {0, 0}, {22, 22}], InsetBox[
     GraphicsBox[
      {Thickness[0.005], LineBox[CompressedData["
1:eJwd13s81NkbB/BviKmQyn1Zl9xCGlIryox2imJrlNumUC6NaxKhJGFFFw2p
FAqxiEUakugnkksXcimVjaIarWJdMm75fc7OP15v5/s953me85wzqB04tMtT
iKIokQUURX5S4/P46DApGsFqJpVtFnHgPpzvoKbSr8+kIt1DfYPg2rwHQ21w
9BvPn7VhE3FDTgssQn29/FabScUzxuTI+KNNy8aSYJ3bhiIfYA9t6002sNTi
oxXzZPy+l6M4zEw8bK6D9YTqxD53aDGptjKe2R44RSWDlQObbBz+5yJs3nHE
PxKu3KK5qYO4PnzqADySpdQvY8CkntsryuyC3Xgah36HjejBJ63JfJc3e6fB
1f7T53bAfKrG+zUc0eRpsAcuTZs3XLaGSbEv/TXjB7MtO+uZcOqDy5v/gMNU
hI56wUaDFvJZcOpcxMJTcLyIsP8DmNNwJPsCLC3gqb2F+6IqBEnw889FyhNw
d5Dy2nhYVs3HYzHy5f/7bCoI9riorqsAd/MDfHfDG4McP6nAXJOLy/Tgsh+3
3ZVhqupF2wzirToS+1QKVnVY09UI8+r870xhfqea3ONJcFPmY7luOHBtyQZn
+OdvBZ5FJN+AzhhtOPnVlcOhMPXuV54A9StO6TtkCkvtDB9tg5Us1vC/a2J9
2qhSGax1ujy3GI4y6CzPgKsa0nLc4dI2244U+Mf/QubkYMrJWzoV/nSW2/pM
A/XvCr2WB08HT+uehjmPe8Xq4eQQnZktMJ3VHjMIX0+QHVsCm7isqFcg+9VZ
evzNSuxvi4vMLtiq1Sy3DFZd8+EoF9Yp2aV0Caam5XLbYe6br+rRsKBHd70s
6lV1/t75cNjq4fBtJ5gz+arhGFxbfqTwCjzrNPs8Fg7zlHnTBtOKbthehp+u
uyi/gI58+AP5f5H5JbjT0nDQbPpYE8wybPJaCVMmVdqfSDwN0YN6sMect7Yw
4o9yNrYxgDO9p18qwx62d67owpuzCoyMYauAnhVqsI/dCXcWyT+8kLUcdpCz
breBBWeeNM8hHq+3+ibE3WU/1bTC3wLvFlqQ+Q/3RKfDou4+t/RhtoVpIOnH
lshJZQkyX37X5Bo421hvXz/iM7kVwCX90mfsp1NK6mHomfYE3mP8PSsYbtst
a5MNRwpUNhuR8ViZpFPwdKNm0xd1JiUfuZryhcdDZHQyYUpM0OAKZ0pfOWoH
6xypuOoG01PcOxbBfa38cn+4Yq/V7jo1OHikKw6+XpD25STsdvSlSSG8a5j6
nQU3GSkUkPN3bniH3DJYoE5PkEL8FSt2W31Wxb5sYQ38Bte+XPpXI8yeOBRN
ztfeyeH0Mrj7FG++Hd66mCGUD5f2O48uRj2PNS5xziPu1egj9ZfK9HlQAqeP
2qlakXoPvP/4P5gTWZ+7H46+nWH6Eo440ZdwFC57/OHjCCwuJiobR/Z/XGZA
AvGdE33TcgGuXnNRQQ+mdx3xvAjn1EdwtsIpJ6Q+cOE3qlmP98EmvA0R8XDP
dMquQzDv276iY/C5NO2D4fDQ0VF1Dhx5gFN0DBZpsn1oC68/dl4ziDw/fINr
AkuK6Ju5wvpqK+4qw1FfHR9awKnspX5CsPS/vlMKJJ5KlVekXzqXH7zAR/yp
QvXt1+H0lOnkYrgvd/+iYLh48oKfPxw19zbMFtbaW/lcC5ZaN9tsAmtk/LLt
ngr232cbg9w/0l4bZ9XgMNO5vFXkPBVLTpz9Gf3wItvRmOyPl6znjDL2Z0OF
ujWs9F5vSzCcP+7l5k+e1w3Xn1bCPZno++9VOOr1Dj0uLH/khjWJ96m/f6EJ
rOM09Wgh8uluWeI48RPytRRmasHp9hlijXDqmD3fEp79e1HNX3Cm/uoYb1i/
9XZGPtx5xvZlAlw7u2m+HDb+/oSXB9tt6Q3tgDe+X7qkDqYPb5+cg3sO/Pzl
FTm/tYGfDLH+xnmDJD4sb5dt4wuPbDoWMgaPry4U5MLpJ7osBWR9f3rR3zCb
9mnyO1xaccVSEvna7W7hDcN7g0vG18KVyUb/fIB5d113WMOxNrPMF7COb3OM
LVxtG5l4H2b2c0JYcIR3S1c2PBQp+USd1E+WYUL6J3C+ecEQ1uM4dn3xg1nb
TQ5nwtS+m6t2wVzWrKUFbBwio7eB5Fsbd7IN+Wkc2L+C3FdNVoWNbJhHq+BL
wRrXO30aFBF3Q1a8MFlfSqBnBDNdTM0nsR82/+appCng/EkZMMbgHsGrUyIw
/XVy1AzM+047EySPfk2kCcTwflFXFmNQDt8vZVk/5GDjbaZsP+LMxztXw/l2
pwd/yOI5g4N0sn+qrODUmzCPa1HhAT8drDbYC9Npzi9iyX6eUCxdBT/q+eHw
J6lfc4OlOGzV+EKiiZynsaqtwjDnSUQV2S996zZdCVj6oJ++mCHqYeRQrA3b
rFXdrg7L92T07oRr084qbYCl3wYxouG2+WWvt8PG/dYfq+D0mYpBB/iRRHXe
hCz5vjMY2wvHb4u2NEA+8e1nu4lVS8LT3OCnPw5Vk+druTn342FmROY8mS/M
49Kqm3BnlsomU0NyX10cL4Ktsvm/apJxm0XdZLxNMllSAh6/PrkrDlYVX31v
FPn0VZ69uxsemmwOIf3J/E3LSBzm/qoQVU3qqZnSWErqE5MvdZP022zc9l9h
1mMG+xws7nXf6rEMk/KbfG8dTt7fmjiyEc7nDg36wG0ty0duSeP3axr7yP03
sHluhzQcfyamxAWmTQyxTqxAvPpVqWQ8p/WRxJflqM/K1zfI+7GrX9W4wB4p
VAKZ/1zDLbneZTgv3IC352G3Q5KeAXCtxv5PZP/Yy5faLyWeMmuqJ+f5AL2v
Xgr5JeaF9pP+UaUZn4eb4qyfi6AezFbJPF84ZYqXogVH3V9Z7gJHXPuaaAmX
fvws4gmL7LdI8CLuuhsSQZxY7BEND8jeWZf93/hJ9WuwyeDQu3Y46tSlb0Wk
3nlXri1GPHvzZrWrYKu3D6y2wEU9vgcfwhr947ci4UD5oJg6WPDFlFsG99BW
JtfAfRb7qL9h+n0jfhmcMyXsOQ3HOiTI3IQrD7YWi6E+49uCehPhohkqRAh+
JH7TJBQeUvKWHMTzqX2+v+yDWfqp2VVwn1jY4s1w4LVMo1BY0JI0RPLPlF16
VQX26+XLkX5JyZY/VY58rHpd7k2Q+8Dwd3szeKPVvoH3cHxFwW+cpajXSNnp
dnL+Lx9XtJTEe+ZD7uT8hC1IFP5JAs+rnxF+RO5L4UV+Q0vw3mFOeQPMKV34
on4x7pfC8wnPyHmtLj5csAj5rPyD/Rau3P1+KoeGPOy2Z3yjk7+z6oxqxHCu
9t9uFkV83e9OVU+K4lzpqcyR8xdlrNTpBIfts15H8mNXntLuX4i/V0tus91h
iv73vStwquVWxT/IeY1VeR0Ci0iO2/8Jj7hv0DwOj6S7P2uAadZ382/CvLS4
vR9gJ4XaBV/gtnuec9Nw/sunVy2xXp/h3XZJI9xD7O5Bnii519voyrDVMVbT
KsRrc+NSjibsdG1nTQbsV6gm0IZp9SV7aMiP/2zUWAM2GW1J3g+LjMTfVIQD
94iKZ8N250KblsBNH1v96mEpxcWuAtJPuuyMWtjKssz2PYk3RXn2Ehy7JbG0
EW560hpjAdNXev9J+pG//ltvHdZXmvjTLwl2c3EL/AmWr7tqTvqFdt3MbAfi
p1nW2biS+r07+cwV+XKjo0rJfVNZuFDcQQRxht9xI/cNvyPm+y/C2N/ZGu01
pL5v1F0lhBDvC8e0VaSfcs5efUfhuZmTsrrkvIUGbOPMMyh6z/NyOum/AkGu
/hyDajPf4bAJpp/p+Kwww6AC7fsv7yTjq7pEzacYlPGwWQ85f332Y3U5kwxK
xELWkZy/zPU5uo7fGVSqQbZ4FplfXWOT8wSDCrbM7SPni5vlU3RnnEEJQgSZ
/WQ+FfZDV5ji8JctRD2jSoXcneHuy4JpUn/VwWMWN2B2T+zazXBb8Xo1NczX
/flBsTPsZq+zpROWOnc2LhCWenVhtADrNyW0ikTB9M+cRcmIr7roya0EuHQb
q/C4gEF1qm9cfx7O7Hs+aI98WLKiOWfI+MBUiNQ0g+p540iPhkeEyqzSYVUX
U7tguPaRvfkQLD9bVLufOCnn+gQ8YhnpaE3iYxacLYWd7uupGxHTNHfLw2FF
WpZyMHsd/YYe1vOL/To3Q+ojKx87hPiCHYKjSb+M/OD7uCF+fVVXWjOp/9eT
ry8g//SBpOI7pL7+Hopxo7DblSPZpH4lgkb2CIOKOOygd5l8H9UFnPzxD9av
jTp6gfQTx0WU9ZlBeRxaUU3uI7cAO8WUD6iH9GrNFPJ8Yf5p1R4GxdH0SLtB
4tnqHFfawaA0REuaS0n/KGqprGxCvZw7VUj/UuYPNrSXMyibKUY3ife/T1QN
/u/Hx4j5f6qQ+Wc=
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], {5.832073615444045, 15.362205769443019`}, \
{0, 1}], LineBox[CompressedData["
1:eJwd13tcy/sfB/BvSoZkKbVSmhKVdIYwnGMjlyhMF5ZLTZJQlEKhY5zSdKFC
F0XLNZQm6SyKVNKRLu5DFLnMfUQqxe/1/vXP+/Hs8/18Pu/3e999v58N89vg
vqoXwzDDtRiGIqP5jT9bIcMlmAkZ9eHt44ph4a2ahg+mQmbGmqd91sGSaztW
aWCNjXE+Fw75GJ3VH9crU5RzH42EFzHLp8LhftVvU2HFwYdZsbBqc5nvUlh4
asXaVzBnevEUW7gxay3jNUTIbH+5qPjXCKz7UfniDlwUJjzRDCuiPmktNRcy
xzu2bKyFuYUer9Swf7o1pwKW2j1TbbHA/y/d4FbCSWYZFtpDhYxoj1ZeHZkT
ZbYbln5L3NIC8w6Wx3fDnC7Bh06y36VzfpaoL0PiyEE+5Y9TAi/C3bkNvElw
S9P4gK9wzQHuzSVwbupQMz0u/p/36OZWWHT50whDuNTqi2EazBYMTdaHO9bL
8/JpPUXnwF+YL/43/0Ep9UNjvLgW5l9Ywq2EmeA7WjL4zzJh2FXqR4jv9Ymw
XLzT8jwsLbz65BnybbJUvaD1G1fPVO2EWctnvg+DeRuiImzg6Irx92fS/u2r
wurRj3tGk0/ow9zcNy474WUO+8oaqJ9t0YbTYf+bzxviqD9zzH2M4BZpS+00
6mdwyO8u9NepeX5tuw3yl33q/kF+EtB9FhbaNG/Sw/VJ3wPiV8K8GFUaH47m
OyVYwhr/t1nbYL3Q9pfPh2M/vX1375L14ifnwdys4YqpyLeKnd68A25sNnmj
hLef/Vi9HGay7++divrLsysiZ5GbB7pQvzwn8AZNhiPkvuNHo78c/xGT+TBL
h5UZBgfdfuEopPULT0qLYfPW6hoRLLv+9mIb7PZkSmwgXJM3YKbdMOS/wV4e
AwuNWLFesCIgYNBJmBMnc9oCD98punSDrtfnhiXC4dMer1bD6ctZz9JgW/2+
33ujXk4hLy4VrhlqsGwoOTigdxzc+G74rT9g5s+jojA4cJx1KR/uEBXd94CZ
Uyu7JsLyxhLxaNr/2m+lAyz+oHmlBbsdMU01hpV/nyy9i/wd0mqzv2P/8qeD
+SdgkXW6x01YecP23wi4+4BvxkGqv40dLYKPLx14SQyr1xSXOtL8VWvdB1N9
Sz/+OZjGV26cXmeN+6XOI743LN1qfmgXzLhl/cfAqusm0RNpPORNbh+63lr6
xycr1Oly3M8MVj7yK8mFGdNpxXzY6WS38RpY6lj1fgV8wD9ZawwsYo99cgBu
ZPJfasGcq+EdDfR55UQ3NKFOyZI5Kw0QZxTor62gvugndS1CNLeY/qkQsdxj
4sYjiC5BFTbnEIUNLWtfIbbMYwddQEz3couzw7rpI20vXoP5dYn7A+GsIXPT
H8IdN43+lsPHvbf7tNF6fTLiGuC8kWONDBHZu4y8viFur1xx2AmxI3JQ6wDU
HbFgcq0X5T+mPH8I9WHJoY3hMK9n8SkLOOmT7669sKzz3BQjOP1KHuco9Sev
2ZWBhdXOqfmUl/VUm1Zad8WkggJExbavYVcQS0VzI04hBiZXjjmAKI4VhVAU
KSuSA6hPKeExmxFViaffTkRUDng9eD5ixIU7Gf1onTOGH4YgNuZVfWtBXeLg
PROeU/8y544sQ9QcqtmWTfW+Z1vlIMrsU+PEiOqEvJi9iBydFav1qX/LHifv
RuR67JhYic9FHnqMQ/evWxxnVCRcc+ndpgy4aH12wFiYr3M5vgiWzpA9eo7v
ZdKmbZWP6fO5tsswGOZa/DLsj7xyNxTt7AurOPZ6M8i/EiNL8D2Xbbz7/B84
xMI/9m/YtmxkdA3V277DxxvuOPZFMZD6Xfvu9hxYs0bVfzEcWDb1wXxY3HV2
QhbMUq5JCID5IZVvm2DJ7DbPvbT+wrD+JvS93vrrXQU9563OXHeh74nHlxgG
+Uj07qeHwGLWasYZ1iybuy6Rxr886bUbDvHOPHCE5msv412n57Cp98tjsGhg
oEc3rL6te/ww7GBytIqe+7YJNgcS6Hul01k0DFaf3fIylJ5T7CMHR8CSy7Uj
F8BBP4t8aJzbU+s8Apb+mBxiQN+j0ZHLO5G/S9c73kesH+hoWnkTVshejToK
K5O336N6VRJ9e8qXa7fvXSjMPVqx8A7qkwz4Q+BG39vP7VJ38sPpD0bDvErl
Hzfoud7TFcih/uhFuTnBql5GnnR/i36dMTyC57piUuMeMttb+yUL5p+eJDOl
fFTHDSLxHmaHsj3H0LhWVMlXvLd5nzMiPGHxAk1qJFye6a5Hzw1bg/VP2bBi
vPslJRyi3mZyGecEVbhWYzvcmJ6gtxV2+bl/Pj3HWYUF5+bD6ZtTfkvhlrIH
7ElwzYqc+BrqX4dhAB8WNmek6OM5qDB73NcV5hzqrhTB3KY3SevhXMPK9gQ4
Iob3IhtmeR0SXINZ58sXPYFbVhzV+UDP1dhFzebIL9fnzQA9vOfKp9k7SmAp
+30yF7at57fKYfHjsr/sYOVTl5LHdG7p9uCPoPem15PzfdEPleoblwNLljlP
tYdd5txjMTR+TOA/CZY9Mglsxn7Sa1lNTrD8glJfSc/5ihP2Q2DJ6acGlK+y
O/Tse8rHJLh4OdxydmPWSVjGuuBN7w1NdTdnHtx4q7+3NtzYW63/nOoJT+x8
gv4Elv5rvwpmCs6ILlM/x5qWNnHgw1cd6X7t6HtnvyuclLBKj94LmvbtTRdN
kJdm3s9kmp+S+9kSjsgVZh6i90qOgd1eY6yjXWBYQPd/5fUSHVhdZDGoAU46
3L09djDqNd9c10mfz2j/RlNYmWWu70jvvcWRoVeMUI8yYvJaqrdl4YotRnQf
Bq/Oo/qSuhpmwpIws6CvMLv7L7Y9zP5o2DEJ/VPfXHjAGu6YN/GslM5lmxLa
eHDIHnPHKpjvou5YAKu/OM7thXON+klZSRQsig5j6JymiKm9UAwrLww6EgC7
TPH80k7777pTtweW3X4+ZjLyTZ9UdyKHzkmfdY23w6y6hwo6p6kCfdyUcODs
iW3kGsfOsncw+0X4u6O03udQ5UD0g9ntLkukc+Dn74bDYX6iod0GWDKy1MMG
DpRHxcyhc2FP1lUDWJEwLGconfPiKjepsV7HhKMXNXSOXV8RdhpWX68f8v9z
7NlzqV6UX+K2cQep3uGClE/Iv2XaINcgWHbStXkz1f/tXuwcuNHG9+gXQ+Tt
UtPgCKvm+8X7wZrZtsUWdK67eaagbhDyGj9mnQlZ8t13Isxb21pgDtf4/vx5
zAD5eAjrR9O5OynougmsShalzoXT/SyKUtmou8lAshFm3XCYNxxm3+EPOk75
ByX27B6IvHV3jn4Gy4u/aH/Ux/xi4yaqN6RAHhsFq8XbdPzpHFoozp8E81dY
+Z6l/niWqLiw7PSbxK90rrVMLuTBbHWw00T8rlD4dAlXwQrJWvYW8u157BJa
/04rW0G/Ux7MWGeD/Zl/Nq1rofEpLPlRWK28fE7XDutaF440Qr6BMx1uD4OV
dpHPF8ER4RVTxsAhmRLrg7CojN3oBLcYhl67CUsbIt86wOw0ubqNxoOivc1g
0eJRswagPzXVG3x/YT9ZWpWdEcx898l8DCfNFubowryF2T2UX4hORkIr5vNL
Lxb+A4vSok+fgcXPf+t52dJ7zzJ1GSxPaQgaCUu/2x/8jvyVg9pH9lC/7vY2
GghLei6FqqifGv/U/qjfdtqEGZepf9ZTnL7qIc9V7a6n6HeGftPrm/2RT0nV
g8OwpuvDhCP9sB8zqTqb7s9v+16G98XnqD65m+7vRreFiYtZ2K+6ot8N+l3W
tdljfh/0cZ/9rffkJOc4iS7WWV/XaEa/A4/Erz3QG/OWdhW5Uz2XT975pIP+
duaXJNvSuUFkFAbzfBIe3KfPJyzqjhUs3l9Xb47+JenEaHq0cV/NmuniD/PO
uO7vhfH0hPTW0zQe5ec0GhZG5Xq+hxURXtURND9gwtYR9qiv57z6GczyqQ/z
hlss8+3EyKej3vjiLljhcN29CbZdf2VwDix3mlPmh/y5T/yfXoBFuyRnX5B3
addegkN+9uR4oF5VRpxJMZzkbVWeD4slaWEnYbbZh4HvYJnZUiYRlnwfV98L
/RJW/XReR358/0QbxjWvX5k6U35mM5tKYEm1ItuY9ovMCfaEbX28LdV0/5g7
mFRhf7Fx0Y8SqjdUsaA/5RPTJ3ovWeLo6Ij8+a612oGwdP9/grGoV/lv9D8u
cOOp/PlD0T/e5oIbdP8qDMaad2khP2n8ZBu6vrW/QT2D/tTGP7WGy2uj62b+
FjBM9c+pjrBkV0Vmrx4BUxMwK3wGzJT2tWvtEjCcC6amATS/oSinvQPjeRs8
Umj8NmvE3B8CJkLXo+kGrffSwFn9XcDIBL0H9EZ9XIn2btU3AZN7+tfn2TAz
YZujJSwZbeq1l+z6X6+yNgHDH2ysvk/9SeueXQDXfEp1MR8Ft+g++wxLlSlW
vjBXcffvTZgvz3WdlUVecMPCifbr03DlNiw8d2ulRbuASSoyed0DMxfbpg9D
frw5OpstHbCeZ0GmI/JXbNt4cDwsdNb/OK5TwCj7dLYIYAnrEYuLemXBr9dP
hbnl4qoXsCJiaf0YuOVH3pHgn9i/Mk5rCCx/3WtREaxaKA77Sfm4K1blw8I3
lep7cMsoq0B3mK1btP40LNdViOVYT17dNGMb5RtQUJiG/QN3ZVa70fzE3UF/
Ir8WyUV3Ls2foKk/iHqEvl/HdqA/wmwD+3NU/7t90Q+oX6Ur16V8xfUJUVZl
dD+HnE9fqBEwrAbnlHy6PkN7Xcd75M9e8i2X3O4ydvYbzC9J6Cig/g9YG1H4
Atd7vn9QAUs/9DNUNiHfdbHzntP4nlUrqu9hfuCQY/2on1u8HybWChhbi7/P
/UXW3WGQdRXzh6W+iCAHVYU4n8H66oU+l8j0l1TGsCg6CP8HlvqQEA==
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], {6.057331579087334, 9.525685965145556}, \
{1, 1}], LineBox[CompressedData["
1:eJwt2Hs8VNvfB/CNZAgJlUJIMbnlFp5wZupESEz95JYkl1y6kFPOREW6HDqU
hAZHDaHJzymppOM2RCa3phRDTglHdHEvcpTns57X45/9er/WnrW+3+9ae++1
aPmH7wwSpyhKRoyiyJUamccfnUn9358hk1oQ2/igA2bHHCurMGBS5cPLunNh
QWGIYiy82TK03x8eel14zRkWVqc2qMIp9XnBOnBJSUJXmy6TiiiW6ZODEy5t
4p+CheaPRBJwCEtlsxFccqPXnwY/0dlq0KvDpByGP/SthAeydIyuwrzdavIb
4WhW78NdsFVg1lwA3JRv2qMOc/UXb8qAVy+utBhfy6Q82+sXtpH+H8uKhDAv
pc6chnw4jsesqmDND5Zpm+BIzQ2mZcSRXjNR8H2pHRIVMPsiP6gAPtv4zb0J
Fsrvt2yCAwvk3fuI1xxi9MPGnSNVFIlvJ71vBO6zip1bDZefk9b7BItMpVn2
8Jjf+fZu+IVqyHAwzD+8h1UBz1b/LX+O5FOnVHcRjot9Y5sNs1xGP7rDOrqm
TjzS/qeq+jL4J/f37CKYvZam/Az53VZsTufCgrJ9PWfhNKGX+AW4pNvlFqmX
z4qIqv3wjEbtn5P6TMrto3eAJRxSKJgqhRWu2ut8J/knvrKOgSfuhtY8giPY
FUIXuFAu3yscFjDUj62HyxZnR2nC5V/yHFbBea65z56twXx5SFeowhcLPprF
wSGhD8/rwtXbHwaZw/yb6veZMNWyZGZEG/1/vl8QBEdYfDQqhccMaQZpcN/o
j75YOIEp5D6Fx2ZHwrxgGuO5FFkvcb/8eYEB87LemdnCel5iYaZwb6TryFHi
yuxUEzglpmLVTbI+Ul9+sYa59JhxIWzztPGbK8y3Lpwdheuer08+AGtaqLuJ
o75phVKbkkg8WcoPFsLLKsr234GtdorFz+F+A/0dJi9g0Yjmy344ajdLNE7i
S2Oyq+AFQ0v/WoR8S3jPBy7AWebJJ9RhP2ajrgtZ/9IeemuJh9VapeEX7ku3
aZH6nd5cwyf5Hrn1RQE2DpxaHQWXLo5/PYn+WapMY0OYZX3QuQk2bufIDOsx
KaOjD03TYcGND5nFcHF0j5Q7yff0pf3R8NG9ZnXyMLXon+NuMNWcXVm7Gvku
lbazgVVu22UegQVpXy+awhnmklpaMGuuN8wS3nivUbNdC/k9t7N0gt1Odthf
gNlK/IJQ2PlVhpgjHOdp03wFFsUE7FsCiw7UWz6BOeVffgxo4qpWofyDxDeY
9b4ejhhXcLBCPiVx+il3YVF/ZdYRMv/1gc+KYH57dm8hnB/74e0d2GGNQOMV
nFTaGVpD+uOdfvANTrELvtJJ7t/dE6WIepZZDi7/Cod0cpvVYVOqPUAF8VBn
ltSR90nU89b71vBY6vWVpP4Zhm3We+Dyrh9Ow+ive+lXRjRpd49kV8LsXf9h
psACOif0LBn/7CfFHNizJzDiZzj6Bmf+Gpwy5Lt9DvkNGri9SoMjWk7JlcIJ
OTLfTpL+q7wHguGSs2qHvOGSjsgFWrC//ZbneqRd7sKvveuwXsK7vccQP6tm
eoYHlzh2NRTDQvuG9hNw8Wkvhj8ct8rmyR7Y/XOqkxJxpt0nZ9iKte/ncxp4
3u/x7jqR+52mdQdXYb5fClvc4U9V8w0ucIm/7+YIeIz3iFmvjvU473YkHVYz
b1fdBrM1WLr1cJJ5uMR7NcwP83HFN1h5OudaFhwROWlshvi3qJ48HAyrTCl4
HYIPbkiv2A5rcvK/55P1YrQ71Rn2awmW6oRPtM637YM56zLzKdSP4zNreQEu
d544oEHeR/KShbWwIDc52gTm5WZbSiCekALH3zfAPT6nkh2JRb8t1CfrY2Kb
3CWYs/estCI8d/ibThvs4P8x8CPGG+M2Z4ohX1FNVWo5HGcS82ANLNwpnh8D
8xt2p5nB3AwdXbLeZ4rvb9OHU+jOtBHkW982sVgGFowvOnSD+Ou40zMynnZE
sjcc+H3rjRgy3gta0jJ4IMBiSkGdPKcyrt34DmpeLLBIRT7GYh4+PDh/wN5H
Ah5KNv8rnnwnGTdXhaqinpRRRxjsqXq5XrCSSTFD9vyyDx6Iz+jVJWZMc/eT
7+z10UVJK9BfavKj43DlDlrurArWt4zygUzYvGHlcTYc576p8TEZr1u+RBrm
5cfv/goXt/125O5yrJM2D1cjxPvywNXnR2Ba5PXfQmAHo++l22D6uFprLskv
b33lT8S+3lMdpH2ybLcjLCidXiCJev3Rmfs6BI7oivVdBydt1D6TCTMnZ0Wb
YJvWh/UdsJ9B0Vtnsv6brkapIh6/d7lnHUm9Wx8p+sMpTNckUv8/5rb/mw8r
lHlHLIenft7HfwOPhT/2+kDWY7djgAzy76VOKpbCnK2Zadow32vTKFnP/Nwr
wzow8/2t0nWwwdG0hYow9fVL2Fvkn8DdWdmP/kQJOs7pcI/N1WV/wCEedgku
sELnnd02MPvEY115mG+YN/eE1MvndX8H9ilztQNRDHjmsGDBf2GVZqV1RctQ
PzrbLgmeGa9Qk4VF3krVMfDQ4OvGsKXoLz2s4zgs+33N02ZlxCEzwjwPq0lu
yTOHU5LCf1yHP01d+aVICeN+jw1rgEXvEytNYPq9NtcpOE5xVLtNEfm8T5bQ
I/uw0WyneJhrmXA+AJa1/afIFfbLdC7Kgef4289bwAnnbli9grmPfPs2wMLh
AFUp1CfFtDVtG0zvfRRvDIv+dfM9CtP+WEBzJfOvNadYDJf7Zzf7wZ4dza2f
YeMCWlIgzNY/ZWiO+MoPZT/wgvOXmFw9DrOcL4YyyfvnwkBMOWk3OXBiBRxn
GJzzUYns//gHBhHPjNDbVR75i1ryt90i8dnq31WDS45NFQfCPg903yjBArlT
J8m+kq8etmQCv1cxK+0Xoh6s2NaKMpgmSF2eQOoT0HfBHzaeaNy4Bea+TPSb
RrwczlMTGuwces2aTfLXno/tIPswTovi8BLMU34q/S7ZF+0KvuECU9ui0zPJ
vis82+K2Ata37Mi5FNjtw+u9cjDPWVsyA+b4HQjvl0cdObWht2DP6SaDWjn8
bsty36cw3VD1RpUs8lnMG5sk+8CyM9S7Rbg6ORTrIJ5eTl6KCRyyMbPMl8z3
+jOH78mg/z0HJzmkXVS9I0SG7Avc9V+Q9UWzOe4K03OvmEmR+be5fD8I1lR0
WbqBvE/60n8vgFmde029YGHNhngp9B93SRB0hNT3s+2xeFglfMuqE7DDnwWL
ZBGfgm3FETZ5X412WmTC9LMZdPK+4T0TVKxCPp7pkXw72OqbefVlOERaer8K
bFy8fesQadfnDr4l+3w559oVqAe38l7mNZiuMLpPA6b6Pv7sQfKz+evUFO4X
iTVNycLGNW+eZMAlc/d761Af2sEfexfCM1bW/3MCVunYN2CHeIbsf5W0gXvF
yjZ7k3rtjp9bQNobe+OckK/w9JOALrJPTesL1JBGP1EvJv4i+9S3P6T6pZDX
K9nqIuJ3kV7chaiHiuu6W/DMqbYMf0nkeUe+/wFM9Z/hmy/AuvBmDT2DEwYi
lmhJ4Hnim1/+AnPy5mONxZEvO75gDcb3m5RwDRNDfKlGbG+yD5d6eK+dQn9d
ybQ0sk9faZAeTtyTqtsGax7yCfkJ1ixxui5J8vc8r0c8c+62tyXM9NaODoN7
d/T87gdzgn5qrYSNM3rayLlpJiChzgDjUd72W1Ng3rxtYgnsN7Pj4RXyPDzr
9LZFfCGjNpfI8zDzKJcSiJP9BXPqMKm/7GNfO+TDbKmt3gpr9s59L4JZZq/D
lck5TPhL8iisQr+7qhPxGldbuy9CPegWib6pJH4p2ewZtDvMda9yhOPe/Pr2
Hjw0MXz+B+rjELlByQb2fFjURuoZN+t5PRXj84tEyyLhlJy/3SoQ78yA3mYL
cs449h9bkl9ISeLzBeR+9dnrG+cZlGYB1fAW+2Cmzb/qwjkGxWobiRfA3FsN
q11mGRTvNe9JDWk/eH6+aZpBqYgHXW0g+26DXKU9XxiU5/Z3W7tgqlfv4YpJ
BmXVIDj1DR4TX2+qPM6gaObhW9esJd8pnexHIwx8v5X0PGDu33sVqU8MSlR6
0ukSzJeuFJP9gP7mj/3+dC2ZF0phYIhBUY3BD8SRP7X6LnUOFhraXyPnqrjT
u3rewRFqTawgsj5adl0eGEb83ZomiaR+8zclwz8i3s4t6rnk/pe0JJ/PDGqm
Jvy3/5L3kffdojOjiHeDb+JNcg5sqJfvGUN7dNQoWU/cwpiTg4g/ZJGD9VHS
n7lvRPME4tOyyyHnTCp/euGvyDfuh8SgHMzUEqOLYHZOdXgLid8oZtc7WCVL
V+wcmQ9NZbdE0l79vWgjbKxXmUP6o7poeWPkHHL5VSYP4zGXeCwvgjVlt3DW
Ih5uzU2FMHKuW6ynkYl6zTwY2WwGxx1/u9kD+XPlasekyDlHkNrB68fvNZzb
hnEOwQ78zsG/0X+u6acu4tuLNT3aUW939yIROadM5Yhe1SG/QNN7/2j///8h
UqooGrmuYf4vkVEPBw==
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], {6.77501517582275, 11.396424511603474`}, \
{0, 1}], LineBox[CompressedData["
1:eJwl1wk4lNsfB/A3WSpLQ5OxlbEkFE1JpcW80aZyMVlaDUWLJSLRjRptSGVy
VURMlkKIuJTQRKkb1Sgh/5aRQl1ug8tVUf/vudfzeN7n47znnN9y3neMwfYg
nq8cRVHf8Uuugi8/8WNKU//+6NCU9AbHtx5mx3UXpWrT9KD9felxmDEyLnit
Ni2wshXSy2B61/Syydq0+E2T/YX+mRhfxRjo06IFYb8FsLNhcadzfJcWTetu
jp3rQczPq/qqRYu/HLTRVIWD9yekmmC9uwurvj80oSmvfTy2P/ar87/dGgcX
r7+29D6coHWM5woL5qeMWSC+gZqCMlNYHOJbkaVDi62fNrQpwaI1W2zYurSg
0PqHwcAMrO9/RCkdjhzLCO8mloZcZOnRgrrZ/FXEVPPImRg9rHf5ykkZLFoX
/K1HjxY77xh6OA7r0X6FZxZOw/2HVZZrw5Kopj+CptH0On5i53ziDjWzBDhT
7mcID6Yu5tskTaOpy0f9LgeR+S3yRYcxv7faceopWFg3zHeC209oXM8g+f3J
Xz0Btn7p4VtE8tmy3qcA8TW/f32hDJbey7nMhSue6vcXk/EZHefrdWnqinFH
YibsPBgXvkqXpm3efFYn9ZL5fbxzH/VgjRUe8YEZ82b9tQpmzDm22xrmPBsK
fI5+tdhfeDKKfJ2vX7AKQP3H6u5qV8HSbR+StVDvcbMfqYeReuzpMf0f+nk1
uk5sBkucT0SUa9GUdjjf+7Ux9nN4PLEAvr6NvTIBLl5ptaQKLrcWVa6AGUEJ
9ug/pcD9a/CHEepffWexqTb6ODzrr7uwV6LE8gj2T0w9sCUOZii2ruiGv17T
EG6FRfxLnVsQfxovP3QxLJXd7mrVoQUHG+3CjYg/1bW6If+BIA8hCy5++tZc
gn5ntTrbaMKSJn7kcvR3mRMvfDrMsc5szEZ/VVv0PlqS9T1iKobgtotna1fC
9M6FORz0sydPY4I3WS9HYYCH/mhsMIs6DDvfqFbegv6qS9WaUsn8eOaxNfAp
UVBZOZk/O5Khh/udlFQGG2FZldHpVvSPeY5z+jXJPz7qVRTiWawy8KgTZpdZ
PNTAeG/UQqcOYs8HHy4h/rN0DaeZ1OecvrMubBC8b+gOTKWfi0xBPZbGXBEl
k/1KfId1dGja9HVHsR8ZF3Bn5KC/l7XP6FiR+YYsxjLY08Zi2aAh8qn2mdGN
5/GZ/9LmAljK+TTxGp7H6Gk9nd6wJGlB8BH0u/T59UwmzLCr/LYP91N3q7we
GuD8up83I+MZOzz2RsLs46puVzH/QJ+K3AJYNvSi7CPu38y0ZA+zUa+AptDF
OE9ONT7Ha2DZydRnIvT/F5ews0JYkGVtx8Tz/HjP2LxAWOLmWJYAr7V+JXMl
47z7v6vq0mKHz9kNq2Fp5ZTKWPTbZ+zCupWwcMpnt+8Y/+5RdnQ9cYnHIS89
mm7YaczaSny6r6QU9Y3WnMcLgdmn+Gv64SfyG6zOwLT/sShN9PtzkffJfLg4
7GO6AfqnTjFHH5J4hRm6GrBXf7p9J5nffOUU3g907Cc/428knhcm2VfRz7Cn
dy5MQv7Ov6RZOuE8ZTsuadcglm9+9xH9+7jEP06d1C/puVUQnt9uQ9M8BVIv
f4UlMvRPdimh9C+S78YJ2/fifKcZN11uJPWQ+ll/wfMQGp/blgFT4zWMI1A/
dXbkuj1k/MJ7OzWMH8p2XWsOi3fxmOT5rNZdqvaHPtzLcw+F3x3PG7OCJZNr
29agf03PpPUp03E+2iw9F8FdW8Yr/cQ5DlZ3jLWDozcbe++GJVb9kp2YH5Bc
v7YdeYrOvU/Igk2murVvhIM17FWH4YnfqlK6kRclu5uxGfG0HjXgx8ES2ZKX
jfDFeZ4WNFxsMyd7NfrLf1k2DX2laOPkrAfI1/Ns+gbUgWJfnbx6Of4+Klz1
vQcW/PDV+x31yzhTwxuCvSJ1J+hh35gvJ6o1cJ9gdOrhfejnnFOnOpaR/bKm
lZXArT5ejSGw+ISs4RWsHj1FvxAOdtYZ7Mb8+m2Ftj1kfqll+P9gGz3XGH1c
Bbonn5Th+sWt8cgvuEp7Tc6G4dp72FB5Hxkvn7KdjavjsOuFY6Qe+bUfb2Gd
cLY8TUxPUoy2hw92B40Ekvp4GS5AftQcQ36yHczwnutnD39QG+ijYKp0cV4d
+vlGLKnJI/EWpO5eB2+KTLtrS+Ib3PP4HXm/8uSia0n+FiE+J2DlNHrDIlg2
br0qDTfythhkYx571u0SDbhr4OLKSbDzarP5P1k0FRdlvCkIfxfub/BQRH/j
DcePa8Pf6U2at2bCrcdDKtfA4hrjJ964r8+RkfdAE/fbl4+WYJy7R7qbB3tZ
siqY6Kd+88Ku/qlY36Ao/QT28TVfs+wqLDOKuPUTLp5RlhkMB/+yMSsK/W0U
ctxdYEZ684uvcHvEg4zVsFdIbtNe9FfF5Unrv+MDgv2tsFX4xoOBcLHc8mlz
UKeZO01tL8JiU5dPpN+LE5XtG8j85ntv0kid7RWtFBCf7ID3hCKMr4vdE07D
YgeP83jfCzLe1vpFwBLWhjYB7h+sCjqdCwcb9a5ZAWfJpdxshEUBHiH92P/i
mP+iDpihat4ajz4wjIQmnTD1w+sxC57ipuUqgQVFntxLyGduWfTha2T+/MFE
Lfgo9bvHbpi2anJKRr26tu2NmwKzD8r3T0d97J59KMwn9UqfmkPq+6uLnC0H
lpw9zHSDv+/oD7vGxLjZFwtVuFjImcuEJQ2ib6/Rp8yXlXd/nYL6/3M5sp5F
C04zDcrfaWD/3v3Jj2GX8XmVq2HBJEflT7j/qOc1lwp11Mv6SSCbnJeiDdfn
wVLlUvu98PZd9mHVDKyfEch6Bv+281zJZpjTGyuyRbzyseHnVWA2kztYAbuO
pXTkTkZ8ndMrrHEOhy0GbH1hKmT39ptwddLwJEeYc/J0uCnq1da4a9Y22LnF
qDYR1gi0qxeS++ffFvbCCjsywzvI/WYfe+aiH+YmWxuNyH4lEaV8WD3Mc+02
WNDf+DYU/Uwfr5OdzCCfT3fC8JwJ+lhzrJpg+qZt/nr4K3txsBzyo/UdXuDz
ldJV0ZlhCgt6OrfVor9PhSWptrDQbvlNT/hqqd5DO5j6p0e1F/GbM8/5/luf
FdmuQeinf36wtgrMcbVq70P+dxgREc+wn1RiMjMQ/Z3C5DOiYKHT3jsDqF+/
T4WXJuxVvrLpGOztn5K0hOT3eabRDDg2OfLTbDWc79/WVbSjP+b3+twnqOK8
+vTfvAbbnpy8q0UZFuxfeBZ2WRy+SDQJ/Vl1ZW0CPCov1QqaiPx+3dSQDysw
n09bPwHnWVk+9B28YLTyLlcJ8+NvdZpjv+mzXx1yUUR8ktjaODhNmxEdo4D9
0+6//gd2mrzcv0ue9CPFPRj55WcZMvbBskbFDpLvIpWnfFNYsrv5bz/Up8DA
c7MyzLEfnPweDqhV12URa+UOOKKfaqH7R1bB9JwXr8h7LaXL5FYSsaWkFM8X
ZVej1DwCi99mOhqS9+rxqid+CuTz7NABG/hUy/fTHQrk/5OJWgvghg9H729A
/OwHp+y04KM33DfdgsVc3dkdZL2R1oeKyFeYZ2v0G5z1Zc3RhXCx66qwufBp
2fUVK5TI85zrIEa8Obs2bjYl9VF7F7qCxN9DP5eS9RJblpH3sZ1BTkYALM3j
WNjBOxzrchoRj2z10IN61GtjoULReBKvA8/Rnbyf01kOmiT/AmbCEOr/eOei
tEnj0Q9F39xc2LR8TK9nHPKcyGoPgS2TDtlWUFi/KMbHHV66t9lE7ieXKs5K
3esKp2tVPr88yqU4rwdHAmA/89baDd+4lCCu6006nBiSONV6hEuJxEvfdsMf
qF1KLsNcSmgzs3IF4uFJihzK/uZS0keubni/UD2RpWG7B7kUOz7lA/n/+5LA
IDN0gEs5H5xldBWeH3xIv62fSzGGjM8YoR61tyM8k2ARvy4tFd7ssWdcFiw5
f1tpIvkc5bWzvsNUQN/XnbCP7ftoIdajNZnrSuCTogcHXLGfJLS94AO8VaJr
tgDxyBRTnv2A5avdo42GEM/W0UPEJ3cmd01E/PTCE6JOePaAoWorTNWv5d0g
52ls372D/yC+wGHxDtivn3PtPSwVHJ4uDw9XP+yURz2kcwsPJSHeEU3twhaM
U8vHLmnDt57Q5S4we8e9O3gfU5kKKWGhWL+4RcpnaZNz9I1ehnhEshtqqVrk
e+RX2zLET6fEs8zI+1HhvkUH8g2O7nDH+5YqlpjJi76g3orzqXA4yef9/el/
wsf3BdnCf//ZPcGrC/meyBmvD7/+5tcV04H1AjLldWCG8kHd8FdcysvhUdIc
OEKwayNXgv3HxdzwJJ/DRyyultcgXqeC+Tms/76Xi3Or//t+rkX/Hxqrz50=

        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], {6.311950459440751, 5.3060385139812265`}, \
{0, 1}], LineBox[CompressedData["
1:eJwt13k81Pv3B/CPsmW7RCFkLJUtS4iQmSJpEUlRVJNLSEohRDXF1STLVMhS
zEXl4pZKUiljqQhdSkWksaZIoxSFfF/v3+PnD/N4+nw+7/c5Z97nfErD+6Cr
7yyKoryFKIp8UsLkly6DkiKfSxkUc5EKfVyHQbnQDJrvGDAowY3r8r1w+uuL
skHwWOfJrBrY4Fz99BKY1icRkAFbjnhcH9RnUAquccd84UuNO6dLYB+NNFtd
WDxmTfgpuLXrpd/AEnzual23CzaQHJrIhtPrJyzWwDYPx2hbYf/vn89ZwMbd
H5dIwj57ZkzM4U61ee41ixmUR67M8ZUwdSO8+wQcmtsQ5AxLfVVoWg1vHN+V
GgC7TMt0ScN9PxXN4mFmdWBszyLE2xzncIPs/8i2qQq+tHFt1mt4Qq/ZvRjm
1F/5OA1rHzVxzoW11c0+aiJfY/OT/nlwgaVngB3stUDQfx1mS/3w2wlXOPhn
18DN96UWH4Q5safn8ImptyvCYRvbQ86zEE+KwZ7LoXDJeKunDonf4Hf5Xthf
xfebM2zw8lSAE/Ft/rMj8BQjV0gXNttanZ0Jl1ZlOfwi+T3PWX8Pdgxa618N
80zWvW+G6w6+HiP1dntSXfYe5lo+riP16mRu+KsPzpe/Mjmmhzz0K/d2wcMe
Mc8KYe2Axg+NcJtEE2sPPDiaKVECa4deZqrAxtZlDmyYd2D/2bc4N4JKq9ht
JP6V0sNc2JIbMVcVNtverRkMl6zfn/kW+Qf3SIatg/3lMqRT4Og/t1QuhcVH
fpxbD/NPrwhSg7nD1YEUnPA+P1QJLj6uOHBXG/cfX7dtIcw4ZmsdAheYNGoa
wo67bx4zg1sVA2MdiKXunJrWQty3njb6wkyhA//9B4+9tBONh2tHjc4Uwxv7
VorfhAu4hQEpsNcBz8Q22KY16O5peCpvcv1vEm+knF0cbPn0vTgN+U9YqAck
E9vNK7eGdcr+UcqF7eeYs51hYY5TVwUsEFb7tR0eO6f37R0cfd77C7FXs5Xz
bMSbfqPrziby/PH1j/Tg0rZOGUu40ar8x2a49niuyXxYQUX+5hFy/4RZ/UcS
T2FuZRqc0Br6+TaJf6RfuwSOOPtK8Qic/4eGThWc0rZIYRkcumqRXx2snSEy
8hF9WEfL6quFGX51HTmw8APruWVwX0P2km06pN5Jr7PgxppRxT/IHMgVJJL9
Q8v63jSiDwvcOkTXkngSBcxzsKpRcqQMzHU+sXcXvF86Kuo58i0X9bQ3h1MS
+CNsUs+kK4L5cJ/T7i90uHTPp9HZsMtC44rvmuhjyZvbp3BuVMcF3GL4kndd
zQyckDT6bi9sU795hzTuj7D+zlkMF7C9u7TI82o7cj5roO+lekpXwbTxuNyH
sPhr9XEfuCQ74M1F2KUiLO4sbGlUIncMHj6ur3kbNith3A6C2zLuHW+HuYpr
CwLg/WpRO6dgR/tZ/sFw/vf2PGXUg+Ku/cUi658UPWQENyfECmXCjJAdJjZw
QvDrunvwhHzOdVtyXaZgaxccLJWsupzMxeSF0SKIX7Z5roYmbP9XzHcDmHG7
580sWOdObbirJunjgJY2Er+aYlMIcZtA6gqZm8vqPyXB9o+3j/jDUpkeornE
lTyjxXBt8ui1Iri1o+g/0teOj9LvFcK0sNCpFHj/Q+/z2bBjZ/X0etjHeM10
HMxaJKw2m8ydcStrH1h4YVNiJfqwc+UVyoLs77TQ/RQ8ESl8gCLfx3CIrROZ
ixfchKuR36Dx0TsapI8TY1NJffvUtBpIH1u6FZqYw9yZu7QhnBPZ4VK5IRry
vOLey4d91kWy/oa5adrPuuHh16I1O+AUqeXKn2E3I0shZdh42dJ/hLAe7VPv
rgp1xGVO+6YGs4Y+jbnD6T27aQy4PNJwvxhMux6qthcWv6mY07gQ8U4k3Ugk
8cuUnC6AudMJZ0vJ9eJE8yxYp7wgqA0elDdtyoNLLNuNx2GB/EcOD6ZMf/TJ
kLlqcvfrCBy9/V6PGsw6WnVdH/vlm/7XqQnLvpkcPgw7Rq79TOZgBPONPw/2
YL7NloTHVhc8F0M+zWvzRkewfkRtw8+lcPS4uudTsv+gZaQLXBAYWpUKu7DM
lwfBpQKtw55kbrpHbz0F26vnKCyAKzID1ieR+riZZLxEvfKTJgeSYdmiae14
Mid1ZvnHwY7D7ZN0MieiZ6IPEX8f8h9HH8pG+23YDHuJT169BTvuUQtaDHtk
BNSHkOuF0a29iF/26OOrNmSuTnz12gdfGm54LAMb05+O9aIejO4rTkM4F1yz
ilw3uNF95ucL0td+6fU8NZwriTD5JzA7uuOXAVycf3V/LdwmfP7pZVXk0SDp
00TOpaLROUWYNRLx6T2slObqla2C83xANukXub910zVz2GfI8IwK9k9PUXbg
L8A+O8tbGbDSUtU1XLi4XXylP3H9H61HYHFuSQSZ2+zTlSt8YMcMWUYpmdMp
hi1+xAm9Pq1wRBxdlgX7qFQNfoYZa9MvFsKM9bfkZsjzlQs39MGl62ZHi5I5
WiF3WBfxuNVl6pC5TtMMeRcG8z+tPj1G9newkH8M87ojo98Sf4mKnov87DWS
vO+Q9RZ/StlOXPlLhLxnOPe2K6fBdf66l53guletprXkesfIA2nYQ8Y8jw9P
vVltV4d6RATwOgdh45AOpxOkT0f3Le6ANz4JWWBO6mf1b0EZzDPMHhtCHzId
LcKjYCWmnNpVMqeeL+LowRMivrd8YVpzVQuJt9HRMMsALkg3++AMT+3ddXgK
54JzadygEfnbOF8/8pp4qVqSLZyeX33sAfF4m2eRMuagZuJQEcyM/URThOuO
2V+/Rnyy7HCcEu4LVKVfh8VtvlVNK+I8bS679oicyzktBidhe6e5CW/giCfh
bgrwVHmG5TjsL82xuD8fz/28eVuFzJ0TO+TD4Oh+jReryZx5fWGjA8yWCXfa
Bzu+kd9jCPfFxHQkw2ynBz0GsNk5IYebsMey/igGbB8ScLIR5igvnd4Ld+6V
rn4Pl7ybCrkMO27PTfpI3iMTE4582EfhyH+DMNUr56uP+CoUyto7yXXzCs+j
sBnP9chj8p6QuZReB3v8tOjLJfVNakySQ/7NqrWvwsh+vh0fXGCfqIsBdFhp
54WSUzDNW1RdCBboPD2ZB3tV5j+pQP4s4fC8ErjzYfzBUFhwv1+nALaPlXfV
gwfLjgqfgVkveg5VoU+5e/LmboHZf4q/NIWVltmpiMHBfg1KJehT1oG8+quI
b8LI1tCKzMEx8ywzmGby9uAr9CmN8e7xbeQruFvHjoU5uTXzdWDqiav7OpgV
otSQOo+cy9R2bbhceZ2PEJyeRtdShD1cjkYeVMDzo8+81Mnz6zTZffKok55+
ozXMNvz3sQ/Mdrg6EECun5QY+zYXbp8XeJX4Ya9VKkzJxcZ8hnk2UmIbYMv7
dcMkXg+9o6PzYcG7BM142P/gs+s/5TAn7EYSX8MF+3+KfYM5jO5SFeRfF5jV
KYT7Ze/5+W+FXeqPGWrD6ZG8Lydg9gfL5e6wTmCLYTpxU9eJiySeCMaTLJji
Zct0k3gsBPpn4PKNI38ZIX7qZe/93aS+DsnbjsMRgQP31GGGbu7nOpihf9Pj
GeIJ1nzfK4F6UPv+zdsDu2jJ6DNg8Y/NBwaRX7r/oIUvzJgMsvQm9Sy7tTgc
Zsdoi7wkfTw0rz0EVsrwW06Hy12EpHbABQ12O4vQp+krS310YT7PUlIVblvs
H9qD/Y3FpPNS0acTkmG34mDxbTH6qrB/k0GQEqn/yseLbqNPmV/m3MpEfhNi
JgE74Yh5OoZyME1MSFQNZi/ZKM5CPXnXJ42+4RxN/CNcNiSL89wjvowPC9wv
N3nAbc8MAnvJOY6J+ffiH/jcLLZ1EmauDLY4L4N1Z1IuLMJ6rM2Gvwqk0V+G
SdK74RJN1oUeKdwX7i+VDwv4h1fYwzpHb3gL4ObjabEtkvg+c3Qu0sncV+lZ
nwCL6wrLJ8Ick5qEUHL9L9vNrTA3c0EYG4547igth3oYmy3ZXwvrDM8/SIeD
1bJstLA+bbhxmRfMUt+5LhuWdTv8zAemSTS2LEV8HqPOEe4wQ712VT0s7jzI
NIW5a5fG+yEfj7iWCxPYrzmMdXwGTleYJ1kAG+ueMGUjf535qn/bwUyLDZ4/
4eC/k6ebkM/gwIWmRaiXpevXyPVw24uyQBvYJUh6pgL1qrvjssIWHlyS1qkL
ywpxHunCfPeiS6noUw475OUU1vPo+9EqTGyjqBcJ17VvG49Cnxo7G4s2IB6a
1LjWDPqSWx+X9wPxp8fe+X0OprEb6oRgnlz8GQvifV/OfkN9HHPCRL6Sc5o8
Jt4qgbz/suqohjn6hjLFc8h5fJ5QSM4Zx6UqVhx/56uWFMCys6cZfmJ4rnHT
twcwbSjdwUsU+WYG6fXAxpdtGgNFcG5rW3yVsB9nhef9S8K4P+2IrCdsbBrG
HZuN9b9PKFyF+ZWlUeFwG79a7Dsc/LwmcQkc0XPDzQ75cUti1ojAxupbDiSQ
fE3TrP6Agwd+TDXAslP91qthJV6w5G9yv256cAZZP3zSSB31Co6Xj5fB/m3N
h24YwM3pyiKZcEHO8Qxtcl3YNdwU8XL/zukUgQUyugMtcEm1weZmsn4BS2s/
8muT+3o/FmY2hxv8hLmPN1Rpw6x3YXHBqIfOmXldt0h+HeVpz+CJHlX7ZTAv
rEtAiZPnFz66ivpwW60zZGBuTc5pBZgZuc1SgPsdfVZpsEgf1waszIcFA7aa
I+hLRv+FET0x8jlnzp8wt2rW3jjsz/+7W6oXfcp4tjL6PuKl3Nd9PQS7LA7i
NiK/4AcL++bC1Kgltwb14M3qda3DueI0x+65NgvnO57dcQHm/tnFYQnh+3pU
v/wIcdbHtR4U4jh2x+QgzLNu2XXwN51q5j+8cQxm5W9Z5TxFp+o0zcpyYMpr
ewrzF51iFN1nvSDXrT3Kbk7QKX59+2WyP0Ni+PCmcTrFik+e6wVzrZTP0H/g
+dmBMYUwK0Zic/x3OsXcHb+HzHVm0FCsMezRWahsj3z5bYpGxLJ8H7s4Uo8y
90cxcN2F4ucPYNbAVrom1tPhVC0lc5v1VOjeDMySfhdJ3jMsvmaBNOLhumuf
ExAnaqda/6RTvEeFBm/I+u9kH4Ujfo4q9/NVUl9md9ONSew/rbWHSd4DAdUZ
LciX/SH1lzDMW3Wts2Ea66+6LHwR8dJCsj8moT7pIjFnlEk+UqVO0jN0qnxW
iymH1E+4fYcNTNs05vIbfcusMk1TgGUdtctfoW9ZfT4i5/E8635W/Q30KX+Y
616K9ZmvNqWlYk5xLb4PHsf+vBNqZcnoW65CWs4E4g2m5n25gr5lxl/K10c+
LvJL+rvQt7TdCpPapN6WKa/oMOufiz+/jSE/z+fMRnLuVvQX/fOVTlGus33j
YMafbzQ9BFg/+sWnIJh1pDhEaxjf38CY9klyXTjjVvMHxL+i41QFTBmeiWrv
RXxPWa8WkPX77dI8+XDRj9hUmOq52/D+LfZbdqxVG/FRl6785/oa8ZwPXMaT
IOtb8XVeYn2NYs4uSfLvk7db9rfQ8f6yrv5B/KGyVgnmf+5uP4H8Wdf8bVVe
4Hz174obJQ62FdrSinjT6P72qBclSG89/wbnU39y52Fitej23A5834pWNUfI
3PPL89VAfC5uldxN5LrF2Q1pPYhHTKRhAuvxfp+/KNmP/MZdRsLI+t6sR17I
VyBRe7oO8VAJsoV7P6JelsUNY2ROtq/RmjOE++01jlIw7+08dR3Uq4RdlPeV
1O/THH4xHBzlwXxJ5mQhrTsOpkkujS4SJf9fCmEV4/ngl1tUY9G3DPn73iqf
kG9sCXMvmZMvrp1tw/5U1DURT9K3y7X0BH24fndgzr5ZJL9DC8K6sd/BVs9M
9C3V2eRAIV+XhIlzo+hblonI552oF5+x5mYITI2Mj52tRj32XZitRfz/P7T/
+834H34u+VQ=
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], {6.741215510839148, 7.758784489160852}, \
{-1, 1}], LineBox[CompressedData["
1:eJxFlgs01dkex08ZsTRKYXDiPP6c/v9/EXNHDSr9mgoRkaOQ6xUOcbzGQcij
LMxMIhkZIYo7xpE8EldyNd6KpIiJ8ohcbg0pFOXus2bW7r/WWf/1Wfu/99mP
3/5+v1z3gCOeqxkMRj76Sd5/PTRM96+gRxsYmU+Cq3VpGH2dSkc0Iy4Ls7tq
R0Ob/JNg0VnE/XpCjUAaxNn3rnfuRJza91YqmoYaXz3pnJmtwAi88l0d4nJR
fJ1WAWLXLF/jYBoUhep7btojLttzWcmBBivn6LQUBcTDdpvs9Gmotp4x6evc
AgxvQ6sMaRqGQ0qXfNMQT6ZzhrooSA+4FTHmgrih82ZCGgX+/za1FX6LeGbH
nm22FKT6CCs71BDn7dBPVaSgyrp9wwEZxLEcGb8+EqR/iJUSr9DAMLNr88wl
4RvRuOuR1ajdPvXNpJAE+dHWPPY6xIuaxfKmJMS2NKmmcREHPvg5bisJfKXx
rMdGiPXW2IjUSUgnm2seHpO0F+5PYZJQ8Sf/vnmoZH6CsBc8Ev7IqmuduSjh
0MKF3SQceuZde7pUMl/it3o3Enojg2Y7GxEnrXp/PYUEM4/JnIWHiKmIuvZm
ElZN9S25PEHMUai9vYqCu566Cp09iF2VdF4BBUe4MYbfS/pP7va8FktBu8Ku
jx+LEA+3zGnUU/DGUq7s4lnJfgSpVs0j3qTT/chW0l+atUDSYGI2p9nNlKwn
0a3xMA3LbsMvGX+g/eF8M+DmRwOlLpeifxFx9+RXGVE0nHGH9kgzxK4VcyUx
NJzKWxBvXKbQ+lmW8SIanKNqP5iWIU5qij7nTEOSSmveCQHihvzExp00NN8I
C03WlPCaDcXr0PeCNp+qCRLtR0L3PwYoUFk/tiG6ArHq/eWSHAqyRu5kbUlC
nHS9sdiZAsupsu5Ub8RtGwdfsCiouKY9sZ6PmKPirz5CQnaRmcM5c0l/o9zl
X0kwufL15iALyff2X34UkaCq3GNwy07SnnHOxJIEqR5237QAMaPE9LIuCe4F
hdHmsYhlQ833sUgwnEnOaslGDFHHP6mh73vvKJO3EVOfKpYI9B41eKMxgN6L
CzNPDEjQOR101+2tZLwiQb4jCaExe6db5NB6M3V+Gk0g4Xd/L/ExJuKaxY0V
aJzggLQ6Hy5i6jGzbZ6ECbWrd8vQuhiLSo6XtlMgZ+Sbf2gDYllTRx8RBUPs
XTseLaLxFWJEUZUUEInicX4v4v471sQrVP+Naa+Oo3Uzuk/EDbFpMOj9UTgR
IJl/r/LpgzRkFMb6H9eT9K/v1vemQegV6BY5tRnN77lceQQNxZGXGw7lIZ70
duHF0qDbHf6bNF/C4bF24TRMfNopmJNBTCn0XDpBwz3Z28uu9TxUDzmlD7+j
Yf7rzNbTpxBPBkcLVWhgDsTbHdiJ2LpzvcUYBQc9OGE+0oj1SgaLiyh4r6t4
ds+AFppPr6bySQoSm3Mzy6sRu8ZM7t5CwYhMZLx+PuIyj3Uvp0lYOxVR/fvP
iPWaBu+WkxAyYpEwmI7YIMTQJpqEC4q6N5JzELepjnfakrDeZtdkWClib+dp
eX0Syr2MVo02S9oLjgZySDhfnj3bMYI41kWmC53v1i6J/n1ub5tyX7edxcP9
bzo1f9Iw4uHxjwU3qiTZ8PD/P77RbR3szsPzmx2pPKXpy8PzdxyIN9t9kofX
J0qPj7znzMPr7+pzFViZfd4fJ7//RTVs/rx/6i7PkzI+aOH9tZiKKK5t0sL7
H3BBYHAmQQufT1btfqkre7Xw+fnnNGZ+uaiJz5d3P+HoB7EmPn8xx2NPpYsm
ro+X21Ny45U1cf080Ii5UPCAwPWl/TokTS2VwPXXu+K3scCewPW5bxefKd5C
4PoNj2ps15YhcH1buKc7V77m4voPOPNP48MjXHw/xrSF+zKecfH9ucb/hV80
zsX368999UqG77j4/hmYnDfOXUvg++k10iI/upnA99e2de9U/34C32+NkiBP
wxMEvv9vFxziqmIIrA/us89ppUwC64dlqU7rwWIC6wtbq2vg/E0C6087s/pf
31cRWJ8q2Y/UZsQE1i/ZCivdgEsE1rfbtXs9e8MIrH/Gyeqv4ywJrI9rnL7N
MFcjsH7mKSb9EDzIxfo6JDZwyc7kYv2VMT0gXXOYi/X56ZIM/5UUF+t3j+F/
dsRXc7C+a8e+C7znx8H6b2/EVl3hcbA/GM+r1rh0sLF/jFsVutjbs7G/TExN
XelfZGH/MfBMlP6ilIX9SWaekax2ioX9ixLmPfd0ZGF/K/KwkQUbFvY/9cBt
TQpOLOyPnBR1DY9wFvZP/Q6dn764xsL++pVNQiCrn4X9V/CrneCkIhv7c/x/
Q847WbOxf0srbO84+iMb+3uJWNT1tI6N/T8tJKC+YYyN84FHtr7x8SU2zg+u
RjHLfAYH5wvXcb9B0Swb54+iSq1fTt5n43zS1RzgwLvAxvnljEOanCGwcb6Z
tLoqSz1l4fzjNM4KtvVg4Xy0rWP10+FnGjg/FZS0xF2y0sD5yuvyfMKtanWc
vxxv5L5rZqnjfMZfERR4JG3C+Y2pYcNUfs9E3/+V7144DpWsFSH+O//NPZbo
nxr8H/Pw7bA=
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], {13.4452, 10.5}, {-1, 0}], 
       {PointSize[0.04], PointBox[{12.5, 6.5}], PointBox[{12.5, 14.5}]}, 
       InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox[
            RowBox[{"C1", " ", "N6", " ", "T6"}],
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->6.137505285412264],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          6.137505285412264]& ], {10., -0.5}, {0, -1}]},
      AspectRatio->1,
      PlotRange->{{-1, 21}, {-1, 21}}], {22, 44}, {0, 0}, {22, 22}], 
    InsetBox[
     GraphicsBox[
      {Thickness[0.005], LineBox[CompressedData["
1:eJwl1Qs8lFkfB/Dnbd1yJzFZ95Bym9ppSWkmyi2JXNciRDuu2V6h3gkhK1km
SdKgkigSBimX1ZKUS/TacltUY+m2hFBJ7+/sO5/PmM/X8zznf/7//znP0fQ/
tC9wBUVRnfiSX0qE/NFmUf986CzqdNC6U3VrWdRk7LGJAWMW9fJR7otgOL7n
FHUPfn7ZoXcNbNr2oKMWlp+/a9WuxaLEeg+LN8AV+5LNjsKsny9U98Bx2aOJ
xvDk4ImPs/AvcbHV7zRZ1Nx2bR15xBtxMlyogTVOrL5tDNf0ZcyegiPy6vc6
wbYB5+uCYUHiE/cj8J3ihnIPmGL703LhX2cqM51h9pFVvY1w6vCTGE94bOvn
7hG4vnDtQAhcMnc34TNsHW9ZeBJm1HdnyW9kUQ9K9/xQBIeGCS9owetG7Ojt
sNBr8xl9OPtZGuMN3Pp3rbEh/O9x5QgJ5PP2cEyjLjx0aaucLtynlCe1BqZ1
6GaYwh4zSdNCcKTOig4WrK1unvoG8Rm7OPrmsP1skWU3fMY0v9IAnvtCqyuH
eeOtwjKwXvHxS+lw6RCNI0B8On+44RB8dNxWthx+ey670Rm+YHLfIwxWcA40
3AbTNCQPa8NJXjbeG2DD2yYv/9BgUUtf9zurw3/SZY4nwXr3zjd+C7PZ3pu/
g+f8uibJda+GNuqROotyGZ9o0IfpQQ0uW2CPWLmm7XBJnsHBO2osKi1EaJUH
vMm3yNNBjfSLxo2C4x9VWn9WZVEpaxLacuDl1Crx3+GA6I+KpD9RDRfohcSB
Q23PyfP77/+dB3solCkKo143XF0MK2CO34CHDiwuFX7lKVxx5KzoDjjJhfZF
EvFSEgr63WC1+lBVEr//mlZ3IOym6eSeBffFplqGwTGzDg0DsF7Emw+h8Py+
djYN+QT88ZMoud+TVtBjB/c0//uLK0zNskVD4TKBxF0WvLPvJBUDL42aRJB+
m6k8awmBh9lhWWLwp9ygrF2wbGTBw0nkE96kLCoMV/RNdbTD5V5yYqWIH19E
87xBrl+/170FruDy1TLgqpVK96qRX0l/cm4MHEuZWWvAtJYZWTbcqbQx84QK
fg/ERvvAixHWHiPfoj8qnkFe8NK+66nbYO1zx9T94TEaJXZFmUVJyvDDyHrp
tFveqwALOudaE8nzd5q35qxBfSyzzfLJevS40bQRTmJYZpH+PP3jfdVLGvaD
0if3MZi7Oa76FtyTaDVK1rNGwZJENly2qil0PczR31B6DuZMFlvYk/65FZqV
wfZ9xXdCYHk/P9OnxNJWbsnwsEmojgziccy2DueSekodbHaCO2+c9CmBl1ct
2JL5tedE7S6HM3/LfzwMN2QoR5bB9O2qR9cgH3oJT7oQ/j4kuc8Gjkw4yc8k
96trqh4k7vroyoFzzI8eDYNpW7xN/Mj6+O64oRecVvzpqQW8rVS5iQ5HsJJH
yP7XjUkVeoN4POloyW9IPnl76WkwteikOo56XNnafVsRFvClah7BN8p3mKYj
vyTjWtsaWKS30mpBCflcDpS9Buuu2s1wh9n00+/yyH4b1HzIV2RRWSvtg4i1
hCcW5eGdvtklV2GxB/7njq1G3U+zQviwb3TJimkFrNdme5mHcBt3dDoaduzT
vSCAux02qyvCl/Iimkl/XK7L63etQn3W1VJ6pD8b5cPz4Wp5+k3Sn86CiLen
iFszRX6G9fqHXNLhMsdup7OwbMFluetw2lT235Xwk/dewU/hpZvc0A540Cm4
Wg7x3naI54/AiwGlGa6wr7R78WtYwEkw4MGMsA8rp+CDNtHnR+HQhytK38CM
ojIRZeTnu5zdNwZfcTTVsYLpcdSmx6T/D1M89sPtHOkHt2FFYeclP/jqn4Mv
LsLsfUtndsN6gt+kj8NivkrPyXi0re6fvOCKIXvRHlKvxuRAc7I/C0ajQuHI
6rqVGnBZwsjLGeTTv46dKEL6bbKg8RPMK9Ixn0E9Lej8d13yLKq5R8eb1PdJ
SVGdAbyTsqv9E/YovOVxSg7vy/eBjeR80do12/xKFuN5OyROwNO/u/Kd4Z7B
L/wFWFtT6E2ODM5L06FcaRJ/G4dWKY1xuK/0yfkilLX2XwtSLMrAOViO9If1
lnPgEOx7idl4iPQvqjFUBS752eB4FlyXGsf7Iknq/5pbB2cZuXfI4Hqz6yJr
EJ4zn3beA186Nj23QJ5X5HmVw7J6Tjaym7D/ZtLN1yO+19BFFS2Y556zXAU7
qkwUG8BXz74fZ2K+QsNaccZwSv+obCvMXZd6cQO8wpshqoz8KM/PnmpwOk/t
rgUsuXfTfyTgpSwdvjtsX6QlO4v4k/NiJ11hm7SpI09hbcWpqS0w97oJk/TX
JqBy+RvYNOKixnnyvpXg67IRj3EwZTAaHmt0az2P+RkEB2v9CJe0zNfykI/k
XEga2b9iNWPicagHe/VElDFZH+ssM2wksK9Xnl0k+7k/9YibkDjWX7LbE1W4
IfSRTpMY4mdHB5L1MJZrMXxCFPPtLSnfQOplNPXMUwT5RzOstsFL7i/8nIXx
3mNYBrrAvD1b9CKF8P+Wj1Nk/4g1y3W1fIP6575KJPuH1a7PtYKTQmipJD+F
MZ7S8grMq4i/e5jk3+jv+Qoes/QXo1Av7YnXN4Vwv8BOXkoTpsyHP9jCMTJr
HpmT+vMqZyvgSfvkCRc4R1apyhjxhVIuuwXCc1mZIvVwqHH5/nAy3uYxLWvM
N8DPsvQQvMjIN2qHFzsarYLg+PhjzzchP9//nin8Ee67Jql4nPhx8hlrmDP8
1558WCxAl2EEd/6qp8GFTf1fzZL1wxiZTXOAtaVehrxHPvHbf9nYj/FZewZc
emHJRGdPI3hsYiC8Cnas1JhxIfPLjAjOJvUNV967D/lwCq49iYUD7nuMGaEe
gr7Xi+R8Fsitbp6jkJfxxEvyvo5RZvr6fGVS7O3aFj6kny/SpPuWmBR3vZ6f
PzkPDtga+X9iUpTeyfXh5H3EDdBWX2RSglpxjRNw+6uBWbV5JtUpKR5Kzpu6
Kakth+eYVKS81wuyf6gljpPOLJNK+v6CwhDJZ7HxLnOGSV193HDgK3k+Rqyy
5T2T4m3bsVob+bc/oMuXw5Ndl4NIvSbfpSfPw7IBqvyfSH2lbr/LwPN1h8+E
JJLralErgzC+7KyjzQV4bL23TxjiByh9sCsh3h+2PfkDkypbtO++BVeUuU5f
xHwNZlrSiXMOswTZC0yKEdh7sxjW8Dnxly/yCzXcVZFD5pOZwfoLXnqRHE3i
2VTl31H8iPEb1L8n/dY73RVErufoavvuhiNsjVwd4OlR6xx9mCZ1v80e4ws9
zswl+5cr6D84jvmwmjp03iH/CNUICU3MV/trk4D0t0fSe5cU8ksbTfGoJ/tn
rc/+6CkmRatZbr1B6vf4i0LCa8yXv1njMty889gP7HEmFUNfFi4gz2sl1vww
xqRUOPO3rpL9smPZQvwZk3JM582Q84Y6JfeLZyeTcvk9idlGxjOzsyu5g3rU
55SR8+KfT0rj/383sf4HcqSb4w==
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], {5.441261304060914, 18.601506520304568`}, \
{0, -1}], LineBox[CompressedData["
1:eJwt2Hs8VPkbB/BTUZP82qGLu9RKKmlCmlAzK6IiotZslElESFMqFMLS0pVs
SDdJorSrUk03jU2ZckmipYRKIaUhMm71+zxb88/39X59z+V5nnPmnO9zJntt
dvEZzjCM1jCGoZEZ/Ibfz3yGTWDzGe7J/iUFcA5LZ4gN88VFs/zh+C1icwtY
PqdBSx+W6jZ77oLFt1IEzVP4TKul79SncOgS9Td5sFjfxoqngv12JnvuhnOW
PN95G5aM5CmugaMcEgcWq/IZvyMKSYvhyqEEu+ewjan/AiuYf+HIH1vG8Znj
k1QkC2j7n7k3Ro3nM4Zebx2WwpJHSW9T4QLdFyeFcLzmPTedCXxG4a86RTqf
LD28Mhk2KrAMOwMbnosr6IUNzTX+KoWF563MFk/kM8w8X04PzD0i9I+AbwfU
ReggP/vSKtFxuDbQc7I1nJYa5H8GjrJhVwhh58y90cnwh4NrQkPgyiazF0Gw
0HlnYCxsWFiwm0vHc2PW7YH9olfO78b5+QasuHCYs/alfzY8frpGwgaYFba/
0RVu3paYaUPHv3UwZRisLREkqFE8wdb7C5Bva6SyqAnxOgtSft8CC3Rqv2TA
TdH1T6zg0JILGu5w4kLH2Zqw8sHdmip0PfZZH1SGhSWpfvcnIz7/9v4JMH9X
bdxOOD+hLnYerD7God0EFhR6mtLxa6cpdcj0kP/IXxT/gRWm5py9BqsXXhmY
hvi65Utr4mDRXD4nAy7e/GutJyy4s7fbAPnXhx9ItoUz3PL6r8OxDYsD5sFi
P8/Y5WqoX/xk3lyY6e1PeQszn3wDFsKJO4ebhKoj/gbVyhWwbEp33DANnLdV
9+UmmP2/IcMI8pe8M4lwvoGLXQvs/ZNJ+3Xa3le73EoT230qX/KK4js6K34X
LIm/s1AJ+fHblPmZsOhkiSMHlqxceS8fjpft0FwBy5+XtZ2DV9b1RvvD0miT
fQkwyyDyMtUr3kExQABz1Ux5UbAzY6OpDvttezKb5qNa3CvLEM/4FpsxfrCI
1We1C87yqq1fAqc55K80hMUNN0314NajVzXrkK9RWqP2B8Tr7CPbeBgO/ydc
7W/KL0h6VwDXhmYrBMCtBZ1KHLja9obqFFg62TVKCxaz2pdenIQ65jWF6MBN
npkhE8mn3rvMg6V3F+TG6uL6/DQYuBHmGAVkD+rQ9h1qV2A9872PYuB8Dc8z
qohPeLO9RhOON+BsjoPt/QuKS7SRj3gFi4V8pcZT/9oHx189tDwFVhfmX/SF
xWqPTs/Ugu3/feYOM3rZ4+/BhiNWmdG8X+H+TDeMgnunqv7AyF2UvaEZo7OS
Y81NGqWhT7xxXol8U8ogHU/+8nk1xRWzr8Jeh+7LWcZzkId907576bBgxbXl
IXBGV2T4R8qn6evls7CsTENuibHVPaXmFsY0v/3rozFKh5Va3MQY/1bgdIM8
nAnIxCiXtjU2YnQOffNqB+3n+7S3EyProeVnCzqfatdvHzE2TdiR3UXxXf1U
VEn1DIrdmwmzsvS7jtH8g47fneDWNMtrTmTH+alfkYfs667nFJ90dPulAjg/
WUM9jOLvObhtByy/IOztxsha8e2bHcbWXxVzfahOY6ZJjTDm3LKqfYw61oZN
D5oGCw1SQ7gw58ShM/Npu5ZHe7NwHWTLr6t5w+zXRZ/ovhTMdxZlk0faTE+n
/43xfMdvMGfLH7OMYMGBZLdAus6bii2qcB+kefq6v6f4s3KvHKT7Tlrovx15
5B8wV1wPq2deZ43GfZXYqZnqBPOLLq/OgGXfFpe4wg6F/xhr0X0aWS/bRMdT
Nx27Hq58YBZ5DJa/Px58lu7bE3MV6b5nV/daN8GhX+4ETkE8Dr94XFHB/8JP
dkgjGNYeOOTFpedSdKneA9goe5a3Kz3H3CsjJiI/TljRMi/6XyVxl3jCekcD
5/jAssKkjmOwvag+3wPmrolfK4X5wtOv6X/YOklo+YosnuVsDAuzq4bewMp2
zJsxND+uiP2Y/tc3Lj9upufYwYTXp2GFnsqIW3DOZ+t2D7i2IXrTYconOP3c
MPh292TtQJivty/+MOLNeTTQupS8/nQt/a84LksGOLCftCN1jzq9P9Jn6NFz
cSfXuQvPQW9x9nsNeu6y+W9Ww9zEtZaTqJ4j7Fbdx3PUubTvBO3PKpyYYg7z
LwX+tBzmpLUsvYLncFpoAisENnwZcowHMw8f/n6enis60QqNeI5bWUazWuCo
9bvn/AnfHhq6OQP5ZmRtahTSeyDnnSgYzokTP7SF48t6pIWwXhg30xqW9I61
VcJ7JWPGvvG/wqxJh3xc6T278lx1BMydcLE4ld47L5TE12j/sYWcGlhQGVQ7
CJdFLCwejfda1LbYwmWIL8swrd8UFse9O3wSrtT6R+ICi6YYuMpgmwyFaB96
D9ZdZFkhX8k+4fRAei8fmvwtHFbvcjXyhWslLb1/waFNn3e50Xu2+ZygAq4s
Sdy9EBaqFbnUwgUfflXQpePzRw8vhe1VkqfLKZ95sdFn6b1lHbzkMa0LVnB6
fKneFtaNZ2kdMhAePw628psXGAmr64SvO4/46jcpetB7VzBjdcJsWO+86/uF
sHyBbmk2vXeP2CrNpP0/6ewdDydaaa+YTPNp7UkRWOc0W9c3T4HZzuWv3mEd
5FF1bTMHDh0Y2L4KLr50V53WPYIdw1UqsI4qOMiP2Uz7JyWPWgUndtwqPwVz
OlVVOrAOUy8LPlsH+3nV6R6Hx3uOWaZF67qUz5br4O7oM+e9aJ2hd2fHQljA
ythyEc4XOdaYwoELtA37qL5Fc1fxYTPv3mWL9FGnrMNfaP+8S86BCfq0bup9
cgTmJNraPIRD2xZxa+HW+eVPmanY/86IF/qIryns9HZjWNZ2emAH7FFi0+kM
S7f6nHoIyxKE8b6w/ADzQA358l3bvm6BhSL3DA+YYeefEMFREuv7yfBxY5vZ
3lPpOovX3YBjG+17HWG+SZ3XI7jM/njWbNq/Kya1GE6b1bpwDM07uEuzYbHE
h/0G8XK+TLovgs3kJftvwFEx4g0/w/YDa82TYCbnU5wE8XVXpMcEwvKa+S1L
Yb/1mncdYb05G7QfIN9YXpDcnPIPj1tjDitEnXkz/b/j+Vzl/4Q8Qw+UToNl
izarqI7F9V58LGYOzSdF1LxXxlhV/ZsdzL9bca16DK63uZfORprXnPZ3rRKu
m/jexBTa331r+tfRuJ4jMseXw5KtGU0OMKuzKUQZ+eWfCJotZeH/HOxj60L5
W0yyC4Y5yaWWx2n+s0v9crh6je6HFlg0cXnib3DUhZhqEwPkk/n12yF4cFX+
rp2w6L1O2we49aHy/tuwcNyz9RtxvthvCz5+gSuPbTUegreV6byYNg334YGX
o04hXraLap8jLKpnTbBFPq3Pe4V+sGTmB4e3sP7ovrwdcGVSyLvtyH/wSttA
KG0ve3DvI7y/ufvTZjqeIvPM5n+ox9a8cx6w84iU7dtggdmDS3yav250IQSO
fac8qAOzJUM+y2DnMF4hxReVGXiiA8fjyO6vK4clTqs9vGBBka1vFuXXeetq
LuLxGDRfFklO7Mx8iPjN4rL915D3OJRLkV/eK6e2RXBiuIbt36hHRvSMdFPK
n+cwfc8o/N+yAtpn0faz/1zkNhLvD07ts//m/SedMFJEfVJV/7WFM0Rn2GwF
HH/u6tfrqd6OwgalEYjvZY//AZhjWrh46nC877RsfYooXreXszcMQ71S5rp+
hfN15XVVDOrZeHKlNdVvQc3ZIJjhPLHcR3Yr+mQBB8ZuP/uM6rMom5nH/Fgn
GuL8G99MENL+tI6EhS8Td19ifqwzaf5R01P9YT/WoWTTgLmXYSmtU6fj/jwq
zHUe/mMdC+ezu8K+wHq0zoUrK65nHEU+obQOpnkm3oyDfK1onQw3pSk9y4fZ
tI6GhSN8Jo5DfYS0zoZlV48+dVL8sQ6n+dycPevgcFqnk6s0omzgMlrH0/FM
3Nm9Cj/W+Yg3/zE3PQzeRn2AIdU362AF4tGnPgHmaPav6B/+o4+g7W1bx4wg
U59B2/coeMuYH30Iub7dPeUbj2mlPsWQ7qcIFYshHpNIfQzVZ+2l9439PKaW
+hy4qXtG1TE5j6mmPgjm1zBFUV94DNOHPonqLa/oONXN+95HwYymwgTWZx7T
TH0WuS+yvLiTxxhSH4b8JAYbxjXIeN/7NFgv52K7GyyiPo7qYaw03wRWpz5v
Bub7ze74wduoDySP2mr3GfajPhGWCH8b+wDHl1MfSfPlo+dUdfG+95kzEf8H
i9UjEV839aEwv3lOpFMP73ufSvOh2y8cRT421MfSvKLL28peHlNGfS4cJa/6
+gr5e1AfTNvHPA281cdjBqlPnkn914yRy1Gv/dRHw8K1N3MPwNXUZ9O80bJ7
W+Ay6sNpfmVMbg/2Z1Ofjnijcrsq1WEj6uNh/vGJVQ04P5f6fFgY0PWLE+Ib
T98BaN5f2XM78vnvOwHtP8MuxRP5cuk7ApxxoKlZF/XJoe8MMLP6otX+dtSb
vkNQvT46WVW9Qz3pOwXNe8fUz3vN+/4dg46XnnWx5AXyoe8cNL/UuvjzUx4T
T99ByBEted6PeN+/k5DPj+r7t5DHsEwatPSRH1PA9dC6yGMc6DsLmT68JPK+
f4ch0y/qDqNMoxH//01JWwo=
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], {5.9861902576697315`, 9.986190257669733}, \
{-1, -1}], LineBox[CompressedData["
1:eJwt1wk4lGsbB/BXWUaIipqksnYGySgVpWa0UVRj6aSSBs0xtBCVaeFMizgp
pkUmKSOJHDFZSvuUYqSFPiKiUZQippOQxPd/vvPNdbnm+nnu93nu+37v1+U1
CQj15I2gKOozfsj3vx9z9r/fTDYVZ3b7dqsZmxKM+Ta/yJZNPT2yetEdWC+F
170N1n/28lQsWU+qG7aF65U+7q4wpab8ODgDcUX+iRQsNnye/Iq49WBngSmb
kvGW+N6DU2deXRgAx7XMe14EF/nnxY6BXaO0K2/CAlFpRakJvl85734Km2v9
1rIP5queWtIB+2jHbHKC6RkZuvokH1erLRpwVcZ+uyXwpRWJGc3GbEoSsfmy
ANbru6BdCssubZ6VB/MDZSrFZF0iSmyBj5kttyuCt3YOlWmgflHpCcl9uCbN
KsMQNjYRlNTCgn9+GjHgkrr8dT3waacuR1t4659NfXScz95fziH2fWt6iw3X
3NUcS+LllfvT+LCe3+f4ibCTyDTzOLwkIdVSlcRr/erMhZmrlRuqkY9s7op3
pH65/kEvEez0Q7y+itRrNf6NC+y6O/IaseJhVe8A+uHQsKOJxDMHwppy4UdS
76grMM190msuzGmjNR2AqXA/uiHpb/uTryvJ/prxRxpt2BR3ypeVumS/v3mX
s2CGxkNtOeqLC9ILF8L2mvk39sKuI8ucg+AwrszCCu53zrnlCyuHbuYVTMU5
uvFlXFgaXJs2HhYZDp4Oh+V2Kc0xU7Bv8b1MERz39vcUNVj4UtlYAjN3Ztqm
TEbcXZ2z7SSf08XKZTBtSlCzEfJlSN4P6MDZDiERnjAz9OYkpRH2sZSPPgLL
E6VlnXC9VoSQzBNTxcFoBOLbk9c2NMDSpRkqNnC9XmVSLyzTrnYNhvnJLwrV
0M8SXmLbNThO9dQrdZjjoD9DBfnJv7zz/EHig73MPGCFxQ2HJnJefPLdc7DP
I55nIbFzvGMjLHt71DAKZosa/UehfsYT8ytO5HrrsmpzmFZTK+5BfZxOts1v
pD+tkjbSb5/vHW66cFV0Rdk60s8n2d5vyHkj7sXowP15O+UJsOAz3btsOvrw
eGAfg/TzZLVpLMwotBXmknrNL+/3hPUkJj+nwOy5aTwrmNP09Z/DpF8x7s56
sDjhgk7rJJzLU32gCrM7ql0XwVJtzUYNmIrxvJppiLhB1Uo6HJf/UUUfZvrW
T5oD91+OP3ByIn7/2vHWRrhkS4rYAm6/56R7HKZFe+ZW0VHHN77JA7K+XdCd
BPcX3L3VS/Y3W7ZsN1nvKzlhhfocOFrzd8DMZWsjSP3SJF3VGJht9m0LmT+9
CyEpeXC900BnKizh5ik+wYq7Z77kwgLd3XV2OJ/9+W/VfDK/tPlNwonkeWvY
exGW+Tj3VsEyvctesWS+htQmGqEeir98pR/Z32bTPl+YLp5bx4BFRbveHIPb
t5QPt5N+r/pQng1z/ZTr0kk/s6XPc2GaTfAbb1hZNqnwDOxzpvK2Osz8vDGG
B4flS5xvWSPPLHH+RDi7gXsxHM52TVQWIZ+qoT9rZsKSHeuXziP9CzgR8ssK
eY2eU3oV9fHnBYXXwPX9HoH6cLbny/U3YWNd59KICfiWerTkwq59s5qqxyP/
7am0fFhRkHTbHlZ+jabfh5mKBuuLBqjLXierkazz/HZOhRWRRTkjcL6gYkjv
mj72X7D0tB3Mv1y/Zz0sD8kO5RGb/OidDDPczmuegzkrFhwaHIf1jvP0F7B8
Z/X977DC+O0fQ7AysLtfA/GcJK+fFuiHYMaF+UxYNOoyazGZj56N+0Jg4Zul
JqR/nFPNj8n5Dp/fWq+F6UdsDlIkv9H/nHODuTL7Eg7MtTjGt4Olswd8U0k9
jIeLNcm8F7xMa4JppRUnanC+z6w8e13UL8+xX5sE94fJk6fD1FGrqatgYxdf
l5lwVWBHgwpMvY9UTobZ1o53CtGf9urCY13YTymI0w6C+Xac0Etkf7HKyKmk
f3G6zs5w/a6Qc82WyOvByI5y5O+ToB6WDXPG+e5wguPY3uJomH1JV5aB/oS1
chICYNqJ71tGwsbnzk5aA/PZoVv8x+I+rly/+ncSHzP7SekYPDfZ8VE82Fhv
gi8T5vznL5cDMF1+KDxXD/kpk65mwRQ3VewE9x8OYLwi8fu8CuS6iFMEVmiS
fMUPTN1h+RoXLgvmsIIy1WDG7IKMCDjsOjenZzT6X8zakEHma92cXgOsc90y
4yrhqj2WlYGwqK37+CdYdODozFcwu/Trqp+wVN/hmh3OL2HOcR+G4/r9Jgvh
qhlm13tghntacBXs0+kdSeYvW9z8lxHqUXblzS4i+19ZnOUHMz0NVgjJfrnV
ISdgWvHcfGcy/5aXnKVwPW95+wDqY54OTL4Bi0M+KfLgsGJ11UzSH+2aci6c
7ZwcEglL5s77MM6SPP+hGrZw2I/HuyoZyHuC47ZnyIe/a3PkUbhk1KuwNbCD
eusxL5ja6TfqDOqTOHjUMWCh5Z4xf6A/9XJZoxZs/P3k6Gk6mOvCd6G/foPt
LD60aOGc97/nEwvlidcyR6FPau4DJF5qFGUepYlzLfb+mkbOD/brC6chXnNc
qTssUo/0E2mgP6IXlXth7gW302/U0cek1zPyiNM9onxhKXvg3ntYEiAIHkvs
YTeLjvok57N6f6mh7rN5HFcyf+IcAyOss5cb6O+Aha9d7ILIfioDdYnEb0/s
qoMZptLdF2FR9LtZgTif/uo6j8wTd0KM3zBMqw+qOE/mqanNQIJ8Jc87/4wh
/d/ixHZEPdnbu003kfNempjfhxWKrmFrEk/zHZqG+sMcUzW6kG/YBF58EMz1
GFucxSD/j72I2gPLWRZdG2DOHUnj2lFknjc265B4zpcFFOmfYO9zGfrJiUru
Dsf+jPWCgUhYWpX0qYDkU8vmz4GZxT9yHyNfboDGg6FpiC9LHixAfZxZrrb/
gZl9tXsOoz8+FycuLoYp8WnLpaqYn7MzmzNhEX3dR2ok6vkrk/E/T3/0rFQF
z6OpIqGAeHPbubMU7tdWzYqnsGKB20LDYRbFUON2fIUltsc8V/9iUQpaefRU
5ENNvjqz5SeLYua5SDzJPOww+/l6gEWVJPZYxMFcQXrmQlhOW1t+h8SPF1eM
hkXN/i5fYMn7velLYPrc6vPjyTx+EnrXwmyfj5PnwLJFsw5cw/4+scni5WQe
BxQqZYMsKq4pRLCaxNvbtAwiH+6Y27XLyPxGxIYvRL4OE5wP2pJ52rmc7Yh6
FNM2a40i8xdh/0AG6123Lqwj/S4xb7VC/fLgGdwUkp+Lr+t2WEC5xXjDMoOJ
+w/B9JH+IzTJ/fC9u4EH9+8TD98i/V582GsMbCzUebwNZtvvEcaS/qW+E5nD
3K0GfknIx/Vp9bZ3Fsgv/dR2GfKV7VqpnQNzrRbsSEN9DoGmkigL8nxdD1v6
A/UwPB/5wbIr4znyXhalVEn4YxUsybYpZPWwKKrY57Y7TI0JrCr9iv3cguav
g9n/XNhd38WixAsDcsLJOjW4/fxn9C9dOi2ZnN/0cMngBxZFW3TI+RFZP3pD
dVwr1q06J/eR9Q03jve2sCj+651J05G/LH/hkWsKFiXgb+L6E/ftr1kMy7RE
rJNkvvpupF2E2/00pt0h9V/92FCC6+VZjZvekPj0Cx7897hfG+8XKUn8s1rL
+DbMy2zfw32wcIp/+fePuN/P6Y3d5Pq5Pf0C5Fv/jRX9mqzzv3m2duL8zV1d
ReT6khEptG7kW54eeIjsv8pJd6MS60O3SpaR+Eq3XZ9gRvRNHxXi63VehugP
E3+nr5P6cnr02rAuZy215pN+dV+1XgI7rLpRYUj6XVerGor+CWY8d6jGeyK7
0uNKXAeLMu5qj02AhaWK4U/IV7D65PY15D0y+E6vFPVVTZFbMoitBf7qzegv
g7uJRuJNzrjSa9DPwn5aH3lvbM2+31GK56fvQFCP2f/fQyV3qf5hfMzY/wWu
aFaU
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], {4.447184550288065, 14.324559082853224`}, \
{1, -1}], LineBox[CompressedData["
1:eJwd2HlczNsbB/BvJGmdLJm0GG5R0UKTSstM3VIpRLl3QhqRRiZN1lTaDIpQ
SsUlXdoklDUqTYkGyaTuVUlGwhDJ1aYmfp/z6595vTvnPOd5nu/XdI5ZQeGr
gsdRFKWrQFHkkxr+hZ/f2JScfFqwqfLoiIQh2DVnxPMGvK7+QncXzCmvMQuF
k/rUfWrhzws6dQ1h5SDvsEy4vCKT023OpjK+vNrAhfme9LclsMPLE7Wz4Oyo
9MA4uLLNJrFjNj6VWBMCYLqCfccJmHdSMW0J7Gdq7eAOW1qFOjrA7N6Nv8ln
sakzM7VEjiT+DBv1G7Be0DvvpSTedgO/CLjU4GUOF86+VjN9EUy70jaB7Cec
X2WkCLvesN97AS4tfvOug8Gm1BbpXHkCc28+W1oDUzYhlgOw9+nM+jK4dGvb
Pn3Ux7whXnoFlvADZ7nAsiuLWbfgFFdaIxeOOR58QkzGjwVE7oGluUait7CP
TxRfCPtVr347AfuL/6Q2HIT7fdIez4d95igfiIGF9+1of8AME53kzTDnfDkz
Du7emXrelfT/YeedfFKviJM8HW5tZjrVw7JYNYEU+epVa2W9gTfptw7mwnVc
f9l/sLD+ks5amHG3s/wHrHgsboYWrOh1eNwAHFmfxXtgxqYM7dMdu2GH6NYD
UXALw2cziT9V1btnIZwXEziWQ/Kfq9LbNx99mjVnHJ/016go/xbMeff6gwUs
H176zwHY7++7Bz6j/rrwP1oDYb2Wi+Py4IaYo+lucImXpIpD+te5ZKsNHClM
ZKrD3UmzWNYw78DY00MzEa83ZKsTbPlKNeqnAd6TzsmSlbD4v3EvEmE1mcGr
MNin7XI5HaYNllxIhfuy3i68r4/fay7suQ2nbn6+RwjTvj71fANLtL9XB8Di
pConFdRne+mSwwqYn1O/zBKWGVppc+CYvt0zVpLx2Kc7d8PebUMJoTDn+khG
IdxvFHuN9Cv3V8W7D7DtdCtWPJxKz7OwQj6RO5ssyLhgSOm+EFb84KrKg9nX
V1x6AWcHtXZ4wsabl76bg3rFnXetGLD4tGZmGOyQ/VrvM+lHmg27EE6pjZl+
FaZ7aQw8g1siCxS3kufRWRLXDZe73Zk8G6b5zUzqgnnCXfn/zsP4hmmXxXCf
RZP9Ebiob3x6Jtz9OsfPBbb005J5w8xMa9+fplj3PnfdF+TH0HULroE5bc9S
o2DDVwOhR+FU9ytDQ6jX0HpN10aYu1RQtgX2y5r8wg22lFmvb9HD87No/dcK
pkv9exxget7WHjNY4LwjoEgX72eC6Wkynlrpf0oXTnmz4uPvxDaHzP+agffv
QEFoAMyeONtoHsyRL/KKhY1bnzc16sA1biF5sPSKZ1kS7ND3YMNT4pkKy9bA
7L2se4Nk/7wtpq5w5Hs1uT7qZfxkPnAj85kPy9ik/rFfGQFw3faSwnWw5JCe
QTKc0t3/NRym2dSpPYDl1z+ORsKyj8n+6shHedKPkt1walr0rgC4oX2IyyP9
ttOKKYX7V07+sYzsd+0hTwH1CRr0X86FPQanLveC4385fiH5CVQijiTDlY/U
UipNyfcLRZXD8tWl0VFwUX+rTTO881Jiy0JS/8F/01phSYDB5w8meK5BgnUP
YXb6E/szsHGZh+wvuHxHsNsqOOnh1eP+JF6fdI8aLG56eI2Ch8edn/rUGO/h
dn5ROvLNKL+vnQl75GbnTYNvLArS3wJzbJxPHib9eN7i7w4rr/cYGqSjz0v+
SlwAJzktyw+ESyKPPpkL8/ZHnX80HfHjLrw1gaWNp97awfGsbcOLYJrpQ/pN
bczbOKN6Gczg0KJYsLzxdCIfZu9zP9UxjU3NH12/KA0unSRdfBw2HK5PuQOX
X8+z8YfLRcG0t2R/9X08e1hoJnNSRX2ip3POWsNijzN5FnDuTPecJXDqa4+h
ZbAHq2oxH443d7XYBMcfzwu8APdplp4VwJKIX3Yysp/vx58RsOXR09xFyK8/
mZsUAitrr1dM1iZ/F12/+cA8F7nhS1i69+9d5sTalfVzUW+r3dNmCi4NVTYP
hfVS3VwfId/ctWGTcuDcMh9+Msx1elxcDTM3DXn9Tvp9/JppA8xz1DP+MRfv
7WuX5BrYQTk34jLM3qJWR9bLEi4UB5Hxs3PebIQVA1W9dGGpxpdeLdiwYUd+
2xw4jD9cjPyEvRVPz8FJyWO9C+C8Y+zEcFigqHi4GPWWllXTl8LiqwsNdGDv
57fCLWFayNRtiVPxfeHS0T0b5tK6dvVMQTwHvZWzYEbtG6b/FPL3201lHlz0
T/5uyWTUW+z7yQmWdO3PWQ2LwyasWwvzFPfv+ayF58uz4ceS/a48U8mGvRe7
vM4n8cXRsWvgDpcdns9IvtWDY0zYVSvdZBjmyJwuz4WzP/+haIB6s3U5hQvg
kvrUOCeYYtGVV8J86ffoP+F4QSe1Hzb8z3d+CFw6Z9XQfVh0hGvCh1NftZVo
TibvvWJCMMyI0gnbAFfq1opWwR5Hop1vwEnG2SNWJJ5F2tzxqFe0z6luEhk3
HHD3JP3QuGf5D/JrvcSZlwgzp12uy4LZ/+zsuQjLDY4H+5Lxg/UBVWT9kIab
CulvlPuiu6R/DQPie0aIt/YE4xysXPResAOOPBPfuBUuHxu7awqLu2JHGbCr
fYLyB0M839lJm0TITy5+tL8Yzg6h3/SGYyKTlffAEuePWx6hXmYZX3M5TJOX
Fy+G/Z78OGsJC75W6+XTMJ663n4mzD5Qf1Ud5pYXfNKB+7bNlvyngXylp00Z
sI9d1fJ2dfRplecoWc+u/tjbrobz2eNR2VKYS39SKldFvv2z9PhwLj3KZAnc
0pkQdgIu7fq8uFIF9Q1I9lXAVOu+zg0w5861Z92w5fU1irZk3J16q4p6KREr
2RG2LDfzMYdFbl9dwmFv7t9dnnBfQsdsMewg6ChdB+d2HAtzxn60U/wFwcSe
gYrN8Py9NV5BsETOu7cD+dIKzDb5wpYzpQ06qIc+ejzIluw3RTinAvZxXndd
i4zXZQwsQ/3y5iEXKfJjbM8c/wiWfTqzIx8WKbgbGGqi33QrjY2k378iIjiw
7b1ac10yX/9xExcu5fqbSXAOLu0+MWAHKzetFQph6lZJdhficTcF3lwM9xnu
ObwWlly9bjaAczBX/1teIfLJffho3i1Y8n3P5SfIXznrTEEcLLWPYTSiviI9
Y1tf2GdB6Kdb6Edk4UvVhWT+tSba8UnIr7G+SQ8WJB1cwVXGe1g59fYUmFo1
cJk5Ee/NgSmbtMn8QictbSWsL8K1ABa1NjxTn4B/D1Hui+1hxjhlL0NFfB8I
BzhryPrGpHTueLjgjNf/87l9S1c8DvtsHKophOMzGDHrYWMbF7cmOPWlrrcR
LFex9/1BzvmW/jQ9WNh9dq8+6ce2+Ww2bFj5TWBP+sVcvuEo7KcQb70SFpl/
sB2DpfHB+gGwNLhBMwn7S82efCIunTFuohHyk4fHta2C2SxZ5GP4jPHaQhLP
Z0QWtA31SNO1s+jEGobNSqjXR74t7BPpT0/w6sOw8aZK3jWS717Rmj44b5av
1XbSjx+rsxagX8zAJU3ziMNXrvKA5Zq+h8k5XMQ6l2cJd6i+k5yEuedvXpBh
vajdfa4XOefPy9otIPE7jBXJvcTyiLHfY+TDnpJ9u5bcO9J7QkeQb0vK1ZXJ
MLfQ5LoS3Ld66Ig/zIgXXh5E/bkTY28xyb2FXUFrVkDeK3Zd1IVpvSah+RSe
x+q+Cg04t8k69OtPFtWfaiIi5+x4u4b2QjmLim+PnECH2T06rodGWJStTXfg
fFjkOF7n3DCLSlk4zPQk+08yCfo5yKJaG9Yc5ZPxTw46ZQMs3F84phlkfX1r
fnU/i2IKY3KqyH7rdiaYw3XfzXjvyXy3EKWf31mUHjVbXQ31Sp9p8E0xzi5I
tCb3IMraue8SLGGfeuAK50Z7zN+D+DFh7/t9ybj6/bR92F9gWryBQ3x3isqV
IRaVu1OJsZL081Bq2QDyzWvQrnMk8YXhBWzUM2x1bLMB8fLsrqhRFuUx5eKF
7yTfauXpaag/5WBsxj3SD80tcRFjLGqn1khtPPEhUZ4a+uXgqKDjQOaXf1f6
A5YNjmS+wzmZUn2U7wrH8wKFy4l1MjY2Y33RnyUjt3FO5iZ4OyrAtlWH++cQ
2xatbsL+PGu2ZS7OydSLe8+XIr/Wquujc2FGzZXjkcg/Vcl5Qi3OyaKCc/k8
1Gt7L9AqAo43cmiah/5kJ7cJbYjrnCtavrEo5dCekWkwmzGR09uLeEdcjqmR
9Qd/D17+Cc/HaZnFDGLj2BN975BfQkcTOYezaba/ht+wKEtO5n4Snxr50KLx
ikUxdrik3CDxN327vPUF8q04lqlA8m1v7zBvxvOJTHntS8wcXR8uQX8DXoUW
EKt8qg5pRLwEP7t+4o9b33TDjHs34mxRP2W4vJ/WhP5JmS+3wfHhQ47vEc/j
/OGEdOKNk1sqsF981rbQC8RJz119OjD+5LngDCw6lvKjRMqi6Ce5oftIvBy+
gdtbzC92YC4h8ytd+WLURys8cIPcS0Qzg89ryrDf6RhJOsln6vLJgx9Rz4z7
f+rD7FcXF6ztYVHlj9PeZZF+TOj9+dtnjP9me2ci6UfDOhMHmH3p5KEIcq4u
vvU1E/NlY8nu7TgXU+maJRboL9c7dXQJzF4tVlLBfgLP9qhKcu/gRTcuQD6l
hq4OLFj0e8buu+i32D7EqBnnZKrGThjzEjboDoyG4wfF7nefI15E+aLFZHwr
J+FLLeIp64/RiMlPbhUlI/8/M539P7CraFg=
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], {4.013809742330268, 11.986190257669733`}, \
{1, -1}], LineBox[CompressedData["
1:eJwl1ns8VHkfB/CTS7GbW2QRGkWEyCWbhzhKsmUzuYxyyZTaFVYosWU0lpDa
NYlWNyZyLxSFLRpFF9nMItFKg8j9EpVKPJ/f8/xR5/We3zm/7/fzPefM0Np7
0GW/GEVRjfhHjpQK+U+bpuTJUZ6mHgQGljSupCluR/0+STmaGq3qTfsD5i9Z
NWsiS1OGsgPXtxCHvUlNlqGpN3/n7fu8gqao7rLjOvCIl//RAlgUO2k8s5im
1FaWdnnAgvPXF0hj/bPGN0lSZD3/vS4Ljtjt5lGjhXqzDnUv4aTZM13HYPan
jzrJqMft1XbdBDPe+RgdQD+pu3V/Via23hZghH57LTzXfWDQlPD48j3FcMv2
h6a9cMgFHneNAk09Xt2o9wrmT0a3X4Vfy4x9T9blTy/rkllCU86txr1TsOCW
Uu1euGYyYqUM9hembq7IgKO2vo8xhAWP5axq4KVupuud4dIeM8t78AtPc7cw
mOfTanAFNrf+pysFZjZu0toP79H8QawYnmjYXEzqsVYYGdfCNC+8MQP9qL6t
2tBA9vs+IVcDnpnoOvkIDnkn4c5DngV2+VKV5HxOv8YX5E9hC90vEpc/udqO
+dht7KoMJf2dFS15hPm134/Tsibz+4nJbsH8VYMPLZtFPrrCnZKGr7VY/FUG
M+jVTqHf0tQrP6Po/SS/k520IvxAfcZMCWZPaSm8+4amoiPeZ55YjvXjlsvl
sB5yuSV5QBP75bEe/QybPglrZ8HUrHnaBzg6bzz+uQbu29k41zLUG7Jpa/aH
GbZNR86S54Vt/VYRpgIacpPQP0shvqpdHfUOqPieQj7rquHxCngiMadpE/Kb
pizuKIXX8s4LK+G/rn06XAvzNixz0MS8eu5tTO4n/nHLH8Fwbl/pwDLsP2H8
US0H5vUlB3vD/BMy12vg/Fu3o7Lg0urK6Cq4LWJ61QAsz4j3TINFJrrxushT
aqaa4QpndStIesETG/bpfUT9lNPfFHBgvsEP5nEw78ozl1MwT+6kFnl/1Hgm
01wyH4PLPj3IJ6Y+VOFN7P2AeRf5gxgRqprEbU7LL2E+brt6h+vJPBjPjidj
fmGtss4smL6iqp+N+b/xl0ptRj66MtukRxrnlXUp2ML8JIdwd7juidoofxlc
ftdAHJawqm/9qgablaeMSWG/oN2VXjC1Nb3uO6yP5CQfFahi3kXrK47B2zPi
rpoQ8339lFCPe6VVo1wFxx2uih3ER3NHtsECk02tNehP79L2BbPfYU4x/0pU
of+5QXn5hzDfqfpTFfIlSn88Wgiz90aVlCG/duBLp3xi/aUx6eT99eveXA3T
1k9G1mBejOynM32wvP9o4K9wpyLvowbqMTP0ggthF4tFMmxYPuTUbDXs1lrG
zYXp0EuZN+Hy+PV7huGQXw6GJcL90zf+0UMeJt9eyw7W717E2gVTz2Pz7qH+
S383tUiYUXx/UTP6U7ISmMTAfF9WQh15Pu2vPAmF6d/9BrORj5lkt92RnC/+
dZCD/AyL4OMSZF7nXU6xMR+1ntpDeagv+s3JdxfmyRvnJJmRedV2tB3G/Lkb
Cp2uIZ+gbSyzehH6uLPYVpnMbyxMzRpW8WHmHVHGerLx8PuFqOfhuaVlKeqL
MW+OwkZCpyWmxPFGgytw/uxjqdfpSrjecM3gGfg+R0tdhtjGbpk56umzGSfP
KmK/7PofKfQj0C6bMYbZw+sMh2FN/oBmH76HBO1VzW/Rv1SxeHA5zNaaDx9A
vsVfromT7z16tE35NfKvsojI45P1/kPrazAfbsmjl1Uw/5M471fMb8TT9RPZ
j5qquLoQ871bkejPIPW2Ke/0gW1iOS1+MP9AkXMkrH/RLaQQZhyq/I877Fic
tm0M5vqyJqaxH1M2O2018lAhJ/Z5wcp7do+xYHZUxWHye+Ogp10UqkTe57A/
LqA/FjtZ8QixzjnzRPQ//Wz0zB4yjzTugf3I94w12mpK1i1vSNLIn3WjQTSo
SPLFia/CvLwPMuQSSX9ZFk+0MU/5kx5f5Uj/4j8ddcT81SwvB5xAPq63hOdF
SbwvX1QWjSqQ+1NmrwPf1emycFIg35/srcMSNLV1tPxpPp47duyuoHFY03h7
lRSx7JrYtTg/MTsquVeW5LnxYyFMnfTjNSMXI/OXfHfUO13PznyLXAxB8pAe
+pmRG/6wGhYdrvRTQb/+hQ2xGcgpEDedVkae9POSOVtgrvXzCmXkVTohI6MD
ix4P/iVNntfa6nozcn7gs5IeHNtXT7GCiRUNL6Vh34HYepm/yfV2fYdV0Id2
zH22A6nHaeX7wY7tCkFNMP2w3CsMFvaZHfcmzwFrzfRGHHk83VvdOIpaOrrb
SN82G5JdSb6wtTdN4dOuVUl55Hc8y+ZvH9RxLCgqaIUpe9ule9Ev//7CgRaY
f3li/zbk0U5b8CefnK9p/pncH3N39Qvrie8I74lhHp3ORb9dQj36qmrWCOY3
cjo6kfQn0rzZOol5lwaIs1+Q3D/n6mrCjKb58TukTmT6L8fEacrJ8/pQPOow
Clq/yMMTmqHOm1BH0CPc2iuG64WX/53FfWBrTt2Zgt/Mnwq9R+6T6rkEGueL
Rv7hnMO+dL1Fax0sURy197Q4eR4vvY/E5wMOr8YLcB1lWC90wXVBsQ2T7xeg
/5xoXwfsu7PB8MVhmM//4uSAPMJHOyL1YJFDYLY9+qjzmJ6TgynqXowZ+rRX
M5rUJdfr+AolkYPXVLs7gHhhxnAJvNPzoFETTBfZWOkht5vq3gQn1KdjvErI
73N6tc+OF7Dgg6t6AHm/k1bV+6FfgcXSUCPY3qNJsh+mlWbrbmO/xv6Vd1yQ
Q3D9orUUPOPmkZMJi759+lAf/URtDF9RR5zFvqWHftkJjRlVZM4G/1rIIo9o
6MLQMZh952nFAPLbB14KkSZulDd/iGMkfWsrqc8fruOW4zhdl2v2uxh5v1am
C8jRKIH1O5nHu1MTZG68hLC5QArn69u+9SG5a5Tcf5qzpURygQ7z+Dz/1/jv
Or/YUrR0zcgrmOm4sZ/5yZb8NXvxMyyczzjY+cGWYrzZOOSC6yfs2yzTpnF9
un5gNyxoLeUkv7Ol2CXlI5dRf+1Ky+WdE7YU93xfPwf9MfNuZMuNY91yVDwc
/VOR6v3mo7YUf/yRIBz5hNetHNeM4PwLxhphuL/CglfOU8Po59PADm/Mg+98
ViYC64IU3ThdMq+pzSMZuF5QMxD0GBYV7JhzxP7cPx8Mr8N82zed98pFffpI
BecAzJQr4NRMwszxM77wzqyUdc/RLzfQoJL8nnPne/uap7BfR3huqhT5u7TH
4gry0TkvlnaifojGAUvD9/DrjogP6I8RFBLgR1x0MXEM/c88UEv6DzGt+EBI
nusue6tCXM9YnlpTiPwq3jF+pWT/4U5OEuaTH5rmwER9SvpaJQfzS5Rc7J2C
fkUftVafwbwZ5xfeX4R83BeyjZnzmFv7BY+gAeyf9PTqCdy3iUxm6rFerCee
cxV9xXUNBm31nVg3tdl9Gxbk5F7LbobjtktIzZE+dW6/qsXnH1usmub+d18p
Kn3D/48U/V9RE5iQ
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], {4.558738695939086, 4.601506520304571}, \
{0, -1}], LineBox[CompressedData["
1:eJw9lws0VGsbx6UUx1SDGXdmvHunESGX0PUp415RR1LGLRpTySXkElJUknJJ
J9KhqBb1ifOVmqJzqMgppDi5p6skheqIVN/37nVOr7Vm7fVb77b3fp/nfZ7n
/9fbHLpui6yMjMwo/jHXf/5oyJzBXE1Bhh1ql78A88TIm95bJiDjN+wc4UmD
TIO86fkEzFKtpVd20hAgq2+124xZ9x/R20NDv/cl7t0XxoCfcUs/gYa2S9nx
ujmYS+4VdwXTMM6OKdCzZ/jhxBRXGoJDVdNFX+eDjJuWz7Q5NFig4GTBdczy
Lpe7RyiYHBgqzkjEHGPk8fUKBWmpTSKLNZj5TYetIimAvoSbSw0ws6WZeQso
WKXqetyJjbli7XPhCIJ+ibrClqmYJefjV11GYOtb+VlRFrM0vvVoAoLpXvMs
TBSZ9ePCY2sRDJi9d1qhgzmJLt6+AIHYcdECp4WYw2iXfF0EGbaDSl9+xmyd
MjBNE0GmZv1YcwRmSGjqoxAsce6gDI5hFmz2rFyMQMP7UVFoOfN8q1SxH4I7
SVPTjOuZ97+Lt8lE0KBydr/FX5hz6+B9AwLOcWUo68I8Xva0cwYFd4rRditm
fSTmyHRnChpYiv5/32bex7XdkE7Bydnbck6cZ+KX6Fh2nwK3acvW+iVgflp9
Z6YcDY6lamf4Tphrlp+ts6QhvjI62pjZr5uibpoXDVdNV55yrzPC++lwy4mk
YYFsI/dmLGa3VRev4nx+2Rqp2j4Pc+oyne3xNAw/UCix6TbE8X0r7txGQ/f/
inalHME8oLDoLxcaOn53Nwch5hJH2zY+DX2ZaqyaKZitRTk9b3H+GpVK5Rrm
gUxmzsrgcgp2Z3yRKc3FHPbC1yuEAs/gB3PrIjHLL5ReN6TgYfbz74MizDUT
w6WDCEyMXcSaazGX8GsWX0JwzdZ6xS03zDGHVB1iEbyRbF11dxPmjs7HTmsQ
fHP8FpG1A7NUr8PJBIHUNXcG7yBmOJRarYOgLiHilfY5zAPLRFE4n+4qq2Jl
6zA/ZXfnz0FAuzotM32J2S/gTukynB+/FvfZMsx+X/mGByJIjBFVmKpidpxR
bngcgXyavXgbjVmyqe1IM4K56p3VowJm/27lL2dSsNnmW00Ywlwz6mvphvN3
MdZHlY2ZLTD0z8bneVeR9elR/D5H39kuDynw2xrd6H0XM7tf+E2BBqf8t5VG
2ZhH7PobbWi4ub5WGPIzZs8R5TgfGp5w2E/GWMz+v8i77KJBGCr+8LnGAN+/
cpifhOvZfTzrVTjmDtH6/btpYI2t6/VEDKfVl0toKCuaem2kTYDjn2aU7EhD
ekejiVk6w1K9ZG18/wP7educMQvWXa7tx/U2V/VslhLmmsrQ+lIKfhq998Hy
xVwcX9d3oRIKBMU3lMU1mGvibB7OoSB7edPAuVLMDT0PWK8Q9IwHsAcKMFd4
dxiXItA3jt9ztBCzJHunfBSOn6h1PPwCZr/chpkueF2ub3T4JuaSJ3ut5yO4
cv258Hs75vG8iWFtBIcs62ttxzCfNtswjvPZf+lJlIUq/j7Qcd86F9df8yYP
U0vMpwW6ZSsQnNkX0FPkhnnkUsBBCYLuzGuqSMzst8uCPokgxGR61eEIzKlv
phu3IbhVsaJTNxqzNLXljQoFyHXfZGYoc3/b0AYPCnQ3frmsI8Kcq23jmUuB
Js+zN2MJZut9Nx48pkAyUqkjZOKl/lmueRYNqxvXH6G78fcKFEsqltKgs3d6
5a/5zP5fPlvpT4ONxF9yxB3zyKslHdE02DmbOxvJY04qu+KH89mp+0rho1Qf
3++eEhVHw/S4kFPxWzGrn/rqLabh0Ou37WJtzKlXBSw7GprDY4fM2ubg+/W2
KanT0GiVt3DuMcx+gzmHn1GgIOS0m3thHlEJUzxLwfqt1zd1z8fM3tUUtZmC
fBOrw3wW5tzjZU95FBjcHrSNG8NzwTRJJaQP59O/q6dpCLMkyVH/LALWo7yQ
sPeYK4w8WsMQfHBZ32f8BfPpsyF9Dgi+euVsEM3Czzsd2m5liKD1mH1YvwBz
BafSEufz/ZIh/RAHzOqVzUe0EGwJ2b49MAizgD3T0QBB342Pw4IDzPcItf4Q
IujUFzYYnMEM9+aXBCNI0/nbS/Yq5hJWNipEoJSRZJV7C3OHv0tzJwI3pxX+
FnWYZczKBjQosHKOmJJbjdlN9uQOEQVega6BiiWYU3XaFxdQsHi5yRnxQeb9
QX8s6sH9+JBSogoTrxKnjD0qOJ61ljHyNLMelhq2ggYFMZp/8wUTj2d2LwNo
EJxyLVc/xcRrqH5xLA2iIrX8TXgOyrh9G4vC+XTW/mcO/1g3CB0IPFdBkf/3
jqpwex1AkeenP+p9tFKbIu+Xut47+Lkbke+rPvh+7xDOw4/v3zjR4pMXg8j+
DMoq8j9tQGT/q++mfw+yRSQ+wuHfC+4vQiR+kfv2NAQtRSS+kx9/OvvNCZH4
VylVWz32QSQ/5zxY7Hbcl3/kj1+ck5Ofi0h+z0+qdGZJEcn/bwnXMzTaETkf
qZXbS4pHETk/xUMX+A/lKHK+YpeLszKUKHL+SsrnUGa4Ln+cz+AobvV+BYqc
38FnDZF9HxE536Yl9ufoR4ic//RPbwWNTLz+rY/rneI/O4IRqZ+rhQdUmgwR
qS/WWo4g74Ueqb/EE1kByb/okfr8zwfNMZaDHqlfuNtY2fqZT+pb1FJwYudF
Pqn/oMwJ582BfNIfrO0u7Oym+aR/eGbm3Inu5ZH+8vilq93TAzzSf5rCFHPv
OPBIf3r5aFL+CZ9H+teB2vjVt5R4pL8Z3fl4aECdR/rfTtesR1XmPNIf63Vs
HG748Ej/3Lvf+efC4zzSX0UqtpwTrTzSf7922yyrVuCT/tyyQadqioBP+neI
ud4s9ko+6e/elUYzjq7nk/7v8yI5KdyPT+bD9eWnhtX8+WR+fHhoprbJg0/m
i3eI3bu85Xwyfw47WM68p80n82lnW+u1nh4emV8fUnZeNNzOI/NNqUZ8Ov+1
Lpl/5b3jWboeumQ+fli4yW5NlQ6Znz81zO6x0NYh8zVJaK7FTtQm83f1RJ+t
cr8Wmc8VdQm7qI1aZH5HDwlyzndrkvnu6KYUJAzXJPP/QkrV0T+0NYk+eHyf
Zdvap0H0g7BCLlG3SoPoiy5Yc0D7kgbRH+OzIswNr2kQfTLLzKGwoFWD6BeZ
33w9nv1Pg+ibWyk7kgutNIn+2fw1aOZklCbRRwVRGpb1lZpEP51MfjBSO6pJ
9BU7S069l9Yi+sujcH5QuLMW0Wen8jMSdvtoEf12sX6r+X1vLaLvUl0Wy86z
1yL6b6Ozf0WUqhbRh5xpit/LmjWJfuR09JR9CtUk+tJlysPXe75qEP258ZxH
3p5oDaJPI8NvKH9+qU7067zkofJ0J3Wib1Vd1VrXXlAj+rchWNK2n6VG9PGv
tbvvekSpEv3MlrKVit9wib6ObWm5+fsOLtHfaZIU7+VyXKLPH081am/5L4fo
9ziFwaXcGA7R96cNqgyy1nOI/n8+3rXnnDOH+IO4yWuffmHW//UPBaETb4si
OMRftEu8bvDPcIj/yD7qKi3r5BB/Ir8kUnmzOpf4l8F8wx5FTy7xN8uyD/+6
4xiX+J+NinRwQh2X+KNvwRdPnGH2+69/Sg48zh6Y5BJ/JSp88M5ygkv8V9iY
/1/BfVzizw4FTtufUsYl/o3jt8X+RACX+DuVtfrSp7Jc4v+KnsyduHSEQ/zh
uuzW1/YzOMQ/akxh366OUCH+MqCua/rtdmXiP30ri9vCrZWJP7XVvZKlkK9E
/Kv8sfeFl6cpEX+rkKhrJIxjww//++c05sqG/wNXTKgW
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], {8.354800000000001, 10.}, {1, 0}], 
       {PointSize[0.04], PointBox[{10., 4.}], PointBox[{10., 16.}]}, 
       InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox[
            RowBox[{"C1", " ", "N7", " ", "T7"}],
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->6.137505285412264],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          6.137505285412264]& ], {10., -0.5}, {0, -1}]},
      AspectRatio->1,
      PlotRange->{{-1, 21}, {-1, 21}}], {44, 44}, {0, 0}, {22, 22}], 
    InsetBox[
     GraphicsBox[
      {Thickness[0.005], LineBox[CompressedData["
1:eJwd2Hs81Pn3B/CPEIoQCYnJrQnJfSmZUUhlNayEVJOQokxrE5JFSFIphOSa
opUS0vRNVtEmubYipW1Siw2bjUql+r3Ozz/vx7PPe96fc87n8j6fFvmFugfM
YBjGQ4xhaGTGv+NvMZdhEVS5TPM6s8RquNndz0oRLmQ3VAfBCofZy1bAEXlD
8towOzrjzCHYOkb/7Ut9LiMtuUeqF/Y9q7b1N9hZLk/dUY3L8PyOyRyCsznq
8U1wP6vacDM85fP3Ujd1LpPxPjzGES7MT4wchIcz15nbwoJ8Mf6vC7iMy5jk
f3awtb18jYoGl2FaHva6wM3Fkj6lcOW97hR/eFxPOs5oIc6fXslJoPnjb54U
wbpl7o8uwZUf9t8V18T5UmSeP4KDpt4c2AB3rvf4c5p+v1/G6DBsXbFLUw/5
SetYaebD3edMl6+Fre+8Li6E+Y9DugKpPsmDWqkw87+O3oPkhD+m/eDRI6OF
SXDhrYEjbFpPOPouEea37u0SIR7hOmflSKr33q+H0uC0ipd/boOFM4+ftoU9
cg2PLYezf/C1fYP8ZF9w1WfR/KLPZ/Lhy6fV/upAvGnKmmFbYQnT9UXHYZ5G
HcsYftL39QjV0zqk0U4RVmj58PGTHpcRyZw+PQs2GW08VAHz4/4dXgAHFVhU
+sFCRiTmBHe+36qkAQtC1yQnw6ye/dPPdPG7p1nzBsgh5QdKyLkJ9jzEqxrh
YHoAFh1/X9cBT/Kf+22ECy2UDvgif5P3Vfc48HDWw5b/4KD05BQruLOtqypF
C+eJS9pkQ/PbhxlFFu6bNWyXNeQhE1dvmPlnzuxtsOoKlb5ceLzb+UEMnH13
MLIH5pv7+1E8GSeTtkstwli8W9AGSyyrWLoUjqi+GfgRDpmzfcoJtkg4dkUL
+fmPivt5wHyV8cbVMG9BbOZGOMh4wm07PPp9p9N6mj9Y7RJOx7s1LlnBEpbr
pOPg4T0eAWrwaETU+li4rDTj8HvE88t0wJYw+JegMM82OC2iQM4HLsnM4Z+H
o+3W1lrQ+onl1lFwwgY9awn48hK3EA/YwqVx/AHlJ128w4LyHbQpPwIbfbBw
0oBT41RSqZ4ubLFXcrTeDzs+TeigXn9rnpsFN+3u+LUU7q5dt0kJllBeXOsL
T9U/CWPDDbpeLBWYP5n8x1p4cvc6pR5t3L9ywbnhcIjzvbP5cLbE7dsVsMKV
I3774PGvwYljsFAq/fwG2GRV4T/myD+1KUplOWwbkJAVAzcMuY2YwEHbnWUf
wt0qp+6bw7o2K6+pYGwtlm2xx8h4tk9txdit2J7hjTHDQflgEcaSCj/fSIz9
s+8o9GOUjpj4QvHETlqPyCLuBndHuWZYwq2lzAzmRWeIv6P412v7u8DT+ZrO
6hiFcu713nT824JNdhibPScHfDBOnn71bDPGDCfHJB7Gpp++twjoeI398xVU
F0W5yIMYZQ300zR16L0SUhGF8XXg69LPOM+kxdDVPXS8euuBR3CZ0x2eB6wR
sTOuDK5c2frGGPZ/Ver7K+y1at+2bxije0vPUJ7S/r2yTVSPDSuybDA2hJyp
j6NRMjNxEca6vsIc+vfpUUMTJYydkY4S/6KOr8PjpuRhwZTHsSLYY1t5oyrN
v5F1zxNW4LmOL4X5m/+0UqDn4F6kO10niT0l5p24bhrX0y2jqf5bd97Phn0P
2vlXk8025gXDdekiywlab1X3GN0XJWFWRTZ035xsF9B9mLFL86cEmF1/caMh
PCpb0NxJdevVszeGz12RCNbAfdkkGelmCwtGnl72p+cyaC6b7mvp74f0S2Fn
x29TYbCLrsS1l/C5PKYgh57jL24xc/Ec6N7Nqb5L569xWWoNB7W9vjRKz5GT
c58bPK6rM6KM/GzXSepug42ir09YU32G2234sK+hXSjVQ/dtSsdGmm9Y5R4M
e93qUreHLdZYTuyn5353YJMOnPbmjiq5Ifri4+8UD6t1dhA916ENRb1wkOOa
PFdYKF5ZXkHvkfs17CWwspxOSgKsPKSbNoX4bM3iWrbCqbM8zerhmus+3Xaw
7wT/2UH4iVJMuz78Wimv0hxmPX2ZpErvwcQVpp14D6YdF2ydBwuOX+L+AMvO
ybHR1KX3h9ztIrw3VZN44eZ0PLOoQhmumX4/5AFHqEnfyqB9pNqxL458W+eL
HpwQ56R8E27e5dP4EO9tj01P3k7BwphVh+m97vB1vR8H+XdKbbm0hfaFUnPV
FPLhOenr4aYbISd66D3XfzTZDY74amesjX2lzOxZ0x7ahw947t5N+4yh8Gge
PGnz07PLcGfSD3bPaV/pv+ozBEecmZ/FRjxN+7vUVbGPBS3r/CMKDjGyuLUS
5uVurG6Hox892rSJ9skos2VayO9y+MJ0f7ghNNJ8J+xRKn82AFblzlQthr06
rbU3w8PLcu4/hCt/b93uBHPFksZEME9q3owlMPP6o/oLePLOU1lJOLl3yUAT
PH0g+3E/xeewY/AUnKwY9qIKTlaeKXKCm59p3DlKfcPT2Iy/ER937nMp6jPY
opi7AlikxCxwoD5kk7n4KPJ1/viWZUTHG1WKN8Ox97SHFlJfkfwkpAl9DP/b
SJs6PDwn/5AhXHJG6aYOzFwcFjuDvqfM/IWkDZ1/TREjA/sGf03yofmTjxYd
Rd9U0xebdITq//ZolDpcOdjdVg833NPa1oC+q2b+T9XfqO/ynFxJfVlhhcjI
kfqWHMsEd+rbRhsHT1J9bYeOc6lvM7m2pZ/qK/O8yAn2mhz5vJiN+0vu8Sc/
OOE+11QAe8V79pyGTe6l51TBhQXheY9ofYkmuTGazzMQ10Q8wxY3GhYuwfti
km8jgDtTYt1XwzznNj3q+2Qb77zwhVmaM3KVkV/dzrOzd8NM1Y7TvjATVCse
DBeaBfhnwap3XGP4tF5c3nQDLMgxq1oPN3eESPXArD7TtcYwu8NifjdsIR/3
4yy4IfHw7zdhj5LBuQOIL2Ke2IUk6jOjKjWEFP+uvXEr1Gn/zBQ7CUvLJC94
ivhGN9xy3QWzUxabB8DO9obBa+HKE3F+IuT7OulNtCmtN9z7fgM8nfAvTwe2
5vvdEs7HevkTTiy44cmRNi1Y2Kq+agmtv/mOd4oK3g+Gn/PtaP6yi4Ff5+H3
AyeX8WGFtku5h2BmymHlcTpeLSYnD6dF/ZPWBMf2fJa7roz77TwvVoLqt7N+
9s8w66dJhuqhsHTxz2vgNKmO+kw4ebo311KZ9tMQqwG4MsWxfQVct31211ID
XP9/X9h7wdPlOWLhcPJixioZNhJwtgthZ93/yTfDgj3clndw0A2beCXEw58l
LtAxxHtMe7A+APYqNp1whgvfmpTfhMdHlPf5wZWHr6vNQr6q7w4eD4WD5hhI
uMMNTGO4AGb/mtOYCitkt74KgGML9znUwroscVk3WOCqZfEQnr5Rl2MOS48t
138Ae6zMyZKHG0ouXL1C67X95j2E+LK9gsIPws3zg3bcpvhHii1NaP7DY+sz
4ELhtuvtiC+hcUHBXrgs7GKtNyyc19/kSh673N2NfKNz9gxYwcLPh3wd4NR/
HZrYMC+0T6NCCfvoqiMP9GBr150myuSEK93GdPxzVlPMXPR7nCJ7B/KVyhf/
KeJ+t6x4GQBXzjjO/hke/uvU19PwcOCxKnG4WzZhSwts8mmk45ICnpeWTs9Z
yG9qdtFoIOxfl/QXDxYtMAuzhbv/8CjMhTvVX9YZwAqNearDVJ+aRjlTmFHG
vmKE+3Px9Lkf4Wjad2B28PWyQ3AJ7Uuws/+MzNuwCe1b8Liak7KMIj3v2NeW
Yr4Uf9NmOI32PTj7Rezqq7CQ9kWY+8ml/DtcRvsmnNzdmrwG+fNoX4Vjw89b
xsMKRth3YYW/5hWUwwLal2FBV15YA+xB+zatlzHLuR6W1cO+Dg+nplWdhxNo
30d8CrtyfAQwl/oCOPnD+WldWEh9A8x3lvZrRDz+1FfAwq9fXFwpXuo74LKe
694PkG8/9SUws0WmxxoWUd8C88yjtVfLYz+kvobqcSHSRXEO9vU09D0wq70v
YVAW9z31RTTfNb63dTb2E+qbaL2xT2lts/B+oL6K3O3aMy6Dfov6Llg0b2jt
Sjia+jLk18mxuXNDGutR30aOrpizA06lvg4WPZUc4MDT1PdRPauvNrjQfOoL
jXFdVDxUksjUN8ImtmO+g7Au9ZWwYEuBTyDO9wv1nfB4asHPX+Fu6kuX4bl5
kSdZjHi7qW+FRQ+jnq9FPgqW6GthVu6pgjewrD76Xppfms2NQv7R1BfDlY9m
7n8Li6hvpuNq89RWyeF36eirYYFP17FgOIL6brKV86dAWLUAfTnNNz6aZgqH
UN+O+ApXLznfQutRX0/5db26bA7rUt9vTPMlVgsQTyt9F8AiRbfRRMQ/Tt8N
NH+TzauDyG+YviuoHq8nm3xQj3H67iAnLjI1ksL1p+8SODZDcetnSTwP9N0C
K0jHXeyQwLr0XQPzPl6dVyuO9yF998DM3MkPtTNw39F3EcVjdXnPUzHUJxjf
TfT7Lh31xXA/fVchv9gvfh1FDOpB311w4VODLT/Co/RdBiucOSgwgDPou43q
USiR+gP8iDv7Dy0T3OdP/lTdBydPnHu8GhYtSj7RBbMvbp/yp+MXHa654XyP
SudqxMPM/CsDw7BHge7mszDLMzD+OOL1qOuYWQHzi9q8LZGP87eqKzdhk3z3
OT1wvO1tvQbyDbfMAOSfpq6XQBbxwkqewuwJb/1bsML3ArWlqJdz1qeySrgz
hPH0hO1mT70sovNdk092g9l3HXtPUnw2CS8XwC19vtUHTej/QWpqa7Cel5ul
MJDWX6metBCuVzMzdTeh/iN3yBvxnNhd4s+h4yNe/qGI/8QvRxKX0fr5jdYB
yK9KR/miDsWz/Ly4A+rRxG0s16D8rNY8NPjGYe6udXBcQN5qbHj/C4f5Lapv
gOrJ6nLp3/eJw6RW7r1mQPFY9UzYfeQw6rbF2SvofMFzZ9q/5zCatY9XUDyi
nds8kyc4DGtk+bc95LqFi7TfcZgPUVdlTsCxYrFSqv9xmJYN6l7XaD2J/50P
Hecw+h9e1vdQPvrO6wxglYAvX6bp+lTKfXGAP49+a9Q2xe8F4/FCOC37QqcT
zHWLaI3Eev4PZN/uJB9+szkK5zsbypJLhBueC/4rQzzCtkzHPJilbrHu3SSH
6ekZ/+cqHb/x/qP9Bw4ToqebUgcXmtxyPIz8DHzDP90lj6VoFU9xGAmHcF4j
zVdUnziGeig/Hxq5TefTPvuryWcOU7+7NqgaZiTSj8XDEe2qeSV0/NiTiAj4
tx6Lk6dhUY9epSz8Qe+3XTG0nqj8xUqs53kvYe8umN/XKyOP87E9lvzjQfN/
L99xBPHVrX2itYrWz2JJVCH+Qb/djma0fopKUB7ynfP338H6/3/+lZ0+qE/N
h/gILTr+Tpb5MsJhmPUX1DSpfu+MWs2HOIwoasXvVE+mxyD06ACHiUrry1xK
/nB+kXM/h7G6di/BjtzVecmtm8PYtsku20g+WzgmasH14qR/FJCnNS8E/I7r
2T4hdYrMt8/IqsD1UBZ515Cz3f2sTnGYn/Vy7vaR6a/wNjOTRjPu/wFBa5DO

        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], \
{6.9861902576697315`, 12.986190257669733`}, {-1, -1}], LineBox[CompressedData["
1:eJwl13s81Nn/B/CPStgk5FsIDVGUhHIrmqGIpCZpU5GhiykphRalJGqSaixb
Uy5NNVlSmzaVSpo2NiW5RYoyXQkhUSPh93rvzz/n8Zxz5pz3+33m8zmHYdB2
740jGIYxVGAYapmOYfxN4zDqBG0O42f32e06zNwKSPo6kcMUCXl3NsP5KXd2
DsEbjp0+P5n6dd14hhiv1Z5h+2Iqh+GkPxlcC/fWv0sQwdJM28FLcMKf14IC
YO5+JxNNHQ7Dt2v2mQWLK8v5AnihQ3WcCiwLVFNS1eUwyrvixJ0mHKZq6MPf
Ilgvp+LHa5gj1pWaTeIwGTbpvJdwt3akz2242+WuhQy2HLp92lWPw8xJvezT
BYfpRfb9C6sfKwoYTeurh8yaq4/xyR5JU2DL9/V/psNl7KCnC+GwS3FRrTB/
ieJAMMyaZp1mYIDv55iWJ1E+L12aHOGSuymDF2Eme435Atj8W8LWf+F8Xtda
azjq2wrjRjiuK9RGFX7/6tVvLTAvIWR9LeaXbpiu2Ubx+El8jsCWU4JHvaX+
Z58n2sOqdgWVT+Fu2xNWrxF/yZbVW/Jp/RtfQuLhVqOZnEOwes3oC2Ywc8PU
wofiL9qS3oB6FIT4RmtTPXWDi1Jhn/EH79ehHjy1yL51sL3C9O6jMDfrW5IT
nLN9pfECOO6ErM8KluttzvhujPmVih9Rf9Tc+KzLsLDaQBII+4X+wQuGw1In
T82k+mvO/jIVFisuk3fCG/Q/GXZOwfq1Dxt8EJ97n0lEMRyW2PZ3OZwWuVHl
FJz/4u69ZbQfcUtP7oXFzNnLTbDMej5vOxxn9VdFKOrXoHbcMgTuDuleOET1
zy/k7aDxxsHsw5MxT6JVUxzM+xCgocjC5wOPzEVwjplvwHy4IEUl6TrMxO8u
2gaLJna018OFj0W30shKc1k/YFOXfT5X4Gcp6W/0kA/P/sSIYurvDO9yhPln
k29IYWlwkokvzLS8l92E51wT/L4VFjivCpHAccKg5CjqV5h35RBsfLTqfgzc
ELg2eD3NJ5jqvhPOET3JdICTy3ol62DR3X0nVOGiRLVaNq3f17HtLvLzM7jv
MgFm3Wc1b4DVjzjUvUW86tp9Dlowb657bTbM2p7RWon6pI1/37ye6h3xsCYd
9tP88XESzHFIt9kNP6tzUqk2wvf1/twfBheoVCYmwnGHOM6xsDAm69w86nf3
Vj4Hz3mXlNZniPnqPba9hjmplvzrsOWBIE0rrK9dE9CxB+5eZnjxJGx/TO+M
FxwlKEhWQj7d7K5MU5grTXvkAUcomZ9Wg+WFOTwh7dfyvOphqouCZX8D1S+R
o/oTbVTTGhNDjDP1UskaQeOPVe7ehPanSuw2TbQcD+ZqNrVMz8jpFF/ioivN
aIWdBqmL0LZerLg0Dnk4vu7T2EyfT/SebwMbN2t4JcOsYM1Ny+DkrfVDf8HK
J2dn+cPdSV4tT+GcCvbrAFj166N3n+A4833pv8Icy5WKQzSfsmmJC1ziOSRR
QZsz6tR1E7S9XbMjx6AtSx1poYA24mv48RFoZV76c5/jex3XpLGdNL+taPJF
tFq9UexKtO4DC1ypjn4+AR4XyBU1Oly0+V+r4nbQerLFP6ahbfDyt7Yha1jp
jEar12w4qgf1yrmzI7gD7fvzUe9z0bbG/tjXRHWccqVvHfXvbjzxnEXPf/pv
49Gyks9ufY3W16grIBX7Fhayze0L7cd5lQtKsOkko/ZxmF+WXVp7CPvO87l2
wQHW/uyQMBFWXp21JBRmgo/m3cJz29o9aWku7Zfnmz1hMDNWLG2nfb9n7e1E
79mjPbusqb4u07JYcFiV2sTdVE+D1S06sDzxhfUD2F5jZcU0WFs7N1CZfrcx
WhPdYTE3bbU7Pbeeax//BrN2xirtp/fCk5Ge12B7l1eSfHruSzrjvtF7hbP5
cR29F1RVRjohXpl39d4umL/inGs8XGb5gzMIu1tbPL4Ps5Z6jB2GfZVjln6H
uRcf+/fBwrH8fgPUQ/rTwuQNvUeM1hywgeWl9SUP6Llzk/jaw6Lb3kNZFO+K
zAITWJD7RRYBS79YFfyk+cL1CxbBrZW2AXfpXLHb0qxD1tPO4VN9tVdUf0b+
cq9PgQws7r/8oZTqw3KaeQj5mGa+XSKB808f82OoHhc/9SbByj5+1dvxXo2K
UoykevKmbah9gfcw80JlcBfV+9e8dy4wp+Kt+17YPXLG0Ss4V03XvBKlwIUh
/7MxhoVXR17Jh8ME4g4JzmX1yJzql7BwjaebDcwsG12rRvmoci0bcK5HXTyv
70n5uz6vO062kJccheXpMwX+sEgmOfUMrvJvz3cme27h6OM9pj1FXDEPVnZq
X7wRLkuaFbkYLmywW37RmM7R7E0hMCdTa0wbnUON7eJ0WF77NdgI51TU1pXx
z2HW5QuS5bBAVtWpi/hkaxv9d8GsoPG7A2FRy+2s43Qv2KuUng23Fre1ZcA5
Xr9Xf9Ch/c1bkAWLjW436yJ/+9Pl09Lg1lvsL85Uj8Ydx/bBclldySo4x32g
KRBWP7X86WrYvY7b4Ai7j9q63E2X3n/ev2vCZdzBcD2YCdT2+YD4fd2+uDVh
PYFiT+JNys/zZOlBmCPROXGEXOVTrk/13jqjeT2dAx0mjAT52S/bfNwFlscU
FumRT1almMHK89xajuAeJmN6onXp3C3Jetw3Afms5oXTOaHsP+7TOlj9w3ob
Azo31o6oKP8f6tYfPmBF546i+wsOzHwrjV9O50zakO4/Wvh86ZixeyieCUMG
K2DlSmd+Po23Ejz5Np7O6wUDHbC9W4nbFZgfnVY/i+qp6lEfC3OEN8qo/vz2
M41B4+lccoi8R/X4d1m5/3i6fx0KVcK9pPAv0exQWD0hfPEScs358mNwWWN0
6RHY98yhI/dgUYak6gHdg0ynPBmAW3lGl3qo/9z+UDbiMz1+QT4B91CxmfWI
g3CYztPSWbBgyZPBxzBr7OgMR1iWUvheBflyd2/e70T3VrtFu+fDfNeD/dZw
VPnUng0wL+zbsD6srclXi4Fl6WOHhrGeu2uI525Y1KZY9BIWPvLu2wTLPy1a
SvcyQdmHuY70/c6U4Xi693VPtR3A+vbz3tuvpHvmSNd2CSyusOCbUb4a3U7z
YNE/jz8qUP9w/Csp8vMVlsvoHiudUW3qAFfFz5hfRvfgb/d+ydFEHLsfHLtF
9zTR5GoNuDVT1n8dlq0OH47RQDxnjK2LYcYmYXKrOvbP2XJbDVy4KD/FH5Ya
bNzUQ/P3N9wtHof8Y+tX6dO91b9Q760a6qyxWNWb7pEF0cwMWHCq9+Mxuncq
+Z7JHItxjlv7qv+7J/8S7QhrRxuM0qH6JxxwVIblG3ZeD4QtZzyQDqsiv/GS
07kwS0tNg4V+pm6FVyeNP6SQvAF2LykSzDRF/B0crYewrPyw80a46uFtLgfr
i98uvZMKh1m/6X8I8zVLT9+EeRm5lisRP9Ol0ltJ/RH3G1/D2v1LfJpgrsPv
Iy2Qr3xL4r/k7rVahkGwveJwTTUsuq/58xAclvZPdBHcqqHCy4D5L7RMs+Co
5x2V/1klJjeK4knlimk8y6RRaynFW/xZ2Q/m/pJ6gwULUl+Z68JluR7yHsqP
52N9EPGEtZ1e9BDmio6GX0X8vntTf56BefUlSXeQL79onPM+mKNR7ZyHelUF
DPdvov+ztK7/JhhD9+7Ya75w97zuirW/oF62ycKVVF+9ai8LFcR905i9jvqv
xquoKGPeCepfdtLvveVWUe9orO/9anUqrX/zc1i/IuI7NurvYvr9T282NYDV
F2rf+0rrP/90gj8K6w5cllkiH8bE+E3TSPTf32UYQfWzL42MhQsjaj3vwGKL
9C+L4YY0VYVRZoj7Z6bOQpgJcKjxhIW6b1s2ko9XrRbCUsOgvDwar1PvU2lG
7ymuwzisJ9qeeXv0dNT1U+vMwzDr4dSaObBlhu5cDcTHzLJb6Aur76mLyYJF
caFmYbD49Ob6acjPfqd0/B6Y0TH0k8ANc0b85+5os3NjlPCcuMwtoPHS0B79
X2FTi6aBNTC3ICg8Fracqr3WEZYNnL+5B25ddF08Ac7vLJNw4Zy/tT62I15x
5Kyi75hfJjGOLobVp9v+uhOWTp5RQvmF3TmT9Q/ia/XYNGcjHJf7KLaD8ptw
lDWfxudLtvchf4GRY74+1Ueut/j9CNr35aWKMG/Yq0+qgHH7jVq/o75xZ8O1
03Cr5Yo32PXB0ipmb8UQm2l4tt5viPbHyfTrgZ9spsxLI2E8rfd556DfDzbD
zZ7uPwdmnuZk8eVsJkxBOIlH8UcplxZ8YzOFiRfi/qDxl5oKl/SxmShlfmsN
zDnZcsG+l81oe+StofxZ+w64xn5lM/lrnpzxp/rIhy9NIqcNrcqGeU6uLhow
S32+VifMsZ/zfBUsiH2z3XoG1h862/aB+vOKzXbAsj5n1SuYn3f+xbwc6j8Z
FCDB+qJrF7rrYJ6Ovt11xCdg9/fKYWn20dLK72xGKv++Ud0c45e/rX+DfJRj
Al9OgqXCVOGLfuR74e0msji00zwb+csjHTPHUf9edp79AJsRW3kc7Md8LLVN
oQmw8KrByZc0v86aon2wb8m9swUz6By2tTCG+e6D9w/TeNGpT9swn/pfyxb5
0fiWPx7wsJ6Mn5JhQX7803YI8ZXNOWUxkrzR12YZ4hfKi72b6Pc4KqF2HfK1
VFxlUUT1++FZN7eHzbiHmIgl9Ht0u+bwsQv1j7thfpLGb7+qZN2O/V0U0plG
9VTxWxz7EfElvzmcRf1nIpw63mD/cq2mFZAvvvNc0Ih8J3uE1ZGbLR7F1GJ/
XMPTFKi+/vnpWx+hv62Na0c+eNwoqQj1uqc7FEHmB88ezGYzVRoKZwvJ9Ce8
+/+tOef/AMc8hxg=
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], {6.643275441506765, 11.267313162260148`}, \
{-1, -1}], LineBox[CompressedData["
1:eJwt1QlQk0cYBuClHIIHhkMNOmiQBBVEogICFvMDWiOoHFFEKxgRhRppIYjV
IvRXnGmKVBlFwWlVKFgjthaNHBa0kasoKDBFSkEbiEDSQWssFAJV6LtOM5PJ
PNl/d9/v283EKfaTiL3vEULi8aafxDiJlw1D3r3mM0Qatcs+CQ7rV9j3O8Lj
hYVPOQwR+pkn9sLMg1rXYFjKdlmPwLzwprDPZjIkKd5hciHmG8ReqhRrhhSw
4sB4OOf+omWKGXhuU+2AmrrPauu96Xh+KuPgvgDfF3VvmwdLtxQFKmFDgrz5
22mw39DsOTyGqP0LFZGwmDBzo+EeY/cpb5jzrLqiCBaedrIOgIVV51P1MK/C
PVUOJ8hrXy52wn6hLvn1MHdfuC4WNtz00q3EftzursRcWHiqVVUGK1WCgSqY
E9F0LBB5FfNmL+iEkzoGpG0wmxYQo6fzBc4h21GfwfVi/AuY3fxPZhus0I1+
3gfzNhwcXo5+RI0772+j81fcZFNg9YtXMbfp/OiKiBzYGBdITsNqjSP3BLVl
7/o9NM/JQo+NcOtYnnwlXHploE6H9S1VF/UmtJ73/X/fBnMjl/LbaL0e03wv
I59+x8482g91UXBMDeqpPLflTBpsWCUJ+AX1F8zocf2Q2lTjUDYV550sc1kL
51g8t821wv6FEbpVsHQ0eviAJfr8R1AMNdtR0iCeAr+IIEF0PHlJitAC+7sI
anbAzF23fUvNGdKZ+BE3g65XY+W91gzzZuW9vU7Pq36KJMMU6w+Vv9HCBc7R
tZr3GJJfXsc40f4xrn/J4LABc2Uc7cfgV5/yYWZLVlcJLJVt9bCCWbE+9jXt
X/5bWy6sDvZo9FoIu72K3QQbCyavpsIFU2c9LIJ9VqhabsCc75act8f++r2n
JBo4iZMwkQd3ysyKzJ3R356yVAHyNvr7XuDBPQFas9uwcKvdlx4wUx5wzQ/1
hWmi166ApdlqVSnMiEodl8CGL47xrdGPsAcW/fZwa2/gZAh1rlAzgv0YT865
OFh460BlK8wr9lFL4Jz+WnnxQnqeNpw5cNRAZ9hBuNWuXPsD1s//2vpeIMxG
/SRzgBu7Jj1t6bgte3Un8i2eGSnoRz9aN1SvPop6WK1t113anxL5Bxmonxe5
c/cl2r+WA477TWidDw8p4DD+E/pbIofL5yen03H/EEXAhIgkHXH0zKDncdZE
O/6viLRec190EmbsL7Q8GhMRlmu3vJja9I1p06iIJMSPVTbS+27+Z4rJiIgY
c+9/P0rnD82oTB8WEf1QaLYH8vasm67YMCQihtl7jnxM60/vk8j+xnqSjSG3
3vXHjAy8FhFl1p0rxneua6iEE7Iv24joeTTnMRo4x3LNnEyYd+zcmXDMz0l1
jaqhrpPdN8P6CudQ5Ti1QSIYhJnHHXxXPu7JWd/xYeQpHbEVh8LS6c4WNshb
6XlyLAEmfhOb3VFPp3f2hUNwz7OIzlVG5MmvnnIYZpOsdi9A/WIveXEidWaq
QzuseH5nYxTMXOUHi8dFxCd5dbgvHX96ti8JFnZvT7Cl4/KO0XUwO+n0TT/y
EZXUrBbzO4MaPMtgdftxNx32W2yfVUDrUysv+ZQhD/Gdt0NC71t1WeZK5OVe
i3/sArM/nrghQz0546ZBhI7vGlyzn/ajQnivl/avpmXuGgPyPEp73Qyrpb89
eTUoIocfaRbVwqR04kmEDv3VOvrU0+fTN0c/0KK+69q0X+l9O+Gd9fIp8uTb
Nb+kPrN9vbEd96NddtyO5l9WX9XdhH6qtrFB1HEVbhM/I5+gwe8o9fBS5fkS
5Fmf8rDK+f//leK7xJJ+8pn/AINyV4g=
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], {2.7378965951519216`, 10.11205387127346}, \
{-1, -1}], LineBox[CompressedData["
1:eJwl1AlQU1cUBuBbxYAYMIBKEIyJIoKDiGuDWt+jUwREIMpSnBSIWpBSgVAU
o1aMKAX3V1s0qKlRVocR0oqKCxixbqiFatE6gkQGNXWBgLJqsP9tM5N58807
99xzTs5EsiptecIwQkg8vvRJmj/i48ASM31OYEmRj8i/EpatPzJmM7z0WN65
QFiZXW/Ng6uDRel3BCzhQn1ai91w7s0LpT8s29F3NA4We+0YjB7NEnWEq/1s
2JTifGuiPUsEjjtL3Wl8UGamiY/3ng7r6HvxA5fpl0Yhf+gTJ3o+aF7UvmJb
5K/KvXucxteF+VSMZInOylQ5CMd42k14YsMSNnXM1dWoxxgem70AFgc4LX4I
q7qSl9Vbs8TXNaI3TMQSxY1a5z0wkSfH/g5rLpGXW2FuywrJzImoozM57QSs
tPk2Yj+svx07qgM297WcfwQb7QWT5chvtPvahidG/J6BzUbq/JxjDrD084SK
DNQnvJJQaw+bDNqSkajfGL37m0Gcr36f7nMIVkT9LbgIa24lqRzQL9Esa1lJ
8/Pbi1Nh8+jSTd2or0zzm38JrCvglaXD/Tmik7/Cam9vSzv6618SF7eHzmuj
uWg57GlJZOfQ842nBVfofIKTik/iPlmvvGwerJxUGt2J+gSy65vOu7LEptGU
Yku9eVd3GGzsGj9uGPrRfzh94P14zN82ZFYrD+9552rrYJ2U7SwfgbinMVwJ
fPOeU0CGFeKXH6ophRVtr1PZ4Zh/4v3912DTs+/jRcNwTnvqtQUWhFn5OX+C
+uRTlKG4T5ahaphNWGJoOXuwEhb73VnfO8QQw6dre0Sol3WqG2q3MESwzXNL
Pmx8m6eVwsY20zU++tVF7/+j6wND9D9GxmXBnJAn4dP41Zdd6Xz0hY6pWTCX
VJMoxfyMVhuXLEB+42NOnQmTx36nZn5kiPrImNrDsNIz76kH6mEnBZ05QeMz
grovUXcEyvfCN0Oy/gxH/axmkYMc1k1fmfYXrJhaccwOVk0VprDoVzltqbgM
9yuvbtPugvVLtj/0gYXfeW8op/Mwb/hYgn58E/vStTAnl+SOg6urG0JiYYXm
6M3tmIfUfdbMl8ivuxcyvwfzkw5X3Qig82PzRekwMaQI16E+LtxjnsUFcT/E
Guj89IVq1S8wF5C89Qbm01gV9CAGFmyvrUwZZIiuKtJmBvXu4sKhPoYQ9+aU
STReJzzD9TBEkb32/Sxq63G+89/CYzcsiKfxZeWfCbrw+7xTKopgQ3/4hZAO
hsici9YM0fvbVpvHvkK+fBKSRPdFkz7/kAnzf57NNNP96NTef/Ic+U5MtUSg
P7XfVzHdzxiiLOzg36L7t/CV+i6sU7m7zMU8yD5t9CrEm7v4Cw+40f6WPS14
gXhrUfBj+n/RUP5F1D+433GR3X/7EMwwabhf72DKlsBsvWCg5g32YWRlnwvd
B2lujq2ZIeyUcEkPzWfreX8y+iHxgZIqWN8+VzG2G/vBb8hcAcua3v58GxYc
bmo1oT5FSdqFuZiHfsTeaWtgLkxcvxg2aC4PPKK/x86Lo3sRz81oygqk++6V
kM/AuoLX3mcxH9+od5HuuM+ov5rkDZPzd76M7ET+IpmfXoh6HCdPOYf6Od3z
D4upZQvn7EO/pDHXo8cZ/UzzSrO0oX//47xamEz3+EnejH7KW48Xwuq8gdyD
97DPTW6aEupTOe6j6jC/dVq36zSeftQ1/z+F7L+g5y1z
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], {1.5384875264621147`, 8.279737420613657}, \
{0, -1}], LineBox[CompressedData["
1:eJwd1wk8lNsbB/CXlGw1SSLKkGVCjLaL+ufVnrYprVTGFqUyyq1J0tgyDWmU
7ZZltCClphKKaoiyhpRIuVMJrXfkakP+v3N9Pj7v5zvvOc95nuc97xmMvQLX
+SpTFDWEX3KluobxY0FTcnKdSFNnvLcUtRBbOPsKYHXTAxvOw7TKguAx8MbK
a9p+sEJF0+eqLk2Zd+8RToU54kW53vACUV7mC3PcVwuqZcN3NBih8cQDNq4T
4UUeST7OMMNNfI34TURqXr8ZTbG/r51jB7OzY8T5sCSLaekF8x1t7ALgRm56
fQ4s1yjwZ8PUY074bzjs+XLZb1PEe7v4oyfyq/P23PYcFiufNa+Hw5ay+u/A
giHqp6MeTcW/rq+4BEsn/q2RDfNTeuLPw4qNl83V9Gkq6qhuRg7M8f3p5wFH
HCmtKyDxohtDLsDWmicTqmHeJ6WHT+FdJe6MTpjmh5z+DKdN2GqjjPx4AW+m
E1/VmXXJGObKlvY9gV3YWbY0LN6iujUTZiTXhbjDgpxL/a4knqG1XxCseP9h
bR/yi/jjjYaA3OfkfhDAg5HpDdGwLLJzgILtb44PCSfx3CI28FFvT/xm531k
fc1r5p/Qn6s/w55sIuu7OFZ6wjYLzDbMgGnHpfs7JtDU6LzKnSRfqajZzA+e
seyVCalP/FS4moJZwzN/xsDyW6zL+To0JUqpLKFJ/15nG+6Dt6sMHu6fin4J
pTFrYN608QdzYYb/z/tL4GNp6UPusELd7ugm+PfqOW7asMxmhL8ALlQKLq43
wXoi5Qn34b0RbC0xLKl4MYOB9Q01LZTcYfnoyxcCYf6O5g5bmHtiQNoKaxdt
ihoL08u9Zi9BfeXNym6/jBFf51zHDXj9qo5VCliQ2uGlj/5k7wl+Six74l8S
DGfsqfxCxitEV9xl8JMzlrO1EE+Q1OX1A07bKe0yI/l1RT3UR7/rqpwGF8DM
a577TeCq45XzvWDGzb0+42AT7R0e4TDHuy2/C/PPWd9iZMA8M5vQ8zDneodR
ISxzjlJ1gWsW58c9IvNF8w+/Qr7MEv/MRpgdtrOZPC/NobSBBpiaYHe9HfUe
mzZ4tYL05+JyFgcO7Siee5U4IjimAv0zd+pOjyP5+YVNmQ/XCS+t4MKNIjuV
8vHYT2rmbEvi7lsd6+Fvm45kfUT9VM196S9tmprPt1mXDXM8i/ML4YIbwvlb
Yemr+7qxsJvxt+SxsPitqskhOE6kmVvORD0aiZ8FsPDIrrKDMDOo90gWLCrd
b2gHSz36qlph/xvKwtdGqK94uHYq1k+8MWWQB0t1vl8Jg1nXi3jj4cabnM5O
2CctubdmCuIlpO9di3oao/gXUmG25YYRZL8M/iksDYU5dxJXs9AP7j8z+Qdg
6cUtVkKyf9WDpkXBdN6d9jaYCjFYdh4WRN6ep0/Om7jME42w5POBvgXw5s4K
vdFYX+benrAejpqpnboYZuiaXl8JsxwG+FEw3TNDyQqeN6VFX0bGO/1coUB8
0/YDg32knkNtuzPge2oXBrRQPy986zx7WHLSx24SzF6tH1SG/O01ZczJpF+1
xgfJ8xLHbJBOIP1ykDoVoH6TlWb2I8j456YaLDhtadi4WsQX38uyzUQ/W/2S
XhyCuZOKO6bApfJsjg5Mjb3w6fI4mlJ53t+Shvp4PZFnXWD+xtZEXdK/W7W7
fzOwv7b/zzV6Mvrq+/VXNWwdssL1syHyvDbw8ipcUPXSyBUW6Osm5cODR5+5
lxhgvX0asZXw08Dgk5aw4LRMux+u0Kj6dmES3lfukTAHrJfa7OtqQ6w6e95J
WKC6/UE1zjk5K36wF/6kY515iLh3+PVW5L8oZiLXCWbLqcIaOLXdUGwA81KV
TOag/pXbtSq0yLnZUfH+L3jwLzOJDnF/smkvzC/p7ppO5rP79v2Bfqq4pCRs
hDlJq2x2wonXXXpF+uT9+SaOhK8cmfb8IYkv9X0aBT9VYZaPJPkOZyzaDQdf
ncBYCEumvFnqCL8sjGOHwFTASjcF2b+FES3ZsDgnc0gMWy8IsqicRPr7Kt0I
livteddExos6AyTkfSpLPlUDS6XnbPXgtBtucfkwL7h1fBz6sT7AdTKJz/SW
7FGC6UOa0Wyy/nhWxBH0N27Emv4mUq+W7qqRsOGfE6K5sKzNNNFxLE3lRhfo
/41zSHImNubUGOwP+5lL18LcvLr1erC/vvW0Epw7shx2d4MW+v/w7WxjmCoZ
oV4CL3MXaAnJ9+yl7+vb4LpTB5f+i30rOJHCZmF+o+o2ehcsj0z7eg5mJ8z+
8Bl94R75zFiI9RN/bc6KgCn9+FkU8jNdfFvVinwvSHLr/OHObcyeHvSFuXPP
zBZYMTrD5C7M1futu5DUP33gXM54cj4ZWOXBu23OeBLTy8d4j0K/ftjc2XsH
Zns/YbnCFTVZqh1kfLD9yTi450V1wRiSz83a0Gsws+le4DId8n0vrb8N8/UN
Go7BgjUqAXnwJ9GdOZWw7EzVxnBYVqWnPgzTV6ouO8H2ZQUdtv+9t8cTupFP
o6brFVeY4XXfNBTmfB/7cwc5V3pWbCDPKy3EY5iYs8ah5DDqk0W5162F6Xat
ajn6o1mqs8Gc9DOudW41+rd50mB4J1k/tT2I9J/3pdv2BHEk/3yZJvockWtu
QvJVKbB5p4HzRun0yGzSj9tNbBu4kfHc3JD0M1Uy/bw68ipoDREib67rgqpl
cK6n0bZ/kBfVyhcbw6xL1302wJLzF7qmwy8buuzuM8i5mP09APaPaZ5rB0ty
mhqfw8vUvs33QN50lk5sANbj7y14dxh5C94ejTVCfq2dvLn3kLfAYmfLB7hx
dPN+S1giSg96gKtwUdGPcnwuKOI1ZZD9GNyyRgjTQmrlPsRN7Zk44RDMjJE/
1Cf7Ia5G7RTMSbGK3g2Lf0y2fwxTW/gzyPmj2LhpmgXpU98T31bYXnmfdRKs
2Dks+QjrZbDyxpJ9alQU8A7uETZFnIC5PUXe5LySGo3ZNxLrst376TiYVa0Z
vBcWFNyrnwszrTRZMlKv+vbsfFwVxz9a9eEqORXSXzaG/N0QWEj2NRUWtPIu
1pUnte3swn1uZ93RS8iT31TlkwlTH5LUEtAvYU2awIrEV21JDiPP52ZpTSzi
0MbvT4WqwWlxtqRPslNnbyWOxueRoW4tiCMz6E1tUMXz+DQUUYs4coMp7rNg
oVo8Kw9x5CFFnKpRqKOvRBaCOPLA3TXxcPHQZbcliMMsf6QQwsJAzXm6mEfb
RhfdgqXHig73jcT47JHvx+FzSf2mjC4VjDf2XZ5KxglWOXwfgfXn32hwRhxW
6eNMK5gqf/Z1JNYpflWbLlTG+HPyUe0wK0S0cBzx7IrsQuQlWTyj4qESeV4K
s3jkrcco9s+FmbuGVDahruLwgpSbsKRth48q6pY+a+h9C3MlPF4ybH8wNnwm
4gka0soGYb0ZHoNnYG726fxZZP/0e2lrIx/BVfVoR9LH00bVJ0l+6qqlmrBi
Xs4rddQjD33w6zLZJ5MfTQuBJc3hugYw01lp9DNy3zT563bk8+Ob+o3x6IdM
MeQShnyl9KMkW5i7rmZXOHl/ZhmmTyX37wqagkj9QQm+nzCfq8Sp3YL+CI9t
9BWS+E4x1CL0L5VtMPhf/7YYKs1Fv/WGhvf+j+T7l2PTMsRhp9Q0bEU91IFH
hw+QOJN2N7qjfrm/6FotmRd0P8qZIn+PsQNWw7zItZbWv50o5uaKEmVY/ruq
pmLAieLu9xR/QBzp8ys7PH46UfLL4y6OxH22HeUz5rsTJTC9Eb0WbtR6vfzt
vxhv9DC3msTr7qW+fHWi6I2MLD+sz1sYajav14miQp96kzqZUbx30n8w30sm
IfuENjQ5m/jZiZLYlFg8Rj2y6TXdlp+cKJmd8+Zc1Mu8552z/yPcIko6iH4I
BPUT/WC8eHfs0C9ubPb0bzD3bLmwnniizF4D8bjj3LQWor+y/slNoi+or7b7
eyxMXZkVbqnAfDH/b3Ke0f7C9VORH/1n6T4h2V/B+ocmI3+u2pYEB5iX8uvA
qD7ku85l1W3E55WeTKiDmecWPtWAJY5exz1QP81RXfAHeS+WFK66DjNf52xb
iPzZISuTC2GZb+wiB9Qnf3B3ux+xddMo0g/awWr+fcST52xx0CDvyW1Byl2s
L2szjhhE/+WUvcQX+Uk+vJ6qRPZpb2ZIKPon6eg6YUKe65UPgedJfw70/utP
ke8xizNu3ajvy4i+W8PIy8jeoewNrh21937hOdM5lb/62jGe5XzzIvFsQz3X
JxjPbWgrgqm9gaXNZbjvqGiejvn//UjvUjLy//uw0/8BBVytNA==
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], {5.288487526462115, 5.529737420613656}, \
{0, -1}], LineBox[CompressedData["
1:eJwd1gs4lGkbB/B3LZWayzdShoQREanGseyhXlu0JFRCSIxopZgOykRm5JA0
LWpkp1KDFCoNWm1Co5KsQxSSyk61dNjPYTUbEfb/7FyX67l+npn3f9/3zHsw
4kZtDFWhKEqCP7JS/0zhZUZT/710aCp8r21VJbF808NfWTTFrnh8KgpmFsWv
TYKtXnycaQRzBr53jYSFOZqP2kyxfrvZLRrmrXc4nQSzh7lhEjjAomPiW5j5
tsztGfzXxvydYwtpSq5msM0aeZl0yF+1MGepbYNUh+znGorJ/uTCUkNdmkoP
7TDeCw8lLNtXBPsM1ycGwEGSK33L59HUNqs/bTbBvLaEovvwrLyHmZthz/yN
kS56NKV3QmMXl+w3X3SRw3myd8wYWNrMHTOeT1MXM3u5JI9taGXBg5/3dQ7f
gBUtx/Jy4foGqf5TWCbU2l8BW9ckWo7CGckbNUrgEoH3gbnoj6N30vkYvMRM
V2gJy74pXe8KL1i7SY/0zynzyFIif5+4QbgKlhfnF4hgY+81YStg+uh4LwuW
zQnQWAgrbE75nUM/gg9pG9SIm/v82LCzrpb0GfKFhTPWFGMe/kb5X/JgprzU
goa3Ro0Okn45dvUZbzFPfRHrgB6Zn1OvUQHM4E31tphgHgEWh+LgDSFfdQhg
hdvU5yh4xt75IxxYWjlWKIR1Vism/jTG8WPWmJfALzbsPngepvZoVX2CP9qb
Xd8GCyc0fHyQb9r7S6YF3BpzoqERTo19I6Zg6dG3g+6o/2xK16XXC+DxncPd
8HjbGaM2mKl8LwpH/5/aPesbYUUK35/MK/Dz/Dqy7/l3+aJozNO03b76Fdn/
fMehD242KHr6meyXHRL/oI++Rvq6WCT/3k/fpcDPso2/d4DZUckhJfDHS/o+
/nDGmER0C26x7+XFwp5+/JzL8ET8rP7TpN6PtIIPnw2/FHYFVuikf7SGMyOk
LRWkX29ecSfyVUwGkm7C8sHjL8Nh53XRu67CnOSmZcPk+3YqHRWT/QX+DdHw
A81I2z0k77QDYxz9qzY61zqSfTuWcyrsvr3/0XSSF6ofYgy/vCjRrEN/QT+H
FrSRebpuyI8l81qZuT0b7qydplxC5lkt6ToIm7g2XuoxQr6SO7wf3lGSsDcD
pnuUq9Ph5JQcyhlmU4LPdXDtrZSmr+DWXbFvtJGnZ2el9oCN4zGiM+Ph9RVb
94phpmJR3Ch882RjYCQsb5n4ToB+eq+EpXrBrXaLWxno/7a1DWstnHEppOcM
7KQXdtYJDgo+PNMY8xOyamd7wNSu4FUX4IH3g8pgWDGeMqZuQFMSEw/nOJIX
HJEeCCsn7GRnYVlBU5AEVjkvyakm+SkfGL/BRQ5X/P4g9dKytFvwa80Bu0mS
58u1Pw/fyebkstDfkK1d8w74Jq/D05z0G63iqws/quz3sSLziDaadhP1XGtu
WrUUFh4zH3OCyweVuoZwEENzVhP64exJOP41LJcXx3nAd0yPtD0n9an2l3Vi
HkORs2sKYd7qkjc74Pm97iURZN8m6/cZ8Evzi3xT4mIFtwbzbE1MrqgwRF54
SLEIdlNkX9OFZXkXeAfgDHeGTSzqlB/aYnsYlr0zKVegLkWcs2YuHHg7PNwD
9hRU1ijgJtbPbFLnkDH3ggPyzuRXjfjBlLbrq8twyoguZwqrMKD4qin+n1b6
TvU2THNWbJPBfvTyjHQ4aKtZ20oc97E0tDqO9HXzhLQRtthi5poAMxefEHii
rkNeyo4zMI99NKEe1oi0mKqD2WqFIYvRx5ERvmiS7PdsbD4Id63Lla5CjvSw
b3IR3F408U8izNSLktTAJpY6hg9g+Y7pB8hcuJM6DRRyKb5/fyaswlB+WQoH
mQQv2QSHzbIOcCOumlcwgfzC6EjvzbA0R9SdBYunffFaS/b7t9gYwZ6Jkm42
uU74l5QVYPX1LMt6Reppy7luDnvlu25Pg+mDgqPlWO96hLnoE78Y83DBKnq/
0yuH9Mc4IhrCOny1KFaD9JfW8OEa1k6r5xHR+B6GKvnqyfBoXY/7U5xnQ6pd
62Jgd9khkQMctPhoVSosPmGSmovrqKdvHVUBm+ZPBM6BeXb3A/6b26+WRadZ
5Pre+zAQ+ZOFWY6W5L6875n2E/gHRq52lzaO//tjE2/Un+TgPe0crNgXOv81
PFQqqI8hblet5KF/9ty/FbthueptyTjMqPK9zoeZSRHJcZgnr8CLL4GlgW/k
/bDttScZDTCvSn3RQvxuH0SYC9WQP+MGYx45z8Osr9I/woqBue7+cIk9HSOC
R7+oq5Lz2rmop7IJfvjUeYkvLJw+0vQ16W+pz25Hch7ci39jCf9mzZ5tAIub
L/SshoMMnkxXID/efkWcE9xarxawD76oVStYRj6v5XKX1M9Uv9FMnlvkLv8P
FsCf8gz5t5A3xLh7ThXez7131w+WhYzIMzEPdli1+lv0I1vZfdsSvr88qSQY
pniObd2YZ6Rj+vuWufi+hf/zl8Jx4svZNjD7ct8pIbn/tGyZFM8hv9ezUYfJ
9f8W9/ioFo6X+mNiNvzhm6UnQ2Bm+7LJZvJ+1V9mPp+NeabdKDdAXoqZhlcI
zBNM2ZH7033y/KWJ95PnLwP6X5Jyb3I=
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], {8.691261304060914, 8.351506520304572}, \
{0, -1}], 
       {PointSize[0.04], PointBox[{4.5, 7.5}], PointBox[{12., 6.}]}, 
       InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox[
            RowBox[{"C1", " ", "N8", " ", "T8"}],
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->6.137505285412264],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          6.137505285412264]& ], {10., -0.5}, {0, -1}]},
      AspectRatio->1,
      PlotRange->{{-1, 21}, {-1, 21}}], {66, 44}, {0, 0}, {22, 22}], 
    InsetBox[
     GraphicsBox[
      {Thickness[0.005], LineBox[CompressedData["
1:eJwt1g041NkeB/B/oiHjdQkZ23ipJEm4LRUzilaKx1s1XcqUt6FRuoohlcpa
4dop7LpKM6xWV2QSNS2JKJO3ht1traUGFSpLTHLp1n7P3jvP4/k/n+ec/+/8
fr9zzgzzA4cDIlQoiirBH3lSik/4mLGpvz52bCptkyknDlavLxSPrWFTk0L9
pX0MPP3vzT+F1ZXcPndYbu89rIBDTOK3VJiyKeaspngC5kdKhsxgxdrrfyxG
PJlK40zhUryvnqviADMerXJfCRtXC3PC4JR1vgMPTNiUoMX6pyIy//mxz5Ng
CUd84yksXMRP2Azralo3W65lUx+qpREWsN+zJfEx8GTzygRjMn7IxFQC27r+
yrKEnVPNmVMwPTNfwIbrtWNpRvbIU32EHkvi1zr9bg+PTordr8BXre3EnrCQ
Ud7/HJ7kB5cEwX7brAJJvjLHMv5eMr9JbT4K7mAOd4bCkk9qbiXE9xV9wfCm
f99o74Z7g3PG/eGCG2dlUzDdyrx4M8yZXTC7AP0J6U1otyPjK/QVHzBu3zoT
T/Ljhao9HyTr3bkmnEf+VLHjLgnMy4pb9hCuiY08xSP9XJ/sch7OC2+6qAlz
JoxPhsJy5bbOi8hfHKAZ4wgb5IpVGbBsKnCTDunfzKjiG2M2xW2XDCjRX+st
rIx5I4zfa2x/AcvzopPDYLFunfowTFXXhHYsQV9aY3TH4VKRwZMNsDT7Zc9C
xCv4W63bTUP0W+RWuwIepVvkuMCKEyYFQSRfmp55twH6ND4znAWLX5d9lwKz
d+QWtsHC8i6pK1yftWs9jfSvuXWfIdwRLIq2gVMvDcUuhJ3is/N9YDmj8pdF
xEt6eYfJfrz59pIZnHLkrTiH7F9R+jsPWNzWYFRO7Hd0XxLMkVjLG+EWvbqH
t+DerS+oHthZ42TdLKw7pmU2AM/mbyrYgPypRPO+QbK/U2fuJMIVzescFbCq
d07VNViSaBLdC8c9qDvUA6svlX5qI+crvPr4KOwRGSCVkvzeR+i9htmeQedK
YEZVEKsXdgrsyj1H8tlY+/E6rCwyNyL1ML2uux4m/VzNDSPnzyOBoTCB0/47
07YBFkwN1EqQr5eFW54lrJigR62HLwmyX+vApS7U7uufsakdPlFPKDJf6XOK
AcuKb/r9gX5n08I9vtJHH3/sn34Jey0Ueo7r4fzxOR5vYObpMzZ7YOvHTREf
YUH5sbhOXeQxOJCojXj2v1u4+MIyoUMSWV9uxdrYoIP5pd6prmS85HPtRXBG
slRE7gM7RmIm0EYf8nfdTYEnqw4+XgLzAv0vi+DGzm3FQ1roZ0i+8j7ppynf
qg92MtSNfQEbjz6iz8H84BUNauuQL2PDTle8H1TZXGsBG2f6JBTBsvW8rRth
cUFxpT7W3+RbdsEXTj0tCsiDudMFM8GwqsZXhXTkb7ztV+0w2KnrKrUDLm2t
qycuOOX401kyPla5ch/MSQnur4JDFh+rCyDxP9OM6oBTukWWm2F56Z6oJ3Ce
s6PHGhLvH10X2+F+zbdrDWFbjsoP5XD9lIgxj3psE3NN4uHRkZ93kvPkdKg1
dTmJz+myewj36gVUpiNfrz3z05Wkn6vuj5P6sqnO/gLYS11J+w79oLr4H78m
83N8MpPoyHfnGIv019padc5HE+Phf/dLIPO/100wW4w6DvJExBlnhIFv1RG3
J4NzgpwPl19u99CQx3bL/Zlkf8THndoWIZ9DNXuKYJmGPPqZGuq1GSyuJfex
5ORNY1ie7BtK7o+9+bLhZFXs5/mp9CmyX7a5mhqw/cWkUQPUzxQkhLYsZFNv
Ct03OpP9onSsKuDslFBbsh8FVtvv3IXDXQ1iU2Cu47FbSrjlS4OmQli3eP/S
7YhXwVCj18LS7er/vAMf1bq8tw1WxNZVfYF8WspH5n8j889+I6iH+UttDg7D
zkNa+W6oh9vpGP+SzC/58LgGpmj3zMm4sc+LY0tQv1K7/xF5P6NdryYYFvMj
qXZYcHN6/AR8tONa/m0yPy1ATQDz2s9li0l9WWsubIXjcsN0vob9vp2gjSJ+
RVNUGB9ma+x7GAKrnrrR5w9P1p0zLEN+R136H5B+NHa+obejntKTZRHkPEuf
NEd2oX7dni8HdODRqxnuUhX8fqjMLVeBr7o69wgXYD+buKpz5Ptr5Obi/RT2
p4lJzcLcZGZc+EcWxVQz2veB7A99zsX0A4sSV/HMaGS9EWeT2f+wKNnh7PdG
5DyHfGGgOcuivEx9wuxI/rd3Du2fYVE/55QWboOpdstdtHcsKq3D7nseLLGz
GVFRsiiruV5OJqmfH8rlTLMoiWB3ciWZH9R8iwbHvem7JSf3I31YQwv2SDhU
PwXH+bt3ceFGxwNb9R1wnta1LpuFOy5brbYjbnno/ADx60XTPE+YaxGtLsX6
HHmf/W5Y6LB8qAH5KefSJw7AusvvubW+R75ZOYE8mPkqP70B9dREv/KLIu8b
iPovoF5JYJI51+Gv37FBxzkWFbQqY3MgWa9VEZEL81STD7vDitMmi36Ad8S0
/Ws1TBn+eCUMlt1vfEryZV5Nl7Ui3uQRz+OzpJ/9Yc3dWE/K3dswQOq1q2pO
Qz70s8/mmkl/bC5VjCD/0UgqqYKcb6VWhyrqU1T48wpI/+2WxYy9xfwDXT0Z
5Pvq+JY47wn07/7p8ydJ/JAM79xXLIrie2xJJv0N28XueYH9dX3nSe6LIsP1
ou0g4s0kVqeR8zaZNZ39G4tKPXglOJc4pO7cmW70p9tZXkbiZx7RHGtB/FVX
QptIPHn5Xe9q9LOnyPzZuv//H5h3939PB/afEIav1Q==
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], {4.585629021796733, 17.984272554491834`}, \
{0, -1}], LineBox[CompressedData["
1:eJwl1glQ01ceB/CH5YgSEFAgQlE0VqNyxCq3JRnqIsVlQDldXUSuBoqCCAgr
WlRUQNBwDIcihoRKxNZmuQwKSD24vNgqEEU0g6gRtQZQGgrIft9uZpj/fOb9
3+/9fr/33n9YGh6/NWoOIaQUf/RJbs3iZ8UnGvq05ZPlrEs3i2Blvx27Hc5y
Yi43g3tCKtcVw5e14o2zvuQThcW50EQ400jp9sES7y9wdNsBVzXOKPzgnvkF
jQFwUptPRK0Fn1hzYhh0/FmDW9AimGW0VbYXdpcwR3IW8Ymqe+pAEZzba/pQ
H+Yf0iu+AYfYbtcTsfiEqLvKJ+HEupg8bzjD/Ml1Rzs+iTboCTKAGS0zQylw
QacO5405xvNu3GqEG/e9PTUI92QOrxiH3TeFqFSwenPuBMeeT6Q745MYmG/t
mJgYCJ9Jv57qTN3B9EmBfz92bE8SrH64rCsbjpzzyPUKnDAR+uAUXLPt9e4p
uLRXMZUJH2EWH3ej9aS8E8fB9WvLHBNhr7Pse56wyUxo1RmYMxCx2hSu8neq
lsHOSWTmMfLLMFX/Rc3wrpspgbn5YYIyOi5RuGyFO8PeKQV0fpTwvT5cHFJ9
cgl17pntnejPH4EpN1tpvo+VVTlwN+Nb3e9gWa+kMhBWbzPp+w31Kz/btK6B
l5Wk59nCbenNTw3hTpFkVb4Z+i1b6U5ghpsnc8yUT/x0NydSBw2MygPhBE+j
LfPhf5nkC39biPpnd07TeDs00lOusHTm5Qjdf7vRI/q3F/CJQJ89dQKW53oc
j4SVts/z6P6+ys5Ms4S5o3UXtFCPdqtow1sT9L/FwtgDTkjRH38IE9t1WRlw
2x5JziOY2+L/vAnO3ES6RmBB/O5Vb+GKOMvvFyCe/Mq2QWP0N0w25eJN14/y
+7QGzh2Kjc6BSfisnjPsuHr9ufswZ6XBPxxg8X7yT2Pkz31q85pN92tY5OgD
Cwr9w7XpeZGnGh2EhRZMWwXWu3HyZlQ5HR8O8KyEv1ReOFRN6099ujYcXng+
uOIsrEh5oLCCl8eZfbWfvq99Laof9a/4244qFzik6FurAtrvWbfhF8hHtavE
YQssk9c/3g+n3im8bE77vyPulAb1+q3OtVHZII/mz3/FwBqnjP5bcP3D+t4e
Y4ybb+P/CkcaM0K+htVBaT5S2Nmlc6bQCPscnG8vg2/5LjgyMR/nc8BjZzud
n+//8xND7KfJvyVvYGVTXN+gAebJLi1lYX1BZd2AHiw7I0/0hacN3BpCmXh/
5bMbufDwdy32r/Sx/qdr43dhYVlG83lYU+V+k4n64+Ye3JkDGxkafvSC5fcr
rolhwmlLPgRzpnI2vIDVw4M5NXBu97PtGxFfETo00g1PS/I+N8OiulPPBmm8
X/tfeiCfUp91gUOwszjM7g6sqH012g+vb+T1e6MeLwNdo+v0fK350fsKnCXu
aC2FH1XHK3VRv2C5WX00LI3bF7wW5twPdloDhwj3uXJh63iOzhvUw8/RWzuL
+UJNpK0EVnB+cCiH5dW27+n3LSRG8oueIT3vjccX0foHS6I3Ip+sA72sp+hn
nOf2vcHIX9Xlk1pN+5/lN7yJ1t8jZR6C/aydji6eh3Mwb1ftLlh0KXzrSwby
6u6Q+MPpRZEW1Xr4fr7riAmAm0XcoT26GN/s0RsBk0a36E06OC/ZQVqH4dTT
LoWu2sij7kBoDSyQq+dt+QJ5Gjy/PQhzli1uyp+DexXJKvrf/kaWHdSCNYGq
rmBqnaEPYi08x2LWllLPavFSYC/DkWN9MPPxFvs0WHQluXw++hXQ7ORYDZNC
zkk+XB97onYSVqX536P9FeS0uwsQv/PT1XB6n1XbQha9gWXLYlUn6f2wPHZu
L/JT2b+6mAWHcQ53TFB7vL9Iv+/M0/NbdqOensAAcRCcpMUOuAsLWnWmVtHz
sEcjnIv6pbpC+Rjtf/Zp08UwN9gqog5Od7M4qA2rFHNf76H7lTde0YT5nNKK
BA6siRls2ABb36zd+MKG5lMecxrryy9alorhsInkqw3IV9E99H0MzGopfNCA
+qxb7QNc4QC2tKaEIH5I7Y/mMMOTnd31mUe44qXJc+h+nBXa+07zSFYTa+H0
GszzL93QN8kj0jDecW0af39nQdKfPMLq3/iNJWwtLR53/8QjPez2SXdYpnNr
ZtM4j6iXdD/ZTe//G2/P86OYP26S/BOcsHdeiZ+aRzoT2KNDNF6aZVP7Hzzi
fPSoHRv1tV3WLqp/zyOM53kj4XCY7/n4aJjPf6mqgBMu/55+H3ZecdbyEUwS
zFl9mO81YNpF/z8winDaa4/4yprnvyxBv1PbLa2WYX3cd9bXMOvIgwy7MR4x
evvTrAO9T4OB992Rr7Sqnknvk2aIpffNRx6xvrdRbAyrI9qYC1Gf0mt93wjN
p4xbLYOt/4yNlNP98CD75kwgn8PBZen0e3hB8fM0xlljsQ6ucKn2iwfFMKP2
o/dH1KvSKZy9i/hcX13WZdr/Hy46ibC+4I7Ts1hYXmnGN6P5lfKu2lL/3TfK
BfWILvkfnMR+qDONR+3f8UiqwbqcHliotNhw4jXGX2dfqYfDCnKHRUOI37HE
pRoW9Yfz/QaQz763QilMlj8xKfgP+tlwO0sOtxWzPzS18Yg8bK5DHx2nv+KW
/z9t+P8FDih6dg==
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], {3.45263162979521, 16.125462776535926`}, \
{0, -1}], LineBox[CompressedData["
1:eJwl1As4lGkbB/AXiVg1YTQtahTSVnaKjYR50xbW0kQHFRlU14jN6KNyytS3
5VBq0rLTQY2ykSRCiWLIsdB8lPRJTUlNSo1Tib7s/9lvrmuu+/pdz/M+z33f
7z1jFhTuvV2doqhr+JJIKSbwMaUpBoERTVndstofAIu04qvfMGmqrELb7rYJ
TUmDln58D+cGnztkAouXXzrAwP7OE9L0w8Y0JR+bplgLS6o19SmY7xqoLIB9
6xf9N/V7miq85KdrPoOmhC5Hqm1gSnAqNh+2d5ntPzyTpniX34W5sPB8VtAL
OVx4/gP/OSyPCdBvgkVTK+PiEFWezau7EBntu3v0ybmsifhJiMIvNxlnEZP2
pyfSiOKBZmt95KFYV+eQQvZZHw4WwqN0THkXzMtbxygmeaferrFGZGhoq3ci
8lyDx+MQVdmPUp8Rb2r1kBFvtjzdgNgZ4LtgCFHqeCMtHbEweksfA/2goi66
/Ur2iyermDDdx5CpSD7THr6dIPcUDfcnwZ2rOH0tsGh+bIgxMasiUgSL03SZ
11AXS3lw70xiecjdX2C+2YnFpC6eJLt7GP0QrJyhrUfqc4yaWgyXeQl/jcA+
zp1dn5Nhbb2hkVZEWWznUBwiu3aJz0JEKt3vfSoiJ+vOjePoO53R7nQH5nGy
507gPUlLYkqm4BxlMutbAlx4r/2MELaydq41Il7m/7IfHt37uK0ecyA94r4m
DnkIKhT2aTBnUNjARN5u5cFno2H6en8m6a/Apm9xHKyocXjvhb7wKKrhT1il
596vgJNMlj1vhEW6TzYEm5K5Wf5SB/dRFfH5cjjJe6evLywaVksyn4V5cmba
XCH2i2rfAic92GnyP1ie3TMQSdYdje67oj6xX+bDcFh433b9IZhX+2XcE963
fuv+Qlh+KTFYH+5UVnytJeurrm+uxn1l3ZlFVWROZ77w4MOssJy2czDHnYoa
Qb5u/UK1IJhyYqcnwoVNAp4OrFILPWkKK9jXbU8jH/7OyeaVqL8xv3w7Exbm
pYeHw8roJfki1Mse7qteCsvC3l14YYjzNYx/ZpF5eqIIc4b5u4/VGcG50+22
ZRqg3rrXGTbwPha/fhLMP521bxdM6dwKjNGHowLO1ZHzsxRuGjDv8YX6n5DP
6PTbxy9Ox/sqaNleDqvizzO3wrL35i89UV/uzcAAW5iyre5+C7NdeP+2nE76
diYlEf0pnPWdlQ15vjFwEns2+lrin7GRPJ8aeiUflscbdB+H7b8ZVBqw8dwN
huZjWKDhdG0V7Hany3se8hEq99nuJOvD7mkkX2ncTzoiOKkvUHAPVtUWFxwm
67OX5zBQn3zopmA/TOsmn3eF3W72rBTAEotzoTth+kOf+mqYMtThRMGck77a
38PSlQle22HGwoW7WpGfaoCftIycZ5crCYSFrxZPGyT5aGSEDKO+sss6B8Ww
eOnUqlTYfp595wyYs/sHM1u48aCxw1HUw79+P7Qf/aH/9Lo3yMB6CX2gkszL
s+eBa2GKc2/KFVg2vvqw3zTMwSBvZSn5H30z79jsqXgfGs093bAiQcdg9Dvc
z3w2jcwzr2eMM6CL89da7jhE+n27bL0hLG4rmPUNVlXa1Qp0cG7QE8dkUk9z
pe3QFPwu15wRMFAvv1uSUQpL6lRzA2DG4WOfCmDfX/ICrsK8yH1HumD2xXNF
n9nkf3Cl0hbnSXvX9DiY4Z6zLbzrsHyTt0kkLPuDu8gd9zeyn2hlwXRHT3o/
TIdFD1XBis+eqjTkr7p6rPcBXFhflL5QD/eKWXlyWMh+El0AN84KeVQD871n
3dND/WX3E27nwIyPDnErYJH2nuADMCUV17nA8jm9Qd4w52xDJNmvYmbXmZL9
VhbzpTjPanqW4jWZj5GqbV9xv8BDaVlE6rHM2mcJKzebfE2A2f/q8LBAvgq1
W4kbyPwEB1HqqE9iFX7EjvTLuDymQRu/o29VzhbkPFqz7YAW8jAoW2xGbJ1U
6DQZ/wvWnvYLYUXt7nwtTdwvDQ8g8ya7Wpz1TgPPxwS830XmLSSYOayOuZF4
7ciGRZFP8+bDUnX55Vckv4j8ojQ11NNtoLmI9EO1om0JLCmP2RJD+nXjYrcO
7Oaa59VE+v+poIYF0y2TQo3mIK4KubwRFm2yX78VljaML5HBow5HP2XC4pPa
XW64T+SW/VcbLFLziXoNc1yk7mMwI8K5+ijy9TVvjDKYi3lISdT9cRLuk/jG
mcKi3148ksGc0r17WbAqoz12Kerlazx11YQ5AZubDxEftEvuJffV8MWX4NEN
E3EVc8jv2vJzGizuyHmfDCvCqR5XmB3UPWkdTEXs0a/D+aNG5xeYwvwZBXP1
YLHGtnYlmZ/zvREWyI/dfNqznMwXu6WVifxztz899wfxUn9jJYV+rzHcSPql
ODiSsmaCS0lO5Yf/RvoV7BRU8xW+HLc4HJaaiee7jHEpAbd9roi4w+vim89c
Kqk3VlNK9mf7SptGuFSZtom8hbwPw6a28SHsd6qo0yL5rnjTlDrIpVjyu4ke
JN/wYvOUAS6Ve9pjaQZZty/Q/KTCeoVWxitYlsl8IIdl8hEHG/RLkcVcYIj9
/C2Jpfth2j8+oASWvR2rugvzTS8qpeT8rKMhE2SdtcenDvervH52+tEc+V6I
8dBBfhKHwKC1MP9VdeuGT8jXoaxkG1kfHNt7AvW4PahpF8Ds5FMtWaPIv1Yy
bytMVbb8HvEFrk/rWgXT7nk5/XDjqaetZmRd5nNcC/1R+NTEDpP79Tf+VYp1
7fnfOmRkHrYteTmE8+SqUqsUmNI8ol6L+2Q9P7zwgdnveMJFyEehvTHUjDw/
a0zhOMyl7HkPJkbIfD7quqqB+pI0nGMe/jO/B58t+silxLNzbKqIoxnNJn1c
isMI6blJ+jfZ8ffJvbDgZBJZl+1QzzdVcCmRQZVfB5lnx1Yzi8dcqvMV8z/j
//S/Md+lFedVF6Zbk/z8OxIGZMiPepcXRuz4QUv/Cpey+lIXW0xMPuI7/4/m
9N9Yz/X5
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], {4.302815449711934, 9.074559082853224}, \
{-1, -1}], LineBox[CompressedData["
1:eJwl1wlUzGsfB/AHSdpEaV9GMk0bo0hpmX9JorSZMigGSVy95YqGboy1FRWp
rtJ0iSxpEKK6r0vLdIkQylKTQkoUUSG93+e8c47jfM6z/b6//9L5T1kTFbhu
NCGkG//o////GTPk5wh+NgxxeLs8+JcRQz58D64ogeX7LgnlcL/CwnlCuPe6
XOc0HLblwHEtWFb91wt/2OtN+PEH1gxJ1GSvbjdkSFPE16ojcNnuirTVsGwh
h70WFlcH8xsMGCI898yVB6e95y2bDQ/OruzhwNwz02XH9Bly63PkOhYsOek8
8F2PIZwfzRbTYN1ciV4E7HB5s7Y9zDls1teuyxBn7782BcDSlLn7t8BVZ/ve
x9Dzfb3b9eFSxYKOPLjpRlj3Sx3kMvktsg5uEDy0KocbzC/H9MPkt3X1V2HV
YM8+A+QT7NiRfhfuH2xWdIFZ7ZfbhmAHrrNlECxurex1xv4XGg67rYG9MuK7
DsMdjW//pvbvtZnZA8+603eFzicVB075ov7cn3Wv5sIaLvxPxTC30q1oEt3P
TvpMAfkFFYc5LahH1PP64GJY6VzOhHyah4z9tgc2u5V8dCnstaCiU0LnT6sW
KMPRs1rXn4KL9NI9b1qhf7VrqlLgTQUzNm2E0+5fuhIMV/HNnhjBTPbKJYp0
/UPJ2meWuC6GxCAP9TQ9/X4+By6S91QYw9mhPx+Hw2We6wdovn3uF2IZOCJJ
JPiGfmTXdR41h0l51sBSmCl9utMQZphtnHJtXP95Vc3GcJNRsyUbltuX5tvA
XGnUixOT0Z+uYJsFsJLoyAZLWP7sXvAGWKCaN7leC9fvm+XedJi1SO1HEsx/
u7a+As7utHu/BjYs6Od00vkm830EcOLHvYkayCecTDgb4KLlKQp28OAZC7Mj
sMSeRRbDSnku5x7BH9RUFoXAnQUtk6bi/NzmZIdVdP2CGvlOWHQz7G8+HXf0
VpTDnJrZIme4oVbNlkEevmDlJW1YOjBinAPHJHsJO1CPKONxewcs+MdB/wws
L211MUZ/zFzcR4RwZ67sMQPLTELztWj/4nI3LYRTV3xurrLA9Z1zTtceLl0s
uhEDNw2rLFKEw+5/8DGHdbUuvriJ/QertHa3clDPRZFiMKwUselHPpzmxJ7/
AvUq6Z0Y3AhHrLXi+MGDXAuuO6xhKje4jvwvl0n+ZsOJWbVT9WCR6IiOHuzV
F3ooThP1yZ6N6ML+/raFHZNwf+dsS5sGM0ZuocvhsvlG7i6w/MIuldcTGaKl
F09W0vVp/CliaodCj/1wtP+S/jlwg63SbCmsu33MURW4wimr7gXcOywr+aEB
r7X4rIB8rDdzDo3DuGiVVyUHdrjLaNvAYUmx8R7wIOv2+whYuNCoOwj2nzA9
7Rp8S7babQXtn8iiRAP1ZV/O5C+BBReX+m6G+XljC1xgadug6SOaZ8/OAH2Y
25vXao28zte4Ll2op8yO7KP5j7apvLpIXTX+bBkcslXfkfazLHFRdStsaC+7
bwxL1beF98CqXss2PzBHTuWJoXQ8tZHF3gU3zTNrKqX7rXf+xYU7wzKj/gNb
3yv79I6Ncb+/DNVh+StV6WlYzmthZaG+1NE16VFww9iPL9Vg8Sm99R6w5JV6
TizyMkoPN7LhTrG5+3P0b5ZHKVcbJk6lxs4w97vjCU06PzPll+cE9GdvU7cR
LOaMfWWtjn6fe3fRjvqba90sNcwPzewOhHt7bRUiVNHH38ZP307P3+14rl4F
+wdsP3uS1vd2WLARTu0vWPEA9s9U+cqDVS+8sR2CmWvP0hfDwiKr2cbIS45s
jT8Mc/84WugES8pWR43AiXFscz86/lyz6SjOG7Qpfx4Mpz2MWDwf9fwx88q2
ADjaLEl9LOqVXfVY6krn36nJrlWnOY8dMIKlhyZ7ipHP+YtrxSecz/1wcttE
5C/qtOVfg5V+13ANhMUJB1220DyR9/+Jp/fbJK3XHFrvo8qlaXDprcJxz6fh
+XBLT0+AJYxhcRIsUspbsQbWXbKsYy48uCxeeQrMZ68532uG+/X+veJknK8a
tLWmGPZvPn34FOpLnfkzNwbWeBuom408MUOaBgvghrcRKVHI27RyZg4bJnmu
afboR9Fmzbua1PmuJ4bGoz67lmvqsFT0bWW1Eur/s75UG5YcKVY7PY4hjZJ9
sZZ0f9OtL08r4v316JChF/XEFeEPx+KcMnePSJirdme2DTxr8tMZWXT/b51h
/1XA8xHF7rgNp131CE2GY8bH+/XQ/feQGwdhVllUtCbycg+N8aqB0xZ8jrOF
5RYBDtOxn8fOa8QLvnW8clUlHKZloBgIS934JzegHjLPdJofHX8cGGuOevsN
Z/3pStc7hm/ugs1G3fNlwawXPW8KkU9WcOx5P85nVHYmLkZ+s6DPcZW0viXS
cU9hQTBX6Q/aP/WU3NnKDLnXH9poS/u/OvxAGMxdUJ7VMRX3i4dVZCjcoBO0
8CisEaReaATzE7Z+94AbWjb6F2I/LZPakiFTrPfTWDmA88uqtZ2uwmnbdML0
YGF4js4OmDtOZ5km6pUs37FoESyPcpzxCXlPRbktNKfzHWcFl6E/Yv+gdxOp
vVdZxo3B34u2fd7KcPQSPYHHaOSfafhxAl3vOteJNQp5nfLyp8C9b/a76xPc
X901WS50fHx5pegXjwhOWqWuhpnky8pGwzzidcyhPhkmGoqZ1j95RHLDJeIa
rT9h+ZziHzwS3VPj00bH2bV2+fAHrcgtSsjL6szgDsO6u+wULKgdBuIqsN6h
O2UHA9+KOnSkHvuzQhyrfWBmpKLTcIRHUn12Cql72dwPC1Gfs7r3Blc6/8Tt
DtVR9P2xvciUOvePy//CaZpJmbSfaRvY3duQN6Kn1L8KlvbYjlFEPxriS4/u
o/3YMk4eCUueN0qc6fzqMYLTsANvr+GnKeg360vOWVh+vOTrCVjjevW2GFjU
KnXygxnf7iS6n/UX8eBoWFro67oG53lkOSlXslCv3+WSVNTjM0f2axccvffL
hoOonxUb92UxLN7fMOkl+hui5r2DAwu/Wu3Zgn4Mvny3XwO+tSwjZ2iIR8RX
b4YqwixFqwsJAzySODHkz/F0fsOTM/ZfeaQz7oqlHh3fLGw2+sIjsyLjV9vR
8Svh1QF9PFLRlqIcTPdr6/aq+cQjvT1XDuyk57dmG1f08EiDomLPWZiIlt7N
+MAjFxrPz3hC5wee+OgD80Oy3YepmwvftsHCrSx3E+QlqTddXD/ier3JyHKA
hROD/U17cb0HiP4CWDwy+ex6nC+VZVsshFkRQoXmz6h3xpwqFzr+8tmElf08
Ym1kk2FG96s/vOsV8kSUH+ui55HWnb6uyGsWpPbgX2om9kfEIPrl1NWSSvPV
9V/2Qn8aC8rdPWl+09FL78GcVS1TvphgPNNU8I7aQHf5EphlsJufAWvst/e8
gu8O8VPx1rvYLzvBYLQeLPdTSTiG80jyJGEyvivky2Nqf6KeJolqviosrg36
XRX1lknYnFP4rmC+c1WbkI84VAXzqccc/NSFfjAGY31NYPGkxH+G3uN6DpS8
GgsTXWXNCW9wXm5X7Dg6P4ulHSrHuNjNwZTOtzkVwm5Cv8wKfwRS+1Vwrzfw
iHyvdWImXd9utXhdNfL0nrzdQU1yLOxu4PwW5tNc1Ee4JQYWxXg+HTy/p1Nn
B5lbnOYRWSapbqcWul0avoD5LO8tlsb0+by+ZkEZfLz2qpA6d1eN7A7qMTdW
20M90inKq+cRpSd9o1Oo77F+39GI/kXfCNpOLbUVJzzH/fk6YLIPdeGmRC/k
SUyXXxwD32rpctZrR7+mRb0rwPnMcJvBAeRnHd5XbUHrMTHhh73D9Z73dGM+
zXtENDWtE/WOfG2l/SEKfcc/wkpt6Y0R+E5jBGToPzCrKHKpTJ++H3RiVLBe
yaowyZp6ffPBug4e8Z+qEHAc3w3MjRDZjTa8nzK81fRhMnnwfM8L3O+uuvxi
fEeQ4lGHvB5jfV/dNQF1fqvBFeQXx/pkGlPTn9iFDNLvUx3mfyblNRY=
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], {2.6263021209059043`, 11.33561489924508}, \
{1, -1}], LineBox[CompressedData["
1:eJwd1g04lOkaB/BXNFSKSEidJvogbCMd26pmXm00VKJti1prUkmEOcrWotkp
a1fa1fQ12c6oadGx2YS16Ot4aymlD6YSFfuKanw2+lSK87/PXJfrvn7zPO/9
3M/9PC+mRMSv2DiMYZiT+KHINA7hM4llDBRtWGZuoo1FJVw3QuiXDEcFNCo3
w6Jo9XQjOMvoygQjOCiKqz08jmWKpodGpk9kGZXN5ivzYVF8nnoYzBeV6Put
WcZZYLFpqwNc+1/nG7Bd9vZXLRNYhjvj91M5zKoSD/jDhu/6J52H5x5bcazc
nmVkvGnPPbjx3Mlgd3LJm/ECyh+1SV1oxzJKc9FDKZz++5wWMSxc+Vv5UTiq
OmOQt0X9m8N/fgub5S21PgKrHObUrkH9IeOboiJghovNriS3/Rz3OWyo7pw8
ZTzyFSwq+QwWGQ2pkuCKtrftNC661LH7KsyHhevDydsejzBBtKt8056BKPNu
bndD1L9O33QJkfsr/LgEUXpvdNoQotDUtMAbURmy0dgH9bIVpfGT4CyVf9ou
uE5xIViP/IZrheUXYJGu7rSG6kk+p+iF5bqm6/NpPHen0Br94D71v1xL9S8v
i5kBC8Wt4ctg0XOTJmeYX7rgfTX239gzL8/Gns6vzNcbNniUt3UjH+ezw+kM
+lux8sOP1E/hvL/iXOAiXhy5Fg7yirl+2gr7unN55mvUWeSllbNwSNU3UgXt
48AbwZOxLNOfk/T3O9TFzN6x4xgsF2s0MdSnIv/7cbBq5MSD91EXs3Hy4tWw
NF5qtRAO+jWi7//W5+84g7pUZ3Yby+GKm3sFU8nDUsuz4fzi28U5qIspio1s
gdOXlX7woDoFnTmfoB6lW3h9PaJ2YuO6DESh5771aYhcgWJCD2L/L2ftAxEt
fQ4NBdP90u1UuMHsam+3UlhkbDpPCAdteXx/DNYNsT08wZnmXxuVHgZXSMxs
F8KGurtiDd2n0O7YGBrXJedehWsULhe15LHCmc00/9Ks6S2UfzB06kPKVy36
ZjLWEa5VP+JgeWp1sAzWjlVmZdL7w3tHaOCga65HfCn/1sLdt+m9yHU00VM8
Nr3rNaKhUsfvQOS7nqw2xzxWt/zJANYxS5W5WsK8Mj80EZZ7JuwZovweER0d
6JdIfTa6CZYbOhK+hmsiA/+TTft2e3n3viXyCNf3L4Uti3Xn18DCFM6gRx7e
9VprgwXd46jurdTnmJ61DnDUpNH9BuRhF1v0pI9BP31WFq+H+acPDE4w3zN/
Sh3yMDFfdvaOxvt/x+mAN6xde35zJ2xwWHQlEHn4khyBDeYXcS5//hORO5Ub
F0O+ufylB+Ypm1t/1MOyo7K8AHP4rcPJNDzHThtXkzYK9d8wj5pEeZUv+p6N
xPdxS/Z8B8t35zptg2WzC+PaYaXyUr4rLNSs8VxMda8IGzmGHK0xy6G6E1ut
7WEmsm3TSzhoxmCHFOY9dT5z6B7lVM3Ogg1MonMELCrwX8ZgfZWsIyGJ7tuG
TPW3MNdtEppMfWtvqxiA6+IeDt9A90Cwf5gC9bNeG7SUj03y4t7CsoZ2/16s
x7j5HZFhv3yNh9VBOq/81kdFtP+34sfTaDw+60krLGtuCTtF+8uoCaC+qpSd
F6fCosW3HXWw8FWZ1BP9qTvFueyF2Vi20YH6avux0Y7yBYh7zOn7y4VbUrC+
9tuuPgtErudVQwXqlQUL1O6IbJ/PCR31r2H7tliKCTMv3h6B+t7PrbqHKBxU
+ZWb4XvX07YxsOhW8Wf7TfGci7W7CGabLIWRAszbOFA/Da7zLCgXD8c6lj0P
AihPtFmWkwn2NaiapaFxcUvjRGN8n9fWOY76rtBf9BiGcZfJmYWwykkWE2WE
9SRLFq1DfUEljierGcy7+ofnVNQvei/8dSms/cebph7al/2syx+HJAwT8iyu
lPpWcce3AuZ/CAyIo374p9ZVwZwgWGqFfgl/WWU6Bs+z2hTnLFjVOVwXCnMn
Drb1w0GnTi+phFV5y5NsLenvlKbbC/UYCp39HSzpHoTKK+C6jaIuAd3H5WrX
eahfWyatL8Xz8r3BkWUwX6XZ4w4XXU8pm4L9ymrePU2m9yUtZXUiOT12Tx6d
q7ov6RTMrBrILKZ7X/v9vvMwZ9D459M9O3wnKRfWpnP6A+iPfLNjVQS59op9
MvrJnbYtfI312D/X5UTjnLQ/JIi/hrnAzqFoUzrnLZ7HUS9/4tb773FOXMns
Zxeof172X3I4J1mir28S9av52jan4fTezr287CP65b7Y8Q+cm2x8pYXJAHww
e1UCrPRumFHYj34P7p8YAXMvvkoNeyNhtAuup+2ChdtXb3B6hXxWKaU3aX65
3NHyhYQRThG/80F+4S3BrtkGOKLKuBFm/b5w/aQHLvtpajrqU8ozM/Z1Shi2
67bGn+6Z0W/n1HoJo3Tf/s4K++NGzj8a8AzrydYnPiBLvU0KnuL5XtNwNfrB
SNLqi8ifz925AP3iFKFOgZjPPrCIv0q/N1IzXsYhH//QwpjuP5dW0v6uA/v7
oN8VRV7X5l/fJWFk+/QdieTOaWvvoj5OedzuC1g5elEG/xz7z7dqHUI+pd3w
xA7az8jM0Qpaz6bsRlUf8ruaLatHPdrnz/YnYP/KGw3mQ6iXzbFtbyfrFrJj
qP70tqWWL5EvzdfO1JT6FfBpN43XhxW+oP5EvZduJf/7Rd4D6qdCcDQH+bmd
9jU1dG+WXK1RYH2t/k72FTr33XY6617U86jdvBnnzv194thR9JOv8Buwhtle
j2356I+SMfn4L9wDpW3f2ZDHWH/Uocn9uAfKcHfp4YfoV9nAzWiy/kiLRIdx
N/6QmN6zrseC3ktYf9E4qwQyfXIvMhz9Pzkk+R/xAtK1
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], {3.403307703004971, 5.184112064989347}, \
{1, -1}], LineBox[CompressedData["
1:eJw9lglYTVsbx4/SIeIiVHufs8/unMpUNIhGXrrR4HaPJHVKKYrSPMmQJkmc
BmOGSlIZmr+bBoUkfZqjjxDdCg1EZaivge7a38faz3Oe8/yetfd61/uud/gr
OntbukiwWKx76Mf8//+hwHh4Ej1qwAKbZ0ccKRjJWbB/2kPEwhIn1ywK1G/9
XSOOYFiOa99BwYZDhRqeeohZ27zJCQqcx1YcrPqkCqywztm+3ykYL5tIeXoF
sU+UhcVbCiwU2IVDWxEnzK+oKaCgsHSmkcMs5v1yZdk9FCTauRAGtcvQ/o9W
282gQHPf8lLvOMQJnub5SVwwbLTdJrZDPOeo82MBF0bH5PwrNRGztp8bTedA
j3JT+pP5zLqtUqYyBwKidppLSTDr2Sm2WSQMNpd6LBpbCqyKu10O+iSkfyno
F08g9vHfH/eSgKHGa1PkpzP2D7yXjyXArP7UaWMS8Q7prTbWBFBnjkwYrkQ8
mPNnlg4BeR3tPn1CxKlqN0XaBIhNhWrTvBFDn9aJTQREbJBx3yBm1tWVDEII
kAjRnnTMRJy/aJXlQwLiIhpTVpQhrjD7nqtIwkQRJ7buEeJmkc+WOBLWnf/e
fKGB+d5WVczmgDbv4pATsy48H6UcxQG/yk+HRCWMv3YqGVO54DPAu6+RzOz3
o/xoKBeeZ+dtm7uP2S9cYf8gF/Tz+kVJG5h4OC+4YEmBx0FZ214Zxp+Fpdeu
UOCY3GXpW4fikTpvo+5LCqzPuZtJH2Hi08JvG6XgjLqqfJUOYmHrwPJJCvR3
Sbp2fFiC1svKRvvQ+iVBU+5lxGG7TqiUUaBVy9YNtkbc/GZ5eQAFTW3vwnfN
Q5z6rr5agYLsq3HJzk8Xo/evUKtyuRCsEb5E9gpin+tPClZxgfOjxqUoCHHz
9DGXEg4o3TQTUdsQC13KanQ48KdP1f2M9Ygrxqud75AwtXWIUtVFrO629Jg5
CUdYJSpyeojpxiWLelH8P9p72/6OGNxyxIkE3PJ3Ig5bI54zcFl7OwH9XbEj
JV6Idwxuuq5PQBJP5DV2nLE36G6zEt3XGs3N7BuI89PYiRsJGAz8miyuZs5n
PiU+gAD9KU8UjDqZ9TmmFqUEfLVbl/NjmLGv6tI2j4TA0aDddVLI/4r43dYh
JHSo5PAkZJh4mbYKvpKgv/JhlWg6E8+LJTw/DlDjXgljo+h71p2QZ0MccC/e
HhbS8T9/3O57cuF6i1X2WBljT7ImsoMLNyVTTCRjmXj82KZiTEFxfaRjkhXi
QZaJRSIF69pHjmrNZ/wVHvZsoSCTa/hbfMMiZH98pG+Ygm8WRba3IxB3WCfr
sXhg71ykMaCNGE4Z//cTBX9khvJD+lRQPVardT2gwMhhvC3vMuId3wqehlFA
NhhW3hIhph9cLV1Mwel6VmU0BzFLUsnhHhd2By4KaulWRvd/dKelKRd2cWMT
em8j7ojk/auOA9Yv51vdvIA4IVD6ozm635llFVGRiNWvxB5vIiE+26DdIxhx
xdHT/XYkKGcIbFv3IYbCdtlhAj4ZSO19FIY4X5i+J42A1hmL61+cRMyavB2z
i4DXygra5jcQ+0SGK60lwK/IpGrBQ2a/2TqtWgQMuL/1kXiDeM72+TwjApbx
PE9VstD58yVaLT0IsIy+4SnN+CN8zr2ZQ0DOAaPsDE3G38P8zVNJCL5mm3Fh
PeIO3xnHPEg4HCl01zBD3Ex71XeSsPpCw9UFJsz7681nOnKAHzzkKdJHPHhI
90U7B1qPycTHCBCnjvjl2nHhtK974jXGfmq3nFIzF+68mlWg1cKcz5etvpqC
v27PU+QnIaZf5tmLKbghr1v82B7x4IqwsToKLrTZpU4sRBz2ttDkCwXPmtuM
MuqV0PvnX59G96v3DbX7UCW8fllBqVykpYS/b5ud7ijZJ8D71z2uNll+VYDt
V6742P56pwCfr2TWZ4t6VQE+f1fw2T02k3zsX7LTF5+gV3zsv6Xf7FMZVXwc
nzWbNe3fF/Nx/IZd88423uLj+H5fnylyvcPH8X/kXb5F1MDH9yPYaX1q+A0f
359Z3SlPQ8b+z/s9m0nGf+cI8P1LrizWf68nwPlxvqq7ttBagPMn5e9WLRUv
Ac6v6JyxM6tDBTj/hMavMhcfE+D87DZ8oHg6WoDzV5ttvPbAIQHOb2rOh6yt
rgKc/3Mb/LzljAW4PmYFPo9RVRDg+uniThoGM/78rC8Rt9LQLIOP609TPFVJ
uIOP61Nnb9jriIV8XL/yx0wb59Qq4voOvWSaaRyiiOu/qb5y0EdTEfcHLZnp
++s/0Lh/3OUeSt2ZReP+UtftVDzhR+P+07Awa4vU7zTuTzO00kIjeDTuX9YD
Cd5SbBr3N3+PwCCzAR7uf0ujMyrGe3i4P052ztVw+8rD/TMs7q7lFGka91e9
PrXucorG/TcqYKazvy6N+3NPVkPuqDWN+/eL2oyTUoE07u8x0/ymbzxJ4/5f
EZTyLvwGjeeD3/e0hMwyGs+Pwb6NL3of0ni++MrO7myppvH8UTmgv0Z0h8bz
aTPcyui8TuP5ZdOvfdE0hsbzbaLk8LN+BxrPv0cbfJ2Tl9J4Pm7irpxY1cbD
8zMCPsf+toWH52vXhxKntAoKz19/mVGttShPfs3nSv9rTfviuHh+r7m+dO/H
EQ6e78su6om4bhw8/+e1P/9jRTeJ9UFAkIrZv/1IrB9salKFr+eSWF/MGL4X
koR0yy/9wRby2ebxBNYnoefqOAbeBNYve9KnOtSjuvqlbz67Vr/b40Vg/dPY
5FyZGkNgfcRecnYK/EVg/dS9sWeZfw+B9dWTdY4ZQ2ifX/pLLLueUnMgsT7L
zR5mH0kksX6zMnj5PKCGxPpu2ur8iaYBEuu/1I+XVLrZHKwPpbXEKgUzOVg/
StTquH0bJ7G+JGOcikTPSKw/R9qbFA5eJLE+9dbZtLnHhMT6Nao7LZZ+Q2B9
W8bVroveS2D9G+7Uu9/onQLWx5vSviRyrBSwfv5qz660KpfH+lqp47L0Pr48
1t+Or84lKZ+Qw/r8uDt4dI8txPp9PPg/s4YCEf/U9469jL5fAP8AZsCd0Q==

        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], {5.8548, 10.25}, {1, 0}], 
       {PointSize[0.04], PointBox[{7.5, 5.5}], PointBox[{7.5, 15.}]}, InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox[
            RowBox[{"C1", " ", "N9", " ", "T9"}],
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->6.137505285412264],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          6.137505285412264]& ], {10., -0.5}, {0, -1}]},
      AspectRatio->1,
      PlotRange->{{-1, 21}, {-1, 21}}], {0, 22}, {0, 0}, {22, 22}], InsetBox[
     GraphicsBox[
      {Thickness[0.005], LineBox[CompressedData["
1:eJwl1wtUzOkbB/BfN6YaGt1UphQhiS6ypY0ZyWozaBNKJF0owkS3U0npsv0Z
NRJCNBTa7tfVSsxu6bJqu6dWl4nKSKthUiHs991/53Q6n/N73+f3PM/7vHMm
A6/jzr6yFEV145f8pcTf8LOYTdEITNjUX+ttJsthLfdAxusVbKqspTnKD65P
b77dD6/6u05XBxY88Lo8SCxbd6BpEZvqPqVi+h7Os3OvjYNpshtVGYjXLzW8
YgeLZ6lssYGnfUw6aTB/4+adx2F9nWsLewzYVGKEnmk+fMJXJCiDtZJCuO9g
sx3mMukwldhxcO1KNhVi3u+RDEsGSi3PwEz9j5wk2FXa+L4eLrB36L5C9js0
tiqtYlOalU4pOcQ6UptNsODG9K0aOO3k0rfBsHXq1+6XJP6UCvM6LN6ztUkB
+WWbGkSUwqmKCh+WwVRG/K5HsF3aRPVmWGvprsuVsM/VlQ1esOhugTAXHqK7
Pw0h+zdclSbDFZkpL2LI8yKNbn+YOyc46QwcZt6e9D18MC+9LhSWJEdemQ1z
AvnKB2DuZFlpC+rpVS/yWg8L12jWXYWjH3TsZ8DTmlnlvrD9x1+0u5G/k6ON
nRUcpUfXI/UzBsPfMmDD8S/7t8P1L4v7JtDPRbTZBnKwaDv1cAhmBMo8K9NH
XJ3xnEH4bVKCyiHiWRzLMXJ+vpudmTBj9uuN8ojXWPrT7IKFeN6dYLQcpq2V
XrCAxQai625wmkhxoEGPTRldCG29CKevdSgMgeubI891wlojsQ02xIc7LZmo
t3G7+ogmzFiw4JsPvDc07K4S7PDeQi4fNjmWdVWdPO+R9X4Hz1RXcyxg0VjV
YVNT9PFY/iFPONFoU5EP3PKmqv0a7LfUzDQZ7v1jx5teWCvP2jMfHrtYW2iA
fMM2fXR8BKt/85Xzgc3UzS/8DndvGBi6CbcYKp28D4sOuf7SBPMLzBoFsJZu
hsUY7DrRq3gaLqqb1JuCPbds1HGBXaPcJW9gkbfxrkVw6uETyxvI8+e5vmPI
PzrnmUcSzHB0NyiHLRMoW1vi3rWBp+GH5WERHSRfk0njbbDDnI42N1jiSr1b
TPpz3ba9WRfxaiVqcmT+UhWFNsTqd0L/QX9dXVj7Mpg4j9otp4ZgF5pVhSxM
Ne+TimFBo2TMfwHmfj2b/hmmL3gw2qODfJU/u+sgHi/yb5vdsDB0YR+5L670
wafD2phjpTszETD72lR1Iiy0W533gKznbdtrB/M5cuHfSH15jnVqsIOVff5m
1C+oFSz6ooX99+/78mFDAyqEWGijVdUFy9/b80gV64PMvSaUzZCX9AcFG1hy
Wj3fCE7sOBJ7nPim9TE2zGjyaSyAwzao7nY2I59TBrJSeNqj5s99cJrt4TlW
yD9s17FQL/hh0kx3MNwb/8LNE84b5PFy4OgNT6t2w/pChSctsHqErc2P8F63
4LoheEjUk7MGNqtwz3sJz7wWLdGDmd97xzyFmfvOjsvBRXIz+6/D3IjcrhbU
49fQHrqD9O9y2/xrcIdKEf0DyY8XG3eQzKNc9aEzsGvgaI81bH3asOor+pHm
cZmvBu/1uD3rGOnPodrH0+hn0c4rnR3zUc/P+gqj5PPp+YCuNezZPhYohoO0
d86ka+I+6RVGTcCeOocjaHC2RaHCXMTjxdxwPa2BepcW2lvCQef9mhRgxmjl
sC9cX7PCI0Md9/hU8dxbsNPnHcXb4Owjj0Jewpb5KVwNuHFdCFsD9c44J6+Z
UMN5aKzLX0vOq/rdmVFYy7LtPOk/5x+NPyfhjqfFQadh+S9LTmlif7eeo/JN
0t/GOpMfYIluvEEF2W8hXxQDR8pdrGyEnRaludTALgM7dZ/DfLMoDUXka5v6
uu0FLFlu1ekI07cPl7+EXX5aeTUOdorSHu8jZsdUF8PZqr9OtMImtNsOf8G8
iLdxQniasbG/C+5IcLuRQ+ZDM9mgAdYyCzx+AaZp95Vkwuzm+84hcKTgzqaD
MPPo4vI9sEPl18x5MGdBnBKZR15R8J17yDeVfrdyGZm/jkLtFXDQDqmGGqmv
s+FeBulHwA5bMi/Mq+OZiqR/FZLV78l5X9LqO6qK95/xLRyFs9XNfFvn4T52
XsiWwBwVi11r4Q7KWF8W+wUvxJdzGJiHVYWRqqTe9plby2HDOGk/uS9+nV2Z
QSpYH2QQYg9H3/jZ7/FcNpWVPWbpQ/LXP9BoBft9auhLIPfn+66pgTlsKi59
97xcEl98RHwfDpjZ6tFM7t+6Pm4VTP+O7fyexGMEOI/BjLP+Z1XN8bfsu2Pr
ES9AWFO9ypz014WeB9cUlLzeBFe8DF9jgny4/fGLdsN85UULymGx8EDPAZhr
WWSvh/wDxj7V+MI1JsWr9sLZKqOjXrCRyblTybCT8pEMN9ihc19/KcxfeC7G
EU59dDv3CcwMeX/yOzhRLXb+H7BtSXqKHon/w0HOPRK/ZmqJPOzzhXUmCE4P
/npRTOaz6s5sY7j+/OftTWS+fo2LTEF+NdolDaWwUUSGxi+oR3iwYO8NYmPB
iZuon3Y6hn0O5lbx88PpeO+em+FRpF8lx+U3K+N8lE61hZLPq0u9R+co4TyF
5+uJzbw9l3TT0PdRHz5ZL7BPsSyejX2aPnN5JB4z6uutWejPyKfuDFgsSGsr
UcD98Q5c9xss0l7DG5VHnkryDs/I+e0YsNsGmzlI/5qG62utVAbl8L3gT4Vo
Jup10pZ5lQkLS0XjbFh/4tuFS3CQV2yOD2x2ZGVFCay/e5l9AlkfcYk2Cddv
Efpnwdl8Zqgr4vNG90qqYMncfUmtMDOv/EUrzJYfbt2N/PL+x+ENkPWJHiaD
MDcoPWaEzEd+po836jG88TGLmLbheGoHPPHx9TIRTB398foK1K8eMJLYTuJz
IhI9YS3ezfO/k/Nrsp0KgKMFMja5sGvVuCsHZj8MqrkAR79UMp5BvKCnj34O
Ieefv00lEha93SrdQ/L5bbynCfk0VvLCSf2iW/EnPiB/2itanBEskC/OnUa9
JnRTN3U47Un8135Z+KzrfAWy/kn96mIZ5GXQc/szOZ+k8S9hFN7TfDud9NvT
UH5ezFcWpe84vWeGnM+PH+QMZ1iY39jhWdjv2Sez5e1HFuUU/mliPtzyoOri
uykWlTa8f3LVf+/P+mA7yaLoG3PmbSH1SmrteidY1FjSxdVHyHp6bNQzKYsS
m2rqJJF4jwOjLeAsLUXvErKf21439p5F8V+ZpXeR87sbHCOD5w4HlF0+Etc2
PT4El61NMda2wHnn//ZCFfHFKRaDljC/YqWxFLbuY/lvgbkrlh6d/MCiOEds
JO6wJPH8GA351nPcX/vCgpAEa81pFmVUOKnmD1PcUl0l1KdVfjiKPJesrkxu
hcUPw+LJfmGFf4L7Jxa+PzNaSPzoxf7VV2Fu7qPNVrBny43QGJhpqT53Icx2
vydUhn1i44/Lk/0qXdNrEC81a2eHmMxLobRTBu/Xl2UVNZH50w3bGYz+VaRc
DiwjfkUPvYZ6gvzyuTdJf6bO1EehP8ICcxGP9GMovN5CwqJEl+0fR5P5OSfc
mvIG+bwaaQqHhfFNz3JHUN9Du7gI8lzhD73ngyxKvdJqTizxiKwJ/2/ka+Bv
/9/8Ta1sMG1jUX6soft3SH6zTnblPUE+azj5j4kDeoeHS1iUS/02435i8lNU
9f//tyzY/wIfb/XQ
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], {5.835629021796733, 17.484272554491834`}, \
{0, -1}], LineBox[CompressedData["
1:eJxFlwlUE1cXx2NYBIQQZAdRFrHIzLiUT6WyzEWQxWLFKorUIlA3qkAQrWix
4AJSW5BFFEWRimJQFFqthKJlsYWIClgVEW0UBORTDFvZRb47p8n7ck5Ozi8z
b+a+9+793/+zCo38fBOfx+PdwS/3u7F5Aj82wBvmfikI+GyzYVsFsqhyVu9d
Cixmjgx2xCA3JbETeRQcc33fkm6PnBU97naEgsZNj61qmqzxutoPU+MpMNq2
93BaInLnb9EjCRR4h+uL1BYhWzrFXsymoHrf9P1T31kBz8/rzkg5BQkhbh5f
XkaOz7bQ7KUgzr3ymvlOZDET6k7TYNkRkTHkjSwVWKdE0OB06g+bYXvkCgtK
dJ2GoLT363aaIQt7Z8IoDaFHA/0FxsjzOgv9nRn4dmfzcskMZJOCjYt3MxDM
W1da9TGyo31I00UGJJN6OvuWc+8v+SHvLgP5mm3y3AjkpCW1ZS8ZSDRjnJ+l
IRfPs1XvYMDSfblJynVk0YWTTs8YCHO93lr4EBmKHnRVMJAbaTsQ2IVsGZ+6
N4sBUVmMytT33Hw/cVTZyEDM59mDt3m4HgFtwZ6zGPg0YzR2cBivN/iPx7XS
ICtIlzW+4u4fHXM+TYON1EtraSWyxriYWkvDtfrzXo+5eLa6+b0xoiFyKHGX
dA03X69fG2UU6N3lu4zpcfFNvH35MwVzcgNM7/9pifPf2vNVOgXB3+cf5O1C
tvtTR/0ABfKC4HeZ1sgxqbfO7afA6r71gGfeDIyP/ohNo0CrMnD+Wi3kmPJm
zWIKVnisd/5v3HR8f3PtpucUzP7Fy7pGg+PU3gl9Gmqax4USsQXOf9d38lU0
lDTyry4PRQ6e9PZJFg32qY35lQuReV2dM17QUHc4z7vdFlkju97YhgH6YfuI
zRzkeK2JuSEMOARtiM7yRRbW/fTRcQZcz64+5bAP2a5uuWM5A51tdF/fb8jD
LxY7NTNg1KB614aH8RRHTKtuZyAi/SdxkSeyMM3ctYUB2WOb1vAkZDu3/hf3
GAiQWS34ppy7rlV1s4ABlwKH0cgOZGlt2eU9DFy0kj1+Oszdz347n2WAP2hs
69mPbCJ0DRqnwcTAYizpIcdD9edLaKBfm3o9zkLOvfBpYRSyWHyyxp1bn+8s
ZsyloXLtzOEvGzHeecZP9/RTkF8/PvvvVchbP+x8XknBWMhQ2/mKaVhP84Nf
nqZA97MgmwErZHF53q5ECmautym5uM8c7z/SJo3D/Rn5UNvy1Azr0fScw/cU
mPleiax0Rnb8J2HROQoKEw8nTSk0BZ4klp9whwLVHOkmGY0csL1Te5wCN9NC
8/DbJpi/rerTFtNQvfrJ3JodyKJFX8Xto6GjMiS1yBnZ8ZB10W0aah0njx6y
Qo5Rbx/XYCDz6SMNF0vkAAOTWh8Gpln+47BjIbLYsODqAQZy4s4OHQxGTt39
Y3ExA6pFtbE1J7nxi25sfsBA9Lro+dXPkaVO281eMWD2dIXWYRuML2aZm6yN
gbaVs7JkWzi+dOhUIwMVxiYVlXkc34sTlDIwaPaq6vgDZI3AqOpkBh6VV/nH
dyFbvrurvpaBB7ckspwe5KaUuivGDFwyyw7zeIacu1ug85CGb47Wnja5zHH2
wM0faeAZ+9XaByN7Xzmy3ZuGHJ/fZ/eOYXxNszWLNWl4cT3ffcF+Ll79lw0P
KWB2yzPk/ca4foHZPxVQIHFwX6uzzpjb78kByRSE5Lb7Ot4wwvxJ/yES9TEy
93p7vJ4Rt55emQcpqEpZ3awXZYh6mT3p7HEKJpc3hD9vNsD59a5PllDw1Zbu
a96rkUW008nXWJ+3GzTftehz+pH5qRXqQXdYit9h5M74ozmhNJyd5PmozBPZ
5P6ErZiGPl6sp5kVstR4vYucBrWTzs3vDJEbBtId5zPwRWVGsb8Nd32Jb2Y4
A9kDncs/4sZ3tgzPzmXAef89fdO9yPEuTn7VuP57CqrGSpFFqiINGQNrTnN9
A9muZa8B6qOWzhoXVU8Dcj2y5OOujgQDMn5umtEvTaUG5PmRf25bcem5AXn/
hbNVtlPfGJD4mhIOlrbLDEj8UxaVUh7ceMX8jE5kRhXFGJD5J+2aMzh1ugFZ
n80zhL4ll/XJ+lXVzEm3sdUn69tRcMlWnjKVrH9gxzKzOLke2R+vLNNrNT56
ZP/0Vt0U9+ULyf5+WyncrqctJPv/KO/nmMxxAcmPNXsPFFpoCEj+fO4etO0S
q0PyK18eVl1XoP3//HOW0rt9tEl+9qUlL6mark3yt7A3ZvXELG2S3+Injnv/
Wq9N8t9QVhcXK9Em9ZF8/+f6JfN0SP2EfrHhba9Eh9SX6HfjM9GeAlJ/KUVh
6lH3BKQ+AwQVwmFXXVK/6+8bZZln6JL6/jrQX55Qrkvqv2Kie8rgTV2iD9Lv
nV7kJuoS/ZDWrMiNMtMl+qL3LF9qu0dA9OfIg/D/uOfrEH36hNcj77yoTfQr
aNd5y32JU4i+Ocfxvnb21SL6t8xfklasqkn00eGxW6nhzclEP0/7CBfe+E6d
6KtHhErh0gA1or96QTd0PVapEn12vnXlnihGhej3+3O1Uf51fKLvG9v/0JQH
8In++yXU/Rptyif9YWntktW+Aj7pH+ZlJ6ZYOvBJf3nlV5apv59P+k9TSInT
zG4+6U97fMuu5u5QIf1rS/hAmGRChfS3pIvnzc2OqJL+Z1rvfzdLTY30xzkr
8a/NaqR/fqj9WFuSp0b66+B4ScSC62qk/05aufKX2HQ10p9tg0fyNjqpkf5d
XcaXHb2qSvo7WxBZFiVXIf2//5DnYYanQvwB2+19ZuXbScQ/+EWXGu4o5RF/
MS9j6Jjf2w+s0n9YN9xpHVv7nlX6E8eWRQtOPBhhlf7ldNVr41miIVbpbwo3
VK+66TPAKv2PYFNjlX9UP6v0R8Lm8itPBnpZpX+6kbFlik9LD6v0Vw3xs018
HZEV/kt6xuN4RX83q/RnYtaxLXIGd/+//m1mzl9r7M4gK/zd5u7AN1mh+HyF
/7PjH3M5+kUfq/SHsYJj02dx8Sj84+j9v5OGj/zDKv1l16NYydZUjF/hP+1N
Fi54EzbIKv2p3277NBc+zlfhX3O22PkneyEr/O3iVNN5X9LICv9bJ2xqcRXj
eIU/tn+TuNFdgs9X+OdL1X0h1hvw/Qp/PSro/9vwAsar8N99tNbQthPcfP/1
5w09VR/ER7tYpX/vPOSf9Pr4a1bp75u25LUmR7eySv/POyWqyLvSzCrPBz3q
9ZZWrxpY5fmBl/ib70ByOas8X+ARhBf/If+W8vzxP/QkFN8=
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], {5., 15.645199999999999`}, {0, -1}], 
       LineBox[CompressedData["
1:eJwl1wtUzOkbB/CfSkahoWRSy3QfhUaSkTJTRNRW9qRNYgfFIJrC1ko1IQZr
mxbpssusQnSZ2qR0M7XRuDZdd9gQkqlNKqmJ8P+++59zOp1P7+15nvf5/U5j
viXiuzAtiqJU+CG/KfVXfCx5lIb8tudRgyudnJ7AaZLfAyrhloWXfa7Cgl1p
wQnwJMmNxD1wWbwiwhs+o74Qbw+zPJrEFrDwuaHvSwseRf8xYqYuvMf2sMdZ
mBOTRBux41FOI5b/rIRVjx5mfoB5Wf2XR815VOG84/HjML9N+s6mEBZs3Co3
gTu2zCoKh5XK4BeusMWY/7oFMN963isBrD7ufvsrk0exdeL5mbDS7TXvMUxf
nZvTCG8x+vdYNVyoq/+cNpdHVXtOapTBTAHLbBl88J9f6/PgjsC45D1wocIx
+TqsdjOXnoN90mmPbsPynwb0SmFFyurKZ2T9ztaxe/Aw+x3nM8zZ9Na2CVb6
7nk5C/GJ02803YdDXDY4uhO37esg6294lWdshoPKE5pSYYt7OVlxsNw6rHYH
/GWlLu00Gd9rtc4RtvJubLgAS2qNcwaRz/WU8dsvwvSGzZx8+Fn9gCwdZi+Y
dicUnn/egZ5E9vthrpMZXG5+JTqU+Bvb7W2od1CC92YOzDgaYJkK7/ESPxxH
fP9W70bYrO6Ccy3yEQ8NdTvAPwcmJsTCvNm69yfDrrHPnzqQep/pL9HMwX4c
WuJfs9E/5z2XDMDS30y32cLK5X96jsB1ZlUiySwe5WVUNF+P3Hec7TVtYsam
P1lw7/yqlUnf8Cjq0VTaWrjSgmZoAouiTT6IYGVOkKbGjEflPM3sKiE+9bEn
EValxhm8hTuZ4ub1sDCmW2yJfJnpm4+shil37X2BMGN9bYUfzGC4mR62J32x
wXEnserB1CvEPyhKzpL93jf7yWHanIJvH8Fsl/erH8LiCuUOA8SjUnO0iYVx
k2cEwF6G6YxbZP+YRs45mBW063YW7FoaWddM8mm92RFL+tO95JMO8o05J2r2
gles6c6ygTkFvuJJsGg8tXgRrKzTXXcX+aijEibNh4Xba54nwnPNQmMMyPoz
+tQSmBYoeaYi50u6fif1zo56ffMErJhOkxTATFlxqg2cVv/yQBS5nwE5JUM+
ZQ8/FHFh3tMbYbakPvMUZgziR35vT5tiXctd5mcW9i+Zunp0JuqdaJryDvax
UcSFwCqjj9nE7dLFV2tNsL7E9cMYLOqR3WETf9FKNMZ+Xh7s/bkMxPsw5KYL
zMiuqnEmXhh6ejss8QjWtM7AOtORCxkwW0sedxJm/Ttm2whb3UwvDoLl4nfe
NOTr33tQ7QYLQpdYu8FjvI0BLmR+b+ebcNjH7qK5D0zjGmufhQXN+w4JYYlx
27Ji+EGTb2MWzJnd0nobDr/vV/ECVqk+HL9Pxkf3RFkjPnniX3/+BV8/5fF6
B6ys1PcsgI1GWkevwsKNYc0nyfNwqVPRQeaLjh8jz4v/yN22icifbtRsZE36
k5+yypzUI1yU3Yl8Vujf07eC5ZrMyvOwzksjHTrcz5FZBMJlEQ0mndhPMXS6
YjLcwq70lsLstY93KEi9zxgVeMKSbo9eMcybq72pjeRDe1O1Fh4ym7FjHckn
ZNOoFSzpf3j1jjHub1wATwdW9zRkzIcVrSk5/bZYt/ONxa/TUa9DYbIeeN82
esiwEd5/Zf0LB+EQO+cgPix5fDlGF+tX2Pt3tRhi/HKXvQ3pD78TwUEww8Qn
2o/0x4pxIX3TcJ/OtOki2OiH4PJ0mPlk5c4SWNxl8W0ILDgfcakXZnYLnznD
bP7LZxbIN62v0nwOLJ5c7LIOFoxsLF0AUyPtExNh11vxrr4wxzq8O4u4oGlb
LJk/5visgrxvWhV2JTDt/L1d9TDVkNgzDPNZzZduk/o/3Z67FPGmVee63IBD
Hn7yi4fVujbR6bBoIaf5JqxaqrdcCP+s9eRQNyx1O2PsSvp5Ws+iiaQe57Z2
f0H8Qa5T4qbDDEG2aQWclie8pw8r7Q8E74Wzv9ud3IP1kthekR25L5083yLi
XdU/vkJ9H7i0/MGH+w8WTfkDNos65/iR5NtT8ToMpsVvuSIi9bKRrXCCY16f
PTIyFfE4ysZPgZld17S3woWzZPFDNjwqz5L5sp6OOJt7I9Vw51WBnT3MP8Yc
3wMLPSoGLQ3QD9vv3NLAXuNKk7SmIJ5NqRJDW1Lvn9ifJuHvkT2PObDo+YWu
6bDq58NHtsH+4UH09fo4L7VpRgYsH5nAu6uHOsTmtilhtXjJZwHMKjd6PgH5
yn/xusKB1c013q6wwGd6pDNcVlO8bhfpx/ih/ZtgxnDMvl//q2dX1zVYcyg1
VgbnvND1NcJ5Uv3bxXK4P8n+dQrckdfeV0fsVfXJBPF1VInPkvpTYc7bLxIf
sirIhqWBrFHmZPJ/QGQ76ccyRtSHk7DiKyuYPC/MojWHn5DxLXXqGbCq8qvh
eNQjx4VR1UbyiawuJ5aWloZJ4LLLOyNVmO+1eEX+KnI/XVtWxcIiH+0DX1FP
6T16TB/OL/RYmFdO6t3lJnCCpXqXxmJhuq73ibWIPyd69lNPOO3uSTsf5Nuh
/2nDTFgdNstm7kTEtYw36ZM19u1LSf44AXk+2vheDccEJnrW6CLOO95xnTC/
rTfhxHjci9Gl6LewQHF0PV8HvtNvqE327/w+2Ecb+wdRA5Zw4ekpE7/XQtxz
h+184bLBL8eOjUPd2pdEJhBf8/d4RSHONRvMS2DKzjR/N+z1T25YLxyjtXo2
C1ZutQu0IPcfMa12KuzvvXxmAKypq8mwhXlD7RMTiB388kNhSQH7gRQWxro7
18JyK729pWScchpdjPOZRgtSakh//R0lrYQFnqNrqsn8n4LmrCTx5nH4+TCd
dSToHsy3YTskk/eXxSU2F/nFsDwLQ2FWdMy2TFjZW7XTAVZYlD5ogzUqra0D
5D7oBsU9MGfQUTsfZvL/XtgE001Nv4bCGkdN+Am4bGerkxm5j5MRf0wjbjh4
shX11bj1uofjfEZKdONpmH7KpD0D8arMOzLXW5P3QshAFvITqo6y5sD+DXW7
v/nKpagJ3ct14I6j9w/Xj3Epoa6PU68V6rB/aNX6j1xKMPPdtRcwv7p+pGuE
S6n8qMpOmJlEp5I+cKnCV0VPh2B/vQsGq95zKU3HgT469mM7FTpyB7gUb42L
x2LSLwHXtT72cakO4+ySMGvS319aTHq5VNki4/p0cv4bzcp33VwqaPh6sZKM
Oy86eliN85IPnpuAfEXWMsbfb7gUf0HzL0tJfWpa217AysLpqh1knO235jTm
S93T3yfD/G02u5uxn+JygTyXjMfckB/+F/naBKZWwLytMpnoLZdSn08KrCb9
5Gtnn/WOS6U5mMcWw5KN+pwX/chn2MAsE/afurT/CfIR7bXp20/GrQ/szh3k
UrSZ713I89KhqnJzR/6U14NGPXKfn53TTsFe7x8MKpCPNGrKxCRY9bzY6RAs
D90/PBtWH2vZtoS4aUwTTPb75UfhAKnnPAftxThPGDvLIZ/UX7YkPwrxiZev
WhcBS6sLT7UhH6WugbcL3NHonVGMevSPWz6NTsYfJ7+a84pLyeMMHAbxvYdX
rLOqsh3ry7ekviB+M96mvwnjvzVcfAaLlgkjD9Ui/g2R9G74v09h1f+/b1ny
/gebcO/e
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], {4.164370978203267, 13.484272554491834`}, \
{0, -1}], LineBox[CompressedData["
1:eJwt1ws8VHkbB/CTVHLJuCxjikYhrTDCFpETSRSbWy4pQ2rdky3hJaObqGXW
61Y7MWX1utQ0xEah6a5SplaliEnpqm1EqGT393/f1+eT8/mac/7P8/z+5zgy
DN/ms0WBoqh2/CNHajr5ZkRT//1i0NShqAXZjfNpSvj1zbGf1Gnq+a2j/dEw
5bxAQRF+dtzrnh4sY8617J5FU5qj51e1zaMp9srbC+Ww2OeAfQpMXdty3xnn
ZxT17bWEhTEzXnbAWRm7698b0pT0K79gNer1epuPNcA8xfU9rXBDZ95wNizZ
+ddyVw2aco8oboyG+eoeoQ/gpv80iwJhSpgdFqlJU798rM33hYUPPFeOwTk9
95ODyXofBpf9S4umLpTPfxxDPr//Tvkv2I3nUr6f1B+09/XQpqkbNZ5BFbC4
4bueQ/CCXg9OG8yoHGs7Axc9OmzzjvhCd2s9/PMAK0EF84hvP/t0FO4WLtMw
gdeF7vghAmbeNslbCnNval3WgncYK9ymYX7aiKkI9W1c08wcYc6d4ll28K9L
S2sXwdKxzbLz6F8wcHWaOslLMJppD9d0M9NekDzaE4dbMX/KgDtDRPoNCB71
go8suRYYB69bW9ggR35MtmqiEek30XBnFWx+bsnzB2yakv+d4ZkOP+Wop++D
hYqho/FwZORGW2tYmmVbngGHNF+nbs3FeoVlwyKYE9XsZwdzP7uOf4Erjy3a
2mSAn4s01nJRfzG3ItjLgOxXOP0E5t2qdfuqj/thqxJrM/qfzKlTvgzznw5s
GIGTmo9wyokL42ZnYf7Fodf+OgZzvcXB2sir2t/PXAzL92/ZXAgrq8WfeAhL
HnoaKH5HU/v8mN9UUY+tvDt8A2xwIVaf1Of+lrO0GF5v6B1QAK/7unBWA5w8
7NX8GBZKTj86C4/6tEUyMQ/fv0y/AA5mlkk9YHpqx6cAmBqOnBELi/MtXyvA
Kzv3U8mwPKNPcgT92M95dCUGTihv8J4HfzkaVeBKrpemm5RjnvhW1oxpsMTn
ouV8WBSioVSD+lRReGQV5o+vunTXjuTlfDfVAa6bqXupHvMJw2dH9yO/3ZS9
G5vkoXrbRQi361rlZ85B3nmfn6bA4wlugb2zMd/2yIrt8IRPVY4DzPd7m35Q
gzyXlNIJFs53aP+jhVzvMfmjNsy3/lNLHfXGmyTLSvRwvXrQ22TYJrC61Qpm
3Ff1HoUfPhiqe87E/Btfh2aif75tRv0ZmFZnpZP7mV02oVJEPvcar6uA08y+
rymE5cfLlK2QV/X6cvtTMMe77KUI1gwLW/qQ2I4ZpKdDUz1LYo3VUU/+ZjAh
BrZX2yrxhjk1OqnH4UmtMXfSH3vzE/MmOP9iaUcPOX95tLQW5izXT9HDPBJh
ov1h+IeYA52rYelMnbse5Py5hvpbiW1fBQyhfoljSkoczH2x4+k+cn9Yp5uH
kHxK325QgR1qWK0cst4UvVTy/Jsk5yi+Q70E+x4rVXI/HvuRcximZG47C5DH
iWV3z+nA/I4fOr+Hq0UrluZiPkZrl8kD5Df9Xu2qMV2sn1W0ogQ20VpjEwAL
Ly36Yxcc+cTw5ln0uc6EU7ETnjft1bgmzMgMOpEPK90IL0xFX7SFwuk7MHdX
pYIcffCnWDsaod51fp98F0x7/xaRD9/1sp2rA/OSLk8h++NXpWl2Bz+XCLoU
hGR/rDTjS2Gph6R+MdZtL0sYzCbWXMO6Cpt2dfvlwmJnOzdP0kfZcY0qmNO6
4fwN+P5QSPRDWH7Ouc4cczzxjq7XwLpiS7PkVHg8oibPn9S3CzlWDb9I27NI
AEvrHyxohreu3lXcR843Vjklgm0qTk1noS7v8wafvfCJdUuNV8GSiSltDvDk
zYOBoTB72G5OH+rrTPOdCIP5STGHtsGRPhO/roGF/L/tR3BU4uo+I+txB0Pe
/IyjuHvtDCnJ6xOr6BN5Psv6kmJJP/f6TXg4ntrT+/wj5uGWCdVYZL+XjLF/
ghOKikbacHTmnH1Pcqdcinf8Ct+vrGhcBDOmmD5OggPLzwRm47mS3ij+lArP
cx2WvGGQfbJTIznLL/uf9YXpmLGOXtjIUPFdCd57MllsjD2p75DGrMV7krvi
5JlTsGLB/Cljauh7bZUrh+z7YNrmbTAvc3KkFU5LaomdAwuv1454Y/7GnAzB
N1WSf41LP1xgEXBbHZ9TAc+mRiG/EUe5rye5/u2lP/vgNB1BiAimhSsNV+A+
7fmY67gQ9RPitiUehAUBJZN1ML1dUFYH//7voQEn9MtIODTRAh/s6mNchelS
0/hqWGGjzQwW5qMi38ekwLkCg/PO5D3hcHPQHJ4oMD4bQFyYQ7ej/utRpf3+
MNuq9VEQbKTz4YMdyedk70QP+l8dUTs5FZZJ4vaEwCtVzppEop60xDC6D/PL
WtZfLSZ/V1RWZcfClVdG/xBgHo70jJUy2f8GmXIG8hD6C7pbkGfkApe81SrY
B6O1/eR57srZuV5RGdfrBbuT56Y59pZxqxLqB/cWZsKyo849mTOwnmv5+Wry
vFh8eBQ8HfP33GMOwRMB/WG+05CnVLXQG/UEnnamOxSxvvqrizdIfYnGnStT
kUfMSXUv9E+3mfFXwQxRmGkvrC0T6E4qoL/Cuxbbyfwt4cFvYJ56tiGFvIxe
vT2tiPP5Zu42+2DKseeTOyxzjDAdI/kLaofFsNBar9QXv3dKGLp1lqjPYB8I
LoRHCvKnX4DFLY27m2AjW9k8N/TL3692uhUetym1aINllmOsCpjHS322GPPx
PN1y4+HOk6o66cSOs1cZwGk9Lz1LYTb/iLQR9dt/MWXzYdnBig4X2KZ3+LAX
zLc5fOYa5uEtz7LqwvqU7RZfV1h1r2+wBcmr7KcLN8nvuVr2Rz/Sn/vlqiA4
LZ71ow/mkacf9fiK/CKuBcoskAfft+Y5eT+/0PhOMkJh/y8K8rLI+5vlxN30
txMl/MxXSoG7+g/P6pxwwv0j3JcNcza7W4R/ccLfg9onG+FxfoTR3HEnit/9
PU8R9drePB42GHWiONam4ijy/HxQs0sccaKk7gnZz2FqIs3beNiJYjyJ8Ikl
84y3nHf6iOuXD+d+g9uSlWqvDDlRCR8V/fmYv+0GR1MEC5dkndRHXq/f5x4Y
hWn+zvZSkq/aufd5uF52y1WkhvfKa4OkmVFYn253MdwCyxZu3BSH+vyNnWbH
iUPjlh/45ESJ+63tLsLiU/7y39CvuE19WStckki/KBpDvwWu50ph9qbMl1zM
J27QvhQOt+Xn0S9h+aHZvaTe6rrSJp3PWH9od9fv6Mf00J0o8jn3KJ9nTt5r
7hb+XrAkY26YCPMw1a5dX4v1GQ5roi1g/ouurQPoh/psUVyP+RP0E1QMSb8T
X/PdYKnqRlc1zMfZPT/8PfKTzd8UuusD1u/8olUD8zq+ae95i37bH/L2wZKV
qUGRA8jj0rhuGiydt7chSIY85Y8v5pPnZcWks/Ij5GOXeIu8b6hsjazgdidq
3UytSSbZD3sPj8omzDsYXrdH9///TznY8r8jk/4H+I+J5g==
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], {5.441261304060914, 6.601506520304571}, \
{0, -1}], LineBox[CompressedData["
1:eJwl1ns8VHkfB/CTS7GbW2QRGkWEyCWbhzhKsmUzuYxyyZTaFVYosWU0lpDa
NYlWNyZyLxSFLRpFF9nMItFKg8j9EpVKPJ/f8/xR5/We3zm/7/fzPefM0Np7
0GW/GEVRjfhHjpQK+U+bpuTJUZ6mHgQGljSupCluR/0+STmaGq3qTfsD5i9Z
NWsiS1OGsgPXtxCHvUlNlqGpN3/n7fu8gqao7rLjOvCIl//RAlgUO2k8s5im
1FaWdnnAgvPXF0hj/bPGN0lSZD3/vS4Ljtjt5lGjhXqzDnUv4aTZM13HYPan
jzrJqMft1XbdBDPe+RgdQD+pu3V/Via23hZghH57LTzXfWDQlPD48j3FcMv2
h6a9cMgFHneNAk09Xt2o9wrmT0a3X4Vfy4x9T9blTy/rkllCU86txr1TsOCW
Uu1euGYyYqUM9hembq7IgKO2vo8xhAWP5axq4KVupuud4dIeM8t78AtPc7cw
mOfTanAFNrf+pysFZjZu0toP79H8QawYnmjYXEzqsVYYGdfCNC+8MQP9qL6t
2tBA9vs+IVcDnpnoOvkIDnkn4c5DngV2+VKV5HxOv8YX5E9hC90vEpc/udqO
+dht7KoMJf2dFS15hPm134/Tsibz+4nJbsH8VYMPLZtFPrrCnZKGr7VY/FUG
M+jVTqHf0tQrP6Po/SS/k520IvxAfcZMCWZPaSm8+4amoiPeZ55YjvXjlsvl
sB5yuSV5QBP75bEe/QybPglrZ8HUrHnaBzg6bzz+uQbu29k41zLUG7Jpa/aH
GbZNR86S54Vt/VYRpgIacpPQP0shvqpdHfUOqPieQj7rquHxCngiMadpE/Kb
pizuKIXX8s4LK+G/rn06XAvzNixz0MS8eu5tTO4n/nHLH8Fwbl/pwDLsP2H8
US0H5vUlB3vD/BMy12vg/Fu3o7Lg0urK6Cq4LWJ61QAsz4j3TINFJrrxushT
aqaa4QpndStIesETG/bpfUT9lNPfFHBgvsEP5nEw78ozl1MwT+6kFnl/1Hgm
01wyH4PLPj3IJ6Y+VOFN7P2AeRf5gxgRqprEbU7LL2E+brt6h+vJPBjPjidj
fmGtss4smL6iqp+N+b/xl0ptRj66MtukRxrnlXUp2ML8JIdwd7juidoofxlc
ftdAHJawqm/9qgablaeMSWG/oN2VXjC1Nb3uO6yP5CQfFahi3kXrK47B2zPi
rpoQ8339lFCPe6VVo1wFxx2uih3ER3NHtsECk02tNehP79L2BbPfYU4x/0pU
of+5QXn5hzDfqfpTFfIlSn88Wgiz90aVlCG/duBLp3xi/aUx6eT99eveXA3T
1k9G1mBejOynM32wvP9o4K9wpyLvowbqMTP0ggthF4tFMmxYPuTUbDXs1lrG
zYXp0EuZN+Hy+PV7huGQXw6GJcL90zf+0UMeJt9eyw7W717E2gVTz2Pz7qH+
S383tUiYUXx/UTP6U7ISmMTAfF9WQh15Pu2vPAmF6d/9BrORj5lkt92RnC/+
dZCD/AyL4OMSZF7nXU6xMR+1ntpDeagv+s3JdxfmyRvnJJmRedV2tB3G/Lkb
Cp2uIZ+gbSyzehH6uLPYVpnMbyxMzRpW8WHmHVHGerLx8PuFqOfhuaVlKeqL
MW+OwkZCpyWmxPFGgytw/uxjqdfpSrjecM3gGfg+R0tdhtjGbpk56umzGSfP
KmK/7PofKfQj0C6bMYbZw+sMh2FN/oBmH76HBO1VzW/Rv1SxeHA5zNaaDx9A
vsVfromT7z16tE35NfKvsojI45P1/kPrazAfbsmjl1Uw/5M471fMb8TT9RPZ
j5qquLoQ871bkejPIPW2Ke/0gW1iOS1+MP9AkXMkrH/RLaQQZhyq/I877Fic
tm0M5vqyJqaxH1M2O2018lAhJ/Z5wcp7do+xYHZUxWHye+Ogp10UqkTe57A/
LqA/FjtZ8QixzjnzRPQ//Wz0zB4yjzTugf3I94w12mpK1i1vSNLIn3WjQTSo
SPLFia/CvLwPMuQSSX9ZFk+0MU/5kx5f5Uj/4j8ddcT81SwvB5xAPq63hOdF
SbwvX1QWjSqQ+1NmrwPf1emycFIg35/srcMSNLV1tPxpPp47duyuoHFY03h7
lRSx7JrYtTg/MTsquVeW5LnxYyFMnfTjNSMXI/OXfHfUO13PznyLXAxB8pAe
+pmRG/6wGhYdrvRTQb/+hQ2xGcgpEDedVkae9POSOVtgrvXzCmXkVTohI6MD
ix4P/iVNntfa6nozcn7gs5IeHNtXT7GCiRUNL6Vh34HYepm/yfV2fYdV0Id2
zH22A6nHaeX7wY7tCkFNMP2w3CsMFvaZHfcmzwFrzfRGHHk83VvdOIpaOrrb
SN82G5JdSb6wtTdN4dOuVUl55Hc8y+ZvH9RxLCgqaIUpe9ule9Ev//7CgRaY
f3li/zbk0U5b8CefnK9p/pncH3N39Qvrie8I74lhHp3ORb9dQj36qmrWCOY3
cjo6kfQn0rzZOol5lwaIs1+Q3D/n6mrCjKb58TukTmT6L8fEacrJ8/pQPOow
Clq/yMMTmqHOm1BH0CPc2iuG64WX/53FfWBrTt2Zgt/Mnwq9R+6T6rkEGueL
Rv7hnMO+dL1Fax0sURy197Q4eR4vvY/E5wMOr8YLcB1lWC90wXVBsQ2T7xeg
/5xoXwfsu7PB8MVhmM//4uSAPMJHOyL1YJFDYLY9+qjzmJ6TgynqXowZ+rRX
M5rUJdfr+AolkYPXVLs7gHhhxnAJvNPzoFETTBfZWOkht5vq3gQn1KdjvErI
73N6tc+OF7Dgg6t6AHm/k1bV+6FfgcXSUCPY3qNJsh+mlWbrbmO/xv6Vd1yQ
Q3D9orUUPOPmkZMJi759+lAf/URtDF9RR5zFvqWHftkJjRlVZM4G/1rIIo9o
6MLQMZh952nFAPLbB14KkSZulDd/iGMkfWsrqc8fruOW4zhdl2v2uxh5v1am
C8jRKIH1O5nHu1MTZG68hLC5QArn69u+9SG5a5Tcf5qzpURygQ7z+Dz/1/jv
Or/YUrR0zcgrmOm4sZ/5yZb8NXvxMyyczzjY+cGWYrzZOOSC6yfs2yzTpnF9
un5gNyxoLeUkv7Ol2CXlI5dRf+1Ky+WdE7YU93xfPwf9MfNuZMuNY91yVDwc
/VOR6v3mo7YUf/yRIBz5hNetHNeM4PwLxhphuL/CglfOU8Po59PADm/Mg+98
ViYC64IU3ThdMq+pzSMZuF5QMxD0GBYV7JhzxP7cPx8Mr8N82zed98pFffpI
BecAzJQr4NRMwszxM77wzqyUdc/RLzfQoJL8nnPne/uap7BfR3huqhT5u7TH
4gry0TkvlnaifojGAUvD9/DrjogP6I8RFBLgR1x0MXEM/c88UEv6DzGt+EBI
nusue6tCXM9YnlpTiPwq3jF+pWT/4U5OEuaTH5rmwER9SvpaJQfzS5Rc7J2C
fkUftVafwbwZ5xfeX4R83BeyjZnzmFv7BY+gAeyf9PTqCdy3iUxm6rFerCee
cxV9xXUNBm31nVg3tdl9Gxbk5F7LbobjtktIzZE+dW6/qsXnH1usmub+d18p
Kn3D/48U/V9RE5iQ
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], {4.558738695939086, 4.601506520304571}, \
{0, -1}], LineBox[CompressedData["
1:eJxFlws4lNkfx98UTYiMmZhRM+a8r0itrZaiFb9uS21FCBU11qXtZkpEIrqw
UsrQX7pSykoXShe6SKhUQuuyLlNNqGZFSWUoac/7PPs/zfMYz+c573nnvOf8
ft/v95X8JnML1KAo6gH+Y/9THPaLAf/mb/gzAahkhyY9awaWLgrit5dgtggv
oXwYEDH9va8iMP++V6M4jIEDDgMvUizZ8c+hXTEMNATWS+43WgJlPHevViQD
o9dG/iGPx6ws3+kdwIDzesMNmtMw5xdO1QIG7kWLtnO7xgMVG9Daq8dAnN/M
Ob5nMXv/dexmLQ0xs+8UmIRitn3/dKOcBtNXwalqZ8zQWrf/Vxp+PlxO91li
7tZrua1Jwwr5wNJQIeYaI/fcMgS/7V+2RM8Is8rzyN0EBFtDmxcWijFX1B83
90YgpZYWlU5hf9851McaQeGQblXPQswRt2zmiBFkj2h/mxmM2bW6uV+AIF74
g32LHHPysqByBoHp7IXG+y5jLnG1MnREsNrhcuu5WszKGFncKgSZMrNPyzox
59+7P3AEwYYbEUO5A5hzTDKKmhBEuB3pLaPwfkzK1YgdS8OvqZ+jevvY6zWH
lfnT8OxMyrOGNsx9Gl51OTTQFU7ac+9gTi/O4/9DQ0H1Kad6dj01hfPHSxiQ
qePDKjzZ9VE88SIGDB5pzPhiwD7/Qf2j6xmwyvQWPL5rAVTj9J7+aAaku7N3
UmGYE2SzfLcx8PaMtOt/CHNObWNJMAPyIHlk1hNzPA5mvS74fKTn0yfEYU43
szlMM2CBrI5/dGRZpkd10sBvouX+wzArE7cbnKMhoGsbx6duHFCZgzyLVTT4
rB3y97iLmCmekdIUX++8tlZ6BHNfwCSVAoGqbPGpnhTMsZ+omuMI0v7pGTA4
iLl78orG1QiEeXl2C7IxN06+dB8QZLhYPj5UjJljerfcDEFoyOgtW55idpW3
2QkR6P6+46UBhdfTHdx+R4TA9oFrnReNubFY1/QnBO86DN5PncOOf5ox2xPB
xHfJwhsrMdvazPGIR3C8TvB12ib2+pJdVSUI6ka961gXhVn17s4JDRo0vuzh
Zm1hmTNpuTMNuon7ostXY5Yuu+y+j4a0D3uz1ixg92d7q7KGhtEedZVtEsw1
qnHxugwoJ3AHrN7g9aYP2UM7MFD3evDA2zOYLaoyxP4MDOZvDXGTYvYGn8Qt
DHDM8+SfR7HXh5lMi2WAe0HeUltshvvxlW/lZnw+UTEvu9dhrtCJrPBlYGR2
wzWpCLPzzq+RUxnwLJtdrtnA4PNNNfqgwYCGS/sUWRrmkrH9bXdpyNRtSLrq
hzm54mjsDhr8c98c9LfDXLH1qas9DR+Ukyq8RJgT+oUaagSBR4dGl45i7/fm
tc1VBI/WrdklYtm7w3NxNAK9UZ8FdiaYNyRscnFBUH27+svMSez8inmHrBDs
8AosbluA2bY89eUYBNfPFRn7B7PjV4olJgiSOs3jyuQsL9kaOB5Bj4XhgncF
LP8U+/4XBEodXaXyCea+0/vsQnB/J230e6TCrORa9+cg6Fj5whJ6MVtsnOym
wvW1wkfm0odZmvC+ZyINS5IeW5/sYjlAe/YmGm44BS7aW4+50C0s9RoNsToW
gfx8dn5Dr0svDdXM8wN90ex6O8U/TsT9tqz2xGFg9+90wApPBg7+rJ6n7qfZ
8+77M4QBxaETZ+NxH1CN60OTsT5OrgkZN2Y5ze5n4ZooBmxdm0NKOJiNAwal
qxnwc7LsSihE+Pn0skKcGNi1UjU1eD3m5NryIGMGLhWolzKWiNWPNZef0SD3
U+3q7Zbg+TEb/I7R0Ky2dsopw6yaQjV70VBD0R2+WZhtVVmlBjRsoRzopGTM
k7TX369CsHOBqKs3kR2/VbAmBcEF5bzGXDl7P9HwhpUIHkd+zDZk58eWlufZ
4X6AV7t1b2FO/rJfLcH7f9PjxVcF5kZR3BusjxOqWP/4Ph6ndVakQSMy/9py
weYPsxC5f7qzztJOH0R+v7D1ivmSYETWV+vygjsiDJH1d5beUYTIEHm+uCMK
/kl2/n/Pv+fRw0Iv++/7Uz7daOsI/e/7V6DPyW6pl5D9feFv9ECeIiH7/8Gj
nhvuJCHn88MmsyRHtSk5P6Zyb1PbKVNyvrvHr/DY4m5Kzr9YyrnK0TIl9dHx
xPvmw21iUj8TZ8xs0BsmJvV1RpJnU58hIvXnrrb2f+0hIvVJiQLSbjAiUr/9
Fb9I/PRFpL4bIuxzYwxFpP7r1o6ZsdpKRPpDR/ba0cFHRPrn/qvGVZJ0Eemv
i+fzPkUoRKT/bJ/vqbKjxaQ/7/9tvdM2SEz6d+JwKScqQ0z6+0KQTmXSAzHp
f5vzlurS52KiD8pvas2tz8REP9rLj8lcy8REX9rbzGtsk8REfxLWu7en2IuJ
Pt1TTT0sqRUR/RpLRYR/dBcRfcuf7pbsUDaW6N9xR8pGNG4s0cfTlgpn7x1j
iH4e7shUaD8zIfpaxXBMljuaEP1F14Y0oHNCos+cH1uGnxwvJPp9/JlnkO1N
AdH3bYtfFlquEhD9vxTSOix8ooD4Q86s181FugLiH3SgxHLccAHxl6SnjzST
BQLiPyE5Tx/uBgHxp878lrEp4QLiX/bZvl6uRQLib5evfrZWfBMQ/yt3/2vk
yLlC4o9Jr3MDK3cIiX+mW2TuXVUgJP4aEyjQUjwREv8dGFx+TdgsJP4cm2Ox
1OGBkPg3N39g8aVjQuLvrb5D3jl5CYn/Z9Zde2qrFpB8EDkrq2x0rIDkh4zw
U1U5n4xJvsgpUmgX+RiT/FHZPsOs7roRySec0Et9g3wjkl8W9S18HBg6muSb
nO7+uBEKPsk/HQff82RufJKP5hy6smGJgkfy065e2ZuwaB7JV2/bm2a52fJI
/rKWamsZ6vFIPrueWsGNGDQk+a1DX6+/ZTiP5LvEPy/z55vzSP5rvpE2Pdub
R/JhIhVY3ZbGI/kxY+jpP+ax6/kvX8ZsmoaKEZ/kT3sbsZUwgE/yqU78wqTI
w3ySX+uOzQ/YX8In+VYlmL+k7Qmf5F+9AK0FRo/4JB9bD9tcqJ/LJ/k58bqk
aVQwn+Tr3ItR6RVGfJK/b5dFhc89wyP53H5P6ddmMx7J78IVjeJPckOS74/l
a79X9HBJ/v+yzuPmxkVc8n5wYsRw++ZcA/L+IOvW5U7RMyDvF8YdU+qnbRsF
/3//GHaK9Q99+BcJnurO
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], {8.354800000000001, 9.}, {1, 0}], 
       {PointSize[0.04], PointBox[{10., 4.}], PointBox[{10., 14.}]}, 
       InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox[
            RowBox[{"C1", " ", "N10", " ", "T10"}],
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->6.137505285412264],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          6.137505285412264]& ], {10., -0.5}, {0, -1}]},
      AspectRatio->1,
      PlotRange->{{-1, 21}, {-1, 21}}], {22, 22}, {0, 0}, {22, 22}], 
    InsetBox[
     GraphicsBox[
      {Thickness[0.005], LineBox[CompressedData["
1:eJwl1Qs8lFkfB/Dnbd1yJzFZ95Bym9ppSWkmyi2JXNciRDuu2V6h3gkhK1km
SdKgkigSBimX1ZKUS/TacltUY+m2hFBJ7+/sO5/PmM/X8zznf/7//znP0fQ/
tC9wBUVRnfiSX0qE/NFmUf986CzqdNC6U3VrWdRk7LGJAWMW9fJR7otgOL7n
FHUPfn7ZoXcNbNr2oKMWlp+/a9WuxaLEeg+LN8AV+5LNjsKsny9U98Bx2aOJ
xvDk4ImPs/AvcbHV7zRZ1Nx2bR15xBtxMlyogTVOrL5tDNf0ZcyegiPy6vc6
wbYB5+uCYUHiE/cj8J3ihnIPmGL703LhX2cqM51h9pFVvY1w6vCTGE94bOvn
7hG4vnDtQAhcMnc34TNsHW9ZeBJm1HdnyW9kUQ9K9/xQBIeGCS9owetG7Ojt
sNBr8xl9OPtZGuMN3Pp3rbEh/O9x5QgJ5PP2cEyjLjx0aaucLtynlCe1BqZ1
6GaYwh4zSdNCcKTOig4WrK1unvoG8Rm7OPrmsP1skWU3fMY0v9IAnvtCqyuH
eeOtwjKwXvHxS+lw6RCNI0B8On+44RB8dNxWthx+ey670Rm+YHLfIwxWcA40
3AbTNCQPa8NJXjbeG2DD2yYv/9BgUUtf9zurw3/SZY4nwXr3zjd+C7PZ3pu/
g+f8uibJda+GNuqROotyGZ9o0IfpQQ0uW2CPWLmm7XBJnsHBO2osKi1EaJUH
vMm3yNNBjfSLxo2C4x9VWn9WZVEpaxLacuDl1Crx3+GA6I+KpD9RDRfohcSB
Q23PyfP77/+dB3solCkKo143XF0MK2CO34CHDiwuFX7lKVxx5KzoDjjJhfZF
EvFSEgr63WC1+lBVEr//mlZ3IOym6eSeBffFplqGwTGzDg0DsF7Emw+h8Py+
djYN+QT88ZMoud+TVtBjB/c0//uLK0zNskVD4TKBxF0WvLPvJBUDL42aRJB+
m6k8awmBh9lhWWLwp9ygrF2wbGTBw0nkE96kLCoMV/RNdbTD5V5yYqWIH19E
87xBrl+/170FruDy1TLgqpVK96qRX0l/cm4MHEuZWWvAtJYZWTbcqbQx84QK
fg/ERvvAixHWHiPfoj8qnkFe8NK+66nbYO1zx9T94TEaJXZFmUVJyvDDyHrp
tFveqwALOudaE8nzd5q35qxBfSyzzfLJevS40bQRTmJYZpH+PP3jfdVLGvaD
0if3MZi7Oa76FtyTaDVK1rNGwZJENly2qil0PczR31B6DuZMFlvYk/65FZqV
wfZ9xXdCYHk/P9OnxNJWbsnwsEmojgziccy2DueSekodbHaCO2+c9CmBl1ct
2JL5tedE7S6HM3/LfzwMN2QoR5bB9O2qR9cgH3oJT7oQ/j4kuc8Gjkw4yc8k
96trqh4k7vroyoFzzI8eDYNpW7xN/Mj6+O64oRecVvzpqQW8rVS5iQ5HsJJH
yP7XjUkVeoN4POloyW9IPnl76WkwteikOo56XNnafVsRFvClah7BN8p3mKYj
vyTjWtsaWKS30mpBCflcDpS9Buuu2s1wh9n00+/yyH4b1HzIV2RRWSvtg4i1
hCcW5eGdvtklV2GxB/7njq1G3U+zQviwb3TJimkFrNdme5mHcBt3dDoaduzT
vSCAux02qyvCl/Iimkl/XK7L63etQn3W1VJ6pD8b5cPz4Wp5+k3Sn86CiLen
iFszRX6G9fqHXNLhMsdup7OwbMFluetw2lT235Xwk/dewU/hpZvc0A540Cm4
Wg7x3naI54/AiwGlGa6wr7R78WtYwEkw4MGMsA8rp+CDNtHnR+HQhytK38CM
ojIRZeTnu5zdNwZfcTTVsYLpcdSmx6T/D1M89sPtHOkHt2FFYeclP/jqn4Mv
LsLsfUtndsN6gt+kj8NivkrPyXi0re6fvOCKIXvRHlKvxuRAc7I/C0ajQuHI
6rqVGnBZwsjLGeTTv46dKEL6bbKg8RPMK9Ixn0E9Lej8d13yLKq5R8eb1PdJ
SVGdAbyTsqv9E/YovOVxSg7vy/eBjeR80do12/xKFuN5OyROwNO/u/Kd4Z7B
L/wFWFtT6E2ODM5L06FcaRJ/G4dWKY1xuK/0yfkilLX2XwtSLMrAOViO9If1
lnPgEOx7idl4iPQvqjFUBS752eB4FlyXGsf7Iknq/5pbB2cZuXfI4Hqz6yJr
EJ4zn3beA186Nj23QJ5X5HmVw7J6Tjaym7D/ZtLN1yO+19BFFS2Y556zXAU7
qkwUG8BXz74fZ2K+QsNaccZwSv+obCvMXZd6cQO8wpshqoz8KM/PnmpwOk/t
rgUsuXfTfyTgpSwdvjtsX6QlO4v4k/NiJ11hm7SpI09hbcWpqS0w97oJk/TX
JqBy+RvYNOKixnnyvpXg67IRj3EwZTAaHmt0az2P+RkEB2v9CJe0zNfykI/k
XEga2b9iNWPicagHe/VElDFZH+ssM2wksK9Xnl0k+7k/9YibkDjWX7LbE1W4
IfSRTpMY4mdHB5L1MJZrMXxCFPPtLSnfQOplNPXMUwT5RzOstsFL7i/8nIXx
3mNYBrrAvD1b9CKF8P+Wj1Nk/4g1y3W1fIP6575KJPuH1a7PtYKTQmipJD+F
MZ7S8grMq4i/e5jk3+jv+Qoes/QXo1Av7YnXN4Vwv8BOXkoTpsyHP9jCMTJr
HpmT+vMqZyvgSfvkCRc4R1apyhjxhVIuuwXCc1mZIvVwqHH5/nAy3uYxLWvM
N8DPsvQQvMjIN2qHFzsarYLg+PhjzzchP9//nin8Ee67Jql4nPhx8hlrmDP8
1558WCxAl2EEd/6qp8GFTf1fzZL1wxiZTXOAtaVehrxHPvHbf9nYj/FZewZc
emHJRGdPI3hsYiC8Cnas1JhxIfPLjAjOJvUNV967D/lwCq49iYUD7nuMGaEe
gr7Xi+R8Fsitbp6jkJfxxEvyvo5RZvr6fGVS7O3aFj6kny/SpPuWmBR3vZ6f
PzkPDtga+X9iUpTeyfXh5H3EDdBWX2RSglpxjRNw+6uBWbV5JtUpKR5Kzpu6
Kakth+eYVKS81wuyf6gljpPOLJNK+v6CwhDJZ7HxLnOGSV193HDgK3k+Rqyy
5T2T4m3bsVob+bc/oMuXw5Ndl4NIvSbfpSfPw7IBqvyfSH2lbr/LwPN1h8+E
JJLralErgzC+7KyjzQV4bL23TxjiByh9sCsh3h+2PfkDkypbtO++BVeUuU5f
xHwNZlrSiXMOswTZC0yKEdh7sxjW8Dnxly/yCzXcVZFD5pOZwfoLXnqRHE3i
2VTl31H8iPEb1L8n/dY73RVErufoavvuhiNsjVwd4OlR6xx9mCZ1v80e4ws9
zswl+5cr6D84jvmwmjp03iH/CNUICU3MV/trk4D0t0fSe5cU8ksbTfGoJ/tn
rc/+6CkmRatZbr1B6vf4i0LCa8yXv1njMty889gP7HEmFUNfFi4gz2sl1vww
xqRUOPO3rpL9smPZQvwZk3JM582Q84Y6JfeLZyeTcvk9idlGxjOzsyu5g3rU
55SR8+KfT0rj/383sf4HcqSb4w==
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], {4.696019990535815, 16.084899952679073`}, \
{0, 1}], LineBox[CompressedData["
1:eJwl1gk8VWkfB/BTEYlcUSF0yVbZk1Hk3naDuEUYqW5RbhhL0yBLMZVtNKRM
SLJMlixdbzIUjTWiyVokyy1LN7tBc4v0/p739flwP9/Puef5L8/zP4fyKe/D
p5dSFPUCv+STkiV/VJmUEPnUY1I1Hh4PXmxkUmw//R+qdJnUeNlAwm9wzpUV
l2JgrVX8ggPECtuHXODBv7Ndv6gwKaZg7MT38NhRTmAuLGAvrDSD5Tdy+xxg
nzMezN3wF0WxaFHY2P1r1BHY/7idw1NlJkX/S6rID45euN4XBDsuhjzPhEMH
VG33wJHBtyy74ZvHNdzWwqLN8ckrke+AkdO2T3QmNdt/IHEL3G79zGAATlFX
ZVvCDZteaPbCnPINRmfhfomJ78h1oYFw/8uwTYfuwAzso72Pmwg/nfbfKIH1
DU+3FmTDwRZzYVqw3j81vz2A19gZGNvA+QKrl8SdToZ252DXdXMWObChaWtf
PCwzwzJPgk8qfb+0EC4/d92DxLNX0dGtgmmuig/dYLkPZTsb4bG/088egAVT
fVH1cIrprjWq8JJdOaKlMOvuhfpF1B/Pbjlym9z/o8GmEnjX7r5SX3hKtbTW
F+6qvqJsCifKyXQZwnJeP61fQH0tP65hLoXz240eP4RFWWK2PTpMqtdF5+Jp
WM+WVV0L1ygItsrAXcHmV8rhi/5zd69uwPonXtbXwD532mP5Slgv99X0G9jg
+bkue5hiHLz3lXw/ezL8lSKT4qm+69BCvBGz120cuKH5Ya8rOS9s0w/ScGjy
f3IzYHup8LIuBey3/LPO97Bp2ejkn7DpqY8zNNRvEC/+hguLu6ob6sCP8z+f
r4Jdm8Ovk369/2t37DBx+/XMo3DWEJe/HusvNFXsJ/sdNxTr5QxzTu7J84Zz
HpUEZ8CeuoUnvODX/rPqfFgoMt3+NMzT1wjXQD1jVuEf7OCMd1LCR+FgSbnG
nXB8jFhuCMy3WC2hTNZPf3n4V3hwzylRMj/ycfqzoaQ/Fm63SlHPUoWRP51h
WqeejDfsSfeXU4LjtrWLaMB2PwyM1iE+FTnTP4D+netYZWMPszjhjTnwIEf0
Zhvqo01wYgJg6mGfFAPOyTh07Ahc+1x+PG09k9LUnmxkwkImdR1f5ZGfeMEf
JmQ9z+OlR+HQ1erT++Cxe7GBlXLY380vx4/D1qlX/tCHZfmdslfh0PQOxWJZ
zH9Hx94S4sCsMUvY5wXt0SSsmWK9ZGEdkwrgGe3SQf6LH2m0Z7CmrfdFLzhy
xb+B9+FE2f7RfFjVo9sqh9hiH32YzK/Lu30VMM3GIIjMLz2zSTAECznNOynB
PdJx/yoi3k2N6Nub4cNGIhJsWKhH5ZIubNfxMDQLZil8yNaCi8ONT47Czm9v
K6jAw7NFrZqoR0bzkDk5P5vfidj/ADPneB8nEb+bYycfAEfmTYUVwzImlfph
MP/WK2UyP4N705/7wqwBxy+aMCt6l7U53MC8FNiP+ulGXpeEYMesDpVEWP59
1U/ZiF9Kb3ewh+MmQ6K3kn75lGxTJP3bed8qH/VxH827TWpj/56IM9bCpU9S
ljfDssdY2X5rMV8DTYEVMMvB6UD7GqxD3fR8Auu0WK02IE63fNwALzSI9ifK
4PlpaRk4CFeHKCtIwKU2LcslEG8zmx51QxrrcXylyXmoVH0o0IW7AiWaAmGl
NL7S0GrMu1/hbBksWrjMqxh2bLik+AUWn89flgqznjyq+w71qxv5Z6fBiZ8V
fiPnN/RBfXcZzFmkXFPJ897J9jNZr3JBO5e8L8r/jOTQSbx4YftO2OxySLsL
zOkeke6DN9+287kPNygUWr+CzQsTLCdg3q01phWk36syEzahHspZ+c3v8NqT
xyfsYdl+7V7yvtmvqZrnC3PSUzLVyfODHSvtRxylJvEe+c++HL9+Eg5QYzsl
wS/txzsMyHVrzyUsOKOokfcR8Vgm70JXwM7edMlIOCfnoMFz9JMW5fBVkuQf
mqQUD8tvv+N+FfXR14W9PgNbz8uKjEthPyq1Dn0Pl6v1GVnBetKJbTtgi/Hi
phwa7mevfWsCK+lal4nCiXua6FZwZGZw7MAq1HPC84Y7OQ9RLnFtEuiH23r3
BDimjn33gzj2ZSpzRyMskBz9tAk2VpyQXY58OfcbL6euxP6GileQeU5MEr53
AKbbzBWQ+ZW5KiGhBhufe+xVTc5rVUXdVvL95Jk8Ady1acbei1hopZsa+se/
XCfxN8xmbVfcT+Y1rJq9H/ECNmzjO5L96ZLybIbj9Md/d4ZbhrZecka+aUdW
VrDguDiNR+9gwXm/0m0w3WxnrC3qS1SIyReHY2zLorPhtBybnzoR3zw3L7cD
plptrpL5Satezm+HORrBbw7DqglLbqWR74tce0r2x/CIQrIxzNOZfVCJfvTY
5P2Sgni0s+GaQfBYzMVIkl9phNbPpjDXfRm7E/U0JH2MEoHpzd8mn4jh+aR0
5m2fFpOycioYCV+BPDbPmdXCU0q+NntEcZ9xcVspzG2583ZhOfKvX5gohwe/
/er7lzCeH+FDyi0wb6w15HchnJ8iiW3TsFBh8KmYZchf2W2nEuLx9/dO5i5F
fZb6xXaw5+XG6bkl6G9u/63rsGOjVud5WJNvdqMVbqk/FKAJl7Z2a0qR57nD
7KIkTFV686zgvfI60xrk/ufrzoeR50tz1XF3OC3sw5c82NHJW6cZbrnfvKoR
tpM7FWGF+Cze61Hyfk6sOHaoE+Z+lYnoJvMdrV7ngny5B/elNJH1HZqFh2Ga
MKOoAH4xvPHJYdTnM6ou+QsssHO4dxcWVP+nyAIO3v2zSi1cqumoLQazI16k
lsENjSXXalAPbyR5JAjumvhHOxDe65HiswKW3Sp0TR8OYD6yIPH5O/Tp4+jf
bG3W1mvIj94pqs6FQ3Ui7K+RfiyoBIfAcRHnFj0ozGdj8wUHcv2pzJEziwxK
UJPcyoBzLoSv65lnUKxfdIO+g1nmu4dZnxn4Z7Yyywxu+Zbq3fOJQYmWxT22
I/u99/X2hFkGZZzV6BQAV3ZwQ2L/YVBdW7SDsmG9jds39EwxKPaZsgv9ZL3s
okzJSQblaD3PVCTzGqAwbDjOoPjz+j7HyP4VmJhrjzGotGHLiBTi3F6bmVHk
YxYo0wmn2dyQ8Md17uCKd+Q8s2f2jaXifq7ujvUGMC/30KI51ucNTQUeJPO5
J+loFuLH9f54wglmSeaGPJ1mULSOoEEHst8Z8dteIV9et9gEmf/QbwNDbTMM
ysfvziY1mPv+vVE66mN9/Fn4X8T3UTy7XWuOQbX4f7pD3i90Tx93F+IR9Qwy
P4Ia+egdMK2lVs8QZvbtNbmP+xtE7j0YQf2yzmEuXKw/tcP/bgbpt2/Cfhbi
M5du8ToBRwqLO8cjX0GIuYUqTE9aXi2C+qa6wz7PbEG9XckOnnwGZe6bVNwC
T91l3QwaQLzWc2LlMK9xy+u6Hlx/Vt9UAlfey8rPbGNQkS1RVBXMzFMr6a3C
+hcDP7yB//eTuPP/n1rM/wKsKK/d
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], {5.303980009464185, 14.084899952679073`}, \
{0, 1}], LineBox[CompressedData["
1:eJwl1ws41NkbB/DfWpfJZXOLyaJxTYWGZV0qM1upQRj3yQq1/hqFbNsKaV22
iBXWyqWdXLeWlFyLomajmihkFZWYQqlWiJgt2f2e/fc89T6fZ+Z33vO+55zf
mfR27fP8nxRFUXfwl0RKlvxjyKb++8NgUz+FrUxrMmBTPR9nu+pXsKmRjpPP
9sBUqdonyfDTUrd7y+GojKz8CFh17vIWkT6bUi4bU4+BazxT7GPhxGeWYaVw
Qt7wj2vhnsZPZ17AqQk/NEzosanxwxxnQ+Qb8jCbb4TZUmsig+DGvqyZNFhs
f7C4DHYKyW/aA4vkTl94BTf/3lLNg6medqYV4vG3tTleiD2vjMsOIaYP9sb4
IwoPzp1qRbxSbvBwLyL35fcy84hbEzeVH0XkR59aZYR53apy3X4aHngk/8YR
XjnkzBTBtL5Do35wXn+G1Wv42JOIIH/4uzGtKAXEgbGpOFfExyXrVIwRK9ba
f26JSO80zrJFrBld8nQJ4gEjqU42IschTr0f41g5xq/ZABc8d0kVwD/bFtWa
wuMfLKJ2wIKxdpmlMNftA1sHrnpMjx9FDA5tjh1G/bFjTsrVZL5rzA79Dhfa
3OBFwCZnOvxjYDpDcb8hmX9z9mVv2OySzch9RMk/1844ID5hLj18BJGbvPaQ
DSKfv8P6C8TxtpP3WIgBLTepDqxTRUd3rB/MDGvxtiPruqAffxiuOGUa2qyL
PP004xrYMvi0v5suWS8LxgSc2FG79YMO9sMX0sctMI/F9Dr567DozVuzODi6
pZBZTtxx8XgbbBl0480puMaEZyaPus/6eJvVwJLrdbXOsLxSZNkDOPi18dJk
+Ig3/aMi8inLsGrPw7pXwnVI/hpXR0En7Kvn4ZcLV3xUT30Ex8y4tTyEueIH
rx/Cc54iPh31iM52f9YB+9OLe5zhkqQX76tgaoYvFw7zbmseSII39x2lyL6W
XNsn3gbba/e37YWb7j0yUYHfnwzLdYQZ4w6/3EM9kVe15GTg4Mrh/J/h6gAV
WhXyUy4WDd7k88o/uuzgYL3dG3ThuiWafzSgPm6tkvU0+vcDZb+VATNTxvR6
4DuaFjlJ2tgvtxbetJB1jNrKG/oc9dk29DbBC56V6ethzup3Du2wmE7RyrSw
Prqhj4fI886L7uqwqPBlmhzySZqF6wqW4/lU0+/Xk/3IO3vVAqaFpZiQ8/Pg
/nTdCB37y3z2ghDOtk5ouACXyB2/SvYzo3hBIQ/mrYx/6AnHr1lddQKW9Lgf
LSDr51tufw4uqHD/rh9W3bnT9gGxdsY5Rbw3Bm3CjZYin+RAdJM1bK8UKvSA
C3wUWrnwotq8E5lftsVEXgCcc62oexCOWWE9zoOZDjqxy1FPMNdOZwv85d6U
Pg48Lq2w24h8f4WeTijxyZkqCTlnG2JjI2Dm/suR18n++OKwWQDpj/u780fh
9VVaV5mwOFGxlZx/45h06dfIZ6vzhi5L6jnlzsyAqaly+w70o2xd1yUNWLT7
8z0n4LPVX9lmoj5aUPgv5D0le692y7wm8m7qZGyDjdVcrPzgnmCNx+vIe+eR
3u16DZxXtYJee1hf5oVEFT4mNPVwIuf21q4TccvQZ82kB6Hk3B+skJpSR77E
Qt0c+Gb28NRBuKTC1fI23OVmvUIDZq97mkjWx7tSdc1dNTznFv4Jl6yPhWpk
Ecw3CvYvhO8UR/2VRpxmpPQMNhl47J0J80oF5cbon3JxqUolTB82e/IN3Dsd
sOcBLPla72Ee/MhjT4MK8g3kL1vfCktCqrJ8YKF2tdt9eDQ+2VSgTup8pTYE
h3IO5g+T7+fI+PbDVqfPyWqhPuGCWeUfcBnX1mgLHLxIhRSR9b99jBcEZ/+t
nbkP1pDxWtgJc6403rCB+Z4LP7vAXFGCznvMnxas+ZSMx4yunm0m793H2+R6
SL/ilDrjyPksHo4Oh8f536qR9/C55KGRt6inxr1HVomst808Yzds6+ISR96z
G5n1E3dV8R4rdblM7oHeitNNpvAxKjf8Cswrv8BLU8F4I51x5H7Rd5wRvlTG
eFcEst3w1HWfei+4pPHD7knYUE/6dcFS3JdRF611SP718fTaz/B9xp9+vrB0
rsEn80oY90yfPjk/7L/iv9kHC9kJccNk/aJbw7Vh7gjvvQnqb0pPEHxUJP2/
r/ctnGvu17kUnydWTSU1wLMbprxcYfY78ctJOF5DEFANM7hl2Qzc84NvMzes
Qv6mizZ2m2GBX8FiHVxi2+W+Hf7tl+kxFuZLa3JcDISPDQwrt8MMd3UbH1hq
h5WcFuqjGuYa18OZAt3LG2F6UcicBryQa1TvBxc4OzKeI//4HO2oD5xNH359
DjbUmJy0gxle+36IhDkhtYufwlHiL78yhzcr1BvzkY9/R7lxEvWLW33b8zE/
Xl/f5ovknm2buyhAPfTxfjo5v7RGsXwC+tGzumsiEOav3JTFUcD7QtV4mpzn
gfTvfaXlERXP/7YObgnvMLpKQ36zyQ6yH8QnNw4myWG+ZR47fEi/zSf7/WUx
7ht+Rgy84Pdsp5cM+slP6aiABa52Jgekse9TZ4ZHSH6hyt22T9F/6z/lVmL+
bNGa7C0wrZ+pTvavuliguSiF+Tnvzie/qwxbd/m/hIWp7crkd5fhi1fnpfF9
0QlDrY3kd9iGwXdO8JSuZe4h0n9B7UwN3FOo2F0JFyhr1q1FfprypvMd8Gxu
juwVeCAw4NogGc9arL8V8xVdT/EdhiVWReYieCr/0PFeODEx7qkl6hOeMdh6
Ce47o6hxmLhIySALjh987loEK4u28QPgO8dNGNlwVHvvCz3Yamgmww3maN3s
f4Z6Eh1SLQYwfuLJusoyWPFHL39zWNhd/yTEgNxrjLfeZH6GT/tMyX6M1HL3
RD0SB9fTH9G/kBs8sTn6Iaq8P03u51GVZcJZCvsmqOtWG7m/tVjBgf+wqJ54
zpEWsp7PMj7rW2Bh/3Cvt8PMb5zMd71nURRX3msQlmSHGK6QsChRxDK2FPKJ
Xj6c0Z1jUQXL1QesyPmZVLLbP8uixg2b2sn5oRbiPYxmWBQtwnLVRVKPpPUy
6y2L4hTH3lokz8fQatumWZRtbPJqDuoX3WKqVsM9v276MxMen8hMmYMZIvvQ
btJfpUsTWXg+aky/X9YIn+tGLwnD+IznpdmWsHjVjsAI5BeZvzrBJQ6KcEh5
x6J404WCILjmnM/Ur5gvbzRVh7hgP3s0b55F8TvKvnaHGYFJz4NR34B/erAF
LMrJYj+HJTeUJkk+Tl1Rs8bfGD+GFU7W2+Snu2Hkc6YrR5gHRzmZ+7jB4mtZ
TD+YrnTj5jaMTysystaEs0cHQscwn8T4fJdH5He+TpSCHubLWTx8u5z8v0Bx
h6MS6qNfU6mNhsUGgUEHJzH+no9pPqR/3R/Vk19hvqF72Rth4ea47fwxFjUV
vKDgQJ7X/7Fxuxj9lPwV5ETOy1eLG+X7WVSJtt0YuW+oNJVU/zssquLIkoQM
Mp69s3NFM/oRbbGd3Bf//TnW+v9oyP4XGgSUTA==
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], {4.696019990535815, 8.084899952679073}, \
{0, 1}], LineBox[CompressedData["
1:eJwl1gs8lPkaB/DXpZIlWlZM2BFJbetaFimTS2TFuEQuq4naI2wNW5FoRxe3
7Jq1hi5icNylaaOojWFTkphQbLlM5JIIxyVKOr//OT4fns/XO+//eZ7/5X1H
K+Co2yFJiqKa8UsipUr+6DAoGRLpDOrvkJDrzdoMSjgW8OeZrxnUePUA7zeY
uVJpSRXevGrkmj2xeXjTQ00G9fpJ4cEP6xgUZ/Kf2lR4zDcoqhierJtfEw3T
tAW9XrC4+TnnHPxBQzZJBmZ3fFAqhSP8PbxqtBgU47R2wDictPh77ylYsPgx
1R75OAM67jaw4oJ+RgWc5r/hXyrEWeu3rkG9A6Y+W+cQR2pTDL0Q250fGA8g
mu1xEKYjNm5s1utBFEVahbYh9sm/+45cl3kgP7Ec47h0GAxMw2KfJJYRXDMV
oS2PGNSU6+uCGO04G7sZkfU6XmM/4lcexmbk//umLmUSd/ps8QhHbNQf5TER
t1g+7U1F1BvK4RojHtDcLVmOGDm4rpPk81ynb1CHSG+0+LEVedWGq7c3wV1X
bNp/g+cnexMfwmYnz2xygCV2FslUwfwd0799Qv+pLNHeK+T+FwfdQuGd1r1V
YbB4NztxAPPXVX9OyxI2NNETHIbVjvy8dhHj8F9u4kjDZe2md27CinzlgioN
BtUTqH/6EMwq4J9LhP9WnzdRhgULXJmT8OmI2ezzyCOuzUyJh9lX21NGMA7f
vXTgJmz8KLzLE6ZOX3b8SD5fOBH3DFG4u77YG/8f3fG8LQjmZv/r7iOyX1iW
w0owtfWQux3G9VwdV92ljnxbkq83wJbVbyduw5H324a1UIdxqtw/Ali10SnI
D75TtnCsDm7MktdOgftrrVOGiAu07W/DBYOCkbUYfz7j1K9kvbmDKUf8YFF9
nGcfXFR5KzoX7vL3q+2Gn0fM6I7AMoo215rIPjDaELeBzOMludZiOPfV6mW+
8LymcdopODVZtjgGFvF0aNZk/JwWtwtwY/x9RXJ+aFyjGQ6ZH16Lfhj6kVQf
ve0H08sP6PUihtIj1DSJQwoUnBE9vAfeNpD5UByufYgY3rHKxRORL5LjuSK+
DpJJa0N/9O6nqlOI1M3e1VaITLu8OyWI9x/RxvlrYZ9eXiwsva2h4xMN9an5
7I6Aw0P9q3xhar1T/wV4LD8lSqiG+d6b+fIe7Jx17t9GsKHoupEs8nFyOjQq
VLF+RcWJocRRBWPfw+KLWsF9sF6ms8TiGpxv4U9nSF9LbxQVH8DMgt7Fbjhh
5fuoEtjQqKbTG/3rhLxwKiLmJTGayfkNfGV3D6ZnHZxTwXzR8x7PD8IyFXOV
lnC3Eve9BvLpuSh/txd2M10hz4JlquyW/GGPjpucAphv1uLiDVfEmR14C1fd
+s7cFh6aufFUD/3oMXO5dHjTqxWe3jBntK69D/lfBHnQImFFr1dSh2HlbUKj
WFhkUGrTT/anbc6jMJj/4MaMK8xM2unsAHNjl2Zq0D/d9Mgv0mT+nIrtDGFa
f93PhcjP3llwvQzzyZ2ISTIh8yUODbGAOdtLnMrQHyvkfWsv1om6K2elArMj
zOWzYNUfmIUnVPD5hxmzUWQdvXzs279CHgm9f07A+iKnL42JbTKO/Q4vNsr0
XVTG/enpM41wfYyWujxxNl+ehnybWPTEP5Qw3tN+XQ4s1Lk5bwALZmnps7Am
f0Rz8EvUM+b35mey78uljlTAAu5nixlY7mOZVBbMPxFy4Sj61zWNKOTDhtPm
6n0w5/rDF9WwaFGi0RLzN+bjvkDG4yz4up2F/7qdEEQn+dZ/UVYO7zgb0x4I
iyqebfgL3nTFg10Cc839rpbADuW879/BQoNvIqNg5qo83kb0Q1VZ//ktrHLA
/50nbFjje4e8b3bp6ZSGwSJrc/s9sCcrRekE8Zff0+6j/pmW8d8PwJOOwgpj
uMVzvMOYXM/skuSj/9wbTeI3SqS/egkl2O8oXSEBZrpeOZiK+VRM9PqkQOqX
MNmuA9PMrwafR38MfclrT3COnD+qrhhfjfWI9c5Nhf9a32vqBLN0DfOPw47j
FY+LFHF/3eZbEbCmgXO1DGwYn77zIpyQF50ysIr006X7jJzLxEBumzzmo9W0
YxPyJTewsoflUIfY/ngaPK/wdm4jzLboNpJDvUElTWezvsD6SqhFkfN88dKy
fHuYkTXq+wX6VT4vL78eZr8+1nOO7Ne6ew0m5PNbh72myHNv47TnEeKVKi2O
mL+Rsw3yT2AhP9wiGdaJrWftQr7JHcGiG7BD1+rQVpge+OLbavLcGzT5xQ/1
MkpVonJgLndD5St48s0YO4Q813ZsT3En/ZmreqvBye7VSYUwwzV7qBz5HYpL
iztgKjdb1og85+qXj7TDIuf5P/PRjw5PIoNPPq9AiyHrs2Wv+mUzWPjDyP5Y
zEe3S+mZTOSjt8m5zmH+xpJPJ5D62Areo5GwIFiK1Yl+uCbtSgowvfXzxF1Z
rK9l8617OLdOPtdG41biusdoTAI8qRnmYiOD9QsLyifnXiC6+nJxOepPWeg5
Cb/+fCGsdhn2t9xjGz4sHnsaky6NugPWBvfD0uXRAclSZD+2RFki38iunoli
SfSXHhBUDIeebZqalUD9brUG2qh/X9PmzmMwUxSjmweLHrpG6sHsvErXdeR5
7jWzpABTnD7hJdiWpj+1gdyfajAiSd6jrXX+wTBDqnXWC97nc1S/FebvzdZI
gz3UAuKdkJ8vvNZJ3s8X7/3g2gmzPm5cVUnOd5JuQyDqZV1JMsuAbb1alw3B
dNnTAb5w85D2XTf0J36+R1OavEc9vPKz4cnzhwJ5qCfa+vi6+zDbVeCjDLPi
m7OqYS7vp7Xx6Ec8enn0FCzoGfSdQf+2IZnslbDhjzK0QDiSUelI8ouOBzBe
YP5m7heY/Ir6GOWrnVjkOa0f7/krmY8Fu/kPeI5y48OXQijMFy97uhzm1Cjv
/XHJipqM35r3C1x0Mm5N90crii+9f+4IzHSwHmIuWOHLLGdPDCz6nHW0e86K
UgzXOl4MT9o+N+fNWFFsJ17lJHnPdQhiUv5jRQm8fOacyXtQ2/zr7kkrStgc
Pl0DMwtv5ClM4HrmXKwFOa+R6kNbxq0o0ftA8R3ynr22zeHbMSuK8SRjlTlZ
z+Iel+m3qCd6Rq8c5rv8IR+B66xHSvVkP7Om7caycD9r/zHTg7C42HXJAeML
H7+avQx32VzyLUB++t2XNRXkPa9QHFMzBRe9b7wO78tN3foM9Qorv+om55/z
eWCwbdoK+9LC3ZF8j+rvN81Bf/y2t7LvkJ+tcdh88yw8MbbtFEwPZQcHEj/b
Y/se9c//TUuygOn8xANBMKPXdlsJ7ucqOO5/hv5V/WIDBWT84+922MFFYbxd
TOTnSHt212D+EpbJ+aWi3smP3DQHmH5pef0K9CeulJoeJu+9rsteoSMYr9/4
cA753pDNTDs1gHy5g8qRsLjpm+cN3bienJLxEyzMLyjLa8N65ShJnFlDnjPr
b/XUYfxPMy034f/9XNz+/6jK+C9vL66q
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], {5.303980009464185, 6.084899952679074}, \
{0, 1}], LineBox[CompressedData["
1:eJxV13k8lOv7B/AHcaZFRlrINkTGkgYVHcpjyZIKlfJtYYpQKUNka5lEjRZU
ypTUtCgcodIrlZi+qEHLiKRSjWMPZetE0vl+7tfvr59/vN6v+7nv+7qux3U9
L3pbw1Zvk6coykSOosjv//sxoCkG+W1CUxOobxvH5tAUtazue5ExTeVPblvS
DV88YmwRAAuGlEur4RWyN0c0YJuftSlZcOnb7+cb2dg3Y/iPIHjTMUbpRdig
5I28IWxGN0p3wW7aj14069PUFOq4tQcsfDOqnAYXvZ31cCF5fmv7ZQc4Lej6
4XmwHZcdOayH+5ITdSzhkQXs0L9gm5qaWEd4+Jy+9XaY+dHqn01wl/9fFhw4
bdXL2IOwRHe6uzw88jUs+SbsHDqrTcaiqYbFlUGv4QaNv+uew4yQoxbj5PxI
V/opvPbYxkmGyG/T53MPyPpw46mFrvCvXjOTz/AmZSe7LbAwe1/fGHxxz9xJ
4bBkyVALi9y3u0wpCj5RUpXgAav/mccOJetreUqx8L5pVvLr4OKKvfwbcJPi
/qeWMC//+YQ6sp6g5aoA86sX134n+TyZ90WC+Gz+meI9DfUpfrjtfBLc1JAU
bQCre3bn2cJagYlZJrBILF/VZ4TzJrnenQOb/Xdy2SW44ZyrqwosPcSM84YD
dTKP9+H8oobaZww4n3dmTTmc//D60mdzcW992cQjcFuYu24qfH1V+SUnEt9f
gTZbyXp2dfhP5G+jWCJ1gL2mdFvdgovUsjPM4V/ygc/84BV1sotsmMp4oTUN
5vx9z3M+HJLdoJOuCws/JZH9Qk9O0jS4P/Za8mbYxr9E4boOfnedNj8Ei19Y
LF8Bmx1v7MmFBaZxw8qwyKrzZwOJJ21wxxdtvM+pprH/kvX9UXUtcMynjmNz
ST1OZysOkXX9D/tdYWFobr4m9jNnfun2h6kjBZ6+5PwM25e74BL6fRK5X7D2
QG4Y3NVwy3gMfj7KOhEIq69cn7EO8aZ335izAhYdHe8vgu0iUsvIfYxVHZby
yLfSQuT2HfFMN7cqNYRzuOX2D+CG90UiGm4qbLsSCSee/s8bLziGMdZgDJsp
ZkjXwqGfG5M/GKLP7FsvehBHizJPwIL3wW0LyPkCuz57ONFv6ncm3Lt0ncsI
+tpX4UrsE8TTNeeORQnp85fd+zzgJuOtnw7BIQOHflcgn0prL8X1ZL1qrHk+
PEGL22ADSzSHUtNRL7dRQ5kRnJb4uv2HFt5z1CctA1h0+sBjf9js/fgnM7gp
0La8ThP5u3q20rBbhrH6GjjG1cHPj8SjI7Ttmo3ntW+oHib3X9K7lQ7bdX8O
zifnaes1boBLLeefeQtzT/C7bOHnW3IK5ZAfNdVRag2Lny/oMIL7SyMWrISp
+B8prjC9Lv5oLNzrHeXtB4eETJz7AE4/NUbvgG0sNA//gXhEs/qGtsPsHRr+
/nDOqeb0TeT8yMA/HsENVdd7Hch5sjWZ05Ef/WLCttkw02TbmiBYki5S6ER8
nHzbZ3lw1+CVzbnE7/Tmf4TXSlITA+CStoGsUWKpY98smCW5yRmHG5SMVpM5
yni40aIDZgstTsfB6sW/TIvhNh/NFHNYFvZqKBgufpeo2IW+ZU8NO68AhzzI
i8qFJWcl3scQryB4yVgk3F9Me1LwiqAamxWw8Pf7lB2kXgZ9jhyYt6w286UG
3p/E+owembtlK1dYws8vR8izyNxtG4rLVMffw2B0DZkj6nll5Sow68DZVBrm
F3LN0mdhvt2TC/eHS5Kbp86DnZWzdJPgkJ5tjz/OpKkFdM9oAZlD837tyoHT
YgZM35P479zQTIFZGtF1Csgv7fq5OGJ110kaxnDInsdjN2EJhxXkStYT8j+/
hVdMLuZtIq5+t3427is27+CS74yUul+8A06zWtkeAAv/3nWpApYZ9jiuhWMM
z/joIv7eWkU/a1JP+slINBw5uveRMuy1TVr7DBb0BsY1IT4b25X7J6IelYkF
Ludh+kNbkA2sHlDovJrUl35Q5QXnC71+KMLMpUOdnjDrwmW9+5iLApvtKxfA
4n0bs0NgxsmXD8ZxfmC8Mlcb7qpLsb4FPxesYTSRObjIcvIy+NdxOeVMmHrb
miFB/PmPbkaHwDyX4EV2sJTfWu8ApzHCqGzUQ2x/Q4sN06LXpxkzSb/6FGmS
OeJ6qjp0Br4Dj7xXaMEyn3cxb6fjPHV9pjHspsObuwpuk1cVkLlDO9Q9faOG
522elnHJ3BkxPxQB212jfI6Sub7deL8R7NW3+tJtct6irNJ/pmH+yx950gyL
5qxXaIG9NDU+KCI/Kvz1i3aY2rmEZQLznoWvV8D+TR3ZlCuc49ZZuIj426ll
G2BOi+RTPDnfJ9NsKyw6flXtJVkPV9i/Gfad4iAzQrxFD/efI99RenBP3GFY
2FcZYwZLlE3lP8DU2KUKChaevSRhI3/pXs/CalJPjsHZYJh9t35cAPuO7G47
DV8fv9BO8uc22+rehPlnY/o6MRdFO+urrpDnG97/cIfZm71TDsHCkqDbtzAX
uVscI13gnICa5+owo/B9yQDu9xKuvpaGOclM/W99EsyK0hnWgNm0hY8SWR/M
yitB3/qKxQ+jkR8/YnphGJkbukqLP6NedLB/BQ2PMBP2OcLihfm7zGCZeUfg
TVXck6g7aEHc9e2xGlxy++FGT5g5sGj0BBPvabVa+iG4yNKhdxZxSamgkszp
w8Om4Sqow/msTWqIRzYpu7l1Kv6O4j5cDYH7+ZcSj8Oi3FOiMlg6EG+3He6K
tj6tgvykIYYp8XCR7a4BH5g3P+FIGRwyufX+CbJ+fnm7Kc4vSZ9/sRDmK9wP
eQSnTbi/7BFMe5UKLRAP70/zKFI/Jk9Pm8QrdJPqJsH9py/v7oTT5ozHO5L9
n08WLUF+svs5vzsQj69JklMyLDJ74B4Fc6fET6wi6y7GUwZIPa6XX+uFxSq8
N36w+NLXm79gloL7pwrMQeZh7+pBmFkfU20Ic9Y9Hn4B90874X8Mc7F/8/nN
KbDQt8btB/qW186LXwh7RRRIwmHm+nkjVSTeJfoHfqNPqaXSVCeSz+LDpldg
6dztT7chX7e8mcmb1Ek/jxy0RH2oJzMMLGF6+xXxyBT0ZUCLhz4s/sjwqJyM
+BIcpprBXO07V0ST8N6XfnRcSebs0cx44UT04UludgLMH9rveI+B/W9Vx8mc
Ek+rF/3+A8+F/vBUR3yyPYqGcbB0J0t3N1xUYfbbBFZPWpRbAXP3HH6jCvPb
LThqyJdODX5qBo+4tS5dT74LRq5R0TBz9aQeUg9e11bnHlgY0cTMI/Wp6rp2
EPeLI5lJt2FpZ1asyUTynQ+0vQyLPlpkyuARqYN/BFw0eY/POeTDCJBtNoXT
fv47ao98vaZqtNQiHrr7SehruKnT6dE6Ei/zYJ4T6sPrUKl6RerXY+h4HOZu
HSiwJfkuVnt0FQ45tkFymcz1A3GtSTCjMrRcjszFisUKVjA/cN6mYMxBrqyw
Pw/ni9sP/NmIPk1jC5UGEI9g1PzIGpi3IWhsEpyj4F3air7kXVG5SJF6H2iO
PEb6liPY9QH599foWy8nc+dq2OIbSojrgNlGA7Iet/V4qCLqdS98VJ3sl7AM
/5yA9Yo73XPJHLrB5s1WwP0K/0o9YI7LoaFZ8oh7i/3SRLhfjm6wlYMNvtTX
kvNdXgadpBC3Rsc+bcRH/TRtVIWbKjXz9hAzymsy/rWnWCE1ZyWw7K7KxWjY
VzM8eeZM8n1yiy+Dc4LH9X3h/vy74RbYzxsZPSsg9ahdE/4X7CvKab9Gvrs9
+VuccX/OR7cZ5DsrumA0MCBH/q9zXJFG/MyvIQfxCk0Tev1gmXv7qs3Ih/vy
23k14nPBTxSQb5F5sWURqe9l3qJTcIxJZok1zLnP7hyDRc63zAqQn7it6rYt
6hUTcM+P1IspUd23nNQvYfwOmfuiZRv2G8Dc1QotHzH3uMMeoRLsp1xsC5xh
6ZPkFOsJ5Hl2zj0yB7Y750YhHmategvpU27EiXoB4hU9uHunGn3JvSUwi0U+
YmOX5EiYmseM9UL+/dPdH9rAMrmrG6x+o37vZ4eQOUl5LZGKx+wpm08OkUyy
rr3lOXcU9aY+8/XJutNwp/EPe0qgt1TOg6xvzq/mfLen+hMf+R6BRUm/TI8O
2VNC5aNKUpjm7FayHbSnJAcsm/XJHJqW3OYzYE+xbaPsYomrXCKa++0p9SYz
fzKH6MlHnV4Sl23N0EC+Isn8d4bk+UEloS/McnjY2gQz2aziJFi2jyFuwvni
3SGzski9mFlstWHkU5A7nAnzX72ZtgfxNS3Kvcknz2vfu9Xyjz1FazGql5Pn
+8z3uo7YUyNdRlZjJJ5nXWtOIl/+4qYfZ0g9+4aLsn7i+Tfuruqk3o0eB7eh
PiW9Ue5kbrN8r+m+gTmOwrfd5LtSXqzTAvd3qngUYu7Jdv0sT4Bp/393RCpj
v9DbswTnFS3QeuBM+nTnlYVJuI93u2K+KfqUjjjxagD15daPl1qgL8U/WIzJ
iJcn4NRw0Ze0vk9pC+rLal7YWIY5xJr54Gsy6uGlnDvXC+YHaORZfUU80wzT
ZzJIPwSf8+7G/XO69qiSuZVxknexDeuLey4vgakChw5aZk9JX0/KOkv29wW8
etmE+7LCP6riPr7O3fjA1/aUbFhHKxemtqTe+lZjT4lmWr3wQnzUu7aC9ZV4
HzGFWePEivH7dZ8gHr3Lv64hH+r+hTI7WCw0vmmDfKnvliX78DyP18+5Tcye
eP8IzqOGnBMmoD78dd4sXh32f1vqYkpcPyMsthHvY4zvxIKpAMOsic1YPxuT
KSP74wdX/Y34ZarafTthWiA2v9GK8/oE/yHfFbrY6IJ+B94Hd+GOr4iPdorX
mdeFeHxV3veT/EZC8kWoj3jjuFMDyf/cgK//F9T/ZOHDq5h7Yre2Z2tgsdqN
VcGYe9TeIvMIPM9RshTMQ59SV91bSzoRn/uzDxT6kq5dx+O04z5nW91e9CE/
+v68nhas9x5SGkUfUi3JlQzEz3RlFcyH+YKCwSX1OL+j3eYc+pI61rQ7tQLv
1+RsEof4//3Q/wOdjKXO
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], {5.542107113763713, 7.062157169305716}, \
{-1, 1}], LineBox[CompressedData["
1:eJw9k3tIU2EYxk+iMU3SUHP+MU3OOWTaOV4yCa9veKssb5m3UsfK8FJJtciw
eUtSFGliaqW2YUqJOCVUNCMsdabmnGW6TGwOmZlQM6xpivaN4jtwePlx+M73
vs/7PI6CrOhUI4Ig/NBrqP8eCrRcQ3UGQnzDvH6YBM8i932FvojjT17ulZJg
sWz9UVaIWDUV1F1MQpMi26lsHLFl+LhJPgkF8zy6x8EFiGOZ6zalJJhKltub
sxBHdg6fbiIhr74sYKIXsdRhy0VJwkx5bOQscRCIkphkikOBMvB+q9oH8ZpT
OnGCAqOc6MqSDMT5S34rFRSYb/b5Hy5DrJvfGPtMQaewRbu3HjE37kwUSUNo
uvbFESni7Dh5/AUaeuSm3vlViNu7hhxraVgYSf0qyUUMYmHBAA1KwQCzlYSY
MMm0mqNhu75aUeGFWDXokaRF56OKdnftQqyc4i3M0iB5ctRkXY36B4Lv+YYG
v3Ez48UexO0Wq6oaGkbdk22mHhrm65MH8WlQeXEkHXcMeuizZfY0nEu7Rszd
QqyLmFBPUUB16GV6EWJxbp1ROQW6t8pJlRixasY7IZgCQmA5K3qO+Flmmqkx
BUVhHAlHY7j/0OKndyRMNsb7jvEM8ytqNhpIiE18OZFxHnG3v+9MCQmiGl77
9zbEbmLpWh4J4faG/TL4e3WFJmJPJIPPh2gC2ao6Bv8/oOhpv4eGwfdzV/R8
PY/F/VkN/SALT7G4/5brri77s1g8n07IieIUsnh+mCzfdrzLYn18fur5YbdZ
rJ/SrOHbgYss1nc64dcGN4TF+m8+ePVnpwOL95M4nbNyfJXB+6t7nO5+ZZjB
+w2S+7zf0cDg/XdffWTLL2CwP84Kfg/mZTDYPzEf7IKHUhjsr5SOGLslAYP9
dw8CXo8IGezPPbLWSzerGOzf0bXMaIcBBvvbu7a5jdxmsP95EmEfG8TifJiV
WkfEilmcn8pQzUyImsX5ykosnha6ueL8GfsvO0eJXHE+1Y2KL6J+xP/za8sx
VDf4C2h7fNM=
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], {9.0548, 14.5}, {1, 0}], 
       LineBox[CompressedData["
1:eJxFlQtQVFUYx2+CvIxRRAIkxt1zz4UVCVMgZVn1g1EegYIsBAxJsPLY1Vkk
1iLBDaVVAQURGR4iJWjk8DZKsBkRXEFUNBgxMQMhQBnBRAeUBYzOnep4Z+7c
+c2d75zzPf7/I5TtCYpdwDBMLHn5778Phs7ZefKsBGZ90u2c1Rhq/CtuOV0n
3LJ8T0wIBv+DlvNPDxMePZ05uAeD32T5vIkH4dz924fUGO5oj90pfy0CJsxL
v+trDHcrF657Vk1Y/uZAaRKGlNdN2513EjYKaewOx3DjhWB3w/uERROj+10x
zGVmR2U8tAdG0DH7gSGG2DUN6XllPJtGDnax0C67MStLJMyo143lsyCI1ZQ4
+BL+qvV+XwgL4l+0bdWOPNemKN9joS/X3XydDeGuhKKgBwisIy/Ply4jnHHS
0LEMgeeNVTc3WvE8tF6WiKDVyuFzA46PP9fxri+Cs02paWo3wla7jjx0RCA3
D7frlRLu2PlKzxYBfvRo0jiJcL3nApflCEYGJMF/nLDn88/JwgjU26a7DS7w
67kJC9wRNHxp4ORzm7Bo5Gp4JIKwuCnrtGHCRt/2hB5F4Luiv7h1kvDolLK8
BUHIJ80GSXOE5RZZE7MITKWXbgXO8PspbBvFLJSOqG2ynhHOjWe2pLBQLv3Q
8Mo9Pl999UAjC+6zV/KMG/jzfCMemWChICKjePYQ4ZbFmwYRhhc+zPGiAD6+
pqPOD0Pe5UuffWzGx+f/lqvA4GOWPd7daUfqrYqSpGIosxDfdNYQLlLJJ9Iw
WM6NWpW7ER7Yu3VfMgbzLL34mOccMOd177jIMPjuTz7f/APhxIOLTTwwyE/l
h/TGEA60zIu3wLClxUR7TkRY5HBq1SALZhcXNt6exMBMeJ85WcFCfVqTXdlN
wl37xpGchd6xruEFVYTrlfOHRSwkvBjqkxUQDlQ6pjxFoBu7urXpGOHpiYrv
6xGUbZwSpmfz8Sf8NWoEdV5aTWchYZjZ7S1FEBBdIHWvJGx1sqHZGUFtYYmp
tZZw1N8BmwUIxl0LCxQDhEdTltVaIxBP8fp4+7/4oVxRsIKj8deDYl4+lnB0
fS5TUX0thKP7t5+VpDrLOXq+niqTfnUSR89/lNvwo7eKo/kZ6mxQqYKj+ddw
q23eBHO0Pm27vB9Eur6t396IGZ+1i97Wd7XDlCTiPqb1Nw3cXWlfgml/HBMy
Qj3CMO1fdNRcUckSTPurtLB8sqOdpf3v6Wlz7Uxl6XxsYFTmTs4snZ8hR68z
P/+F6HxpyuYT40me/89ff05ynH4KovPp9nyT8pU/ovM7dPnXaXBAdL579dOH
v1iK6PwnN3u51C1EVB+CfA9dth6i+pG8FMZtXISovmw1Jo8P2CCqv1aVrrtx
LaL6NNIaOum2IarfXGNtFZuAqL6j1woWvcpGVP+m9yse2Fcj6g9/hmkOpLcj
6h8/dd/L0f2OqL84C3tcW58g6j+fHvNkZGOI+lNR+LXxjmFE/csvVCKW3kXU
34IPpcbcu4io/12p/Ui/9Dii/rjkkr9aGYmof2YeSfouGSPqr9XT/fn+Q0Lq
vzMvvWo7TwupP1+Im+lYKhVS/66wU63ZYSSk/i623cFMNQuo/69UjDIW+wT0
fui9Fu7SvZ7wf/dHUB+vjxXwD8Gydbw=
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], {10.9452, 10.5}, {-1, 0}], 
       {PointSize[0.04], PointBox[{10., 16.}], PointBox[{10., 8.}], 
        PointBox[{10., 13.}]}, InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox[
            RowBox[{"C1", " ", "N11", " ", "T11"}],
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->6.137505285412264],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          6.137505285412264]& ], {10., -0.5}, {0, -1}]},
      AspectRatio->1,
      PlotRange->{{-1, 21}, {-1, 21}}], {44, 22}, {0, 0}, {22, 22}], 
    InsetBox[
     GraphicsBox[
      {Thickness[0.005], LineBox[CompressedData["
1:eJwl1wk01WkfB/C/JSTDzVZ0bZWGMraQJtxbyVRUsguRkCxZMiVvzK1Xtuwk
IwpdUpasNdZIjEIkZGuxtIgJhQyX3u9z3nuO43zOs/x/v+d5fs/9XwVnHzNX
boqinuKP/KeWfuCziUnxEmgwWe/0i95Xw5Niaxjj6kzKsXdZ2ReOvjs316fO
ZF0tYETKwZmOE8KdaLc39+Nq38ik2gzXru2ArUrW3/sPHDjqK9WL/hOeLVGq
sMoT//4xtI/uDPL/pMCkxF9w0hZhfmr4RT5saLJ8QBLPVyspSAsi1hu5rKPB
pCYOnle0guvlduXYwgJ5f8kx4OnBqPFgEm9f6WVt2FdW8UIWLK3UmaQL1wi9
CnsMy8p6fzGCF8Jpp95ifEBwVMpxeEzwYO482i0nPcWC4eShIDq/JpPlxKmN
vwXzVqdxROAFgXDeRrhFxfEtTRN5BXywHoM3x7JbVqM9wJkVTyE/Jdtff17C
fGNKngvi8P5jEh3v8bwfueF75Eh7svaXZ7BKssNdGbj7WjcnH/1txN7wicBO
hsV3o2CV5vbRr5g/dG9Qozv686ryhzyFnULT5PfDc4+YTUlw+uqosK3ob/bL
pcPmZD3P0hLXov31uXEDQVhL7HbWCtZ3T9O0arU8k1Jv4W/8iv1wvZ/EfxpO
F9bM+QLPCR4clITfCa2PQzsVUHXzQpwc9vfOoh0Zv6rn+bZlWcQRYRZM5l+0
TqAuwkI6+7m3wVy0s/tocPwPM/YBkq/RaaVaGawn07LPE17+qhoTCgudMh2N
gwv6Zr65wdHv0mbK4JGd2f4n4eJoJ7Ve+Ju9fsN52FRYcXgWNkjxssmETUx/
BAlj/ekdQ5l9sNZjqwoFeLqnS30Dnh9gLHTzF1jvxGNxZ7h4QSlHA054JC13
Bw70dmeTdmte+q4xmPXTr8Nk/GV1xzox5MtekVmN/aY0DreXq8M11bFKOB+U
9Ns1m3bATkvT6X3wG++xXZthLScj7r9gUb7BK/OYr5OZKpMCp7ctfimELd7s
agqAm7ietxvD639TbbGEHSf9O7oQP8epq+dXkl9MzUsjuOaK1SlFeIMEo7KA
jv1cmM5HPVDdBhRdEL54hhMoAjdm7hB03YD6/PbUgAbbT9DKGqUxn0YdtxQs
PlUqpgLbK652VIb1/n6fe1sK55+HE86E/9wbt0ENdimpsHIg9ZD9TqJrPfqf
T7EJgWuLWSux8Gxa/gjqiWpQ2D3iBguoCSs1w0knRVxsYc6ygNk4mV9zqMEF
1k1vSEU9UPo5OpNX4M5PUnaKsHux/f2/4MCWSK1d8LL5nxPfYUqtTeQgnEHj
9OsjHhNFV+2jZLxhp20o7KVkYGkKJ1s272mC+yT7on6DY+UuP1yEZ88O2O2A
617qBcghX11jsRJ5mEfUQUINrg/Z94wXrrA2N9sCl390/4XUY0tKjjIPXPxE
L7ERVh4YWHqC+ZKNDVpJvqvHh5K8YI6+buEl+LjUcToH8RoyyuZd4Eyqk/s8
WR+neN1DZD02+jwdXof6buNv2AVXbWx9thseclOM0oDbGPMz6ZK4Dy4XqajB
fq1ynv9KYD/95fu04GuxjaYOsM2V7aZ7YAtms+1zcSYVUcczbQUHjT6LPgoz
J8tL/cj5iWnmfBZDHYnK7k4g9XfDLjEDjih+wlMOezv0j3nAAeE6uuS8DhR/
3mwOt3ncFuDAlUdp0pawybkgtowmubf5t5+BhaLqbcj+pH/Uz0uDZ+/355rD
k4ciinpgi8kkG1f4Zy3Ph1KIR+ilW7wPvJ5xq9oJrpcR7vGDbbrfX2WTeB+P
rvOC/5M1u+ktrOfBrjgO92xTWBJEvgFcyX5k/698Tjq8CTbx2uupDtv2yZ/Y
DE/7s0RE4ewm78I1cGDtzlUzpJ7uNPH3Yb7UVdbrOmCtoK7CSDg6tIheBD++
cHrvRnjhh+1bct9EayXVsBF/pukD3nNw3Z+z2hJwsfOR7ydgN7782kBR3OdT
715awF5WISI9a3GeRjyOHYGPZM//pg7zlimMHSXnQeZ4YjwNz61qOG4Pb1Fb
yP8ugvowCj10Bs692tD+RRjj4+52hMFG3C8visC0RkYBm5wft6AQp5+wrgKR
zqSeun5vE/kghPNzerPBZziwoLsgCy4WmvAm952NcSUnAY4WPUIn9xldbnC0
FNaSmAsn9eE7v1i1DOsGGWzwhKsCQvJOY/6xyYhLf8A6WxTXTcKfVPkqo+HM
fXN7LyAeQyl9+UQ41X9mkBfx7+8OCYmDe/Wtsi7DFtNv+K7AQRuqRD7C04lh
lmfh8lq9JTHknxobdsoO7tAvZMnC00vXYgzgh9flxWmwyfyZY7Jk/65JU88x
Xmu4IoacP/HJR5/2wbx8YZwBUi9F7hJRiEfv39eB1bDLxh0+txAv21m78hap
n5OnzGOQ36d7/90dCaccTFB3WINz2j5x+ALszq0kIC2I8bKyf/vCvtOvBjoE
EP+aIyrEvdtZ/Ff5sa8+LinnYc3unTnWfDgfqypKyP6YJSgMM1dhf154NKbD
eZ/c3E158dz4Q2Xkfp8tDv4Qw4P5Bv2k++HOIObNFW58P1fzW5F8hA+f2pQD
c3xMMsj9E3CUR/cSbNMXKGUIf3jd2hEHt4R7rrjAKtU/7WyF60sasy/BoSni
p7dh/uSHyimp8GLxGvdc2OVGWnkezOkq7FVHPLqVZdolxK8aw+pgrxaNh8R1
P5+T3Yv46cGSe+7BRvrva0thrU61gzdge0PHm9zIt02PP4/sJ3XgTbYyLK8T
FeMBhwkyuuRh3Rc854zhw/LPykcxPt7VQHQrHOWmFO8LswNfaQjAx56mh7Tg
+ezJuXsfkX/E9gNOU4h3UilvN3m/6VPdfWcC+RlmacWXwOfm5biaubCurLSZ
m/BnnjsjERT2acrZJ4l8X44vzv+xwqAWlh6UkXo1EevWnFpiUIGfA6hkeOgN
iy/wXwblm1GzLROmr7XM0/jOoDI9FLLJ+0Po+Ogj9TkGtX/k5Jl2Uj+N46Zh
3xiUS6ex0SRMo4u/MvjKoEy+zd0g9UQrzbh5YoZBlW8tLNUk99vKJefpaQZV
b7fjgRXc535S+yPs5OfwMhC+6GrxQA/9aT6uptdJu39l7AhMHdNhF8Om7FzN
Zsw/VDkV1QizQ7P6X+D5m/PfSXaQesuoy/5nlkGxNy7VdJH3x6nn3dQ8g7KJ
pNs/h7UqB5W/wWyJZwaPyfwWqeJF30m+B9bdhwscG7/ILDCoi1uN56/BeaZs
ajusdyZTj8Rnrz1gPoL+9n80RFjDEYa+Rltg+nXJLG2Y9ZrVu4L1oY8o24uT
+6PVM9sP8eSlUhFzWB+lkZSMSMTP5PrwgtSjyu/sYCvkz5b6534TLH/9eser
CazXA6tDD2GKVtFV/4FBGSqNBhWT93Flu8TUYfTvH75N9ttJcYFfoZ9BcZ4k
tFTB9VPV5Sc6GJS4tmxIK8z05ki8rWFQLcs7ZkfIfOTD0v//7w9N5v8AQjOj
IQ==
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], {4.8457692355174515`, 16.56249235517452}, \
{0, 1}], LineBox[CompressedData["
1:eJwt1ws4lGkbB/A3JiEJSYo0onIsx0yhmYooHSZGZltKoYg0rXPUqpB1yLSU
QyrakUFp1qpVyJBEJCKELXTYqeyGKKdd3//5vm+uy/VeP8/7Ps9938/9PoP2
wWPOPlIURbXih1ypyRl8dFjUfz+mLMr5h+DgNphXz1R9bcKi5I8yHl2Gy05a
b6uBaZbZiXvJ/Q3PewthtfU7O5VhTQev2kyYfe+xau1yFmUz+aAwBU46t+5z
EEzTGx5Igu/zA9fowkPdVj4X4LKDzMxObRalIOf9LBuu6djcwId971/2K4br
agJUneFxzc1rHsFG4kX+S+G0N1d6SHzTZdIbR+ksKkYnaWIaHtFjR3bCsi7X
xpYgn8BPPj6PYe7MDVMGHHPJ+dZDmJ5Xo+4C9yk+PNwIt5TMmB2BR1L9Nf6A
xb58qyhyf/qutq+whfieZjwsuCVjpYb1Vd+U6CbDFq2t+QwSX2HH+wSYUap+
4HvYccMdzmlYSliRFQkHz3p8nwe796YXXYKn15ZVfAdLok4aFMLs9ZE7bOGv
Z7QVSmHv9LO/aMLizSEVJTC3p1x/gtSrx9Ysjzh+6Gg7XD9veCoBztZJmCeC
OREMe284mhubmwzzbTvaTcl813ILA+GVFTTpMeRjtKniFAcOyKsX3oZ1lzAZ
LFjFgibnTepXwBOawVmWvqWqsOqJXTuMYOGtDW3xy1D/ylAnY9jO6tT7T1rI
Y8ItwBJukXeS58Ler1/T7eDSiQHL50sxfswnngvHuAaU7IO9DyRHHod1bze/
o+Ds5KwsEm98LF+vXBN1LY/YVwTzKh8Kz8PqRncMG+DgCN/vI+HoGu9D74ij
Jqd/hKc9dOL+Jes5aWtnwV39yvoLUL+WgSp2HRy+fFp3OTz+998WZD3N1Y0X
DWBhd1PTJnho4ILEEPZ+F18UT8bfFw6sgKMfCK2bYNGzFIE6LGvnQJNFfvUe
W4Q0WO/4yOBa2M4srPwj1o9ivY7iEHuEjTXCTb97qXjANkbiggKyH0IZpZ1w
xmiUWyyx/9j0Cnjw7uQlT1LfUaf0t1hP8PD1bFvY09WpMwEOL6Wba8KiNtc3
S2D6r3sWzazBPn6zG0tHflR/4IUWOHqOt5kMrHTItLoYDi+ZCTuigXlVroxl
wSaZcsueLMG8kY3PLsLTcZX3DGD2K23ra7DC2ejmC4tZVM5FduBduMmRk0qD
h8pVx17C7YZmt86pwzztfmnEQ8889lULTjpyRaAFt2d+3fl0Ea62tc3WcN/+
6+FpsG9qWuN3ZL9HwmeFwDZZL6dDYcG3ZptAeHSBbTM5D7yLC5xOweO5r+qF
sOOWr+bXYcHek3n3YfUdobM74PpgZ/c6+K1DuvxCrJ92psuU1Jtn2iW1F455
1VdVD3NDPnhdgzMq4yYfwFSR59XXsOBSjQk5X4w+3jy4EPlxqy/JpsM5jLEB
a1j8Oy3sBMnHV6S4C44XrC4l8cdrLnjkBL91ZRitJeddb//UGrhM6pejyuT9
fFzbNYn54w3+MexGvXqv9pffhKPrqiJJvXsTrawdYH6p3hM3mHVkTJHUi3VC
WawDuw9Vft4IU2Gp56dWY782RPkWqmG/OB1tfXDT5Oyrc2Ee+5+4dpim5jDf
fyH6Is9osAMepCntblZFnTqtL/wJq0e/qF8Ps0ZsXWZjfkF+pd+dBaifxuWA
1XBw8rqwTXCfm0KiJ8xr0WW/U8H+XvMdzCDxPpy0y4Hr7/0R3U7uF62MDIbT
ZofKyiLfwYnWVwdgR5l8M104Q+O1zmHYXSfQivTvoBet4zQ8fY55dzep35IN
YcWwoLoojvS7rqNWkQS2W1xR5wuP2/QHGCKenCdv3/nBvS3CHcfhpNDZN73I
909Qz++lMFtJ22YP6a8Qb4sh2DO7SGUTOV8SIou1kK9uw5mZVeR8cigqsYZH
F/dqyMF6i+RubIbr/9gW8RT5ZLsOj5jDojOzamPgtLca+nPhIcGurdZw/bYT
8xswv1DJ1m4U9YzOpPIDYT7dpbUEZp231PoX8dOvStdHwBUJOndPwLIrfdOd
YFHrRKZEGXHy5+sZwLJzXYq2w7LW7Fo1OMf7F/ubSrga2cuqwOK8B1MKMG/c
plsDZnTtz5MoYh+dx/3NyfqSyMnmefj9sNDODVba1Lu2QwH5F1i4xMKSf7dL
ycA5ky/nlMPxewLmec/FeVj1LWiMxBtEb/wij3Mh6migKTkP9vXY34V5bS33
/WGl/gqVQnnS7xdMc2Fu/xqvRnJ/95I/m2HxylUWqpiPmyfPHiH3jxZnRMGc
OE8RjfR/yVrNKbj0xT4XUm9uRYtVLOIJ0Nx6S4bs773y9vmIn34q0W8Czw9d
fvsiBQ5XzAztJOcX/17uJJyR5vtcCMtKX8/bgvz7EtX8j8HjmZVN/jD37IZS
Y9hxqf5bLzg+NTX+PanfnsE/DeCW/giZK7Bjf7tFFeYrU+T6ceAy69ZsbZhl
Ht0/HxbGPHV3RXwm+bkBz41xHUge3Y/4+Y7Foqsw/3bYgCPy7/p1pjsUFgvT
tyyWw32GnFh3WMnr8PGeOegr0UguG85wa/HKkkHfCAaPucCee65vOTAb8Syc
H+5NxhlL+9bT4LiCn8/A6nR7RVNpxJU5MFYEC49Ebd8uhb4RSJxekfVEu7el
zkLedz8+I/2S8SgzQx4W7f+B50ze7yNdvFIKdesJGkuG+Ud/y+TD4u02enWk
/7oe+mXDvMydU9/gLrscyXO4PpIlopP9D4lVMMZ8ShtrJmxhdY0c5eswxTFU
3wmXvah8v0qK/F2n/3kXLKleXvgbLKk7t2AznGMRYbIe8QuDPFpWkf5Q5aSI
YPZogM4MWS8zRaCAfCXiTtETsj8eUmn2cI57bXES6dfJw5YcWG/JcIMD6W9l
06PmcPiTc7QZUr+kD/59mM8x8Sn/jjF5z+ite+EW15MFgcR2y0QCxEN9K/Mz
hlndJqE1iF/idvrGqBHy4ZX/dh/5qq9Ma6yDTebmXjScYVJK7w9W5hmR/d2t
WD4Nb8mo/hmmfzHeum6SSTEYu46dJ+O0W6kV35hUeG9VfgasFOg+vXeMSdGt
KtNFsGiF1Ub9L0yqb/1wdTvsWctpXjfMpPTUuMrSiAdf2CVWn5mUaMfCLwy4
T+C67c4gk/L8fCA0iNjQ59PERybFPz3n+G2SzyluhBzM+Pv6jQ/EAelSrz4w
qSFW/ZAW6kNvD5H3xXif48JD22FK12NryifE99POU8fI+10z8tL8LyYlKasz
jYM9uwS1a7B+y9lElRRS/ylr/5tDiC9j2b6fyHjGyj3ViFfo8l4mhDxvnx8g
HsHzB5tKSX9RXp/j0pCfidmKSh2YzTH52WCUSXGll6t8JP1fa3nyB1iUettA
SKxVNbMf5vm/e+MJi5z+MvuE57klpz0WkXxX7/uiBOt16Lc1k3r6m8i2Yf3w
cHZwAizmzJnHQHxKtBKbHTBVyGBdQr3ES52fLYb7IoWitRIm5Wv2yHXEEH20
eb5q6BusZ+Tu0wVHC7een+plUuqHfvzUBFOmzSVfnjOpjAaj5S3EnJiC72tQ
/3l6yf2G//+/J7vyf1cj1n8AoXnJwg==
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], {5.445389222627836, 14.620169257907214`}, \
{0, 1}], LineBox[CompressedData["
1:eJwl1ws41NkbB/CfDE0uS4VGoSE2W7SzUk1WzaSbSkVRVkyTCCmmIv6RRkrT
ZplKjFSmdFFRg2qVbLPJbZlyb7RiSJo2RetaK+337N/zeM7z8Tvn/N73PWfO
HJb+4RsCx1EUpcQvaSn1V/zM4FKGBAwu9XSx09BdmHWvk1k/hUvdqX0WFwyL
F2YtL4HnvKgwnwpzI8vsSonHVWxTWHEp2T8WvC4412VL+RHYkJZozcR8bf3W
6S5wrb5FWgQ8EmDXRIeZx5JvtMHMqWent1ii/7Azz8eUS+0NVEnvwCyz96pO
mLXxB41zMGV4XbF3Kpfa/0MbLwVWPQoKoU3jUmbMT27JsKw74/VJ+NYyV2U6
GS+WZBubcSmTYvdTN4gduyN/hqXnRy4+IX7j1voOZqeOKV+R+T9MZ88351Jq
n7UKLcTnvtVlaAecOkFrcCZMLdbNi4VdJAOlK2GWW65dFByQYV/lD8vX+sVv
hrv0tlTvJ+MTHN5Mh4uyT3XGk+fbZssa8D6BfmTyYbjP/6p5FLwj91xFFKya
/mmOAey2R6y7jbgnJOgi8mk1kvkvhoWhdslzYeGDxq2GZLy9a2g16rHs03VT
JeKXpkYcCYPjLPQsSP7Mx4OtlrB175et62Fxxfbit6inFX28pSYsz6Kiq2DD
PRrP7zCR37w2r1L4Q3KiQRCxviRYCbcFrtxgBjO/qT9Gx3w1hR7jb03H83x9
jw0wfWH/SQe4dql8QSEsUU1or7JA/la9l2Yi3nMLXW/vh8VZn0xuwozuhCon
4qYbIWzkW7PeqNsEZs6fP1YF+0ZFX9Uhz7sCtX1QP7uwyxlG5HmBVnknPFpa
6uYAy1timnhoo8PygvhoDT1+5pP31r4raThLWjc+zwJxtT7e+K4VZnnvkfvA
PafLb1ui7fv57zOxaI2+BmoGoOXb+lsloFUuae+6gFa6yqg7DK0qyPu6Ai3T
b5tkCVqGeZZDD1qZ+v7kMcwrqxiyGIblaYmOObB33Ja+d8QVnrnL4NSde7+r
Ir63uVqJ+IU3nvOSyXyp91x2wo6JlLMzcdG+zjHk//BudEzjf/H2eJ2DXfUb
63+CVflU50pSn0znhmcYJ0/qmKkNB6ROkDsR267ufYH6enty/LLw99pf0j9X
wp70BUXjYOpCcXcdLK3p6wlBK4gVMobQ6k178FcL1k0+ZehXR/RLin3htBkW
9i5+cAL21uuofo19IDBe/WkY5p4dLhXBwqM7vCPx3qSkdb4uMDNDe2CM5Je7
umIyLA4T+aQgbmm51OoLPueC8PBqJvK0tqT2EwsjWQfyYNo1n98mob/a/4l6
CvYZu3+FlhOs+mrr4wGLGkMTwokX7WkVwoaKgJpbcN9h61uXYcYWy3H9xCWi
M8WwxHmn/gLE35fb+uEJ/DB5VBkJF+mWFcrh3I6kpBswlZAWc5vsa7lWWS1s
OxQdcQr2/Smyoguu/L3QKxRmFW3JfQWPNPy+xhk2+3F7PPncsR8YtY+HZZqj
WzNh1dCmvIvIJ7iqIWojqZ/9le8d4UYDmd4gic90/AQF6tGqWRp0GJZ1Nhbu
gdmHrEvGUA9WiZ3lTNiXd0k7jNTnWdKhj6inzCu9qRHnat83S3Qayfn0Z7s5
G5ZfbXlVC0eYeo2eM0G9F/G+qGH+1J0xdNg9kKdrhvmS4s97HzJGvmt5x4Ph
iF+CFVowszGquhqufDKbl2WEun72N3dBvO7/bMxfB7s/j31fDjvmnRIYw5KY
HuEs5Du6IWXewGTkO/uAzz6yXqUfD/8Fs4IvTyP1d3tv/McQnJO+/e0YTPti
c9AE42WLUk2cce741lTYrYBVP+osFcBsB5osHh7R/jYqw5KcGxLPJ3DObzed
7pFzixVnPAHxRts2XCmD+75b0LQaZlz4I7QC9vSwzzgCS0cd2oqJufGl+bC7
za632bAd/ZLrU9J/uHVCPDxiuLStGc7RL3Tygh+apFhWwSx+Z5sVTDd9WZAN
Cy+EX+lB/LHSK8t3wOwXK3behV2Lx7InwpL5dGOyH5NkkVeuIV5bU7eo9WT/
Nd42nQ2rr3bP/pbUp6nqWhapR8vVaG2yfzJ6syeQ+u3pCOpCfX3PMF7unoT3
06p5TXCOESuwbiLW9+YMjw7YzcBh00I4R8OTS8N4aac67YYh6uDL+2QNezaM
XvwOdqW/KSGfl+Cm5uwIA/R/69IjgoXnjwU/+gbPPVpCKkn8zG01C+DagdPF
+siX8WPzcLs+OcdvW20i3yPqUPWvsHIk8+EFWLTopaAEZuwSXu6ChYa7NvTA
TKMGIxvyPX9nfthizKcUHj/mZ0Xq66mXC4v8AhtOwEWvDsyzQzyqh7rLb8Fi
Xatpd+Ha+NKCUljgKFtmgfiVysHj1fATu/w5vrD79MamMtjW7sTBFFhq0ry4
EHZt8msrhJkcE80zcOpvl26Wweyerje7YNHkhCmP4eiAhTaLyPwrdrhdI/OL
eteQe0fAF87hCNL/3ejMOuRDK7kyfhYsnjacdZbsr3tHYk8hPtHcgNNBsG1M
lvF15CNU+N53Ip4l3XsB+RuOjYs3gQUl4rwDevBd58FRcl4VhNNW6mIeo8+X
e8l5daZ1t74O1jN+2kli1na+jZKOtrGK+YWs57JTjvnj0c++0oxB5jOLG7uo
jfooBvM5sFoqqS/QIt8znQf2knuP6bykv2hojeniW2T9Nra7rIP54u7zH+HK
8gUGHZqII1WXWkjuIaYab7JhYdDv7eQewhz4evIMrH6i7VVF7jGh9kUFMPfW
OpEe7nXuMWfoQ7A4XdjgCueIzaK8MT+j6b4qZgY5h/yS62C2d2hZNrkH0l7X
bUZ83pMzGI9IfxHPrgNWqdmaCnKvzMsO2I58XJ36VxHTl4SnNsLq/ob1cpja
vSpzNvK3VdZMvEbmd4sR8WEWY9G0BFigcB7eBVNLNCM2wd4lvd5usDD6rWgG
LHylM2uUzJd20OA9Wf+8dQaxsPxlZvddOOd+b4sC8UiiTAeF5F518ejeQcRv
+HQi3QOW0vJvjiBfbwavwBaWlB0daxsHG+XP0SH9yyrn5mugXVqwfJisT3Lv
l2gK47OWLyT15lvTJsaPcShuat/dEbI+qwY1rUc52L/a1foYz3+psebDJw4l
HRh4+z25Bz8oOf1xmEOxqh/1+P33/suDzkMcipHoOSON7Ne+cpfWAQ6lNJ8Z
1Ez66yXEPe/nULVb7RzNkC//0R6hA+z6w6TyAFgqaKjo+ZtDMZ9tY+eR9bsa
Ga+B5+LHJjl/E5crHgXBwfusvRysUde8+52TMH+tTeDjEFhcZD+rHxY8OFSf
Bgtmf7t7aJBDSZojVL/CfaJfeuiIV5xxr74alu5PZJuMID/e+5n1MCUoNNdB
fqydTaN/kP5zi1Pq4Nr/fdQh4+VFIYlbPnNwf7aUpsPCGSGlGbBq08GUMJhf
ez4qHmYH25othrlbrsl14Upt3XY6GW/QPDIP89muuplTR/bL7f4mDbyfS4vj
Z5L9Zx7tFYn6CWzsX5H/U7hv9KLOIh91rU+HM6nP8OHKONRH6Lddbkrq0XWg
0qGPQ8ntj8dpkP1zQr721DvE81SROUju6UcVz292I7/oo/Rhcu/WemzxZwfe
vz98qjbp3z3OTvwC8brUi6yIh+2rvq9HvnGV4WtIfNr7mnPLEE+oxOcQ8a7W
168LOPgcnfd8SEx+ZCX//3/LmvsvVzbtmA==
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], {4.424344451651139, 7.165661129127848}, \
{0, 1}], LineBox[CompressedData["
1:eJwt1wtczFkbB/B/JCOXJqKhoiibLCaFImYiRGG6WGG0Q0YXXqZyyRLjEq2o
cUmDZEgMm5oScokhMrSYrC66MK2ilBorlZTe3/Pu2+fjM59v53TO8zzz/P/n
sFm1wVfcg2GYj/hHn//+2PL//bTnM7Gjbt+uGcVnoky/TMv5ic/8uW/RzDsw
+6S4+T+w2bOXR/fTeGJp9wS4TB/g7QkzvfQfOkdjXs7KBAaWD3ueVEKu2d2Y
PZLPqMUewrtw8sQrM1bBsdVTn+fAOSsz9pvCntH9Cm/CUbL8J/k2+Cxx3/wn
bNv3p+ptcIjhUY8GOKBfzK9uMCc11cSM4vF0WNsb1qZud/SAz89PSH1jzWcU
kasvRMHstpR++bD6/GqnDDgkSG1wjcYVsoRq+OCoeY45cFlZ1yET5C/LP6y4
Byt5i+dMgq1tonKLYX1Nm6sAzi3NXNoC22+tjAyE1+2sauNgf2l7/Fmy8O3I
W3xYuW2QLc3XFG4/EwJb33ll7gS7yUamHYJjLV39WDS/b1djOsxdpF9ehHjU
U+b/TflrzHb7yWC3b/JlWsrXYUjlXNhz85Yssu6BtrUD9XApD6+i+dwOSVU6
/FDlH30JZnlbvBbBglpW1S6YiQjkDKP61j39vIDW7xO3r8KOz4iGf1pgQuv9
Ib5wEbbv/aCfBvnFBrMjpLBzn8wbv8GePQvcg2GJSG3nALe7X74lhPU/bmZk
j8A+JnEFIlgVWnxmCCwb1nksAtY4nnwTMxzrXrubJoNj3/5yshcsfamvyIW5
G9MmnLTCvLz+J+oonmPX9HNg1vDgN5aI117xrqM/rHQJi/SFuRtuWugtsc4Y
zYB9sCZBVdAIl/WNlFI/cQ1cLHtgfl3SkvJyWDU71WAcXMYuTGyF1f2KPEPh
kKQXV3uhnrnihNosONbwaIkRLHAxG2+A+DSf/vb9RvND/Ub5wDq7Gy5VtF9c
Ut4pOOCh2Pcq2T3OtQJWvz0wLBrmyypWGiN/+6e2l9zo78cWFNnCrFfF8hbk
J2jkj/uJ6lOjqKV6B3xt8DKBtTueFCylej5V+lfSfj3uxvSH2zM2auLhqI8c
/wI8p8pHHdvsqZ5Hikbuh+2vTpCmU762F7b7wmyFzffhMH/KGbEDLKj6/M9e
qleMtzsblsen9K+xwL5iw/uGML+hyHMmrOrXp6I3vQdifK+kDcO8TsNCDhyb
+cHADOYKyywmw+0X4nYdGYrfv3a9tQLOXXtSbgfX3XUzOQSzdvimaznI40uI
zX0aXx/VnAi3Z+fdaqX1R82Zs5nG23IPOyA/F0HfaeEwd86SSMpflWhiGAPz
R31ZS/3HTgk7mQGXuXU0JsMKUYauHtblHf+UDkeZbC51xP78j38YZlL/sqZV
SWF2YPlv52B1gHurFlazL/jtp/760WuoJfJhQuYtCKT1x/26TQhz5FNK7WFZ
zqbKg3Dd2sfddVTvhe8fK2FRoH7pWaqnUvU8HWaNC630h/UFFlePwwHHC28b
wdyPK2LEsCRT4X4L70HdRXnmUFhZLjoXASs9E/Q5iEf7Y+eribAifNnsqVS/
VYfDuvAeZAZMzr+C/EKmBke8gsvafYLMYKXvy2U3YWsT9/xIc3yqfKrT6b3Z
5lRVNATxr09mZcK67MTbzrD+8w7OPZirKx97bjDycu5/sYLGxYEbR8C6LTmX
e9B7/MkPdpYZ1p8++5gjHHKhbOsyWBOm3CAm23xrtYLtvU73OQUL5k/f0zkI
4w2nOS9gzcaie19hnfXbNT9gfVBze2/MFyT6fbdDPaLGp0zjwjLjC7xZ1B8t
K7aFwdLK2TZUP8HRN49of5ePb8cugTn7xu1mKL4B/5zygkVq51wBLLI7GOII
qyZ1CJMpH/sHs/pQv2e/PFMFs/KfHH6F/QOcMpxNkL/msvOSRLhdokn6GWYO
OIxYCFvPFc6dCGuDGsoN6Nx6t0VvBfPHut65ivrUFV092IT19FGx/YLhEEfB
hvO0vtyg5wiqX6yJuztctins1Bu8N0X3ezY8RvwB8UYSJSwYJAx3g2P5/vId
MP+8iToV9ZHUCOJX0Xv58Ne1PWHrUycsFtO5xt+wduVAfI8Lli36hebHTHqa
b4rnRhkXLaZzg20u5MKCv36fS+9xjmZPRDob8ekTr1yk97ooWe4Gt+9dZV9C
87f5ZWtMME8X9KQPxSu/P9Ib1iyeK+LBAl5wWi/YflJ2aiQsuS663DIA9b/G
W55K/bV0cutgjIu80mILYe3WMYVBsKy2+VA9LNt1YGIJzM//vPA7rDJzyXLE
/rncyd7ddK63B1pJYe34UddbYHvvM6FaOKDRfwv1n1L+5ndL5KNvypiUQ+tf
mnUxEOb6Dp4vpfXSi8IOw6xrUzLdqf/HnHdXwWXieXUddM4dC0q6AcvD6nUZ
sOSakWEa1affq8ciOnfdk8K2wIopU98PsqHnf0PvCbDk26NNhTi3+Oau/3mG
eEI2rd5yAM41LpEshl2Mag76wczGQOPjyE/h4lNqD0vHbDVdg/qUadQVfWHr
r0cGjO6P+Nc8etuB97a1o9376r6Y9/hK4HdYqknISjNGnXp5d9B8lWW0bXQf
7Gv3W9do2j80sC2Chbj6DMr3hmVGWwJlvVEf2YtCOmdFKV7HKo1Qx8TX4zPI
Z32ihbCK33H3Hd1bVkWFDiT7ODrRvUNx+mJrVy/kfSJD4En9J7882BLj/HmD
zcLpXvJ6rmMwrWfQUZpAfnt4UylsP1K1+Rws2/G3UxD255RcF1M/icxjArth
Vlnwk9PUT1W1gxWIV/G8cWcM1X+tG98V+SjXN4/8lfZ7aWN7D9bpmrrH0nyW
8Mdo5C9xTe7dhHgl5uK4YFjkM/DaRWu6j72I3gpreHZNy2HBHUXFEmPq5xVv
+tN8wafpDGz9uSV5F90ropOaI7C+IEff0oxzT6VNrM9GPPw/dmnXwdxr39If
IV71wwG7u3DuCQqSOrORn2KNLPACzG0r3roX9VF5OO0Lgxn5sTGzDfF7J/Ed
L1jGWfqB6UnPrZfPfPLPD5/lG+DTQ20lJq+uPXWCoToOPHIC1k33mjGsm8cI
jNUl72DFhIO+i7p4jNo0vmsG4mGsrkys/s5jRMIEfhrdc8JHfX/dwWMkI+q9
2MhHFHU2bQYsM82I3wozQ+RPBsDWefnx5bDi3W9nPWDOlKLTQ6gf66X+xTA/
4IPVZLrHznTalYX1A/YnyedRP3boDAo6eUxsVVjUIprvPK66E/GITG8Xz6H+
jdwfMQPxupi7755A/bRxHt8V+ehGr+5rTP0X6XxfDVuvW7Imk+qda1vjQPn/
JVQ7U3xzhZ7rYT1z3PgS3XMGD92+B+YaPTAcSN+HMG+5mMbbuN2bqN6z9vqZ
wnzG4kAF7h18563S/VQ/10c282DRusGBiYhHJk+teIh7h/Ts0fVqxCttOMnx
h0UO08PPID9JgQf/+zB6vq5LZn9DfQXnY/Ng9aUhAk0rj9H1tHyWDCuU467y
WngME5a1+QSd66ZB2vzPWC/p+eZsmP9PyuayJh7DjX7oX0vjTOf60x95jGrm
ygXjaf+qBx6d73kMe6/RnlgLOiduGA6qwbh/2bQmGl9+41BrNY/RZtc7LEX8
6swZ+7J0PEavvat+QG7b/moWLDW33mlL/dV248w5WJs3wDuK7mFXPpTn4u9l
i27cy4XVZ1N8Qt5hv9s7Qqtp/rPiMXG1+L7CclnNsHT4ysdfP2C9ZMfrb/93
j2tpj6J4P+zszKbxkC++NY3YX1NZRfdYJrfHSVYzxuNnPTai9Re6mazQY7xz
U/ghxCct9NpUDws6I7J6kK+X+g1DfUT6vKnrKL/LLexajMt2HvhFS/VqvjLW
A5Ykrz86iepdWmy4AfXTC5PDz9E9q9DnUmwD+rGyyMQKlubruusRrz7Ftuoy
7ilM6J1WFfJTTJf5Cchjo1YavUG+AvVdNiy1Oe7JeYX6rPls2oR7DFOjvNeQ
j++3ueeLOvP//z9Ukcfou/Fjzv8v9ApXnA==
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], {5.192668420912666, 8.275685965145556}, \
{-1, 1}], LineBox[CompressedData["
1:eJwd1ws41NkbB/AfYlVkiOSvNKl1TSaEjfJjK9eY9tmEVNNNasmw+SOpEVLU
NlJu7daELbcy/VHRsENEyl2SXZcUuTWhi0vk/z3reTzn+Tjn9573fc/5zWNW
7g/46ZA0RVHt+CUjNTCHn1U0NUpGdZoa32pm1gGzVlplh8KtprdcsuHGNlbR
tyU0pcC/H3kM5s7yu5PgKwM3ThnC7OhM5S0wt3uxa682TTFHuswU4GO6UXZX
Ye7oAmWJGk2ZTaz6eyss/OOaxTBMZ4zemlpJU5xdKrPSWN8m+KAjhBtLnvBM
4Z79Wvf8YMHNooowWHuGvWMdLHbyetIED5y3rZpj4nn5GbE58m3c2Ee/gpmX
3bdnwPtVh2PLyLzikjLlpTRVtkWhKR+mG9mWJ+GTf1+uzoPFd6a1OmFhjcml
Qrgx3I421qApl1T5+iqY97FX7Rhck+Ao6iLPt+ZMXYW/sD5YzsJcUYdbJtzo
eqxXC/kxTP3/TIa9N+wysSW+MygOgO87lKTtg4XH5zKNYO3arIwImOdcG92C
/b9tlZNPJPP9DjkH4dXOTQ03YGaMEbsP9RQmyB5OJ77+mOsFd1WP5aeS/u1f
feEp+rH2ujEjhsT7y8PXEi5ZeTvkILGVa30e+u1x2nmfJcxSyN66Bj7mcK5O
ijjp9KtHqjS1rPKGeQXqYQwOtuyFL7hHng4n9W9SSNKErcO7O41JP/Ve/zK2
GPEs5SMfr8D92Rgf1AsLftf00YUFsQfjJXDlslIeX4um+Hr7d6vieTpCN0eG
mCU6uB0eWVu6NWY5TVG/r2KkwyJt+cUaxB9MhqSQX2OWx2T5MtyvRxZ1vxBf
nB6KhIVGX7U64LfMcy2ecM9os7I96mWm7ot2hKkzcgN58FLPikduMIt1wlwO
/WI47jI5SixMXeVKvLem6CqJ9+72DR4sr393Wz3MOd6fmAafe9R4RAn5CJsC
5Yi5EYrqP8N8HZN1p+CloU2WyTBb2BZnD1s/CKxsIfnn/Fo+Qe6nbdHXeah3
dK3U7QR4s9Nghg7M9f6DoQHzZCmL9bDgvGLOZdQzEHRaYS3cU3/mLxl4zbKD
oUrkeT11Kgj9kXfnd7WT/Zl1Vm/Q38ygvuI4YkMGczfMzC9I0oFZl6o+v1XB
+YyJqXzUw702fOA0THfeP6RL+uPF/4FFXO/2PlETY1ai7bQy4hcpO079B/XI
WGh3wy46NRHesFD/kyPxPwKL7ArcW+po2NAUzBvKf8IinpGVNkI8BztWcC7u
7WhacVAwvDSztNyc2KdGpwHm23lNvkCfKAuJzXrky5IWR8TD7LYpt3R4dXFq
gQfMU+5OZqBe9sjJgY3kva4JcjoBz9C7f95A1rc/bXgFuxikr3Qh53hqjZwB
+uXbcvwMF2Ya5UX4wM+bXZvI5wB3U1ZuPOz3zO3Ra1h4b3hxMpmfOhb0PfLj
ycQeioULL9r1HYEFYepx3rDqxIupbLinpPaWOnzhz7c1PWS91GIl8r6wJ562
zUf9TL1b+k5wIyfBfiXpRzvl+BT1bF5Yu3A1zBuzCNsIz+tVnceAewL3bMlD
Px4GNGi8RTz+oG6IJtzKEjkLYE76/1r4pN9XVO9ugZktMe3KML1GZk8bqYdR
H57BoKlPy9SP7CD1FIvGHWH+aF32kyXk/LJ48vDAUEPaWvJe7LRPr1CiKcuj
77TJPWPKJ5XmwMd9GN5fkDfvTUVDDextYO7BgZkF28YU8PxmQ3Z/K/IWb6vb
6QLLu8V5eZBzM0mRXIddNkt5S5A35c8woJCf6l6vklRyrwovth6Fz/Vrb/OG
G627nV7BzEFulznMEVeWbsGYIhGt1MfI0PQJzsHoO7H7wToST1K8WBr7WP91
ytoV5jq1N9sT3232CSfrpw6JQsjnzYsagyJi66svf4OphsihL7CYfcs5nvS/
83CuFck3YmewH0bvuq9upzA2KrpITDDyTC1bijEKQ1TP9uC5C9IdZwZhOlzP
KJTcZ5Wh9fNJP4yrm2eRv4f1ogg1mNXoYPFfOCWPW7sQFuz8VNiPfmT+5H9p
iLyHE+1SO2B6Xp7rPRLv7lTHRfT3+YbWmxzSz49VG6IX4fM2KNlkmtSb9SEp
WRH9PbX/Ng8WpIpUmhRoKrTvavQEec9qRUssYWZ/jswBWHxCNN20kKbyVjF7
q7EPc1tB9U34bbavgSHMW35GNQvm2j0aX4V9Bdc15nphB6kHMdLYlz7haeeq
QPodxvpK4lZlH36Dkdd9o18NI8d0kUoa8mH7eTA88ZzYy2mvL54TT3xHP12A
+fd3vH5E3IFzP8z6wuzj+mVK2Ff8m8NtS7jxdlRyKOzrohZoDnOjDue2kft4
6lPwHpg1Mjaw+t9+9vfnwKOyRhN74KzXcq6q2I9WjzscCY/GGPYlkP09izvP
EzuUftVAfuJwZcMQmDpkfjidWNbR2xEWuOtNMZG3ILz3oRT8cGnQ53iYP7e9
MJ306Z5TVAeZrzrXZAy3i+YWy6IuwRDnkxepJ7CshJjX1ZVki/HhraOB7VjP
7GQUaZHz6d9vH46RMlEcmEVeglpGqITsv6BOOETq7N/oa0b6aHBl/MN83Es5
57jtZF1XxHF1OOVpvIEL1vGMRwKOyGO/Q1o6a/B33iS1buQ7jJKES9MYxVYh
dRkYQ90jt5TLod+axp8TYE7byOk4WfRn+5WuIti35qwnZx6s8dhNAfFS3u70
cpFBnANSlZdgYeKi+Tulkb+wPdcS+zwc/xYbK4X8ue8qZ4lz2HZvKDyv5x/T
irwoA807/jDTPz/pHvIOlXZcoUfmL2V7nCd1BqhUKBMbKR5how+TleVpujDV
9KvuDLGx252DZL6kghWF/nHDbc0ryHyi3vNOeJIym7LA/jx25WY59Jv9Mkgg
ggVqfYZTZH2Yh/7Wf/Pt5RXBDL1oj1qYlyoWWcOW2n+ybFBfz03V8svYTy8k
1OcaTBdM5JQivxrtB8/byPyBhReqyP1nKBUMEdc8UyhEfUzOS9Nmst7PbyYR
9U+aTPrFkfmcHS1cch7xATdViDd9NHJHfyc3jtj6YX/O5q4tbjgHxkWNf9KQ
LyeWF+CDc+Ane49loD7xPs30TJwDu6HSf/mcDUUty1RShnvOPouqnrGhxBqs
JiHiioM/2XtO21CCI6LcszCnrHqif8KG4thIjV6WIf/nMaiYz1j/W/V/W2D2
ghtK9h9tqJ6o4eIfEY9lJjSxGUN8/UH5Tpj3c6H0tMSG4u3ityXJkvv9rVVj
BOvbPJYdRr497ya3fhhE/Fct9Xaoh2m+/mzUANlvfLcW6uV9n7/05Ts8X+Vi
JYGZ5S/aXsP0Y3fObXIvWW5OiVjPkztUb0Peex8d/xbEY14rkc4n9zj0vjhq
GPmkeHhKYPpAfj7vPeoLX+I1Re6Tq4FhxgfsVxY9Ugfzdy+0fD2K/P624fqR
zw1lq9EOUk996sOX2I///Qn/3HHE930+rAr3tJdutEX9FHOdvaE8+d5hnnIR
ZtaZPluFegRBi+bHwJzTDc3yqFd8MPjLCliw4qdrfeiPuHlm0ovEs+woryL9
NDKWscB+4vdhokJyrvk/3AlCfsxFy3eUkntYJrzYhnpoTes1gzjXnibntAL0
Q/ydgiOqowSvLr3Rf4N8JOGhCThnumCevegfjK1qBQrE72R1Rpsx339yyedv
6NsmbuCZCrg9LsqB3AvyIyylxOT71pzN/wGlSdTh
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], {5.575655548348861, 3.165661129127848}, \
{0, 1}], LineBox[CompressedData["
1:eJxFlQswXFcYx28R8ZgiIUNISdx7I2HtWUSILP20M2iDbIg2KmiFWEMSpB7p
emWRamUbEWVTTKIPUY9EiaAVpetVj0m3oqRJxCQSErSpWrOC6rnTzsmduXPm
N3e+e873+P/PtogTAVEaFEVF4Zdb/3sYaDPl1h1A9ckcE36hYWYueJfSFTM8
LiitpuF6xjS16RRmsyPJlgU0dDuGUqp2zPHZV7dIaXAUnnQI1dkJVFXrMjpN
Q5P4Rd/GQMxyjcwIGQ1ndLyvDpZhVlf78CtpcDV4UOT7CPOYoWl2Pw0m5YmX
UhhboCZctH5V01Cj8k0/FsbxfIUlYmBf126t8nOYqew+k1gGJr6QRI7cwJzn
scO6mgH/YKFb4DDHB3ILnzJQFtI12zeJWXA+um47C1MVb1ARM5hT49TDYSy0
777t3DnF8Zbe8nMs7Df47bOl37n4EJe/b7CgOp2TJe3BPP15KjPMgny28o5N
LWbXMt2VhyzMem/VX5RhFt1cHXjMgoWVooY+bsvln5B0l4ULY+v5S/7c/3rG
Y7pY8PtkSdnsiHnM3L2yggVBnd6TLAvM6g/sqj5koXe99VEPfcxmeoWhr7NQ
863nkkwTs/xZkqEWC5IOr13X1nH7FT/06WbgiLl0Mmkj5nj52ve5DITX3lKD
LZfvstTKhwE/Mzi26MudJ63b3JCB+eaUo1ofYYbnHZb3aZD3r8VH13PxAS6i
6zQsBnldbvqDi4/deaKYBk+Nk8Z8Jztcb9klRQ4N4c+6nQclmMVnSwyzaFiy
NZ0K7cG8Nb/hTB4Nc0kr8lIjHlCHtP8ZKKehOTvvXc9DmAsynqvaadgQEFtt
U4q5fvqY/BkNbwaqhCGjmMdGom5bMpAS+sLHUd8eKKOW8LhgBkRZ3nfCnDEL
zhjfL2Gg3gZZrB7ELCqkTo0ycMFgi3V5DOb6wuHcTSyY7nVv8D6JWccw+L39
LIzW6Y2nJ3LxxxslUhbuDAolTmLMHeuKWmpZ2NMQU9sVhHk6ztdzkIUAceT8
EyHmy6/U//CABeYvcUyxFWaz3JkDT1jwt+T08fJ7yr6S4pgJHonv7Ch9dbOC
R/5/N7k4cG81j+zvdliRM1jCI+cTSlTbpDIeOf/q3E9+LWd5JD9d/uT9iGIe
yX/GRDmpUcMj9fFta9le0f+yfmUD65qHFl7WVzmip/h6hz2pv+ZoUdBYpD3p
z+FvUqrar9iT/tk0akZH/mlP+vvVhqdmX+7hk/4LA9z6nXL4ZD5C3GSzykE+
mR/L4dbwtzcgMl9pYdQ5+X5E5s86Ie/ici4i89lr1FGo24jI/DalCdb/OILI
fLtaZ1h8OofI/G9Nax0QvUBEH+LMdu3EFUT047tt/GLnAiL6mpSoNmdOIqK/
nkvafJ8hRPSZJVIrtb9DRL9qXfeD984jou9rCw8WdBMR0b+mKHj7WCAi/mB1
RZKZvgcR/+gyt03QZhHxl6B5u34PM0T8x/7jm2vlJoj4U+rQXmMXC0T8q+eW
oruWh4i/tVXklNq+hYj/HUj9eTkiHhF/FDs1SgsrEPHPtXzZ+3l3EfHX47KC
pmADAfFf74J7VRcdBMSf0YS0NPkdAfHvhGSvaKVEQPx9NkeZmXtZQPx/YTw/
M0khIPdD0WvDUSWPMP9/f9TqcKsD/AurmHX4
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], {9.0548, 14.5}, {1, 0}], 
       LineBox[CompressedData["
1:eJw9lQs0VHkcx0crlCYkE/PInXtvHrGt9Wqp9Gszu1pCSEsbNVRW5Z2UtkTe
ayU1bDsyp07Rst7HCg15RGSUotRorVeFTa0jj4r9z9nd/z1nzpzPmbn3d/+/
3+/7/fKFwW77FzEYjOPoo/j+96LhYO8CugyBIZkrtLKgofqWmYpOI2I1WW+L
Nw2hunXT6T8grjdsqoygQScl7HX354gDzqqXn6ZhZnmFq3jAABglmVfXRdPw
afe+lubziN80KPkfpMHAPvbVRgHibz8xdhfQ4JQuOCP7sAYY59SqK1g0KGlP
ui2uRax5rHiwj4J2xw7bJfGIzcxHpDkU+FWkOcZ5IXbgfIjzosD4N13PJFvE
M7/vv7aSgpDX8okUI8T5qr05XSTkuvEKd1KI+y2cG0UkNBVbdTHXIiaU5Rx/
EhKyeEfsNijq9eRYbyLBxTGDHvNAHJUuXkqTcMmoYexGhIKtDvTpkeBq4mvT
kIVYN0Zsrk+CkAqxcq1BLOl3brYgoYqTygqUI77/59FUTxKKm1rbBTOKesPC
xnh0/0d15p5l6PyQG7m0joSno9ULaSzEM49mohdIoNdptVnrIFarje3ZSkGk
JKrkG1XEST6615Mo2BWbVuA7rnj+zfshbRR0W16+U96EuIrfPriYhn6zDMba
DMQxgabz61F/8wd77NwV/aqcXu9DQzlr//KpZYhfbr53JZKGdzf/KK2pp4Fh
FNi/KIaGEf1ZkXMo4tZb754fp+G2fRkjk4/YzOFUgj8NUQbfG4c9olA/1NOZ
W2gwp07+XP4j4pjId3ZaNMgancx7nRDXn1SLf0xBz1XLunkWYjPhvjYRBVmz
liXScRL9/7yphxsF4TpsX14nYsm1J1lMCvJaX4xGSxEHNO9efo+EzKfK7pnV
iDU1HFUzSBjo7NSMakC8t2jJKV8SpDW+jOuPEGcLbCZtSMgKHf6oPYFYjeXj
RJLQ7lRi46yB6lcRXjVofrqGzq8vmiPWpaeKCBJMlCaeK3siDlnl3GFNwoH6
sw/LIhFLgnfPeJPgpnVi3bMMxA7xwu9SSVhNZ1QyrinuDxElNpMg2iW+wyxC
7KpRkaxCwfRd7a3BBYjzq5TYjhR0coZnjMSIs/e23E6nQCW8fs/AacRJhuwl
Dyg4lBWxbExR30Gt6qo6DdfXFDdYk4r+hRX/spGGFSnu2jsGFf1Z+PXYPho2
ls0f2iZW9KfyrXcUYqojONsFsUPdDzw0v7UyhX75+Hdjifm5gyV8fL+xltKF
Sj8+fv6XKwrHi7h8XF+a47rpbh+B32/OJHVy5Q0Cv7+L8eYrvBgCn0+Ux1Z9
7Efg8wfNjtWe8yBwf+rs/Wz+3kHg/jnkBm1b8CZwf7XL4h/QQQTu/5tnJ0y3
JxN4PrYNmvz3ivr/zW+7uFQrsIPA8011cblT+obA85ftYC8a1+Tj/chTlSx4
mfDx/oTf+2wicRMf71fXy7nCwwI+3j/p3Cqds1v4eD8HE4YlA2Z8vL+yu20u
W7T5eL9/0m8HpVcE3v/EJ2UdBuUE1oeFJO6AUziB9dN3VNSTZkJgfRkUX5rv
rdXH+pv/itkl5OljfdY2bRYnnVqN9btV3WpQZ4SH9W1m/YVbrBcP63+0Rz5f
0MfF/rAgawjLjuRi/+DGDuWDIRf7i3SamRv4loP9RyiXHzrfzcH+xCpNZgx1
cbB/qdu9GBa84GB/2158JCBCg4v9z9vlVZfJ11zsjy/frr7om8zF/skcgLTo
+1zsryKraKNCFg/77/Ir8kpjTx72Z+mupjVxyTzs3/aGF3YPFfCwvx/ObMrz
uMnD/j92Q0CMFvFwPkSZytwnUng4P4Y6BwNmnXg4Xywn/FP+muLi/Gndq+c9
lcjF+aTJjvgoVOHi/Do5P2eacJSD8y1IviE04ikb518VO8unxZaN8/FyGJvy
EOvh/BzZeUazX1kP56v1rZzJ7uO68H/+vn+o0O8q+AfQKOjo
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], {10.9452, 9.}, {-1, 0}], 
       {PointSize[0.04], PointBox[{10., 17.}], PointBox[{10., 6.}], 
        PointBox[{10., 12.}]}, InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox[
            RowBox[{"C1", " ", "N12", " ", "T12"}],
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->6.137505285412264],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          6.137505285412264]& ], {10., -0.5}, {0, -1}]},
      AspectRatio->1,
      PlotRange->{{-1, 21}, {-1, 21}}], {66, 22}, {0, 0}, {22, 22}], 
    InsetBox[
     GraphicsBox[
      {Thickness[0.005], LineBox[CompressedData["
1:eJwl1Q9UU3UUB/AffwVEWTqEFSRyQmdCTJsKir4nEkKiLEQhVJygQAKyAnRo
5jTSATOmog5FQ1MEFBqJSigxddpAYEBWIAQjMUaKIoKzMuj7q52zs/M5v9+7
7977u+9tWkxK2GZzQshufOkvaRjDx4kllhQCloT87dQqgQ2hP8zu9WaJz7zS
gPYpLFGXSPX3YOfs3yMWw7r8IkMrzO3Mf/ecI0s4Bmt9F6wYK/ljEqz+Ln/j
S7iq7wtGwWWJTd7XGxwQn2sRmOQIt137yI8PC8QTnlVMZomnZUfDe7Di7NCW
TTDXf193HCzOXpX+DizNaOJlw5onfx3lwNqepnHlsDbuxUI7WLc63qsFjnSK
vc6DI7klTkOwxL0nxY+uR/2S7DAbee7XNWyFxTFCMz48HKM+eBEOSem5vwBO
KBObBuGghd7LlsGGyb3GecjXk3v/1xDY/m0+k8GlcVv2LYcj1ZJ/vqXrraKd
S2GtuD2nG05IXLp0LuyX5TPwF6zLs/5mGtxMHg2YoT+emq5GW5jt3xQ8hHVl
qrznCfJtaGzS1tPrhRmhrbBN1bZFOXCB7S7lZVpfZGKpEO6sk0w9Drtc8nqt
DvkaHzyI30PN+yd5OazekXw5CeaXtSprJ7Gkd6/0rfVwb3HR4EzYMs73yCq4
+afx23NfY0l4WNxpEawa2h84wkEdprePhMN5Iys+E8OKHaWJG2AO3+/VBQf0
odBHL4Fl5i5RlRNxPoeWucrpeeVdyumZgOsmdiafpfkyvmt84esJglNamK3v
y661R77bbKP7aH0+wvvpsLTJjRmPfshOEs1a+F7k09vv0PNYfilrK7zJY/JO
Ecz37E8vgUWhma+2wvITKx5bIb7SST8hC1adsb67Ew7oyis6CduUzLhjhvx8
HpaMXoDVD+ruHYAl9UuOXYJF4fVFjqhH4lnLVtL9KTrXXNgQ8ZtLOSwgHbcG
YenmRSdPwxKLQFce+sF9OLYrlzr985XT4ZeTI2qksKXHrgRXWHL1h9xoWs/c
jJt/4nqlt12YP40vdJXLYdmxiRkecHGKJtmIfISf9MroPBi7RQ9d4ALpyo6n
6I+6MSl6FuoRWui72uHi5kLrN1C/p8PwFR1d75mdPmyHPrMn1tTQeT+zMvCG
Lfo2S59UBRu2BJbm2KAvlZp11fT5cRwaWD8O/dAt8L0FK+3vmvlbo49tt2/R
eRO/vshqiRX2LfwixUjPh/dlR4wlfr+/GG9B6xkXqC+zwFzv9c93h8mWiKDp
sOWh6toA2n9+oqrJnCWP7dpSE+i8Hy3vLoLzBB5+iv/q2zi+DA7nLDlF+xsU
Nu9JJ1z59XxBE+zctO5jAeINP3Mu6afPx8/mnV/BzXn2g2M0XteIlzvySWgR
zOTMQV4rArLKYFVEeS0PFu22LJqP/Dv3ZCe5wD7a5+9fgV1cjb7OcBU3/vZU
1Ms5rNw7AeZrHdYmwtze+oFX9P4d0eqDsN/sivg++r6Y8cubB2BNRfQUml+k
R5TpQ1j1NC3kW3jQIa7sBeIL1x/NOELncVZwfyxsDFPwMuj+ilTZWZrvzK4z
dB6C7rLhNahHfuNcOn2/2CirnS+jfrFV4l0hnTdzk1WeGfr6x63iGXQ96/z2
WIL4Nze2uNF+eyhGo0YZEjTPuZZ6MLOl4+XfDDEGLiug+0X3Q69U/skQial/
CX3/cMzfX3/axBDtVrFvMD0/Y0CsfoQhqkzDjRi6f82na0OGGZKpD2mXwW7l
2QvcnzOE/6Fd0Bnab97hnjVDDCk0BX9zGy4sDm5/9IwhYrlrPj0fA2vGdsGP
/Qqy7NFPQ0zuo+nY36YL4XjBsoK0mmqYw7NtD6brsVs8chBflnrk2kZYMzGi
YR/uz3oI61LhwpP6DceRX1v20Yjd9Hppa1rFC4bYzLxgkwmr+RHbr6Ie59UD
TXvgQV71CdVLhgx3WzyR0vifvLjjj/ovfnre9BHdv98+tgiuEo5oV8NE1eF4
FdZ570xaROdF6xCWBPukpc11p/G2ya7dQLzmVXVyK9jNbXMUvd/F5EyDkdaf
YXXiA+QjjfzsSiPtv+XvvHzkrwwdn3qZ9nt+4+LjqPfVu9vW0feF+vniC5sG
cb8WO/khWDPmZe34GJ6yoZG+r2TOYd5MH0OSFJLr+6lzRaOS3xhyVmB3jD4v
sjtWiqIOhqgXaFao6PPQaGJ5PzKk2OecrJSui3ecH73DkLQ56s9v0vloUImW
V2I+phbGdVPTT3nN///vc9h/AdlC5sQ=
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], \
{2.5098469626739015`, 16.134340888021704`}, {0, 1}], LineBox[CompressedData["
1:eJwl1QtUU3UcB/A/kjReOmHi0MDlc6DiSDBecq8oOQkTERQMdWjpBNKJgMuM
hyIBGuID3WKugUMxX4BikAzwlUMNJpBuEQJKAj6RUsFQ+v5PO2dn53P+9/5e
//+9+3DNptAvhxFCUvClv0Q/hM8YlvTT35ksiVLpGs/Acn/2t2o4c/pVKzFs
+ELy/i64YkdvbL0DS9jNQWbhsPAoczgQFiem5otgzVPP9tLRLPGK5rk5wtur
Ro/lw7X8DvlIWMX4rP6Wh/gzqn+wh7sDRL8/tEeeo6O5k2FDabAsEu5e/6Qi
AI5Izqg02bGE/6PDwxh4UoG/MhY2lgzG5cN7fl7nYgeLWziXbtP7O8bvaxjF
Ev3SuszhIuQfsf2xFhYlJHhOgPc4Zvnsh2tnfhM3B9a2+q0/BJd4vLwaDhvX
BHx2FtZsP/56A8z7epTJBD9pM38mhyWerhNoPm740/o0OCH6ZuFSeFB4kpMO
y/g2UiWtL/vQ8hS40/dR8D3Ya7JH3RZYta5othP6k2/JuxgNxxkLQ5bANo6W
poVw85QPApPgW/pg7gw46uzQpky400+VZQNL805b7oJLuL4fNaFfvnf+ghhY
9PzAqt3we2ErN38Ms2W83PnwYI+g5wny96uVZWaw7Jrb1D10npaXdl5zQ96U
08VjYHlrbfx+eJAT10jnY3zWtDMGDlNb15nReX6f47UYDnkVxW7gsiQ1TpQ8
F+YmRWSqRmKf0q8UUme+5byJHYF8Td8toddzNwV2BdmiXqs7hzbAhlk1JwNs
WEJ2fvo4B9Yv2pPyuTXOVWhVoA5WNF1wUFlhf4r4s/pgr+fKUEs44pfpf7ui
fr2piHPMkiWCth7FFzDXKOyIh2VrddNVMA7I4o2wZM2ahnq416dXexDm6/Na
BmDpI4VPO8w5kLvDFvPs9rEpX4j4PKdubz6sT/k3Ug83p2XHfQCXlF1MCkV9
iuVnahxhscCqsRWW3Ba5cOl5Eb6dKEE/ChfHdvr8cN2P5jTAhgfuoXR/jKfq
Rk1E/xELNklofV7j1f+EwgrBDr+VsFi6RBAJ86OD5Hz6vN05uN4drh1d0mVA
//y84p9NiNc/MTElC9a8rhSFwtL3dn0USNcfbp50BPWQ7ZENFnBt5+U31ahf
ttWqzTADefo83unQLynd/V0R3Ntja1fIwf25ifEZsNfByvCE9/Ecb0irTICL
o0or/S0QZ5naJIOlTvXZ1sORN3X26W2w3G31QKc5zoFz91f7qN0PFDQPQ38W
at05mB1/duwDM8R7obrQBsv2MvvHwJJOvZk9PQ8372/dSjB3N6e+INpPXcYc
C5i7mqdNh0Ux1quyhxhi3Lh3PD0PqcK+a+uop57Z9oK6tys7H+bfGPrXmc5r
aJLfSBrvxjafebAg9+P7Mrjk7FXvKDr/nzwjH8GGiOQ0KSwfN3taPOoxHNzp
tp4+P8uM3u9ofTeWvl1O40UNeKSjH1mVyyJf+j5bW2b/BubPVI+zg/sbHbKX
of9cNWegFfWUnAtO2gdXBE15paH9RA8xWlhRem/3Sro/129OzoaNqrnJDnC7
Bz+RhWuf2lXVYz76ml9P/Ir40tsSvyw4IjY4wRkWOFW0iOn+DT4o+hT1dU/a
68OFOXevmIehHw67Wd0xHfGm6i2S3zGE8zLsbjXcO6v9L9dBhqQ+D3c9AZPj
homXBxii0N4KKIBrV3w5J+I1Q/pvxrsehzULy6vMXjKkYvgL8S90XWktbuxj
SMjLP2JMNL77wostvQypvX69YRjya7yLTq14xpDiAx3+HrDAL4h37DFDhPZv
BLHUOVmmEz24Xtqn1sKSMuP5r7oZwu3iXmml66+O5/Z2MUScqsun50FT5ntI
iPVUF9tV8+j57fcoMMf9+jsZGfT9o/l6G0/6CNdrC15lwIJT1Razn2B9fqHt
Ybq+sq1CjHrEwvMXlXQ/xN9O8EO98qRVOfT9Ion3r1z0giGZ9y6XJ8Lkfuut
+eiv+Kp0WAgsS/iGHfE3ri8/0+JM90ezZYQS1ghDZ3bS87x2CvcuXT9Zv6KQ
eh5Pq6O+cmRkFGxoLnX9BO7uU83i0f7iPMM2Ir4g3abmNzrf5Bu+Xsgfwrmg
3E3n+aDhSNhzxN/aJA+h69UGczXmR4QLapzpfpGSn6SYj6JSGd0/DfMY5772
zn2st1s03INTlx9OG/sn9kt5rL2ROi+qPLYR8U7IG5qpM4nur0uYz+Lr7p3T
aDwaUvf///s09j8Nb/PQ
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], \
{3.4901530373260985`, 14.134340888021704`}, {0, 1}], LineBox[CompressedData["
1:eJw9lQtUTHkcx2emiSkjhOixYu69IdqkYnaU+1P0QBTZkiR5TV6FXhSyOsyU
5JVSW2lr8igqHEKpPNPDiUgbqxal1Mn0Uo2wv/bMvXPOnDmfM/f+/7/n9zvF
L2DFJh6Hw9mL36HfZ9d+4mcCcP7/kBAUvl5oegTZV3NleSUB72cd+GL8TQ84
/RYmYgUBpuOa3mZvQIa6ec4xBCh/kaaLH40HTmJ4z9JIArwuPzgeQyG7bvd+
HkXAUhm/Zm/0OOCMtv2RnEjAuUkxvJSBscC5OFibc4cArkmzQjsMObBv0ZJW
AuITkoJ1tZGVMlcjEQmPpIYJw67rAqe6Sn+BHwluXhY5o4ORCz5qRGSR0PD2
dsN4N2SBU5JXGwnzFRLPbAdkz34TPzMKjq7blmnojjy5Mt/GnwKh+bz6iBDk
xm/Ex2QKUs+KnGsvISun+z29T4GVW9Trla3IssANvW8oSPv93u4oc4xHVn5O
1EzBQ4fGredDkFsObqhqpCBwrp7ZywJkX+N8SSUFPvKTCTFK5FmTooMuUXBe
NcHgzkTMv9EgxWYfBTdeBf80NEMu8ZX3AgXO3qIzO0yRBTOGR3EoaIdO33gd
5H77/dMLSbjKN/QorsPzwtI/rQ4l4bK/TewW+dD5DuZx1iSUrBdx3UXITu+s
jFRYX9cnV/ZnYfyR8TXcMgI2m5UbfdYfqpezoCydgPY9xRtCD40BzsQSy7Vy
AiroLrOU96OBUxdv/P0gAYflG7km9shiO60pRwh4dy5TUeY2Cut/69DeZAKe
HFNuejZbB+vRE9h1jwDxKMunGy1H4n1yrdIOAjzjXgyq1ghxPg737ZtGgldz
TYnq2gh8PyXV2p+E8lXSiGAb5MgdNdlXSEgSpWV/GdDG+nlNlXaRsHjr2KUu
n5ETJZmdlhTIadq+UQufVypv9O+kYKDjADdxBfJ5t6+HzlPg/Ti+b3khsvTO
Y+FjCmZaljaLbfH+/tb06/9Q4Pen+LZHObJTQ9ZC7F8OvzB8rCfG2/JG262B
grPcscsq6pFPtOTPfor9WNRye7sj5ud7InO4goLgEwvreWeQC/alZARRsNpn
l8HcAuSWOP8wCQVvpy4XFl1BzlMuCRkgQRJw5kNGILKn44+mGyRMrOSGyn/i
+dI08fxA7N/aFxY5a5DD6pq+/kpC4tlC7TcyjK+gz9G7h4DF05a5LIzFfCDW
deMDAjrKVLnUrqH6cFbJUnHfjlkVr5+vhfVx1lEcJeCieGh/h+P78Md77N9f
keWQWjqM/T9zId+1/rgm+77AOe/a3d189nxViF0vGarB3t+SO/PZykweG5+N
YlAWwuGx8a9O3WrkHcdl87vVlNttt4LL5j+oG9tU5shl62O8/w71fRuXrd+S
Mj2H0wVctr4lAW35VhSPrX+rwD6q/QKP7Y/lrscOF6012P6ZzrfVf3Jfg+2v
2NFfkGfPZ/ufPCnyx5YrfHY+qiyKC42/8tn5WZzRdv3aeE12vgY+r3MfPUyT
nb9ow7OHox/w2fkUT51Ba7rw2fmVHJipoZmpwc63gV/FnORKHjv/FZE6SRZV
XHY/9rxe7TX3Kofdn4TCraot3T9oZr/6DK2dYoIHaWb/OnV/BopUAzSzn0Kz
l8c8EvtoZn9L6xqdtDb30sx+X1iz51tuSDfN7P/gvBEV6+s7aUYfdglOZfBS
lDSjHz1FAf3uMV9oRl+EH5p9Tud00Iz+5Mlc+JMTkNX65K78zdxcgs+r9Wt2
0c3057Z4nlrf/G0VS3KN8D61/qU9CXc/QHXRjD7OlmlYdyzA+NT66VHbnp7n
1UMz+jpHtvtNlifmo9bfPp8xCUKTrzSjzyNTXHeezEVW63eei27aiiZktb5n
X9A7dPEuslr/3+eLlxfNQFb7wyk6LqPJEs9X+0d14enpN19jPGp/mXx4k/SV
Mcar9h+QVvfG6GN+an/62P16i0VOG834V9CHd/KMmmaa8beHrwp6JLX/0oz/
KadfsLB79DfN+KOvz3gBd1k1zfinr0vAp4jgezTjr0OuW8LLKmL89z8ocRKF

        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], {3., 9.0548}, {0, 1}], 
       LineBox[CompressedData["
1:eJwl1QtUzFkcB/B/02ukNOg1iBHVkGxED6bmX5u2FEZFifJXiSM0rZIQs1np
RXW2bGpjkCmP7ORVW9KgTUhNkd1ka0peJaaSsGS/9+ycM+eez9z7/93f7977
vzM9LNpvI4uiqP34kpZq+IaPKU1xCDg05fuvaYsYlgjN72QZ0pSTwzmPNhOa
Usi6Xfxhs7QXga4wb1N+kg9s9PSY/RljmqIlkwV74IxvZ3snwIoXkcldcMXL
g8IMI4wXHdnngvhGmp5bjWHmnWxACtsxBgNlE2lKztlqbzoezxcNbomARWzu
vgKYSfOPmwurnjtv4k9A3Lefj3JgzqHF0yrg2sgPi/VgXmDhVQ+0Qabh17lo
mZVFofVoxRZd0QLSHxVS7mJEnqtv2A5LUpu1pPD7MHn2Bdiu+mBUH7y5lBlR
k/H916eYow7VxJ5XDvhdLtocbw/rz+YLE2BFqsfkuXCQXPz1Eun3+r7fAK5l
2tI7YWmpgUErWkGqU/9nUr//pOvJaJVUX78GxsmpPY7WMP06wnuQtI3Tk6sw
b8ODxtp75PnmHhdvmF2x0yUdFlu9d3uMeoOCos4tILa+nbgZnnLZdvxdjJNm
Zp7QJuZ+3eYDK3qvtl7C+vFLW7Jq8HvW2O7sWLinRKaeBXPyngcsh5WtY+Mz
0Yq8jx10R5s3eMhzGPvC6Twf4AfnDC/bx5B96j17MRHm8AVfzmNf7STdgtuw
hDUl+Mo4rJP31Dge4jI5l9O7DBBvkbg8m+QrdF7tDKtP3dw1AXnR916m1egj
33bLXYWkPqcFT+JglfOBL3NQl6SQUqyFReHVplVkP3wup26Hs3J937hh3fhz
XsedhWmX8YNVcErBsjfaiE+HChxn4lzmndK5vwfmJPjn74TZZ63rNEh+OcWf
f4flz+4+OgwrZumGNMKigHsyY9SjKPvCaibjo+vNM2HJ+tQdFbAd1X5bDaty
h2OTYbGmpzkX6yHK+TbiQhx3YLkVrFqxbrgb+WhZJm42hxX/TBXuhiULE259
wvP0Db7XGJi9wDwlBaZCF/Xkor6SaMW2V8hHWZ+taQW/6hQ9nwKLu5231ZD3
4sHWUBvUo9QX7NkElyilOpNRv1ygbLcg/V3z4t7rYd01tgUPY73Fp5Z73hxD
zp/gches2uJ5Lp2N/hbWjtfk/TEe7A/Rxe+8vh59PJ+lf1/DXQfnM8zUkJwb
ZpKLtps28ntndOMk2R/ukfYwLfR/vHTcgOyPrmdTqSb2k623MQ2mtgR6WcEc
r95R8t7n8aPyGlnIy4ZpOgkrj17slMGiWzlqOxNS34axpcRuWgmVsJefw9un
sPJIh8IJ945Z47oYO8RT3gkvksH0Y9bTEzDtP19B7illx7CtBfKRLrldRJsh
v2UeqaUwE/rHaCQs2q8lc0T+Yt3Zl2Jgp9qhpdeIY6UvGbjCaNOf01Av7euu
5wDzaw3XRsGiLJvyITJ/e6g8G1bX1h4vJPei9V9TD8PUnd1rSH5BlsEja2Dm
xsN5d5G/2jCy9APiK2PXvFgFp9h4vw6HpT7zInvI/VC2Q1JE8j2zK52cB6/7
dEA16uHp/PqY3C/srEqzq6hfYnzB9iHW0441op2jgflKDE8fh9mpxfHhFOKz
Dy05QNbbMmM0eFRI8dqYL0mw+ufm9o//CinpZPMYMl70ZMW1K5+EOH/FuuT+
4bCWhpwcEVKcqp+ezyTn8ZVHeNOwkGImJOmmw6LVe9f6vke/q/1GTXKvX0xb
ZDGEeBGzeKmwkvtL1+pBISXpsK42Qf3SEu+2vgF4+s4Isj8qWoPugOVDYqv5
WE9VWGafFcYzM+zdrsCS32KrK2E6YmaENRf94Vss0xGfalz1NhlWjAtsSMb8
VK5yZhMsLWxan0/yswkO/QpLdrXEln1AvUUXLDiTcK74gfHlqIcJuLpYF1Zz
KwvyPgop5X7Dimck/o8f6txRv3ywsKMYlh/SD5fBqpZHEwNhKq/duBzm1bwp
GybnpdbQbyvpVza3psDqnZKqm4hHr7CcYQLzeBuDyXzya+OTTpP6E7QLViIf
1YZPbQ6wWusF9xjyp11tG1qxXhzHB675qFfd9HfMQXLfDLmej1Bjvh9seEvJ
/+g3Wx3jN/DavQutYYmZ33fCl4g/79bAVOJM0ai4W0hl3eKvm09cp50ha8d+
9lKOG2D6wQjNfYj96c5hnSP9zO7i0TrUf1cxTg/5UA15Ip8riJ8oyU8kJp+L
1f//v5vR/wH7b88c
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          
          7.6718816067653295`]& ], {2.5098469626739015`, 4.134340888021703}, \
{0, 1}], LineBox[CompressedData["
1:eJwVlQtUjGkYx9+ki0p3SaFhQmU3opLpMp/aGJRIdBGGLlqRiXRXg3SqbUly
6QifSrlkVbQVypCY5DLbFpPd7Cik3EYUodr/2zmd5/y+532f5//83/f7ZsrG
bb5howghqfinkUhH8DeeIQoa9RgSXFDX8gflQeLwXZchGT/d1hKAmUO7JxmD
a/YoIx+aMIQ0Wqv5jWWIVRH/qCeY06YSdUuHIew7B0XFOOxPW1ETCk6+Ps7M
FExC0rpcwQV83vpdxshXfd28DPzafXbbKyPs37+ayQPLKrxEgWD2VEWXFuoH
pKTXthsyRJgcdOwC2PK0W34k5Ya+y1uhJ7s63NoQzNnKHb0I+mXPLQ4+MgD7
TOOa6KO/bvKbYrBE9ldbBjh7QiYvF0xuvK3oBxd3uGw6QvMtrUb+iPKN7ssu
IYr7TjwrRTROMGhvRyxP1avpQhQ62Eyl/Ri/KmcNxJgNzYUrEZVFZVP1EUWm
OhH5VN/MoHVDWP/CudfrGViRJ7OkugrCzzhOwnyKB6vep4O3yAuXrwDPDrUM
nQFunT7RM5Yyd+6CK9AXfGlkWwY455No+hxwxOGLY/aBJe5vpV6Y13T+8UWb
KV/3SfwZfoz2Wxs9D0yafBlD+PWjh9PzlvZPCr+nDn9FjbYzsqk+y9F6JtoM
0Um9eHY8ze9UbV6shfWaW1qoP8JrPnrnxzDE76R2kwr1cx6v0wW8fCCY+RU6
SOXNr2pg/diAjALoEBro/qYOzhjS/BYJHQofi4WuNL/Ns3sJdEhsAtaUgGVz
b1xwhw6iY3vRGf2k3tmpa6BDseSjST/42N9/mhQgkqMb70vx3OlDvu8YsLCn
8v4F7JO2n9GkdcTJpSG5qKsvt3q+HSz5vb9ShL64ID5RNJ+Z6eoMXUqesjgP
LOT4R3WDI3qP8RRgjpe7liPmeM3TqaJzL49hu4Vgaer3QCllDZvKaHB55bVY
X+gQrqsdDgcLOFotHWCxZ0MxA5ZbDXGF0CUsCRXT90ffrmj/IzBz4K7AGywv
azLgQqdwUt3uaOhzsjj52ZfyHs2+GERBxApOIOU06+cbsC/jcd4mOzDxl5z0
QB/Tw2er2/FccaB1aBp0sV9qZ/vS98zA+J4x5jB9FW15AuuIMszVXBM+vLj1
rR7rJB3WyR4a8LPPfrgO68ht28lH1OFHz1jDQqxjFzxumgB2yqtdFYN1bLHa
qxY1hpwNrqh1w3OyJiG8ARwx6WGWNqJ41NMrvYjxtusHX6hivgS22hPr4u0O
nW4dBf0T4gceghmLS2ZdKqh3e8fTFNQVHeDnjgeLD3I1vNBXv7kzLo4gfy1G
OhO62KZ0V3Uwk7wixxC6Z2/WXpc1wsf9c035DBZb9TWGUz5V09tIfVd2Zx2n
bDXyIYn6NWLpokfrzXzTowPfODnzOkVgSb1htwgsP+8Q2EvrhwyqFYLjzR1n
boceZqXu1QKw6Wr5/GGqz9qnfz04I3jQPg3zSD6W2L+jPodUGn2j812PjxKA
v7aYZK2m8ydOfREHPeWXvWIPghU2+fK99Hw2jPCLwcI7ibNi6fncbZ6WRXmH
+mAg5lfYm+5kwKR6qZIHf6Q37py7g/qs596PlvAvINIrZjJYHKOI4sLvYz+6
ziylfh5y6WVGM0TzSYOqH+bhkMaEdNp3hlQ9ZZhPOK0r137HPuVcxUubH3xC
6v3PFYNJqYx7axB+5c7R3kfnCgpzDfjCJ4pZzecKaN/FVddV+sEmt7k9NJ+v
LWjp4xOmLfJCGK1vt/jaP0rUs7Dga6M/O/9MWdB7PmGXpX+XgTkuS4xL3oC9
Xu8tU6Pf8cz2cz1YX9SUlIt5hJXyK1tfo16Bh04c5uUMlOYou6FXZSBqGb2H
lc5HrJAnJfbxY+l7/NX+tCr2c9aYm9HvD5uQaBzRCz6Y/tQc/nLK6tUd34KN
Mh2Dqd9r/6sRQA/ntOx9OLhcsGuqC/Qq2hPm8+h3Y7tbrfdH5BO1nzym70Fn
x/1fMB9rWDSGAYtikhjdT1jfdjUqiZ4Pu0M3HywuFNTlaNB7M13/Cc1f5EVm
0vvtYVxcR3lsnJsI88paK2wWgtnmHQ+XUz+2OPhFob5Yf84PR/jHptxzdkJ/
Zoo83Bb+KroenfD7gPwz764F9FzrZaon4R9hJw4l4lwJKT8fAX8k9x/oNOCe
S8ztQh53Ik/mxQ/gnMX+R3eb/YvnD+zVjlI+HFwV2YK8d2NSCeUMUvfyJvql
8PZPGaH7aMk6IqG/7yP8/wF8ftdF
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], {3.4901530373260985`, 2.134340888021704}, \
{0, 1}], LineBox[CompressedData["
1:eJxFlQswVXkcx49Ueogrj3Mf7Hql3OMIRXlc/bym8o6yw46Iaa0UN1HohZRt
PfIqsUY3u2s3iSuU1AqhsPIItSuKaupyQ5TXVnf/Z7b575k5c+Yz55z/7///
Pb5fnaAIr72LCIKIRTfz/O9iw1kZc+kBUb+iOCePhDKFzvlRG30gJoNdhc4k
KPTCMmEi4njxkSwNEoKD0lT4DxGbzL7JI0gQ3nApD9ZaA4ToSU3RchJcyMLN
VgcQa8d93GRKgn3CcY17tYg956/5RpOgaVF7wlTeAIjn4ykXekgg3ipeW3Bg
WOXyZkc2GKSZNc/EIRb9tCGxiQ3p+pFVx4oRC1sV5lw54Lnl9ZUjzYhZGRur
+zkw36/Lin6MWDzp1uTHBfuAEe+Sp4jhYnBsDxeqbdroqT7E9bNbH2ziwQg9
ktXQxMTzbso6zQNuXPiA2lVmveGW0Zs88BEL1HxSGD6/welPHhg2iFoE3yPu
krXkN/DgZPq5tnJHZj3boOiLPLD8I0pyXg9xoI2axIsHrWs3baxVYN6bW8W+
50Jm1fRU0TQ6f3zD6rEELhTKORGREsQsH6VlclxwzB03bx1FPJm84BXDgTCV
ZI/qOYbtOyvH2ZDvE7lTpMqsn7r7qzA28H7ZY+lqjTjjTujm9ySwfg+X9YUj
Jqjf5DNQfrU0DRtKmXxlszIcSKguy3+3YhqxSXxI7WoSIldquztuWYvyRW1Z
kGnAiltLQyvSEQuTVtsrkrA+x022fwixKEJ+2oKEmOsX+tOodWi/kuGXx0mw
KDr1neshxISqauIgCbrqlR0GlYjjl0588GRD0bZ2kJMgFlkLwnrYMDLV5mGn
aoi+Hyj+5lsOzJS/Eo2YIK6vcu96yYEePbZ6kh1ik+htL0K4sPvzQul+J8TP
h0PfDXJBabnJRLIAMfwslbfjQa2JSOZLIe6KSuOk8sA3hLtIykI8+cgh5DYP
1qR6tFRMovgZdW5nUf2eVFSo7OtA3HVTvaiOBy2PWTr/XEGs3R28N4sHKeyj
Rm5nEddrb1d25oHBwOlu/XDEwg9WWyVccLkcvl3mx/z/9aPJKC74JQRbTu1A
HDicK53iQIKu9E7GTsTi9I/toRwo6eIqPA5mvrc9eOw5G4K8thRpxSOeFLe/
9WfDGbuUaTUmvnDiXM0bEnpaPAWtg0z+uJcfnCFhyL1UWqbJ5IcoYQlIEFjJ
5dwIZvKTremsTEJVtVlGiBixMGFxM6qf7Swzv/+/93TtiLjowcf/37//OWx7
AR+vX3jJW3XHCz6Ob2Zd3mihS+H9naiPUhzzofD+OQX1/iMnKXw+P9NXc+sK
KHz+U89UHSKuUjg/JfEFLavKKJy/msDMG8SvFM7vkEGc8UAmhfMfK0l6dP0w
hetjy58YWszE/1I/I0/38fNmFK7vULTY0l2ZwvUvyX/1SXWCj/vDuTuAKO7l
4/6ZmetkxTTycX8Vyy/xzq7l4/4zG3o9erSOj/tTyYsboNXJx/2rq2wurpPy
cX8H3dp497MGhft/WOpq9pcrheejI+BYXmUqhecnxSPUMLKXwvPVd+A6ka1j
hOfvoPn8BfeDRng+s2aeVdyuN8Lz6+69V+mDIo3nO7D7Rb+tN43nf9o3k+Bn
0lgfJP6FLZVNNNaPkdy0qwFSGutL3mSM2FnBGOtP/T6VNgt1Y6xPQ9JaWZqG
MdavQ26Kq/wVjbG+Wf/9oN1pjsb652CaorHvKY31MemQ0NzzNo31cwACLBtz
aayvZTsax65E0Vh/R5Mz9cd20lifdXq1Dtha01i/PZrNe1bxaazvjUVapbv0
aKz/K6nBiR/X0dgfqhrZPj9Y0dg/Dg+muZzypbG/DEV1WC0/TWP/Waw+7bXk
Do396U27U8LDjzT2r8b4RImNkzH2t5rRPfebs4yx/+W4VHkWjBhjfxRdihzv
M12P/fMTfXf23PH12F93LZgsVb+H+Iv/CuSYpwn8Cycd/cc=
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], {5.0548, 13.}, {1, 0}], 
       LineBox[CompressedData["
1:eJw9lQs0VHkcx28oKSFl7sxc87ijLbF1WJSQ/SWO8ighpZKJJGRDo03U8eql
FKO8t/HopDZaGz02QgzabKUpNoWo6eERI6SHx/5nd8//nnPPPZ9z//d//7/X
90v77XUPUCEIIgrdyud/FxMMJqfQpQ1EzayLZ7NI2KZ9frglSgcIhb9LmBMJ
WpfidLrU5gIRW/qzmEFCg5Rt4JmL2GTsfRZBQteejO2NVrpA5D27VaBBQvpS
m3DRc8T8g+PLTUlIVPn2/dHIeUC4fSnxjiRh+R7RhN+M+UB0DZxMl5Ew1cba
MnpMyXPzLe2Z4MwOSPowijgvxyxeygRqrXz3Fxc9IML+VP/swgLJ4Yceg0mI
dVLMr7ey4GOJA7/3KuJShat0CxsSqqRFnn8ghkz/KBkbgqPObpVfQVwz5nhv
OQX1W6XfJZxA3OUhFR+hwHyk/cZiL+V+3Q29NykoFkYbFjOUfM7M4S8K3ONX
JUc3o/M0TzVk36VgUp93zvcE4hpbv8hMCsIP9siMHRELbeb3uFMgXv/TbpG2
8r2FVdQIGwRB7944vEPxx97V7Ytjw0rVJEIuQ6zjpTVzGhuOL+0IEbcgVhz7
6n6ABa0CLUnwkJLtHpUNMMGsRH4JFin3P7WdG8KEZWvqIjL3I06pDLIcIYF2
65i80oGYMC5STUH5tbJ0j/dW5itNJ2U1CcE+Fq/13iI2iQ28rUuCnAG5xw8z
UL6Mf/w6xQC9iDkyPw6J1ifq2mmS4GOYM9lWiThvr+rwMhKGdi4poTYx0Xl7
uuWHSNhjr/4g8y1iYt68+A4S7I125bjuYqH4ZgyOujHBPjU9TkWGOM96ZYiM
CXVvzkniF7LR+hcXN21lQb9v06r6HYhrytc1y1lQ6GhiNDMBsUnkmteBbKgc
H/VuS0Lc1R001MEGfV1hp3Y0YijsV11FgWgHTJV5IW4WJbNOUVD20FztGY1Y
8WR1YAUFzkzJKf9u9P+UKtcTqH6l/v4GT7MRN9/UK6ii4ORvtN0nD8T8x/4B
YgoYpp82Z+siruGv1XaiwOXG7MK17Si+sFErxx42pNt1iCevI27mPVGI2FCu
0hghL0Qs7M7o/8gCFYdnUfRlxKWnx5uCWOCRb6F1tVG53jY8posJ9RcO21sT
aH9FadMHHybMTmC8W+yOOGzwzK33JFxIzj8orlDmj51/7ygJFb9sbvNZocwP
8avOShKiRCqGoY3K/KTpO2mTsDskgP9ISKHv49TqUf1iBpTzS+H3kszslyYS
ffz96TMTf4stOXh/mx+LFhY0cPD//fdvPxJqz8XnG4/tYbaWcPH5zSzjKqRT
XBxfud/9oQ2WPBz/9OpFRzu9eDg/HtNWJFPbeDh/4XcFodOceDi/la4j224Y
8HD+h2QaRQEfuLg+MZ6ddzSKubh+m/Jy240DuLi+d/qE+3K5XFz/jRZN3xZ1
cnB/pBVUEy6XObh/+oYktCKRg/vLRX3WxYWRHNx/OysftYzFcHB/6l8wr7I6
z8H9a88NFh5q4+D+rosIOjyxhIv7v64ta+e1LC6ej5zqzz8Esnh4fhgSmbv8
Eg/PV0voNSKN5uP5C7f4kr4unI/nU/zp5e8VNXw8v+s8ArRGNWk838LHr1tt
PWg8/8PeqYRRKo31ocfnfEOZlMb68Soj+YpvP431JUtxoNRJXYD1pyZ47v1l
egKsT539t6eSGQKsX/tcNef4aAqwvlk/v9fk8JnG+rfa9CQjuJ3G+pi4L8zC
rYLG+vkCfFfUZtBYX69uqO27LKKx/vYeS13Q50ljfaafckJtrWms3+vrLWRz
jGis77UFnOKNBjTW/9nGHYNJhjT2h/JaptdxKxr7x/6OZOcEbxr7S6fogZXG
ERr7j5resPv0Shr70/smh7iH4zT2r9rY+B4bBwH2t1u9OxrrxQLsf2edy91y
XwmwP+ZJIgZaTA2wf04sqR47c8gA++vGryYz9OoQ/++/0f+a8QL4B5YP+SA=

        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 7.6718816067653295`]& 
         ], {5.0548, 7.}, {1, 0}], 
       {PointSize[0.04], PointBox[{6., 16.}], PointBox[{6., 10.}], 
        PointBox[{6., 4.}]}, InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox[
            RowBox[{"C1", " ", "N13", " ", "T13"}],
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->6.137505285412264],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          6.137505285412264]& ], {10., -0.5}, {0, -1}]},
      AspectRatio->1,
      PlotRange->{{-1, 21}, {-1, 21}}], {0, 0}, {0, 0}, {22, 22}], InsetBox[
     GraphicsBox[
      {Thickness[0.005], LineBox[CompressedData["
1:eJwl13k41NsfB/BvQtlqkoqkLCVFkSsUmsFEKWsTuinK0iT7mq2mEEmUrBeR
hESIK5StIlu4JUsISSlbSTv5vc/z6488r+ecz1k+53uWkTruambPRVHU0gUU
Rf4yhPEfJc+gZufn589uY9RIpD/lq93MoBQO6riytzE4qsGjHv5wijntkDnK
YyS9TmyFmbFt/xhsY1CnEwpZA5vwV0esfjdce2pVSzSssGlSbA/i7ZbctNOB
G+7WnTWFp3xeJf+UY1Aq8smRx7YxGBnyQmX3YdrEeKgvyqVfyuSfgRlK7o4x
6G+dvwGPCXx6RPRPIeqfO3ipVQHuzmvv/g/9+Uxtj1oBa6Yb+35B/Z9FOTv5
STm3vKGIMoOjXl2vQfyw17xLWZlBHecV8RCBZ3ap3jVUZtQYb5FmboQja23j
bVE/ITy/iAGX2ZyM9lRmMKRSQ08dhdm6ZQOBiLeNlJkKgll2phJnUd669FZm
ClxSf1/ZH/EB2+vnyHzWb/5s7YLyJG127DO4j3lRzQrl7z136PfCNgoPEphw
VN7GAwOk/yjhdDk4UcyF3Q1nXqQy+RD/0kKnog5ec4Rb/APyYxxmvzibzE9q
Q3QD3JkkmxFI+nt9OeI25p/nUnRcn4wnb2PoZeSLx7QzazHs1i70whvlKdGP
NR9tZFAiLvmxtohn23ga+cAz/xrdtkD5bFWb/kY4zy8n0wzxoy615V2yaO/5
r6csuGFPiEYEbGe6cP4I4gXqC/ZpwwzpqUFnxDvtd1Ce38Cgxrvp/wbD/J+X
vquDP1myA68j3qvj3Zd4eH1fxe+HiP/t7OzsCae7ibX0ozxBPq/3MBxuXO44
j/WdudCqbgI75Svtk0R+brqf+mQMK2l//7AL61eu6P3uENznGvj6EPI1sCco
xAm+IvR7zBVWK8xvCYVny7VpHKwffX+s+00Sb1odfRH2j8n8/Ij0F6f75xIs
9Er23yF4MFaAGYb4ReJKW+bIeEP6rwfAF5OVpoUx3+4O2bSTqE8bzRuUhFvG
dkmZYXzee5qUN8DUxFpdVdQ3zwmKWwtzjvBZrEL9lHZrdUH4ykzNi2+Yb0T6
ya4JtC8oLaDbCRddkql6TMajYqx4H7Z/LvUkCs4r2rIsmazf9Dcdko+a3jEt
5JeRM7+clx+ODQ7tcoMr91psr1qPfuJlqu2Q3zmfvRqu8GJmUoQ14uf5tHLW
wW4n7YOw/6je4tvLn8swqMLxS6GOsPFK5blwOKTISdMf7TFi6u/qwW7rosai
0d5TTwMpIVjlo1RcLtr7fYNrpF+aQVlqvZ7H98hoDHu/pAIOSU2tw/dac/pA
uXwGXJi90k4A+RlKdtsRD4v0DBspwPHHDmXHkfpvF3Ltw3qy0jqt0uCW0K/L
HVBuKxtUXwQzz8brYf9xbreOjjbBV7Rn4yJJ/tscT4/C4V9imfHwHVOfmUUY
nxcf9TYR9aV6gutkYVabyt+xKOd9wmulA4s6lr8Jx/oYnVtobEnqt/YK+KJ/
y7M9px1gqw6hQmuUr9f4QDsF590pHtNFOV3lbY0d3Gf3eukGOHttQ4kZXMN9
NYYb/e3aXJ+pAl/5s29uGPM/kZvWzQ9Lxha8eoL8Snsar+/EeO3CaJk5KG8x
2vg6Ae5Q6y24gvxu1OxqNZUm52WC1BnUN+WVWMMLPyww7HNH/czW1Yr3pTDv
4DFfJ9SPNw9LOAHvV9+60wXlO5JoE2Jw4Dab5ThPGUe4rQvbJdHfe5G0C2jP
RUBhSxTcva5HLgXO//7fURb8MDitpBSOXJPavR6ueRnC/xK2Cvt5j4JzVlnX
fYUFZh7Mtq9DPi6ftF1F1s9K0q8MfmuuZ6kOp3esry2F95w8s84CXuvtndsI
K41kGHkg/1Zqe0UmYaa8Whbyz9nOf5yXhvaVCpIkk5DPnf6CnC1we+COPxnI
/0fZlO/7YdHbF1pvoT7TsPrlKbjlm7L3DXiZomFEGMz6FSxP1n8oajg3FVb4
kRUUgvh689qlebCcrSzTGe3bCFyYKIQtaW1JpoiPuZ7xMRfuexTUqky+P+8A
xSSYkelhIYz2dHL93QKIu0cqPyO/2l1Jn01JPnflRz5HfsVT1IMlSL4yW7VI
/krsmj5VYX4KN1/J4bzjGBxbsfUv+BP3sMcllOudD+ZJWYv5nG6hcN9SIrnn
9P5IYL1WpDn5wYG9O5daw25hB/9g/3EEzztFP16D8+sZJwf7nXJmsZuU4L62
0cXXUN5zYdPhO+K4H9WknfE9cRxlDbTU4PbHb149gndNO6Z2rcZ+dS8UH0J8
QaJecRQ8+si6eQHZH4e3Zx+BH74rZstgvmsnrEKYcN+3QyfI/aRbr6SuA3t5
sXXI/dj6VD+NBbNmQqPOwPnfx6+fhi3lXvPHIV6KtsMgF9asXF2I9aL6dH7S
RmBJnfyHBai/YkD5mwzGx7LpqrwHK06VNR+Da6J44u7CmhWCbknww4OafjcR
f6E+S6AeTlwdNnMVfiPxzGAYFlkV1k/u2yMXmVcnYMHjrobYrxyXfzw3vIEV
kkdiGPAFsRmTarjkg600uT+ULYS8Q2Cbts4Qcr9UTEgJK8Mpnnq7B+FP6vdr
GzHet2ccXj+G+XqtZIxgxqvRnDvw3jiLykdiGG+iQ3Mi/GZ/6HN5uN02TSGS
3GfK7opRogxKvauYTfabStuPT5OrEJ/S2xhG9usbRf0DcJnzJBP7nVpBP6pW
sxL7yeuDXxr8KGTOeidcUutYVoL6s0UhtXUrMB/9iUVtKB9qj4uyh0NeHf9r
AuV1to08a+An5290CWF+f08NmH8UwT5L/O6pSPJ9ICm2HX5yUTLQBNbY9ar4
GeyU99gR9yOn/4tc4gBsJ57+IgJ2UBxTWIj2SqIjvbC/qJFO1QgVOF2OwyTr
Za8YJOMKs5I/nX2Icg/h4bl8uEViuqga5UHbK8fGYLZEXvkD2DrDsUkG88lJ
G2ouhPm171SbwBwqwC0N8dUJ8Z4u8EO3rYE4D6hN42eYfrDghxhe7FeOEeug
BynXFBY5YgSbMMPp++GaseNftsCq/i94hEm+FkqYYf7UypFFu2rQ/6yHH/ck
8jV32dnfEra52BmK9yLn460FrH7Ml53ArVQOf5123WcGX/GXks8i++vpjrQH
y7Feb+usk+DlFn9E18J2NzY5Yb9RWfd1Os4IY/7lNSmxiD/Tb79geBnea+W3
R8l5+ubzP9nGsEj/qml8LxwTsXZ2Iw37YFUJfy2sX2BiwKKR86xGoxf1Jw97
8L1fiu+7N9X0J1yt/q3CDLbcKftRDPOR9/VbNbmEQZmEq4ZqwNZ9BQfKYeZQ
cjzek5Ru6V72PXim7Goi3ifUNhuNzS9hzpNpiQT47UxMoDjaqwnUHc6HkyzC
koLgwcKm/ir4VqW56zRMG164pxEuuGnMq47xjT/vzG1Bfntmrgr4wOnyssMN
8F3JCpm78OychwyJl+7uce+FB33Ofc6D5xyHk37CTtOrJcl5THOomuFGPvom
1eqwX6m9e8cf/EI5zXDRFjL+JxPFm3tIPmqdmzA/zvxbvWtpJD62dIM47OQ6
7GBEI+vDbPqN/HxpkDrWivGKqEqoDMCaw2yeHsy3L0ahqh4OqrxX+FgI+6VM
OKYYZqWpdsULwmz6P2R9vzrp8VoJ4L40oHzTyXoFb/CQ4Md+WsvjewPW+rws
cGQxvj/L4mt4T1NmMn+pVi3CeJd4u5eR9Y/eOVbIi/11dd72GXzthHlBHQ/W
J/ioz3uYU5Q1zwWztWx9eDA/rdZSL2du1G+Z4pKFIzhJlxbBV1I8UvTJemxW
Df9vIe7/tmelbPjXCTmPRlhFt6MZ70/q4KGDCmNw+OGzzuQ8THy9OksJ8epC
3BYV5LxNbZaJgWmivwOaYfP3Ism86D/T571IJ2yZ+mdtCDzjGZrTA8c5B5hT
GL/gbs9lpNw1jOuHGyySNHWWxL/415XZAg/uT/Il7ff3uwbwYf4mkvsaSf8S
hoJMKVilyuoi2a9KVV7cS2C2eyWXI+mPObWexKdzzmfvhe9HP9v5Ny/5fXZj
Hr9vqOABO7FyjMfy6a14/L6hzg1pNIxh/Iyv6h/GkT/m4NDR75hvw3nrAx3k
/ORINLzhwvv1yA4K+4fKvrTHtXQB3ruHBfrI+kq9Le4NoHBv3lK7mE/2Ezsy
yP8PnWpffNvyLiz8ymiGb5ZOXRkX0CP3s9Uvln7FTzqlyc/1g7zHZJVCxK5/
p1OJwUZPeuBS5d1ZdV/plKBLw338nqQWO0TMa83QqcGnJTeWKZPfRdnutC90
SkGckia/J1e+1BXRmaZTex7klx8g+beKvfziM50qkyvr84I1rQr4a+G8r5Hc
5P3ptt/MmQv1WUb6j3AfUlTgdN4lePGxtrZ6uHvssoMh2h+UFl7XDY9rhcRu
R/+M0uR3b+C7WsP2Shjfj+9zue/gkHVr5Dd9o1PcP2KYw7Cjr6ihAObTnWw+
ROKXnNms+xgePFDL1UDOA57jgfQfmD+n0reIfI9x9tvcYZGb82Zkv24V5V1h
CJfdUnmN9zDF6DPubUa8knZaBN5zlIpH45WP6I+5u29AlbRv0FyZi/EoxSWf
JL9vJit2s4Qx3vDtcrd+IX/8Ds1secyPKZ4yRd4fTUsVKhZ+olOiHrHerbCg
/enVlmN0qmPjpg1kffPMRxpc3tGpnOC2jAryPrJx3eE1RKcC7+VpP4BzTvCN
yvTQKXXRknm8byjqoLRfbRudevJfNTnf8W7trMuqpFMz2hny70g5+WdT+f+/
yoz/AeY0ev0=
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], {6.692631926209686, 16.805862007661514`}, \
{0, 1}], LineBox[CompressedData["
1:eJwl1gs4lPkeB/A3sZFabSpCNbmOW42oMyrm3W4mSTMdLApTYUchnRXTJkbY
VJR0WY0u5LCO67CUS7WTSuVQEynabBMrU6kGYUpyvv/OPI9nno////3d3t/z
sHD77s0hGhRFXcIP+abUE/gY05Q2gTlNpeZ2XdwFF1pHXx8ygyMLRtuMaIq3
2OI4se+WM00uMPNxn2oCprm3/ls6l6bUh/mdhng+y6d5JxPWdrWpdoGpBP+8
CkOakjVXRUbAUSt/e+gB0wsO7yuAO6wb0j8b0BQ7Pr7nJSwdX3G8Ae6Y+zbM
zgL3i0IkF2HD3YGZ0bA0bSD2JKyouXD7Klz4jD96DvatmhKuYYk4c+rGamHp
lQc6q+GMWqeTfbBYg+kfBwty5HNMkb9jnYawBGb2pGwOge8a7s57CKdaz/+9
BM4yLxl8DdOPbERDsC+DeX2UnIf39Tmhv9SIjyPE9KTWg+Gw4XuxQT/Jn9ro
dIZ4wZL57bD6fEpiGSxzrz1YBftq3yiqhHnrRyzSYIWe3v0cOEf4s0sgTI0d
+BhLzj3CVtjDdw36lrLhjNGbv4+hX8OYjF+6UY866Xu6mfT/lvGXCBb2K3fk
wuykQJ0v6JdpcGn3Abgj90LGXjj1ySvhdli+bumJnjnI53ttiA9z7x7K8IAz
PMrojTAzpdS9ejb6kvdMeJHnpbXxprDI5IxfGIyB1WXNwvt1/qH/MKz8KLMx
gXn/WvGwmtyvrg+T6tMUa3ZV/puvz+dv8YW5RVKJNfrhWlhPnwPPWL0tNQLO
2RVy/vVMzKf1hlY1LO0rd3gMM1a9PTgOR3l/GXoCqyWGIWusaKomUtfkHSwv
0DQ7BCviH2qQeIY/lgtuWpH5p3A8YLGBgc4oPKOzvTkNjsocDmYwEbfxkVMb
rNKPs3eFs/LKbxihfuWXVZJNsPLFvIpAOCu/PcwLlnX4CCWw9Hnc3x7EnB8K
7sGiMetOZ1jRx69Uwur8vFMmML2On/xhFtkL77YR5KfKPF++hgXlfmVNsMDT
J60JVp08nSyBpRKp6UlYxm5VCOGcgBj+WlgY+DmATfqZJ6zuRr2i29IjujAj
2ud+BKm/27Plb8xHW/G05xXmoTzRsL6RzMvpyAt/WMEya6qAWTZWdre/Qz1l
VsWFZH9nFu6xh32Xrm0phpXxxjFZM9DvYuOj9ZZk7yXPp8Iyr9PVT8h+l49/
M1MPcfXfnZ6A5ZkLIu2/xXw37x92IP1877IhcjqZi8omgryP5tYtndPwe1aS
XTlxSUTGHlhk41AwDMtsM/v/Qc6v2eqT+Qu4JfttYd66LZ0pcIZb8pb1sHLe
vZAmWC6/+WcacUA9V8caXrik4j25v3UTj4ajUmKW70T+mvionAhY0BfVNgRz
31jcOQ5nSM46JqHewlN+zfmwirOt7VvST3r4ynJYOtnVKx2ucbWwL4Flh0Ze
DsPM6zdWnid26/NmYB7iAPbRJBLfwTXZEfadqioVwIa356sdYG5ozIVl5H5A
3HQjuMNe9e8pJJ9E3/oxyWe5mPMY/fDGoyvdYUbcAa18WLpXjz6F+makuB2L
If3XOrOukH78O/kbyXnFpEO1ZF5DwcdtyX4lJpZc0kX8fbFO+uQ8QsNk/1Ts
y9zXd7RgcVPQFA8d5Nnr5KcJs3rPDc7XRj+mT6L1mKSekQ3j32CvWrbOtyLz
X6LQVGnhPNdR7k72OYXPmtDE92FB4j5y/1xmkQNcONEirSD5/dbfT5uMOkvr
9g6QfJWfnWfBavdTp0j/lH564T0N7HGR/6/xZP7F/L9KYOUBsbKRvK/KwuJ6
WNvU/P00G5w3dGkOwnJ2uK0nzLIULHJHPHFQKz8VjhoIHrsKM4yWBNfC4jw3
k1WoJ0t85M5zWL6Ht08OszxTvD8Re1BnAtGP0FIzTNsW8bcWqLthysK2VwcW
LHp0wgv9Rw1mL5sg8drcFhTD4v42z1eknimzf3kOC3uen71H6pm0jNEPM+ra
3+WSehjLPjXDqc7X9kfDqkbvLwlw1rqbpathOpunqwVr29XPmUme57YMB2iR
v3N6/G4yD5fQ6GOk/qLNPZfJPCLNR7NJf2dLzDNh8VKL8HTMg3J0M4sh++k4
OLRzEuJVPUsPJt5xK9WFQp6VPrmBMH1mmD3vC4dSd681DoEZSS+3PxjjUMpH
DxxEZF//49ub95FDsd/7n/iV7Od914vFoxyq0NhU0EDyTTjSw8McakZwgtso
rHiqW5j2gUPJjI4edCL9zDMO+XmIQ6kcdw/EwjklDT43BzlUzdFs1h/Ed5eL
hHBUbFflFMyXonraQ7+eu3R5wrL4I6VXYNWin8wy4Zz+jTU8xFNwr5g9gBm1
LyTmyKfe1CibbIfzP/fHmqEeUdcwexGs8F+YvWKEQ919tc15I8woG3D1R/2y
A4L+IHL/PMs7XA0vv6ARClNWPL8g9CvwF18m57SLiZHpJw6lzfntHnleoNi5
Nx8urCuJcyDxk/njz2DpLFHiNBJv8eOEP+As5VWlgtT3T69dbrDiSqRuBaww
8tT9CfGzli7Yk0D6U32XvQb5udpBVaRfhehH+wbUyzvuGbqQ9Fu6Yecw+jNk
nR78iHlRlukWbzAPduhA8lNY0HurtVLFocQxBwdukX3sXVNb34963t/PqSP3
x2Nbxvs4FMt7u/gqLHs7PnlzD4dKZRapm8j5hxt76ruQ3zpR2UueL015dKgd
/SWfLZhG3kdQsPJYM4fKEF3WdiWe6ybcKuNQ9I7QKNHX9xWrYVzMoeT6lc9q
vxqfnGv//3/Qjv4fanPBjg==
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], \
{3.3357846455469073`, 11.259023129707089`}, {1, 1}], LineBox[CompressedData["
1:eJwl2HlcTOsfB/CjhZHSUG7TpknRSKWSayLNCEmFaSNXMiR1LdXvlhRxh9JC
ZRI1SUxlmUsxSEZEthQhCUnRRqOSpGW6Rb/P8/v1z/R+Pdv3+z3POXOeMd4U
6hmoRFHU3DEURT6pkVH8mXPJv5TAhksdG2NX2gIHp7uv8YMV1Xv6b8Lqu6Vz
FsDU23dx8XBy0PfHhnD1wa13l8N1M38YqMLMvm2bVGG/wYlje625VET0GcGt
mVzKoPmRzidYJVB1Wwjc4DMv9wPM9k/LYMKi8LMSYn51gaCWhfZwq8422PsY
PT0ZrvO487EHLhuXTXODZRE6pWOwnsp7m9pJsIXHpQO/kXi2vDjUYsalbuv2
KVvBYcKrHndgbYu0fme4KSn65Vk4jvHv8AY4xktmlQVXdZSU7IIZ5v40Edy1
sao1meRbMLwnFz7Dd3Y+BRftvDm7CB5hPHl/AZaNpm58DtO+qddegdUPTRz+
CqtYKJ26akPGtUvoiE/4p0N3AVw7OqV/Dlzd5XhfDAfvyt7kA7PysvipsLZB
XNJfcNy+5z6RsLWKkm0S7G1nErIW3qy0dUcmXPTgTAGbrJcwdDEb7lG+z5kC
130MfX6MzB/4M5zUq2hhke0BWFrkdvYpXCsZKgmAfdMezpaQ68Ggv7CHVaZ4
8BNg5olXa1RJfW1Ut2yFT7Z1FT1GPvTOiiWeMK9sdeEBuOlReyUHTuxYvY4N
c0PGxc6Bw1ZVaXfO4FKCvZ03LGFZZyMvB2bL3IOsYPn0OckecHVwu/NcWNrQ
baEGV/1eVr4IHhmRBFVOxzond+t4wZR25ow02H1v9Jxg2EE0/GMTzP2+qeNv
4vTncg4sDzrYLYKDL20Ss2CxWULrFZJ/WJqNIRycV7KjEn7IuWVJnNixdRHZ
bxGzzp01g2v7w22+wS5JKnYLYAffAw7DsN0HC43VsK9noIjst9u2nlqRsHbV
jxLiHv+13SK4bSaTT/pHWXBm3Ia35wwkd8Pabp8dG+G4ZZuPvIe3m2vXDsHV
BZX/3if7P3tjkSbyd9D4O/csWb/825ABLD+SfjgOrqOeGjFhA/7sTj5s4aWm
xYD5UfqaDmT+yA5HFVLPW2O9dUh9Y9elt2F+VqifuXw2rofDjYM3YWmJ+fzz
cMSxzAlxMKOkzzIEjsofJ1wKM/V8lDmwxd3E1lFT1P9Khos+HDx62uw6LFtj
MUEFZtXUFAfBYbtqnw5ZYT/uM1bTg5nG3VEjsPimec5zE9yn2ZzQCejfF2Zb
kwCLLk/fPx1+SF/2dhmceLZeeTlxzbUUOkxjc1rCYWlcbUTrNNQh26MoH1YZ
b591D+aNd61/DTeYvEm8CMsypjxTJvVcUuGeC4flORjpw3Fzu4Pz4Lhv/idm
w6ZDG5oLYbvl3Clc8nwxjVt6Hx6ZeyPdDY7pdS5rhGvrHnp4kPbTty1+wb4z
7Kp4cFeLs5Ux4vPduqF8OanvN0u3JTBrznv3/9W/YD8tEDYQy4tY5HnlP37s
fljGuy7ShDcvGaebAUtcZuS2Iv4zaXmb80i+NvIaMTxyqS3kDMwtNrddC4tH
/WyyYXpIKV8TLtt42TQeFiQY6ZaT+tYfcibrsWMfaArgqK6HuvawdURGLQcu
sBSJlWCF4bTicbBDo7PHA5LP4iPn31ni+X48V3UvLLAoNL8Bm7bO+mwD040H
HHNhP/UnHm3GyC+Qt1oEJ/LVHmTAjAw13klYvmZekRvcNOy2uwBu27YjVpX0
F8mzHsMGTt/WlDMR1zmuohO+faptvBBmaR+J1EE8SyyPa2yG6XOfnV0GF72m
BSyGeb5TW6Jh5rVHh6xggUlq2EVYOtVcMB1u+rsm5x3cZJR30wx2yShuGIP6
SAqvW9nBCk5dizHsHXUxYDlZ3yfi/jyY4bBwdyAsjDSinGD1f3Kd4+Gw+sh8
st/b7EaD/oHZGzScrOGKSruAKljeo6uiTcYPPLnTReLLu5rXifW99V9NpZH8
N0o2yEj9K3dvMIB7Wv0H98DWLWaFZrBgHDeFDcvvaWSxYKb0XHoP6hHh6jVz
KuxixJOeI/WL12obB0tUDp1aD2/Pvl37idSLvoPOIO2WwsMyku/pfcI6C+wb
qavOfph2RTMwF1b/lz3EhUVV2ZERsFTjIKvPCPk9dZnvBffYr5q9HhaOROc6
wsz15VX3pmJ/ts3WnAcLnJIVM2BGTIGXA2k/OZCfZojnLiPl0gpYFLLhwFi4
Z6XT2z9h3ySb2iQDPBd84iccgeX/UZ1nBHOvWJncIvF1fYmp1CffD9GSTlg8
My/5EPHs8h+GyKf6iqN7AEyL37N8FSz0HZPpBdPDXiliYGbsT8c/YMqRtfsM
TJ+wSW8nLL4UfvgBTH16o58Lh6mXLq+Dw9waIuph3yBf52aYWygpM0A8PS/G
ZTbCjFn5cwNg3tTlTVWw4OeK9xLYd53f2sswT8/pvpy0J72uPEjWG3m0YCrJ
3+y1wAP2TU2ZuBQOtnZ11ib9lTzOrYUlMa3O1ciPrjXNgdhl5tHhBOIKWf8i
Q3I/SzVIvaXbV/87mYz3pNn3z0I8BZ4xVVhP9FXVUgrzzn8uDoWZX6ND/gNL
Ilc2/UI+8vXzFiyAmQ6N9L2kXntrwjRh/j0DZrce9uvq7F3f8J5VPbg/ejUs
iL1n2wDTKk91lOiiXv1eA69JO6W8gwnTRCmxpJ26ZNV9mIG6HxVNIOOFPzQY
SjBD5R+2OuZPbAk1SNBB/wO0hbaw3KTi4FSYdzm43Z/E47RK8+lv2PclmbeO
wCJzp/hUWMAWTLwPV6SduP4nHFbKNv0Bc4dM1vvBtIjqlUyyf2Z52AXC9JK9
6stIvZquKPbDZW/rTQJJuygw4TLcI++9HQUzbHdQHbCQUo0UWJD7a0WvBeIR
f9YK3wNXSPSSw2HpuvQgsj+bfK+8ksEV48uzXGGX5orGQTjM+dxHIzK+Ya2q
BfJlbY853oH46iK+G3mQ/K8mpxaQfA1yCwLgnuZEKhhWDEQP84kXFG41IvVP
f+O2DK7OF0eT+kq0DJumwNbF3l+SYUGQ3thnWI+uYr/FBWa2Z2qFwImBBqFq
5Pps9VgzjHzEFZr2r/Hey7Xt/7ULblqfkHEBrqv2/NE+Bdc3qablMFyhsqJg
FSw0qemNJu2xf/+6po3+u7Mm7ITlV6rbdGHp84CPMXD1JB+XeC1cr0wqTQiX
qf+s+DmZ7ANh6SVYEB6TFAfzy42TyfpRMcXUVJi7KP6+EuJjHSmpqZoEd235
MAdmXKNdOwpXBB222QLLP2zzCIOZ69SpTJittcgzEBa3Gp1+AEuv7fck7dZi
0/QvcM/8gMFUmFLKujh2Fvmeb6DdgctUH+rrwlGmbceHSP9nQ6mkvkybN8yF
iEehLJpH2gWPlWtiYdGeSXWqMOvOwksVsHxB/qNP5JyS3f18LPJVnDjWRs4p
NP+VWfYw/7DFqVhYZujU6weLdJ9VL4FdtE5v3wFLOtpLRpE/L/xxaDAcdUjW
XAxTKV+93eEwqrlvO9x072o0A6YWsaSm5JzSvGrZM6wfbH/5dhN5by/ut9w+
mXzfDB7NJ+eUyKxjg8gncZH6hlDy3i9pLf0LZknV5EvhxNS/8pvpiEuTEcMi
7+G5EytdYLFhYbMOizznjmn9oYn1Hd+t1IbD7DPuz5iIcVbNWwzhJtryoDEa
WF/u5WgL8232WvyYgE9ZUKAHzPwzmK1CnGWuiCLngBuNvAVqyHvxi2vnYPrK
8UdyxmOeGzPodaS/j9oMK5ipY+anhvyktd8cu2mIy9qxYT7Jf6CgswEWmeh9
2QKLt2XYDMJs1xSNZLLf7HrN2Rhf9txhmoTsL7GRYxYscG0JvEnGP+kImoz1
eds00+7Aws2Pj59QI99Lx9tIvfklwxNYiLdM0WWTR3zU8ZUUtlZe0iiArd0G
WLPU8XlR650X2c93Z35NgdkFkdkGMF3qPv4lLLMu0mgk+YRtfPoVjsq4GUnO
SUK/7TYfYT5r58aVxK8/GefBdTttBSqk3jsLU+eS/jfnp97GOQa3n+AE1g/2
07SJhq3VhRq1JP6FWfUOsNRnpW078hMWnywcDzNVC3PqSX1aJYHNeA9n1qcH
FI/D/bIvbfEj8l6+xD0vdizijV81ep144j19d1Xsh4H2u9dgaf3hx7oq2L+D
13TvwNa+kk0DSrj/Og21akm73t0xnWMwri5ndh/Ms2u4MEph/YBogQHW5ydN
Gp4PW/MOlbjC1IfhG4tHORRtym+8GLiM/1MU8otDueilp1yCBVN69yp+cihR
gI7sA+kv32b4Ea6+qWuhhnqU/UrRNUB/4WfzPVbEPQ+XnYWtXXwTlsOCkqUm
OzC/LEI5ey2pn+/ZqzZYX5Q2LWY9zBux+lACR5XTd3uT/VvkscIF8bts8Nrp
SPZjPG18NaywH2nSJ/t5bMQfLkpknaxScm4WhC5jS2DZ1e6U6+R6qGQUtMNR
j7qW7oR7kg5aUcqoi77MbjYs3Nnb2YV2XuyZjk+oD1f18egFWGHmY3CS1Gv/
6aP2cGK8U5w3LD7v2pZF6kn/9WAS6T+lZOELxCsrS3F+g3MQ33CMqBT5Cc5Z
Tj8Dlzn+enoK9WGnXNDcCws2nt3nOYz6evDtyTmUyXih06ngUFFLr7p5k3Np
7iHrmAEOpXDJ8Pci87Fdi3X70H4+ftAfpt6tV3v7HfW88XkiOUeWlTquSv7G
oXh+OfqZZP7Xby9/7eRQdUc3mZaR+TaeU+mScyj525HX3aS9PXvOic+4fgXh
OeRcyJ1+K1D5E67fG81HnjA1X5Bk3sahguNbjh4g5/CXvTZqMHPjnqBC0u7z
8tUxWJEY/r6ajK829r+O8b7dgvoO4t//MuO1cygps7lkCC7z/GP6ki+Yf7I2
b4TMV5nK3474orS0Fd9Ju3DW8dyviM85Mq+ejPfr6LqFfPjRJi+LiSd1bHjS
w6HEFrlHE8j6Hu9M4pA/22pW5Epyjj2RnDUM92SY7NYg8+ebKJv2Yv7qU/3l
yLcpwcKwD+0Cd9o+Un+muWbCFliRQ3syh9R3pnQ0GvNzs/qOduEcKghc0L6p
G+NvG0ZegMu6XGRmiNf6+Pq3oTBXe2/zGuTH1WaVOxL/nu+n2Yr8/L0/M2Dq
BfvzhwbE35K7fhTnKCozMWX+K8Sn86S8lzhu4h3qAepbKzX/YfL/380ocSml
IL+jmXD/C2OF7fI=
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], {6.89794654332688, 12.999856222011616`}, \
{-1, 1}], LineBox[CompressedData["
1:eJwl1gs4lGkbB/A3EUqZTYpO65Qci0rLJvN+7S6Twogk6zCKaTpto4NGqcax
KbWGj0JppxyKanNaJGpSTpWcsmGpKdSEMjqZDrL/5/vmulyu3/W873P/7/t9
eMdw0651oSoURV3AD/n9/89cmlKO42NMUwbTvzQ0zKGpDp2i7uuwXl3V3EOw
zWYuXwDLuitFc2ChoFTDCWbllEVfnE1Tl2LTc7XgNFkvywS2MY+S9xvRlNkq
4a1UfVxvlq+8BwspT2cKtl+/SVhpRPZ9LOLp0ZRk+KGkAhbVuq9pm0VT/PDo
kbuwpPTs8l9ge+5IbBdcPmNnTvVM5LRJffsJvmSYu9cDphPduYaor4hZ0flG
F7k0gkrcYV6E1cosWGL3fdgRmDFoseA3uLnstymF5Po9kw3YsEheKZeR/s5d
lrJ0SR1BlJYJTUldci74wGkVVyJtYZFCELEfVjpdbHCDOR8vm1+CeX7C0iBY
0FE80AcX/HhOhQuzU37imyNfwSHOEFnn5f2gHwbXvwp2IPcrNQyNymBezwf7
RbA4yaXzIyz3qJVOJOuxQy2W6F/OKjNuQj4+J3PGOli5aI9xMsnLPOrKhS8l
rOwh/SrcRp6FwoL9PUXqsNLbw8IDLk84Y3ML8xLbX+cawh1Ld43shw00x9q7
Sb7ZCdHLYJp6dy0aZoQccRk1xPNZa6OnC6fNMeJUw8L2vEmn0Z/ZsF/Sadg3
yHmhFqx41GQrgFkZ1YWCGcj7/Jc5oTD1MHPFMx3s4+hzPpCsv5gU7wozSrpP
hsB6oa9XX5+O+5e4GIfDl+p3qi6BNdKvmCTDnGcPasq/Q/38db2lcP2v+mqe
cL25tudz2L5ow4ExBvq0vDFzOjkPc9spKZzmfOfqT7B8uC86HRY7VB3cC7PG
+4aPwRoV7W/Ow76RHxzFML/3aXoDzJnpz8+HhUNt7q/gArluWTvs+/bM8nEy
v5YrMdNQX2li2a+J+ZZ3jpewYZ6p6lYNMu/aDXdOw2buces/k/ku6h55AouE
x+uewryjbtGG6M9s9pKQ63D9UJPcD+YFtXqK4LT5SWPxsNR+h6U7yZ9raXGB
zMPIZFgL1rN4LM6DOw4J5bVk/uHXLc/A4ny/04dhWe6E3n2w0jUlZTl5Xl7/
pDmQ9asV+0YMUKew1OIl8kjGGwsKYZuVj7cIYdkxTlQELH+ROKZO8p9f2uwK
c4pU/aLQv1mj//yFsHj25qnPtNGX0eO92rDUTqIsnoZzvm/ZRlWYSh7rjZ2K
XPoDdWow//BhrwAt9Bmxf5kOud/9m8B5CnK8C0m0JPWda5tYk/Hc/Do93WDG
ccWt7ZrYJ87l93BYoZLg9pcG6kceUsuBm0OG/jaHOaaLmX/D9M/q/ffVsb+1
Ilsd/TLCq7XPwixu+DnSv+JszGga8WTFVQ5M8229b8H8APuEGDIfgab+ZLL/
zduOmbD46+3Lu2Gp0wLrK7D01jmrEVLv5A7Ha+TvIZT7IBL50lI2Psgh89ZL
tNJCftbggrpEmH3gWE0q6ecwX7KTrPc0ujPQL+3vwaZh/mJHkz2wIuAGSxM2
KD+YXQrL5jWE3kM/7DKv2EfkeudfO+Ng4aOdOvUwp8pSxwmWrUve9Tu53nvT
2sHv8XuJdbYpXMCZtDGQ+GZ1SRLqi4/I1nfNh3fIklqRV5H9cWAzzGerfHpN
+jPtthyfh/pl9+kBzEOcZ7H9GsxXadBpmoQ+g5bP3A8XdF2bm6OG87LteMYG
WHa58OI+VVzv7+HjCXNODzq6TsRzCXZO2QxLmK72Viq4zzjuvyfIfrO8NptM
QL2azIwGuLlmceqP+C+jOB6sO4vkE5lWDHxjUtJK5Q0+LE1Zua94jElxwrJv
t5D12tyH7V+ZlGKhpaYd+uO41HC94YLAYv9U4hcVb6xhjkp+7muYCi5fHgBT
uVkpc8n5pbK4nTDvi3mnA/HZ7MBT2F/yNLJvLZmnQLQiDvUlOe1bvcl52v2f
TynjTEr+bVWGBzm/e3xObUReuU6kNZm/jbs39wXMT/4QYkDO4/B74Rb0x1i8
aPobUl8l4HMb8cPA2/EwbfSqzhjzELppOk8jeddP1GPDCjvbeyL0x7aRnPWC
GbFdal/mkfekXY0FzMmJmbKNzP+vq/1kP4P4asY/eE8zzpWwPGCOd7CdF0yl
iKz+QB7agrfm8RxyHr96JyJ/QV/4he0wJ2jPjEz0Kwv7s0MHphz11cK/MKlm
e6viVrynZYOr2y0+MSmhpG48D6afyKoaPzIpRrp/VAZs0GdxI+w9kzIoPPAy
izgirsr8LdavtbXchSXv4rrUFUyKvejnp59hYZJymsMQ5tnRUrcK9Wh25P1B
OZ6HRowwDZauqmM7vWBSNsNHt4wSmzKW0X1MSpzWGu5H+hEeTfz0HPVa3h+o
hOmbo3nbYEny0Bo9zIPSbnuXAPNTd6tthemq+xvde5HHKcQxn6yP7np1BvvR
TyYs7oClGXelvqin6Hr7episB+Q5hSCPGMGIpSXTtmQMIM9q3/52Mv/+5u3t
yM+3feKcRda/HFg9/AbXn1Rt9iX1ZlsXB6Nfhhq7RIl8kouzvtMbwfnb9YdO
PCw7UW50AhbztDtUyXqjg0ERLA1bmRBB+vXZeioKtnlSafIK85JqMO58wH7C
pV1tvmS+vqP1U2H669faRvK9aV7t7vTXWHea/m4tTKlb9e9GXk761p4ufG+i
XDPzKkl/B723HYSlN3vOJ2E+Cp2sIluyzsrwMe5GvStNz8bx3hfqpsdJW7Ff
oOv8lzDVukb1RDX285JH/s/kI6miZOT74Cz6XzzWwqs=
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], {3.664215354453092, 7.259023129707089}, \
{-1, 1}], LineBox[CompressedData["
1:eJwd13lcjG0XB/A7WqakotDeWEuSKUlIjURRmCKKYrQoW0aKIo9BlqiUosUT
U1mSMJIkZLI8laVGkpAMorSJ0iL0/s47/1yf731t55zruu8Y7bvFPWAQwzDT
5BiGWub3AH6mXOb/v7FcJknO6u5HWDoh9UrhGC7TK9318xas3cUP3A4zr15H
HSRXfjw2C5Ye2HBvASxe+mWGCszu2uirABe2G6g2jOYyoRFnhbcnchmb+0en
PIblAxQ2BsOFl4Id7sI2qxNOsmFO40I3Ml+aK6w2QX+jd005vCxJIzEGFmdF
3vsAS5ROsVxgwVfznYOxn/xbi+phsGemt8Jkimdd5ZGPxlwmfGqTkjcsiM9z
K4ZNPMe0xMKy6Ijn52CWRVfPPThyaaF5KpzyMizsG6xtupqVAtc+SCnVQT2Y
3P5dGbBzSUyMLZwfdmtKPtxrkXTTAy4ciFtbAWvU62T7wapH1PrbaH1PedsA
+Cy/MVsD8bFfhNd5wdUDI35OhUWvd0fNgYN2nPL1gHmOU0v0YS39qOgQmPXn
30utiIcjP8gyGs4Oml+XB/sP2rA5GQ46tMBrK6x6qO/SKVimFLXHFK59v6Ui
idZ/8qtRhnrlz8633Afz1ycvTIars/uK/KieY6LX8Og8tDUqZ9B+ppkSNZid
9mKFAtXXT+VpNZvL/NvQml+KfNg1CdFnYZ5k+eV9sORoZeIe+HDz8lU2sLBO
TTEQFix5qtUyAXXrr9myCi5secdLhwWC1ApvuGn81Bg3WPS8InYDLK5rN1OB
UzYLY/fDv39nB5aPR7/NT/PzMKOVPCEBTvn1Y50Utk3p7/SFhR8fVQ+QEyua
7GFppco7C8QfdMVXZAJzl6iV+lH+ggQLA+p3DHt7HH5of3syWePly3136H5O
On/OGM5uafSth52j5a1mweFi+Yhu2KrebOhyWHz2MYfu2x1Ld83tsElKYxi5
Y7VXewpctpQrofHhZvYT7sC1M9t03sFaLl/s3sGsY2WGN+FNplrVfZSfV+LP
A3T/T63NV0f+4bp/HVxo//++9enDUiPjUcpwLfPEiA3bSFbXlCBfs6Uqmtqw
pMPaMBzW2t5sJ0/13DE025zqu39VYgPW59UXLpMaoe62Nw/cgvlhHqGL4dCk
5CFRMCf066o6Q+ybpRQ/j+pllaP4D2x27/CngXFYz3dygjUcNHDG+AYsuOo5
kgWbVFUVBMKy9uzkTgPcx39Gq+jCXIe6772w6JZpegXusXD6nvqRGN8lsKw6
BHPWuAxygR9qOL1ygjVcbigdJ1ddj9UgC/552AiLo6pDP6Gu8dZZQU6IV155
RmoJLBqelH8Jrhtbc/gSvdeTJ6UpId9NjmWuGfReO0bYWcNR09qDMmHW+7tW
a+BxfWs+XIaDjgtNhTB/XNS8+/Rd2xhsnAxH/pgveQdnX4vOyqT+M3fM/sJi
16CUDLj143zz0YhPXF0ck0j1/TbZxRHmrStI/X/9c/ey6D234T5f7wYvW62s
uBcWZGywMIL9HZV0TtL4BFeHUsR/NiHTP5Py9ZWemwP/vtIQfJbqtcnDPw/5
iwa8LU7B7LqdJYawZO3VcQfpO6RubxlD9X1zZD7tJ1A8ZMTA4a0PdWbA/Caz
i3v0uUzu5BTRILhjluMmddj23Xy3B5TPQcMl1/XwfT+RobCbvuNeKz2C4XGf
Jn2xoO+2Q+tuB9hb9bEbfbd5j0W5HPgwX+XBSZhjNkJkAzetmJ5P91TSk9zl
CTds3LxfgcZznk89Bus7fFvxH/LucN3b8Qq+c7pBOZ6+GyaGbeaIx3HyiaH+
MHtDmssxOP8ly28uLBLbPuyE2dcfHaF7zDjpf1iO/MSGpsLxsGTg7KzrsMwo
85YxHG+2+dZg1Cf78g1zK9pvj/jRXHhZ+CW/BeScpqgtsLbt7J0BtF+bHRMF
q17MmH8QluW3zd8DN1gNBF6k71axbhQfLiu38nsKSz9MZZnQ/O7Hxa0Un2PA
vFfYf5neC0MW5f+Ad09A9S/fuUYflpXebe9B/JyPxpeNR9N5CXW3wk0lQ1NN
YC5/kfEH1CN04dKJhnC8nYi/iOp3ULNBieqnrDX7ti7u86k71Z+pXuw3bA7c
MDn+aCHla/eHfU0H91q8cNReNt0fo8cOsOovmz4uzEmd3takjXoNPWDShXsl
O5kQeh7umLFkig/M7ut02A2zff57WoK8BOVrDINhoUNM7wSY0+t5IZz6/+3O
SkBeDEfX5xScErxmnyLVPT3qygvYM9qiOhp5SXNURxli/6atCtONYKGvz/zt
FF/r18hyPfr70Ml7BYsmZsYcIa+JaZyFfKTX7Fz9YA3VnuOn4XhPueSlMFt2
/nsfzN7/x24lzETyupxp3BBf3TC0XJ/GkYfo+ecavQy0Mu2diWK0Ape60Ddo
xRXimPs07nK2RB/xyM6om9+GtSdlTfODRbbHJamw8M+it9mwuKAwbzXM03W4
30T9wy8lDqH9fj+aZUj5L86Ry0I8nnGxavNgKT8pxgTmDXI77wXz+v6LFSE/
Dc0xtuR493E96uSywp9zDOh9XqsXSeexafmv4TT/rEZI8yjEk+se+ZTuydsh
K/kw78KXgi0w901n3ceRuM/bF8v+Ig7p7eDt22G27TuN3RTXr7MfDGF+iT67
HXEIcq2/1Y/AuJ69EcthRml/QCHMKj/dXIQ4uC0XWi9RPzN4M5vi4ugp3YKZ
K+btR+mcx1uMovnxnUO1B8EclvtWbax/+OMW/UOIS0N+2E5/uGls2QFDWLT6
ecVdisdhifoTtB2hU3YY4XmKqcPBOJjZyhhEwWUJaTfWw7KdW52/wNy+sT7e
sEaTKJ1L92eSm1UArRParx0Ha8iu9e6FhVdvOD2m/pSAQ1dp/vPPEd9hbcvN
TDONl1NpZXTo/Vr0w4zWfWb8pRv9Zdm6Mdtg/s0JlVWwzPPai0I4XjNm6gnY
+UPZux5YFuN6z57yrPNSMEPLq+01fYnntaHfjdzoub+OgRfcpJ+R60frPBgm
J8W+vd0R/XzyjpUv7aj+iTUuTrDIaU5nDuqXrWkgGwHzN12s0oGFgbqKz7AO
mxXyNF4LbWOyZjDV84lNvRbM2uC2oh/rcBOMQnI00Vr+/LsDltxWm+wB10rd
OxuxjmD4uUej4DL5RblLYLbT2c+dw9G/f8/f61hH8tNyVDPcdE3aoAPz00uL
+2DpMA/ng5gnMpcbMxqtRPVP2R88F8mxd/nAwm2R0VGwJGau9iU4PLKAMYSF
+1QPKGAdk2NFVU+HwbXP7gTC2tdZ14/D8ZUj/Z7CTfUb3QQwt0CbMUdcNppz
3APIpfZ2h2Dx9b3u1M/nLpjwAu6Y6dcTBzPyliuGIk+WTR2rmNYfcni6JRw+
ruFEH41P6zSwp3O2qGHPRjwdSpwt1C8sHVy1H+b0jBEPgU2KZ18pozx3zD/6
BOsHnWqvUEQeHdMmlm+j+796ceoMynukl60SXGjg8MMb5kxNy4hG/M6aZzZt
hnkvK8MGqN1WuiWI5mttfUDPmdi2Za5oZcz9r6+xj6wkL0Kbnu/j8RfAKR+W
OD2j/UNWR5QgbpOCn5M3Ubw57eOd4NrtqUk9aDX2axfXa6Bu2Z/uhsA8/gjp
UfhwXEjWB7QCI04vD61nhlq5M1rurJUPpqAVXUnSXKmOfSPz0k1o3IyT9yeo
YT2f+89mwjLWgkC5odhfeiHSH+Zb7DbrHIJ8BZWPM2H2+iAbebKlR8d3WHrz
HW+WCuI4eDpwEcW1WPlYujL6tyxii2G2h8oEc5hrvrhQazj9O+ebXTsLLT+y
MIzy785tqYM5TlZVlLdo40mLHliQpKtHdZFa/TC1wXxheoQjj+6XyMguFWZO
PHwSQnV83Bw4HPuLagzH7Ibj/UtPpMGybablVG9+Uf8QE8Qr/P7az5F83O6F
GOYrHi6So3Nz6TaZpAovN867QPf23sS2WFjg2WY9A9YQuyo/J68N0iuifARr
n7TBHWbb2szp3npvsngPS3jN9/+l83j5eXQmLG7xZ5Sp3mGX46bBss/NNj9Q
Z7x+wjTsL9o6+2ED6sxRjR9ajXi5P/03dNI8j8WWjVSvNyEFE2C2wuX0N6gH
Py7r5AHMY79J9CtQQts/T23EEPp/h2vmfkX6e2X35xXWkaqV6LkqYP3aMwMV
sPjN0VIdefS/r1zXC3M8s327B6F+l3e48jBfrHtPrkUO+/ntKJbCPKu6nAEG
jvssF0J1iR7WPxOWcCc2myJepr7/5twBe4a9zJP7HZbw/6QE/4XXu1oXIT/h
iB+7e//YI14f2U7cM6Zpo8F7WLRtqqcW6iH5G6ujT+OfeXR7kzseOp2D+fFi
tURYWDRv7GasL/iqaH2d6ud5Ls8C+3PGzustgnm/zeuL4I6Y0V3ZdH/z3RY5
I/744vPNkXQfD7KUpXDHtt6S6XSfFUNXOlO+DwK7CxCPcIuTTfYgujdF02vo
PORP5jaSR1wf9RL5dEQfMGcGI65gWdUd5B8f9qOlFf3cocdzklEfrkLpQA6N
P7NsqwD15O09c3wGzNZVGeaOcxNdWNiQSvWc26vuhHPjjiiaXYl4ZYOm63rh
3PgGcil3kR+TVpAUj3OT2P19chr1kVnl2HXh3IRrz/3j3o/6OO79fBhma1eO
aulF/4hyczeYm3GEE9kNj/XauQjm2yws0OmC03Xrd8HMax+VV9/tGUld2qxa
WHLXbknMN3uGuzUs2Bv7CV++utrWgnq7HElgEA937Xn51iacz5rOFbdhYeOp
qWlf0J9XEbaP4h9/O2DwZ8xfZa/lQu/dTGG0aQPG6xxxUUH+wuc/LFRgYVRb
+g2Y8Xj+IqmB4qvYPJfqJR29+gbm828N3nCJbB1izGtEfPuiWr7Qd8R95XjH
r1jfhcf9Tu9peRx/E+KTLeLJSqk/ftKJjDbsp/c6egPN925uvY18hJ9jHd/S
ezOsec3jDjgvaqEh7e/2emwU8pcV5tbOUKbvfkxqP9VjVVzTNOQjzBo7eNwP
9M/ZVaOHfGWHzAy60M9Yju79SfU2VT+0jubvGGNSifeGP1E8EIH1mYAqlzzc
C2HArEbfdvR/3157EecuaXUuNEa8kmXbfe7RuWvt/rAC+TFuIu1+eo+ss7zV
PyG/XW6pfjBTafOlvg79muptv+geJB+OnfkC8d/jWZ8kR6kVMw8wPuugRyqZ
fqK7+P8J/ez/Byak2x0=
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], {6.89794654332688, 4.9998562220116165`}, \
{-1, 1}], LineBox[CompressedData["
1:eJxFlgs41Okex8ftZEsp1XGJUk7if5n5k+Qyq5/wpNxSLm1KuZR7pN0QB0M0
lMtKmiM7jZYuw0ZSLiVSyNrdZm0cSW5FolxqbZOK8845nbd5nnn+z+d55/3P
e/n9vt/vat/wHQfkWSxWIfrKnv/7kKD036cesAINMuwlBKR2HupMsUC8nS/e
KyZAo8ggIz0OscHDnMEsAuy4JjuM7yOOMFzwkUeAfe7DGV/VfwAre3+dDWKX
9FibJ16IRQdy72YQ0BvyrMHhEuLtDf5jFwm4cIwXFjGBWFf8XNxGQOM51RpD
47XAEjRfC5ohYLG/q2JuGGKNkL41RiQ4bt6aoi1CDMYOMWEkREqrSnMeIF7c
2vB7KQkjSTmOG4YR729tC39FgkOZ6XitFHFin/S0IQX+3ISPbix9YFWLN+b7
UGAXpXX+p09o/HL4QvUcCkLnm+3rn0Ks3OP+ppqCl7MWL8J6EWczwfGPKMj8
QesA2YRY8v5q+jMKnNIttrAvy8Z334oYoqDlo3j9jTTZ+gT8Fd0UCF1tzFRD
ZZy2W7mRguKZPLskV9l6n3pYCynQ3pu5yJiLOHr2bzsiKDDiq/sqsxF3pdiY
WlAwMW6gKDJA3D9hZztLAueIZMKYRiwaa1erJ+F8VWLzKdl8jcb8PQkklD+5
Jy/viVjXXGXQmgTVimmX0DjZeWS+2PYVCamSdg5VKps/M6DcRUBJtkoPZ0i2
n2ght5yAUL9VGnNr0fn0/6IvPE3Adsl0RFsoYkb9ZVAyAYeO1pser0IsclLZ
mUhAlJmy22uFdWj/AxWx6QT8mGynVO2CONqSd6SQgMlHZvsKBIjBO5p7nwDS
kJ8W2SPj9+PuUwRopWzM26ZpgM4jhvOrPgmuN7XHeU6IR9Yr7PQlweOd9YGO
KMTRO7juhSRoP3HmhJ9FbPZab8UACS32f2hOliDuH/n+2Up0v55VF4/ckM1v
8lHYRYHY/LfHmZWy3196K59OgWs53bJVLBsPOlJTQcHBt32GywSIWW7V/hIK
skx2824kIJam3bg9QAHTcfiAuR/ihuQiuWH0+0nr0S5bxF1yTopPKWCtbFk4
qI9YWVnVoIWC+16ZVsIFsvftEngXUyAfdmeZ+TTab2D7tzoxFHCC/+V2eQix
/bzXTrYU/OUeZpPXi7iLHNr4FQVJJXutXAYQK48VB/5MgvfJXO/r44il1cV5
6SScLL7XSs1D759MTE92JOGhq5tWCYHYYHPZUzVU/wZhakW7EDMF8Wv6CahW
+C5HM1u2fmI06SYB7asSvi96KJtvzWk7S0ByZJbw+HJDtD7daecUAu5s9d90
fR9ijbOi7gQCzKdTPWZKZHwiQXyCgJmKewIVKeKuCTqwgAB9ia3CeWsC1YOv
K7uOgKTaALOkVMQaGbycEQI6546Ja9G9s8qNJyu1Uf3y+/h5qK9Zkp167p4k
JNx+FdeA7p01SfSMniEheKlPgLM9YlGiemMHCfy647Ft3oi3n5vSWEbB9PIU
+6+DEUss9aycKVBcUBmjF4L4wcnmqzwKuq5JtkeiumGZvdAyLqVg8MQ9db4r
YkHhsjdtFGyKbJrVsZCNe13J6qPAb53fog0rESeKpEbofq3ezaEPgccLuwum
fh4g8Pz7WRZyg00Efv+aY9yRqKsE/v8iLqcs4wcCr2/uL4fUnlwCr1/11bGq
xjME3l+cbexxE9Qn/99//rhQcK3qy/mk2C1N3vT4y/k9itGNClIi8fnS8inu
dpYkPn/eFkHLP2NIfD+9Rrc+7r9D4vub78INeDuPwvfbphJzRcmNwvdvV32u
wVFE4frgZUX4xI5SuH6MBhMPeTE0ri/H2fSw4XAa19+KxzmvvS7RuD43lJcM
uXXQuH6j93BN/5DSuL6Lj4YUOi5hf6l/jwt3y1eycX8sLM25HbSajfun4+zB
Ek8t9pf+OmM91jyfjfsPLh6+6/MnjftT4bnZG53HNO5f4ZI7y9fdonF/O2pm
5jcX0Lj/v/u1OH5bIo31QbhIt3MsgMb6cd213eymO4315fdKI/3DDjTWn/Ni
+29ObaOxPn1dQw2rutFYv0b0r0myA2msb2vf1eUTfBrr33WHZ0viK2isj6Nx
D4JuDNNYP7u6oo5m6LGxvp7SbBH5BbCx/vrE185sKWdjfT7V+q5E7SMb63fe
SWiNtedgfa80mp9lcpqD9V8g7H/B6uZgfyitfr8kcCGD/aNe8PeRl4YM9pcP
65S6Wq0Z7D/EUuFsvBuD/cm4uL6gxofB/hXcos4/GMRgf0tPG/tUFsJg/3vJ
/fO3D4EM9sdv26ulw7L5n/2zLNnkqZUng/11/a5eP+lWBvuvMIk4uNaSwf78
5JZvzwjJYP+2rIh0CtZhsL9n8nxVWhcz2P9/+eAnUZ3H4HywrymSMZRjcH7Q
qEhUKJnj4Hyx58pz/gUFBuePzPqb3wypMDiftCoWXbm5gsH5RcPDq26Kw+B8
M+P8708bZOv/nH9Wr4/WGzvI4Hx0zWZT6xY+g/OTi3Xmqt2lDM5X3ZabvdXa
GZy/ek0FSc5SBuezvsGhzmEdI5zfjItDamqtjXC+qz/zYFmdL+LP+Y8lhx6J
RvAfY8b5sA==
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], {12.5548, 13.5}, {1, 0}], 
       LineBox[CompressedData["
1:eJwt1gs0VHkcB/CrzfsZa7MpxpiR8agkj1jOPWUbjyWhNW1eyUSrh2pLqPbW
FFOyrM0jTWZ6CevIFi2iZCq2iNKx44gsa3coTG2ktbLf/56dc5x7Pr7/5+//
v3PGKnZ3iHAeRVEi/JEn82EOHzua+u9jTVOiXaW5zbBRhHLsGZumLB6VJB2B
gysjHarZNNPhuTnXBc7ZlekmhU/wYzmjPJpibL7VLkB7y/Kzu4vhpPxYQwny
gAVjd8LgqrstnEqY+54KMIRlrR55bfCLuK6FnbZo76nFmUL/plPRykJYy2Tw
U541zQj4njaJcEJ9W/hW2Ml1fhcfrvpCtOsi1mtn7Xt4Odz0OrhuCPn7iVgP
NhzMc0vjcLDOtXlXLOGY45azW2CzisjfbWB3xaMfz3JoZuHQ0DVX2KzXY9Uv
8B/qBlsDyXxOvufHYU2fy3rbYZloZ6QWl6aUb+qPZ5D5h6sTTbk0I6KSj5fA
gl+tAojPqWzuyEl7nokR2jPM3LmZ5zCTGhuN8aiNvhUOKjL+hH885qMC9Dsz
ZmDfaOHTIjhS67fCWVKPQL+aOMz/kS07ZJLsx/J8Mg/OmOhfOAgrAnPrXpL6
cNktZL6Dna9dK+GBtNU/F5H+ynel+1AfsdVkTTxZ3+WAUm/k71zbPtjDAyGR
OQuQ/3GU7ziyFONXxwvHUf+BMb79BZh1c+XtbpzPm9WvzL+EO82zrj9C/qns
w1oduCrFu6MdeWjRuOqODU0VZk4Z9iGnDBKjU+CY7kMvppEXB9ZcdIdVIgsL
FuZviG/MmkMdk46ZLNsA++2cL+2Aa81C1E9hPfUVbFUZLHbR82lF7im+ysuG
3cP6g7Sx/6hkRdq3xEuyE/1RL8lwsSQVVpWxX4hhRdythySX3ZvUbYa9Mhd1
Z5Fzc8777i+4yWfC4RK8wtZEYI7zkQ6rjTXCzHe199zg9Vr7p3vJejzMKvlw
jK+5/gw80NSQ7A8HyCP6zLCfnKBhUxpeYl/Ec4YpX00DHqzXP6ngwwITwz0a
6PenyV6jjcTR0o4erN/7qJC/Ca6N7LS9gvUc0BcKQmFG0/HZ1/A9C2XWGjLe
u4F4R7Q3fWtebgMrtjtLJlAfg9TsEVI/s8cnHavhoIdnKVK/Juaz24fh9OIC
kzyynz2n6oJQv5bxsPJQWMv4lTveJ2rEz1GqB7N6X74ygIV9Eh1SJ9VvIh01
eN1pa4cDcKHlYy98HzAym5QN9nBSSNFFPeSLj3Aa8Z5RdKCnnIu8aCQr6wJs
9LLwvD+eNcmyK9vwzLkWVJmCJ79zpmAVnkpBhNpPaC+JkuSRcUpXVvHH4UHt
upgJcu/SzquWYZ7jy+J9yD1qneSuS8L+S+QxC3APKaOC/lPXkI8PGrJ64NJa
rtko/NO91vBhWCyLTFuC+h9bOujxnrR3GcnB+VHzGZt3xphPkXD33Dbk3hnK
lBVkfalSQQo8JO9LXw839St1cW8YipZ37rQm9ZOfTEb/q/80GJ+EV0xMu21F
7tAg4Elh1dAZ7bXIv69n2VWS/YTv/MYM3lJdf5CcS4JIe8sw1hcnLldUkf6v
CkwryH2teJtKvrdkN3sX78b+aj5oa/43fjrXzgn53rCi4jiy3p7TM29Rn2Q/
6+cuJF9+3bMR/v6Jf9ss9ifbFh53Gv+3PxQ02Agn3TK+RPqJyzSUySRP87vL
h136HEcdSZ6eZuQG/3D5vtWgFcb7qG6zM8arFef25sNUy2D/Z7BXWWNUEHxw
ytQnFK5eXN2lA8s2RV/dj/76mZscHrOQZ2TJsA/mafsZgyI4RlQTokDeusG6
eTfsfvI28zH2c6MmjR1MvN64JAxe47Q5z5P0j9hinA+b3hRqrISNbP00u1EP
r2taSmKxel73AlJ/j/zVXjDLt21uHZxouzF3Pen/sCVgH3zhkK5TAhzcZTF8
huTj4YYn4E5e1I5ynFeolvr0JbjqnJ3mDfjBn9HSZtLepXR7JZx/LL2hn8yX
e7tHgv5HWvPZU6S/3ycO5HuEFVim0MD+FQWq+i/Rfjw+e7khTDt4h3ORv1wr
fKYPT0ecXTVG1r/M/oUaXBhNPanC/r5YeP/5KMYTaGzu2Yuc1f66qxWW9f+t
64pcrWfe5xLYd/SrRbOop25DOGcbnHBiR+ZDuHleT8dSWKlZJ5Whvtvb2ufu
W+J9zs50P0ruyXBzgjNMT66Sk3tbXOfqJbHAOciDePHwkfyNxupwYXv5A5Ib
ctYd3rsE9TsRJST9Z1skA8rF6H/TlCbvccnyWc8dcNJUrk4bTH4ezJn///uA
Q/8LoBYEtw==
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], {10.131120426728657`, 8.809365547472549}, \
{0, 1}], 
       {PointSize[0.04], PointBox[{13.5, 17.5}], PointBox[{7., 10.}], 
        PointBox[{13.5, 9.5}]}, InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox[
            RowBox[{"C1", " ", "N14", " ", "T14"}],
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->6.137505285412264],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          6.137505285412264]& ], {10., -0.5}, {0, -1}]},
      AspectRatio->1,
      PlotRange->{{-1, 21}, {-1, 21}}], {22, 0}, {0, 0}, {22, 22}], InsetBox[
     GraphicsBox[
      {Thickness[0.005], LineBox[CompressedData["
1:eJwd1Qs41OkXB/CfW6tSFKF2thAamphkqaiZNluS3DaSVEQIZdZos2UybUMq
XVbkEpGUSUsjQlhNohCaoqWISZTuch25/b/v3/P0zPN53vd3fuec97y/dPeE
uOyVpyiqGf/IL9U/hb/FbEqZYBmbahwrly+C3bmWLj0MNsVgln3zJ+vG+Uda
4LO6esHasNA1/xix/vwcvTo9NpXxdmcl2S/8aWlxJEz5O/bJIV7R/Y5UK1iY
bKG5FL7e3/R9SpdNnX8WmLkb7j08+ncjLI1+/mcafPmCLFsIx5S7zemCp4k6
Rs6S9eGQWGMTNtV1wPHGMZh/80EnF55xQ+jAh5lmtUOlMPOmyYeTsEz4vWkc
tn8g9z0VFmeVV1iYIq9D9qeKYcmkg4cfnPmo0b6FxOtc9egk3OGXUzgKC1Ok
JelwtFBnHg35r4wwjsqG2aVP7pN6+j4IGFdg5uMPJm7w+aCO7WdgDcZ71X2w
rDjFYz88PrGaGwrzH0lnr4et39x5wYHpD6aeqcHdl9JtfWBbo7E9L5BvtynP
dRMs6Yi/mw57MLWXLoal2/Z88oP11vFOfEN+raVp08xgz+szC+7AajbcbgX4
Mk3u99/hEk6UWif6l/LE6oMhHN658Vo1nGpkdqFVB8+nZK64C+sYesw+CXs9
VRWVwmfHfVWsYEmbln8dLCxJ3da1CPVFFY2+g8NCz9zeAUtmP/eei/fRmz/6
vl2IvrzInNwIC82/tEbBXoWWwmiYpi44ag33Po+rfQyHaw7mzoSlTeWRGqjf
vjI7ceAnNqWtnlC+E+a/fLeOOKP/elAWTJ+4Gq+M/SXpdok98OAfRaFMEk/J
aIMqk03ZPAzt9IMVZ9nxDGG28V2TbNhX5hdjCfcu3bzmExyx+dfadbBa9908
JvLPihIM2MDBpQomIfBgvoUaWe/d0pKbCTst5fIsYEblwWsPYa+C3vcG8Pmw
bRtb4FSTLHs1WGgpd+sp6YdWx+3PyK93SZdCIcx+mdl9h9Q3lHCOB2dsalgW
AfuqRz40gXXqk7PIPNDCnX6pRX6ye+rOqnBz96M8RzjG5KRyF/oVPJ1/oxr9
0LnrvbkCpv7aedGU9Ktu0PA6XONxNTCOhvWvdbRLZH5KGL8P/Ij394WpXYab
uakz3GFRdZP1LbJ/vyC4egHqq3JZ3ggLHC7sYRMf+LllFB7/UqHRMJ9NJbWX
HGWS/ucaPD8AS1mBAyFwYYqCbAlZV/73IqnPNudy8ag28vmcHjkJ2/wWYdAN
h3+sbVyM/pQcizN6C4seNn7ZAPc9izg3AQu25yzxh/95PU+XxGu9Q9c/Tqy0
omEXed8rw8pkmF+W15pO1qutdHLggBmhWj2w04+uwgJYZN5gbIT8reVqNIvg
wTBmpR9cI+Tz8sl5W69qS4LH9xqvvw43F6lNlsIlPh4LE2B7iQ23FlZcMqIS
SeL5XODchxl7bGz3EhvHrr4Ct85ZbLGJzNuisFUBMOeCpTsD9rI4QGnB9Crx
KjIPYfy4DbeQX4DG8N1P6Ie++oZnK2DJ7k5nMRxQ8XibEPXXtGnlp8GcsnT7
ObDEMrElGpa1F+dztRB3bKslj8zTgGlLsyaec27LPEbm4/Uq2mqY7eC5Ph4+
b+aWJ5yHOB73LxbCYapv7AxgmV79wdcww2VAqVAD5xY9dV6F9P/eovnucEy2
Sy7Jn5qbVa4OawdPljnCWwdSVXrV2VSscdqvYTDt4I2xZjjjdL84iey/ef63
F3D7Ws61Mlj8tOtBP9zHuM1rI/cnu3viJ8TT36E+Ogxz9nHb3WB61okxleV4
7t5UQhKc6jyWQ4M5/9gMvyL7IxP/NIDr0+TTdJG/fnoIYwms/1/d2l2wpGBj
hy4sqmzsPgv7Spwn58Hsgdv0W3Dv9H47RViRl7CvDFZpf1TzGe9X3lk7IoJF
3wKKmkh+jJU/k+e9fvTmFZP1d2+ELnCSEeNKCly4Nk1xSoPEH/7nKBw7JaQl
wBrH5XXJPMSsKXmqBdsKY71Ivxjvrb6cQv2ffNSvrIXNPxTK+ufi+dr7bStg
lbeGE1thmmvBfVPYls5yKpqD/XapBWawdP8sRxocnmX1rzVZn++2MFYN9z6q
IX4LLAg5FTwDFr4SXPaF6V7ZoRaqmP/1XQN8WLLojt3x2Wyq6sC5A1fIfbHR
S56ahT46WxdVwTXLYrfnwlnR/zm9J9+rcP8VscRHthXOQr+Eu82PJsPMay7b
mcRaCd4SuE/et8GR9NfnvqrxbHLOGVWBsE5FvNZlmGaz0ogPewW61+khH+nY
Cfo52CmMJ8qFxcXT1iTC0oo3CguQv6D6jHkSOc8FEZmusCf/jlkc8WtOrYCs
B9BvRcFiXa7+Vbh3nOJwyXxIhEa58Cf6H3zP5eR74GKTAY8nbND/hZx3y/uB
wzB93+EaMj/aUusOazhjzop+ZThjkX92A/Lx2uTOIPPglTLt9BDyt6dPDZJ5
EHfFe46g3hJB0M0K0i8ft/aXKrgHWYLIPPK9kWesvDET+TwR+GTB7n0fU4Nn
II8j5ynSb7pBYZnpdMyFqCKPrKtNTthO/IDfV/2cW6TfJ6OPdE7Dd027dFBM
zitO9+9OJfSFt+xiK/n/KmTDbiVYlp/jPwS39iYOuilijoKU1mgi/5KoNsdW
BZyXNOfuKjhp/lPT07DX3yreu0j/v5tMHoDrPWOFf8EBgxX/8eH4J3NmXCPn
l2yTUwbT0gI0q8j5Gkcf0UZ8Wtep6A7SL9+LBWfh1pfTNg/AvZf2ntRAPvRz
D5PkzDAXH0oOpcMiQXq/Msz3HC3TRz0SR0vT6bCXz5uWZFhlxvBheThcNK46
BKdafnUdQjzq0yvpMvTDc/3LM10w07p+7xo4hu5j/hhWdnhycyFs/3FjnIjk
u2DH50Y8b6veoRVP5se8omALXH61dPMhWNYobk8l+cRvKdkBx5iZCsTIX3TM
4QWZB+VIz2cVqFftxMvpJjDdpS8/XR7vHVsQthBeaRzBCZbD3K1erUC+H8Ic
VwdTCvuGHN3nkvlaNqb0doJFDebWVZL+iwzrDwnGWJTwa761Hqnn+y5Lh1EW
ZRvwJdCc9P95W6TrCItqDY+/Yk/q+3zw+o0hFhURPPFxH7kP16K83QZZlHvi
Fu3TpL4WJyufARaVsaW9Oo84nW7Z1M+itvY8OdhE4nEX52bB0v0GaSOw2iHD
XU/h+AK74vnor6Tf9p4Dnld0DnRfCUtnyv05G/G7N51Z60Lcp60xBQuqHnj5
wX0Cm3qVYRZF2Vwe48JUZtBRPeQ7ru+dchjWSeNkG8tYlHXscRqx+N5BfzXU
p5hgWRxKzt82hCeGxZve9/uS9zOXmRp/Z1HNMc+ynEn8JQNz2bCM/q17FZzx
1+J8GfZ3s1upRTCn0HuY9EvbcyyIzIfUu57zC95X3sLM60F9Es0g1xbkF7Z8
rXMduf9Gp7doon9b79g35pP+rwucrYJ61QwMI9LIfeZqiGv6WNTKC6qRZ8l8
+DsfrPjEoswtlMrI90Mn2mNDzTsW1W43UXOcnGetfc+LLhZlf6ngawyJz7he
b9WO/l7aqpNA+j8oGA9vYlF0J+ZINtn/Q88ffo9YVMzxYLGYnPfSixPJhSzK
N4vHJ/fl/38x/1KK5NeM/T+hhPYG
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], {4.487956841671435, 15.391819547632672`}, \
{0, 1}], LineBox[CompressedData["
1:eJwd13lcjNsfB/AnU5oWhMokMUgbZVQ3E3Vn3IbGLRlaLbeSLqOitGjvjn3I
dUOIa0mFkIw2FW2Kpn3BLb9704JMoYaKKUu/z9E/z+s95zznfL/f53nOOc31
C17/+wSKouYrURS5UsPj+JvPpQQEmlyKbZ5mVACXp2j6m8LS3GTVXbB8fEeE
iDjhULcpzHJ/sE95EpdSXvi95u08LiXpCKHnws5DZWfz4ebpDbWHJ3MpelNJ
k5hYqUUpfgqXenXQ8/Q2uPDxydqVWlyKb3r80lrS7vM05xnM3Hp1EQ9OiWxs
3jEVv2v/oUbMLqMnfYOp6/VHXGD+RZnPsWlcSvjz+Ck/0j5zvGfqdC6leJh9
KwFmeDrMOgq7bVJSukKs/nvKBzgvPmx/NSwzSjyxUptLicrtPw/ComJNzQPw
8L4YTQbyY7aN9d+CpfH6kfakPibXvzyAhcMFE73hQl3J53vw028/lUTCXQHx
8Zdgf9Xol2JSr5Wx46Fw3MtZ+kmw4kv5TTb8NSoz6Bi5f57ZqiHEk7o5aV08
nLnGRuM6HJeTWeQHe4XxYrzgjC/1Gj/m1x9cqAl7fSmYOwmWbQy68hj5i/IW
c56Seqh06pB6fD05opwMl/fGrfeF+c6dPqRezBzB4VWwYKwvXIXkL7EwWwEf
G6AS789FfHpWHetg5c2/D4XC0v+1/hYN89be/GAO8wss4u/B5Z32GQNMxH1Q
MVeDxPMqdKAALlRvcw0l8Q8P+IthLqt1bT+cWepo70/61w5lBCN/XnH0CifS
v3LI8zvMcimutodNjsVrntRBfL+OZS8n/bP8LI108T712vnyYGn+a+sCWCbI
f+oB0x2sbtrPQF5Ogam7yXiTDPYWwtw1CuoUad9gv3A+A+NyqwYLYZlXY0UM
zE9WXtoNC7mF80tg7ud0sRryKxy/pNEHSywXnFkMiy5pGHyHy28fMVkHM0xN
ZV/h5DGHpUEwM3PgZS9pb+J/S4Cp8x+9S+F6d38NMamf0sHth2B/DV3PQ3CS
m2rWL8QxG1ZGw4KuGrfPiLfc+J3El/T/bbQ9E25vaHprR8Y7s7F5E+xlP3p/
MpmPnVupDSctcHFtQ/xyWf23NtRDeobnkAJLoke9b8AMXkaQK2lPeG19DK5P
m/pOHVaMbmDsh/mpXvR9c5BfoKD1L1iRu0pTPhvX8pDVuTBzpn+YP8zyLIp6
DwvWfT360gDzmucE/6j3cMqS3XChu+nmK7DIujdbC2Zcm35Rl9Q7O+dE1Sw8
98aGjnOw0Dvw9HG4UJHGNtZDXP1GScGwPMfSpxgO+XNsx3ZYpD692mUm8j76
0SAClr3pbO+ExeoZVWfgpLKmOTv08V4k9l+vgb3CuyJ7YWkfzUcd80tUS9lu
+J21+s0HNzil5dqmO3CIpXDCVVhIe3R+BGazY0dHYC2dIvECXKPaHts4IF/J
5S2Xf4abz5/iimFxp+PKFTD7tdnHcpjdEVVjAaeaVV3rg0PcPrmrwQoLns84
zMxyev4E4zNSHLuJC2mLZSdg7vmljaR/eYowxREWvoy++wCWRYk8RhE/95OJ
SjTcfFZ27xbMUjE0Z8LUYLzTVmLBDWEeyS/NOcAQzvzflPtsmJ4pUh9Cfdh2
J+olGDdKw+NMK5y0d1sVk9SnIEf6CPZ1KTf4E/dpfWlPaiTt7Z7RY+Sa7fX9
Pa70R9E7d+LarjfFhowvfR3r0Y/nwtLODAkh8907ahoBR8nuTGiB5R7pTlNh
hnfPTgfMYyLauqsCz1lrNS2WPHd63qzwwzBjp/UmAeIs/9V5sz+xdFdTD0wZ
Oth6ke+s6KBbJPLk8oSL/WDBkbfr1PBesj8bJIjglA3rVyfDWhrvT0hgO/nF
CeQ9lsXYzhmEm4t/9fsF9nIN5LERz4WARglZBxh+pjmHYVGkfdEZmC9Ubm+H
mXfn3pWQ7/5O5XRj5FuleotbBkc9EnaT/E3y7Q49JP0/KNRuwMm6ljr3yXj1
xk1PYWsV2eANuOvd7GkDcJCQH58Es5e3hH2EFVa8mBCyTvkn7uyCJfqtb8g6
RzlU+t6DGe6LPhnC4lP7LkbCzcf5/31BfpmJZj7zYK2e95Y5cMjNu2VF5LvY
bOGxm7RndV7hknrPqxbYw0mPhaeKSb2nCDP1YNZOg8yFpJ66S2xJ/TLLbq1N
wXcpi9NkTIZTxq4bq8DyK3rxpuS7ZxbW7SHrRjT93ibSP6b16gesu3KNPuMM
WE5LKI+GpTOlVymyjpoMXpgGi/Ovb2WT/DbmTi4j+9gSi4pIOCTSf/ZeWH5v
pOcBWcdHTg1vgPMy2+6qYN3SypM2rIYvnD0rX0vWsTENxVo4KJHheg6Wf579
vwA4pHvhmU44tXeScgr8nyrtLBP7lFZaOP8pzDZct2Mj2edCd3XoI54HgUsD
E2GF3b/7A+CufnOPHOJqv9z7cPMDW+dGsg/e2lmjTtYxNVnXCzhJz9zWFY56
LzF4BVPNZcVJsKbS6b2knTmcGFkGi0WjX37cf36C5X/wBQ9FTwE5RwiXbH8F
83ji12dhVsdj4T+wXKg5FkbOIbPidt2Fm9PHV68h++y7xZciYMmK4/pG5P4Z
PuqGML1HpZiCM2vVrpciXkbaFG+Sf1J31E98OK/jpm4V7GWRZ1yF/LsM23Il
cMrsljgbWPtqbe41WKyXeDYd+yxzMNLqOpzp2qqlBTPu0V7mkH3mobFYhH37
6da07zUwvSM3bBTnKPZhY+d3ZF+vo39MIL7ma6BHzl0Hgy9rw7K+eZ7kXFZY
GxNSQs5lfz2M+/NHvf1PxcJe2vFlLaR+ibs3CGD5EpupM3EuoTjOpnZwvcUj
W3+Y3fM85mc47/zI+9vk3CIu+88dPtDt/GYYFu7ypIlgN6dLX2wM8Vz48V1F
cLt2tFUoLOAuqxwn4zmJX2TAwj7VhDWIzy1m6tUGWMw3OHkJZk3rOP0WZrxV
9h6AF+UrFn+Hm+efW8NG/uFhA9tVFiC/5RFqUXAeY3mmEmyySJ5+A65v/V4/
RMY3a6qogVmt2vodcGGeeskzOGnGgGUZiW/dz+V1cFbovfG/Yd/J15/fhN/p
RadHwDKbd8phcHLyN18XmDvkvHABmb/S/4AJ6f+KNbMS8UWluztNJLaPD1kL
hwQ/augj58AdwfsbkG9hM0/2FI7S0bVbAVsb5JnUwFpdf3f8hnO0oM6otBqW
mNVttsE5W1twMaiFnNsPhdrq4BwuadE+2EvOjRV+ETSc2/kmnB4yH7PLLExN
A3HxVfqXwFpPLC5bqMPxVae2GZJzbN68aDWc04tUwtINyfeonPGejnNhHedx
Lyx6Yav7FzzM0zhigfqxCm6c96aTc5fGkSiY+5oVsQm29siJewiXx7ZM3w+H
Z3+aqW6E8f/eYNoCM+YqWa2BU3W/PueQ+ZZ3PTxiRPLRVFTDQTrumqWkP3Ob
yxbE57ak55oM9m0QjUxA/PKLW47TjTFfXf6ddNjfO9HcAG6upa1ehnzDnce3
GsFaWQGfSuB3qsmHDUn/syp3jVAf7bgOXwbMKrQ6shOuH508nwaLSkIHjsFd
smM+vZiPCqf1iWBxTvZIJaw1RnNwJP2/eo1fhAXLPC53YnzJKPv+HhL/xd/j
nWC66b4IAcyszjA9jvicA+aEmJPxTm79Owv5VE10qZtC8knzXnEb+UYZnw4e
Rb2YabPKzpJ6Lfw++pa4rvZiuCq+u4mbbskWkP/D6oacJ2I/XM7fJCf1DTo+
0UwF7ydvdzCNjLcqsl9bGedwq9C2uXCISGqoS+NSs7h7JznB5XMFrj9NQH/x
c/0EmLUsoiNKCeubNPtaESyPf3b3NYU6SX8Z+wJztxtO/wPW9jw6ywH16dru
vWcV3F5xs/sYLBjJDlsOy81jJ7TBqV+v1m6CM8KZ1nNMEP9AUnQ6zCto5GyF
QxqU32hiPmlosd4VWEulX/8EbBjr9OkfWLD/joYJ4tNcWrCZZor5dArfSGF+
0TKbBTBVmRoTgHy6XgY+Xw4Lum8fpiHfV5/VpjrCqcr7zBJhaZHpbGLfZRyr
UTh1+ES+Hcz9wyt2Feo1nBWgMCH3+11dvBOuKj4inETmYxRp7oANu5+1vyXx
XtZMXKpCvuMtGx/Dzf9ajrZhPOFpmvFlmHVSdb8T3MxxOBoFSzKPLziN+Mo9
k2vcYBFdKakI8UsK6jRtSL4Mx6FS5Dt8TOo4G04t+6ciC/URLltqNAWmLPUe
6Y5zKAWdO6ZG7v9on1v9lUOV73mWTdpF533/SRjjUAeWskqZ5P7tJ/a4KDiU
c+m/i+xhX5r1C8dPHIr16NARf7irRnotZphDPW049+E0Gb/TdsbwRw7i8p/Z
DHMv254v/cChtAP/8J5K6huwan23HOPRuhs9ST2i85p8YK3dr1ZdIfWzKXlr
Cyed2bfvLenPmV4bCOfpNPxkbYbn7dtPDcACw/uG0XBX2pPX+RhfobJuWSFM
ua79mo/5tZ0tLw0Sbz2398UQxg8vqzZYCF9V0Zo9wqHYyqN/roC7Dq1x9UM+
yRX7rTbCqfK9j1M+c6gL+et2bSeukIfdQf5BT1IDdsDcNts7p0c5FM+VVeNL
nKT50A71at5QluJCxvM+cSAF3sxjOFmT+1+6/3sZrlLoXZsOi0IzdNbA7dM2
3h1AfOVVe0wuYTw5bfaVajj1wZXKZMwnaD5QlgpzB725NojHq6fBLY60m8t2
JCJ+fk7OX5tJe82WeanIL3W9dJcDLLpd8WYf6sH2eXLLknjRxljxAMaXvLqx
kLixRPldH4cyDFZsW0zu71UOdH/NoUweZO3+mcSzQml3XxeHojfGvPQi/VfS
uWeeI/6YbJ+EHw4vsm7F+0EZz8gm9f22PrS2mkNlzC1u7iUOtVntcp9DRR3v
GTEi9T7wrGkkE/NPsEkPImYm1MqP4n1zVNzPJyZ/ohKKTq6LuP8HynaIjg==

        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], {4.482386206896551, 8.28583448275862}, \
{1, 1}], LineBox[CompressedData["
1:eJwl1wtUzGkfB/B/N11QU6GS1nQ1rOzYlGExw3YlDFLZpQalK2ZTGl3WuGwz
eqWJ2uTWaItWYbLKSGkkSUqDYlYXw+sylK5SJL3f57xzTmfO5/ye//P8nu//
+c80tlt2rg3VpiiqDX/knXo1hpc9h+ol77M5lDD39PZ2WB589+ENuCalqOMy
LJ48lJUMNwcNBQlgjfns417wcENOBAvm9SvuWsM02WZVnx3Gn7LPG/meQ/nu
n9p0Du71d7LTwFKnP//aANcZ65e+gCdVp9yeQDxw3pXUmy+vzKm25VCKnjnd
X2Cmey8/GZY/+pxriflZnpuD2DDD7EgGG/al2E5GMK3n7dntcL6N0azndA6l
yufypLAg40pgFVyYKZvRAk+YPsOhCGaEfr/I0JlDvRr5NSkPttxX/m4BvPHN
WFM+POy/My8Ejt771KwE5hcbWYtg+t/x9+7A4u/+DsmFMwtarV7A3idCtYth
/n4bNYV+vNvGPhfBuoyIWjt4+F5DxxlYtuG7YHeYCt795CAcEj/K3kr6t/TP
DoLz6T/YkP16+ybxnGH5muGX6bAkq7KzH/37+Y405MCaJVt+KYEV7VQCsUHp
apsoeJJH9EgarMwu+9cODtxW/Hw3LB0fv6IVeYbouc73gwOzU5yyYZpe3TEn
mGV+aTgQHg6fot1D8ojon2BP8l9NfbsES/01a4ZmcajjsUObw2HJbTP3p3BN
3JK1NnDgxCXtt2FF4zMf6XTkfv/ooUpY6JaRPg6WpT6zq4Hlp22Wx3yHdVK/
738CK9s7aBobvDdqrn2EORcvG0XDhY0V162xPjd6R5UWzJjf3+IDq10Teoum
Yd62NSeTYOVgx55oWJ6UEFICe/eJF7vDAmth3GtYcTfMyoWMdxZNnYI8DGTd
mvmw96BuLQcuzFFncGGpYK3zVlK/rbJOIA5YuyWRPA+bxQ9lsOKU0TsRyVPm
GtkL0wc5dcT03cUL5qE/7p/BmQnk/NuLQ+JJvxNmxvJgSdeRKaVwOG/c9IWw
fPxNOdkvLUu7xQA+HnfBwRh5CC0auQ9IvzpDj2xhyengq4dhy5Kn2sT05um/
ecKMaW9VhjDVLJr9DXlJ4j7uasV8nEWivDJY4KL+lAUPb9akxMDiBEvRQphl
SwubB6uL7rDvk/6/RqZ9m4nnNt5t6gqYk3L37SNYEHesodIa/YZW9l2BuTtX
S2fA0jdm+bkwNctpWdpUXL+gNSKHjG+7nTZghRxX3LWWwoWfggOCYaWyXesf
WFFT7NpiieffWdSqhC0Fe1ZtgI8zjn0YIvMXeTB6LPDcME9OdiL91jfuz4Ep
M82LQJiR5MP6BbYMaCpOI/s9+w/jR1ilXF9+i5yfKTpMW5i7/b5/P9nfmGKG
E6woNhychrw4694PLIGPu2ivYMMS78MnwuHAwU1RASTfEPPQXJgZaNy6FRaW
qQyfw3K752eJLaumtdmhX2XX6vX+ML0ggNoGyxp/slkEszqy8v6C69jWVybD
Bhv3zX4KcysH/F6R83+zXPAVZixdfetvmF77sxYN+UgzVVbhcB1nYJwJrObE
KW1hFoslG8J4TaQm9V+SX/hjm3tkvgqm3lFYOudM7AFYounqXwkPP+ttnQHz
ttm8MCH1xut8Ofo36MuyesbAPotbnFkwPS/o0CVYmV5Sf2EKzl+ufdERWG19
MWMSLBvJ350IG3QbMxMm4z5Eq9fHweFa5/apJyE/rx30JHL9wJZffGHpAw+b
dNi7ejm32hw5jzYbXYRZ2+liT1g6y9S5Gea76YrazDCP+iVPG/0Jo0zGi2CN
j/k8V9jbtqDLC2YwLlORsObKA0M6zEotNjoDM5alLjKBLb1EZx7AvabxGyfB
yj+Sf/hMnNiwwhmWa6xirUmec4xMAmDJuIa9LsQnA7vTyPXP+So2OT8bHXIb
YU7isxRi1m/2sabo10Bz2vZH8vm2ryjDD2ZWX3poAcsm0hyOkv2pMrl9WE8s
LMy6A4e/X62ugvlK2+r3MGuh++I/SP+sdodvsGJlY+rPpL97ftQorHHk/jSK
PIQeDUmvYYlI9fEqLJj0qaIMpsp27dpO8v0t/y0ftvTLjJwJ885bOU2GBYZP
tnXOQK7XDbML0D8VvaukFFbc7nBzhBX1F91SYXq1z81sU/SX5sGPhAXJfwq0
iEM/+gXAmnNZ5mE07Cshb+UaWLaF/+SECfpJb2IGwuqFq87FGGO+jK3uUTCn
LOZW0EScM49HHofIeIvlO8Mm4Fy1uglkMN9k/bVj41H3vXetg9Sn7DV7Z4R5
xI8zTMn9l75yjoK9P1rxPGGFWekta1jme3BbAtmv70jyF0Pkfau87wIs3WNn
rIe65SFeXAu5/q6xy3xy/V85hUOkvr+gPxUezjmVS867TCp7Ngxrfv7xhTX5
PGue6ydAP5LJLvHEzPx9OhT65ef5fJ4Iq0f156bAvfr7MwYwn0Q84qqF/alW
7PrSQPJOC9OEwfylFvEnYe5oldYVWDyruIYH0yNEiSpY2L9Yfzq5nxs+t7fA
BpdkJSqSl79X8jmSl19gpITk2XQ9zxvWrON+8IaVr9/kVmB9YWPHB12YJne6
rwsz5y4crnXCev+NCnVE/wqJzvoMWCrOj3TA/uT00p5QUne+vsoQeXFX2i/1
hCUcywtt+qgv0mK7EFfH/Xt+HO6PwHaNM8zsGcyM1cN68zp958G0LxsO+Opi
3Iz58V4wxehvZOmQ/6f2HibzK8+blC/VxvXLdJsOkzozxneHFuZPXDX1Bqkv
qPxym0IejxkjH0h/mi07PGFllcl9O3L+7IKudY+xKUub9kZ/cl737m4vhtUv
Qrki4gD2mWqYVnWltgTmXXMrN8f16h37NI/J+cluuBIGc2821ZPzLsx0rGmB
WTlrB4dg5vLt69ejH8rgXQwxxX1v2A7L3Na1vSP1uuqZW9G/oLJ0YxNZL/um
cQdcWFF2uZDcjyFPiTv2K3vrYxUP987vjDgCaxaIAhaR9Rx7sq/C0uJZ6V/I
/o8+KSghdZ1sl6sw/2xy5z6Y9i2sM4o4j1ZmT/JT1MY4kHxWW/yajfWUyQ1J
akfy/V8x7zn6O667PCsPFvYmi8awn/ADnrrbiZur878ij8Ka2KtLYemmCxa1
o2yKP1JhY0fqyxaeih5hU+En7s8zIS74+kH7M5viJGziGZLxyTeST31iUyyv
W7E0WB3VnO37EfXTilJ7mH535mHHfjbVG9XaQeZXmDq+mN/LpgzC9syNcCQ5
HnC1/8CmeDEx4mwyf0b4T4nv2ZRgjjm/nrjWIipFw6aY6ZKlYzBHykxZ8RZ1
6hqHnDdFkJ/zvTdsSn5ZXL6V+GxOzyAsZsbaH4E5JzyuKjBe7v/QRUbyfMRI
MH2H6/eHatURS5aF1GM9Wd/DSc1k/Klu/XtdOB8RX/c8Jq7R637bjf1Vldff
gekvTayF6N9ba7lLEVlP/jg/ro9N1fkG8w+Suvy5xzLsl6etqV1LzmfXf/a0
wAaSlkELMl/Jq8W2A1iv4JjdE+yHN3JANhXmrtW5lU7yjBWIyzFedVFf4EXy
G3sZNor5eY5PdShSn1qm9Qrr96ZtsqhwQD7prfZvSH8X9Jb87kC+V2at2daJ
fsIWVXnDis7mYzzsn/6066ANTCXkNfW/ZFOKq2bjvuF3k7D49bvf23C/ste5
dcLUDea3p48wPss/8TXxgSPLkqvZlFC1prCLmLyOV1LD///d9j/H0Q6V
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], {5.031265249859636, 11.441321666978585`}, \
{-1, 1}], LineBox[CompressedData["
1:eJwt1ws41OkeB/BZtzLIZCVRDFEiNW4ZbM2IXNJlXCa2VCNsQjVt7pTZUjun
7TJdXSpNLZpym402hdxSKjlE0mZrWNWEatY9HM733XM8T8/7fPr//+/7+/3e
GyY79vqFK1EolBb8Iy1lfBo/C9mUf35M2RS/H2NiWmGZKNXivgmbQt3NrL8I
8yfizqXBKg6XftlM3j+Te5cL6zlveDkbZp58KLSDOXcf6T5APwlDB7jG8PGf
nb7sh2dyuuvnwfdEe5abwbLbe5+YwmU7WJkv0errNGQ7oa1td3ssQtsc49ga
jPZhbbSuH1qF09Ftx9AurZ4btQCtxSOXO1VoJ8uUXYfo6N9Tf/ArPGDBSX4J
0/JW9TlgnD194eGPYOnU+lA+nHbBr7AOZq89YpNH4phVt/MpLA6fDm+DB85G
Gf4JC1roe8fI++kbW0fgCMF+JxryzClUc9Qj4z8M9zaA7VtarjNJfNzCZ3NI
HUr1Q7bAopTIG0qwkqQiKxmWK52M7UJ/wZ3p+Rfgsd38xBJYnnLA8iYsjhnJ
SoJHDplolsINy2Z4OsHVbrEVt2Dp7/H+A6Rer1fa5hLTul5LyHtaf0+QujA9
dQ15aAMSmWvC0FJ+o7oZkjhWtrfZkPdWuXFJXosqVJSH0QalJfxHgjY6t0FS
jNbL/iBfgFbHXkU9jNTPr4sTjjbLIaJUF63FUHZWEFpJ4apWoTGc/OnCZtjd
8eD7PiPM12BxRyTcTPWhBsEN96tchXDp126H5wvw/2+f0H6D07jRt7bBDbUG
o92wWXHTOwrMNHRwIPEKj4gsyuej3nGDFZtgfmWd5CTMCIoMPAPHJEZsSYYp
Rx43PiFOGZ9MhcfKPTT/A5f6mJhkwdK6hX6LUL/m7irOQ1jhPubtDo99/mz/
z3jBF6y4sOSPxsbVsKx+YUsgHPZOmC8kzxu59T6w4L7EpRHmXTH2tiHr2N1T
ZSbyE5Uf56jDFvsG+lfAwrDPcS8wfgr7bUoA8b3Pvelw451Qna1wQpDA35/M
h0SNtgFmfPxaRCWOGp40hzt2D1vXkPoO+aT3YDyvn6s0kmAe1+flMVgR4foD
k6zjVu5fBjB7R+GyKczD0lH34XRSj9o/Ta/CghlhtmowvXHHoa1wwq3p+EhD
7Etz5z4HmJGpbvzEAOtq5MIVK3jyaOVdS1hc4Ra3CtY8LGg6PQ/9W13tjIYb
vQLOqsCy+CW9JXCblW3hz/pw1+raGYiHnrl3xAjWf+HsvRJuyxzZ8Gwu8kgW
Xo6HZduvJZyDmxctSS8h8z2Q8E0snGBf8vUTnDPa9N0eWL446dJC1COs6IbP
QVjhVnnaF/byGLG7BnvdHl8bS86J9XGq7bDoY07ZcbjHM506B+NbqP4WSvYV
36ZDaTM8s7Im9TQcFPsx9ArMSNYaPkD2RT4v+y3sZX0khJwvS3sLdsxBftJD
1rOXkX3IHO52gQV71T+Tc6UtQjprI0zz3hpB4hfO/7beB27I5wdFw5zOronl
MF/V47UpXPboQcc4+qdxxwNLUa/O7K7yAphyInXUkvgXRxdPmL7L91wx5p0d
OTyL1EswZCrwhIMVlV9cYcrnRQtGMc+MVSkRN/UwX5KC6zVw47hqtgYsE49r
3YBV9Dy1o+Zgnfh831EI96vQfJt08V1RvOm/YX3BiwZnWNCTnEdF/znXK3fd
/hb1c1zxKhiOOeEUvxquLtbXq4H5zWacdzron9XSYUPirRt3F8Oi/eXf3IBj
pIuSY2ALjX4aDfn2f215E0Kea24I94IzDN8u3AmXeXTuIeu3P1Sl/Sd4TDs1
+ldSP4NV8UWw1+FALbLezbyM8uWw0DbhRAs89l1XtBXiYZ9//LQV7myWrN8H
63+iBpFzXGX/6zulsJi+OqGArK/YMHsFiZ8ZaJ5GzpdjyUVGyNfrjOr0RnI+
eebfcoHldmWOOuQcm6ue56ZL9u/5gSzkc4n794AdzFNVFqrD53oMl2jAMu8r
Z+LIObY2Sfsx+ueYJAnlqKcgk3J9D0x3zbsWTvbhSQejKcTP/m6GaBD7ruLY
wt+TYNq65mVkX0pbvmbKZyM+E2NOADxTwz9/HUyLEwutYXHYr2sKaPj++2M0
M7g69/6EJixTJJY6wsyO7bnyWZjPHMXLH2CBPHm8SQvz1O37ryKYtrpzRbsm
vvPblUdFPPKpdUpqMHu4RDsOFm6K1grTQBypXz70knj3058OUrG/xv7o3EHO
oW2v1/wOy/Kuxr6EaV0VOjepZL0vDF2NegR1LQ99St4vdWi6DFcvWmyvS/pb
O0fcA9OGijJSYIlmDU+drP9bK+ZPwBH5lXmk3kEVzY5HEE8H88xmLTK/d8vb
tBE/e1KvdQDfKy72vDgFK+bbfioi55fo7tVxmLGkJccXnql8LdcD+VfPtW5/
g/jGMisbo2Cp2oGILbDXgiU9oTBt8eLZz5Bf9ab+D5awuG5Q05mco11t9lWk
XgukzyWoV5lLyyUTWPADpc4YlqQ9C+YiPt4Gt1c5OCcZ3SeGtiN++ungkJWw
qDi+2wv5S0Onb38i56Yk3WOeOt7fJKHehWmhO/e9noH1wXvndhXOCGwOzVLD
d96v3uYZkPeueYSoIh4rI0UDec5cIHNWgbX8zVXRvz59zSwbZcRnV98XCEsi
U9atU8J33i3pFXC11Hft2W9Qn90vrpD1klGfmUGFeVU9shxYP7KDX0rBeXHn
Q68h8hXtLskUUcg6TeAch6UddbsuwTLbyyNf4A53sfw5LBoV8FzJ/Mce0bRG
f/RDaYPJsL6hePY1mCLZxLgEl72ofL8Y8Yh/9H9zBZbXmN4sgZtPaC8+Covt
ExnOiJ/z4Z54I1ytG3BKCovlrzymyHiZp3I0kW/zT8Uh58n8bFU6twZm3xVu
nUfW6/hOhwCYY9999hRZ37NtdtvBinPa6lPIn3f8Y5QM/Yn0LppEwfRsestm
0n/+uN+fqCfd3Viao0TOy32tm2H2H4y4WsTfXKy0/iPOZX1+eck95MtYZ5F+
AmZoXD1vNc3C/VifRM5xUbHvrPJJ+DjjsDlMH7T2dhpnUfj87DfzyXOVwrMV
oyyKoix1ow25B/YET24eZlHYe5KWh5B7w9zRdckgi1Id2334Bsx7ENDk9DeL
wlkqNVVDPLiwbzl+YVF4Fy3f74NlOdy1t/vx/pu6/vfEVuF9X3sxvrJ29zaS
38GgRHWY37lmfStxdLrSm48siuwnUddKcq+3xVIj8Lz6tGVjBrn3zbZ6n+pD
fDqXJ9/A7NqBV3afWJTmfSdCNcnvLR05D5ZjfPGMueZGpP4TLlEFCsTHYFXo
kOcZizbVkHivN2r1ku/XXI+uHsD39Rm7ckn/oV+OnkN+vLC1SZ4wJ4BxxnKI
hf3nbtaG+GgPHA78CPMWb+dyiI2qprfDsvYnj2qQn9Tnk20fvpeGKZcvI/ku
2zZIgzkF/nmXST2jGDNbMb5CIZbrwtUBM7SYiI8+Mywxi9ybN5nsC6iXwCUn
24783pEska6QI76wY/k9uCfFbtq6cX9hvKCyJ1Jyj0q8T050siiMxqn2THKP
2jTdGnwOn/3eXUwckHZjSy3qZ8AxqJv7/797LlX+r9Vn/xfomrLp
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], {5.445389222627836, 6.620169257907215}, \
{0, 1}], LineBox[CompressedData["
1:eJwd1ws4VHkfB/BTIQkJuV9GFCm6uDQJcxRSJsloSWgS0sVSKuy6TO4i991K
YVy2Um00WUnFJEVll+SVrDTIu+3jHiKh9/t/53l6zvOZOfO7fM8x50nHJ8jF
byFFUa/wjxwp0Xe8dGnq/y9pmho5V8F/QfzDy9uyS2nqyi833yfB9PYqmR1S
NBW0QL2DBfOC828JltDUBekezbGVNMUQ+yXQHZZO600sgEV3ja0t4e9+VxWd
YN7GL2+9YU6YUPhdBzbuePgYjrw/cPA+TE9N7eWgfvap8NBQWDRkbaKM/hc0
vTS3kfNvd1+ch5/FVXapwMIi5f5ZzJtSn1Q4y8C8tTMuYrI0ZWaTf3sI5sYW
Fkoso6lMQ2bGAMyYSm2bhBVOV5hNwsENdmd85Ghql9eHAUlST9/DtgL+c9Qk
Ug/OGHjbMAC/eflfth2Zr7b1hfhymtK9YBUeADNCXS5RcOpk0IIUmCq5ot6F
81et0xkqhct3HHl7Ga6ZOBZSR+o9+NpuCZeNhmu3kv1uWEplYx7ux3ej7eT7
Lms/nsf8s+4vzjST+j/0Kv4oQ1ODBhbd1eT8UYv4Xdg3JCNO4jLMP9d71hh5
/MeXFX6MWNDfqI/8GmP1AjaQeg932mxHvn4HvK8OknwuyPenSNLU0xvSBwtJ
HtluR6Rggb7Zgb0w7493lfWLaeqndLfJeW14z2zZY9iglhftBTNW6E1NwMxh
1631WsjD8ficP77vHRVWzIQZ8YHrZdDPc6AyqlYT/VSfOnbDiuGmhZ4wbVLd
9RfmM01SrZaH+Y1Lm19j/rNP2Rv6NHB+5p+a77BfTr2U3F+wUPfV+XbsL+xx
lGrVIPfTn/sfIZ/Rsvn4QeJmE/Eo5GdRZFKninq8gp0nJZFv0mTo4n2wKCLM
zRy2pd72X4KDI+/M2cEOLpyID/DoyfUW5HPvb+uer8T8omu2vMXwr+z5fz1h
yrqoIhT1B1fxE5LIfidm835H/7qmvq98sr9pnV815st5xssrgrnmE69LMf/8
4RVT50m9g3zDZOx3zLCuwx3mndqe4o/9/b/dDZYm9Vey1zgjn6SUJ/bXMQ/D
yf4yB3mWJB82WEfyk96hEYm8uXONiwrIvlbP59slcH3aNlaIaZDrZbT8KOwd
IlPno455xBVtmMSfTdRq1ZBvzHF3e7jF8EutNswrmunPhGdaJaLOq8JxHGcl
1Hfv3J0rBlPae+Wb4BuFGRlZKugnPa9ZinnqjaLfboaFJ5u5hZhXYGl074sy
5pUN8LmOffLn2MotMN1QPXkb+9qW3s19CnOvnRovRh5yTY8imsnnPdITUcjL
8GLgo1GYr6BEbUKeYQa9LF3UZyyMMroHt0xsk/KBeexhnW/wLgEn8jpxdEiI
OK5H6xl28RBMl8f0tuDzCPbGSGOyT9KhYwdh16zivb4ww1tVvxL98v/RmU6G
+YWO8u8xj+zGTo0r5Hxtj9xuzKu0Iis8B6bjbFUbsE+17wPqNPlc2W5TCfat
VgiaZsKihzFacchj3k5R7CPJR03m82nklSU7rB5K5ql+3BuLfCvqtoVMYj/q
KC/3kThNeRyydzoM82ZG8gzgDJ3vL54pYR73Nc1/idGUC0fs8kqYVrRVuAdn
tadWRa/A9yeUtdthw7HrOn2K2Kd9LNAM32dU//6TC0x5CHxewSvdx5paFWBe
UWY6+ru+SdgWQFyyaX0o5pM7Fzuygvjnz3lnML9pYFLpe3n0Uz2rGIn95htK
R2phRlahSzT2D+gY7nsI80qkvH4k1zO25odmWOTXYmqF/KIWF/Z9gYXjoTEi
2EKhS9MY9UVekmv3IO+a+PyXQbDQvaYhBq4Mq11VCXNnN82EwsdKk42+wbRe
ySVjWHK+bIyJffhvVcrJ388Mx7vnKCwqs/McQX9nBz/FZPI5kw6VhH2ia1Oy
YC6TsYrCvJZaDP9Y4veJNn3YT+l1u7gHySf4YmUt9s9QVlqtRMyZeVaMfFof
xHRXkf70qd15yM/XtCvHluQTd07uAcn/cvj7R2R/4yy5hXBNLpO9muy7xmKW
twh58XcyE/C7L4ySfrwVztEdO9OL3w0qoH2NGXxn8d9LbGBR+Y6eE7Aro+/e
Hty3wpkxpw/wOsecWibuU66tV2c86n/U2PXEnvzOMZ5buWGe223+XuekyfWR
oxwwb9XxqqEh7E2lXV/qiH0azQy2psP8/kwPF+xblWK43w+mS9ru7MH1jOA0
lQTCjFXVu82QTwsn4J8iWHhxX8UXWOXulitzMNd0gSX5fRqcsnU6jX7UI99r
H+HpXbFa5LnKdWpLXoRjy5FRh2TMx20NvdSHzxs79eqXYX4hJ6cmHm7bmtYd
C9PZR5WGUd+5Qb+jE+bt3S7QhU9PNQctJc85UQxrA3k+1H31lIWp/f6J2pg/
bCqsrBvnM5asaJvHvtyCCLmfSH2Pfpsu5NFxxbtHRPJ50ib+HHnpxZSbK8mQ
532V4AXybKHry7Slye/zk4TxhTTVdKVunTjJSyv85W44Lk/tSAv68owSd4oW
4H2FqydT0Zc6uGawDPaNbllth1xpZunZGjhuqdwFCcwheql1Sgrf74p1Y3ah
LzUtYKXDYr8tELSgr6jx8D47HGe7Nw8P4n2+0drClTiv3mZL+2Zi9yAZdcxP
DcQM/YG6QrFhbR3Ule6JUToKc/unbq5G3xNR3eHOMH9clKhJruertMwA4mfL
907DN9St3W7BvIS18rewBzM4NlsO9YVmJv1ryf3P+ndnGvFNwekQ2PaeiaUq
5qJSdDwjyd+zsmHUbzD3VvEhB9ih3EleH3MKA1YntKOereHPiVnER5YMrIMN
Sh3T3xP/fTuNPI9SOfz478Q+B/pcMW+cHt07BnNXTdhZYR892edp5TBdf+iA
Grl/n53QsCDWNfeaQV+xLePt6YvI86LQewBz3ojPv/cHjtQrz+wZ7GXraq4p
IPsFyBeZ4Nglca3gAkV+P3SW8nF02Lh+pGSeRYn0b96yh9278pRVZlkUN9/h
8FpYcuzwndSvLIr/o06PEznfLeBXtSkWxZDuzb0DZ7jz/DomWBRv55phW3Id
Nh7Z2vkZVi88toTkVqX1YMMY6u2focdguc1F7JYR9Fuo9HoEc2eYvCtYNoz6
iTLOU9irvDjKWXeIRdEdmZFfsS+9edJDDBbd2nPwkwSp37y+EOa9qZquRF6j
Nq9zu/F9rkfd5H7k+WloXw57FPWs37AayX24JT6CQ/pftT7zDXZgJXw+gfm4
KfpWo7CK8eQwbxz73OGFXIOTxF0FodiH+2u/oQ4sGbh5zmIS/VrN4vzRb8Ol
OtP7sNBDzDsa84zaB/l2waK2uQ9nMW/Ato/LCohLbD7txz4dm5a/nEY9qt/U
x5zc15zG5E/oxyuLSldDHir+YfdPYR5RRjZbEflVVbHH+WT+zmCPDRR57u0x
WkT27XsROI7rRF0cHN79Cf1viqt8nmNRo54Kw+w+vB/oFREAc8WSi7264KPW
Vp4wpXAyekcrjqH5qU0wz5idevwJfDfDXEDqkdfvjykh+X/Kd9b/AAHSgbw=

        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], {5.22992770204188, 1.821948653054139}, \
{0, 1}], LineBox[CompressedData["
1:eJw9lQs0VHkcx2+pjtVjl06aJRvuvdx7Z8ZaZFQav9jaJSGlOjqVFIpFNagV
jbzCVMu0JJvFbjY9xtFmLFKNwk4Pg96UTZPS2ENqa/VQ9n835/8/5557Pvfx
//+e359NaGxg2HiCIGLRxd8/LgpEH0bRsgGiPb5GpSVhjkXm5QKwRbzszLYS
Elo6LBo5BeKAU4KWTBKIIA+H3PuIt27xtkshYd6rs3FOX6HngjVWrxUkGBIc
2CUZiAPKL2YcJ8F1sIyadYt/X3jC+A4JtrG3BawVBURWR2eTKQVnBPscooMR
l3oMO62kQPcqNC47B3H770rXUgoMkt7lhpOIc9vWr/2bArutPve7zvGsLCSd
acgPg5jDGsQ7c6Lmymh45lFE+6gRh0z3aT5Gg1nNd3P7ixFbCy1LWmmor88O
dUzmz+9vStHT8Oh01uyN6FwipdqWfUxD7o/UajsxYnjoF3uLhgUHusK8JvLf
58xcVE1D7cS47hg98qe9YWdFGg0jvnsPfYriRrh9+S59MQ0fLvWFmtQhtmZ1
mQQNRXvL0/P/4P0/6KdHdlWGNp82b0ascVo/PYqCBytWHZjK72c9Oa6QouDQ
prT3k6eh85g58aonKF5Rz+savkG82anURE1C3k2/68P7EA/tXXZSSUJx97W2
R108v7Yr3UPCu+3O2TYONLJ/ofuzVBJ8kyMIAtlJMC5R6QUk/DbORKRGfhEh
lXuczpKwcKDJs9DWDnFtcPMgCUec9k0KDkdMeDWRDhT4bp2kkvyM2K3RXh5P
wXK5MojWIn4qFhxAcb9rflM+oEcsSAedCQ3i/i0lXoOIszY3XPanoW79jCpt
P/99QtUaBQ3STsuMcV2IV8cZDdXR4Fc9NdLjPGKNdlP9XRoa3SXJSUWIjdMC
H6J8uIRLn4q3I2Y02UU9NFx1UdVM8+Y5USS5TMOiCaJdT3j7Ayz0X5Sh/DoH
ufgbIe45taA+koac1JyB5AHk71CReilLw/Cv62JMexGnvA77s4eCVmrHoOEp
YoGiLDWfAq9m1dwp7xE77n4xwZeC+5f0hNKat68zt9aYgvPLNd4VgYg/s0yq
aCPhrbrK/EgeH78Nvp5HSVirlWe85P0L6d1hk02CPLPyRqHQHtWnlVufnATp
MGo3uT1+PxKxTBRx0x7/P9suJXEyzeD997j5GzbGMPj8RZUeNatUDLbPXmo1
Gv2AwfZr3ANb/hnPYv9cu7NMzWey2P+p68ryBi1ZHJ9EebxZqhmL4+ejO3G1
aoTB8T3//kb6590Mjr9ba6D38xoG56f9p8aZ1/czOH+ezdrUtDAG57dm6Yt8
zUIG57+F6U38wPs3Vh9Lfun3l8xgcP34TygIaTBlcH0dvSNMMbNicP2xsdEn
uiQMrk/H3W8CtRsYXL89Z2Vvyg8zuL7nj5t/LuJ/+z/W/1ri3xs+HIv7oza9
cHQ0icX988kP1xL+6mBxf4VTzo6zaA73n0x8Wmws43B/6gumLfaq5XD/Rhcn
jX/5nMP9Takqtr2wEuL+X1kyz88wT4j1ITIxeFfkt0KsH5OkguJXi4VYX4zV
OzcPSYRYf5aMKGzz+P3G9KlFRhc1vOWwfsmi7x3rvM5hfTvsvqPnyHEO699F
54TitlQO62Ok28GWGaEc1s/9lWFdah8O62tf1oW8cA8O62/QbjVJe3JYny2v
WJ4yX8Fh/XadUqxIiOewvgcYZB3Kcg7r/0Ml23dbz+H5oJu+7t4jTojnh4Wi
43Z1ohDPlytTvla06oR4/hipNB2xpAjPJ6njY+mtOBGeX7q+7123XEA8Nt/u
GPF3MfwHyoOxBw==
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], {9.0548, 11.75}, {1, 0}], 
       LineBox[CompressedData["
1:eJw9lQs0VHkcx2eLlN0yDzN3xKB7b9pDiWrR2Oq3WWRGr0k7zlBGJZpNE1FE
opcathA9t3LEQdSS0WltDxWN0sgrR4w9rabIVttR04Pa2f/ddv/3nHvu+Zx7
7+//e35/U9aoZVFjWCyWGt3M8/NFQ0OPGV1TgOWhCZJ50+DXnuy14TrDF4IP
Kmm4OPnJ/AcJiKtWDMxNpiFmc32bmkKcc+TSw500uLf6ZelbnIE1WNxvlUDD
ocS2Lu12xFWKedt/oKFuaFXvY1fmffTKd1/TkF0paznf6ASsJHcX35cUaEoH
iqZKESvrx+vLKQi4PZd4MeSIzl8ceyeCAvZC79AZZYg3exQW2VKQsFsVKNnD
cGy04R4Jl5+mUfo0xPsT829nk2B8fFf7YwHiwue14lASrvq7/OTWgPhRp1E5
i4TV/OfiM5bM+XzfnSIS7Je8rJ+7AnG6tK9rMgnVkZeW1pQgrnesznElIbpA
MifZxHyfOFgnJcGnI4vMFaF4PPwy5akkmLKSYl55I25qtUj5lYTXtsJTpgDE
j7o8k80kyJcrUlSLmPg3VoskFMhOiZc8EyMGfeHzfAqOHy2LG2bsPXqTFd1L
wU2bDxaDj9F53Xc1MjsaKseIsvdtRnxMH2GS0HB9/Jow9lMUDzvpQkgsDZdE
65U+EoatHkak0TAyfOzFlbMi5P+1W+wdqF6WnmbzBwdkrzk/ZQMN2o9/lhaE
IC5cnqb/noYlVYnb79fZIw4sEXNoKA8eGJbORsy66mtooyD0/XBJzq3JKL75
3ekaCnxrekJq1YiF7QNxCyiACjlrqhjxYMp1TxMJ+/vcbiRRiJOO+nlVkaBs
7jyzyZX5/sDS4gQS1pt1po9SxGVZH20CSPAPMrpl7EYM3if9p5GwKSLX0qoZ
8fvU846oHqpru2YW2yN/uhdsjXIiQaEuyeuPZXhvR5MXym956YTZjP9VT0R/
rEb1pVYejfyA2HnFTf8CEvSVQ7TFVBQvO0pysYuEsbkLqT5vxOlWJ3ycUL/F
cKjp7ogHE1bvUFGgmFacPWCJuDVj4mgNBcKx4r97ryF74KIOfEfBWuudG39R
IH5l3C33oMHgeLpdZ0D+Fp6uuRpGg1WH+Y1AwrD9/t+30tC2oyi0pcwO9We/
TphOQ8jPzLwJ8fvuuvBST7kQ/18UZbZ+Vktg+y12kTN8KAKfH+CefnhZiQD7
l/dN4xf0dwLs/zJO2BbhCB/Ht671haGjjY/j15muGMgmPs7Pp4e2vaM9fJy/
2LXnYk6PE+D8JvTJ397zF+D8xxGKWFGeANcnsim1NcwowPVbNW3TyPs5BK7v
vnn2nWmpBK5/VKa39VgtgftD9ZurMvcBgftnYXnH/EwDgftL01tq7mkkcP8d
6qArJDkE7s+4g18p1N8SuH+dxcKJ2nsC3N8pXQf2evzr/+f+52t4oaoKPp6P
yIwWFmscH89Py+H1XL9wWzxfvA3Hz+hqeXj+rNNOFf9lx8Pz6bCnf0vyIS6e
X6tt40YJBy6e72PyCw72DRw8/y7BmrUzNBysDw5GyQQ3NQfrhzH8fqNtPAfr
yw3nSTOdcjhYf3zzBur6GHv/6ZP/WW3zPmsu1q/RrkVVwQou1recIfaC25Vc
rH+LKV6jcoSL9fHlcHd8py8P66cuZI40X8XD+vp6ebphVgYP669Xbf7l2hQe
1ucTb3Wl7XIe1u918Y2DXD4P67tzLrGqR8vF+u+YXekpE3Pxfgip9gvyOcfB
+6PiZLjsiDUH75eNT7c9W7eGjffPa+mnyxBvg/fTnSKVRcX0SXh/ZTYQLmFj
JsL/+21PETNvX8I/w9S1ZQ==
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], {10.9452, 6.25}, {-1, 0}], 
       {PointSize[0.04], PointBox[{10., 14.5}], PointBox[{10., 3.5}], 
        PointBox[{10., 9.}]}, InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox[
            RowBox[{"C1", " ", "N15", " ", "T15"}],
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->6.137505285412264],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          6.137505285412264]& ], {10., -0.5}, {0, -1}]},
      AspectRatio->1,
      PlotRange->{{-1, 21}, {-1, 21}}], {44, 0}, {0, 0}, {22, 22}], InsetBox[
     GraphicsBox[
      {Thickness[0.005], LineBox[CompressedData["
1:eJwd1Qs41OkXB/DfFkVIbhmSHZctt4QV1uo/o7QocmnKsJSERpRs0mS7CAlR
lFAkyv3W5JKRFEJCsq0sJaIRK5VqVOws/++78zwez8f7Ou855z2/32j4BLv6
LaAo6g/8kN+UaB4fLSb138eQSWW9d0++DXNkdBKH1zCp+HMBPhw46ZGBZjec
X5GoRYNp/iffdsIVUvez2jSZFNfA068PNuJOpxyDOSYt2z/BDodFGWZw20rX
JyqIv0Np19w3DSa1TKzCyhHmfZrJaoG5XOfQeFjeMmX4KmzUq/tnF8zdcf1y
JMyuOOWlvJZJGahJUKFkf+Doa284yNadFwLzL97UK4S9p2vLwmHvhZryE3CF
gmZwIqx4+cKgnBGTslEO/FQAhxr7e+jCIwY/P3sI9+keirKEQyPSf5uAaZ2y
N21g34rqhTLIf7xxU5wt3Pqnd5MBqdfzNW0j/HTNPilbmG+z+r45XHydfdId
Ds1d8uMq2CCu93sfsp/uy5WFJbj7OLtg5vvr+X8jP6My+93OcPqpxSE34aw8
jxJT0r8Pu8MOwfItT6Ol4UJHpc8WpL6961r7kJ/OcrbcQthiRf9fV+Bxy4+N
PeiX3m+h2SyYbl6fxoM9dsXvl4AjBu4XpMPx1s97+XScb+EUfA6mt6/L4sDU
L+mNF+DowS2JqjDtjU99Htxpq5l//Xt4VUpHK8y/MNasDk+5ncoXws1eUwVl
6qjrKz9gDfJp4wWnucJ9248XHYCFP0m1y8LMs4+TqmHakb32b1aiH+1nxOZh
zgKH0WcwLfGbQAv9EXbPrXsJOxv6uP0CT5nwy2bI/leBbD+YO72dvxrxDMJv
J5+Ee/wejPnA3bWG4xdhQdZ7vXw49PWDuBz4m2KO9CRcOpDytQB2/rT2qyHy
p4qVpIltNtUfDYAT6MOiLJjz8ubZVFiwns5OgjsV1DtuwXyHgn9/h6XtV1XW
wL6r1BX3wN3tFx/mwc3vamdJvtIrKyvD4YG1P1mQ+eKu/svDDD726/ReKTi2
vbG/H/nwc8e3DJJ+HHzJ3QvzLo9Ml8Cxez6eH0G9fTFFFyLh0p5yTye4W0mW
6wtL9Ch3Vaihz7mTwdtg560OtvKwEe9TjjN8TL/K89AKzIU+67Qn7KnTfO6F
KuLdmn8eBjcvrRV3hpPsynlZcPT6yy7PVLC/ICfoKSzanWYcDGerNEwtRr4W
5y/50WHvxaWmevCxHsmECRrmbcoqaiscEfJWpgtueGRvcwgeMMlRaYd51t8/
T4VZc4ZlA7Bw09nqGjjTXOvmAsRz2Gwa0AO/uiWjZAFbnXGoe0useV2JCyve
b6kSkfvLUfath4PU7MsWGeP8fEHIAuRf9WznNkm453RhpTXMjvHmiZH1oMnR
wzDPVVxnBv9vJMvZegVm7k88NEbyOZ/zpRi2e9qW3k3uy0X+ZS6JF8B5WQ2b
tgarxsBW98xq0uGUHvsZR3hy6J/acNg7on9OhHyc/52M8iLzN5gsSIF5rCtF
G8h+qaZIGpzJZV3XJ8+7onPZWdQvoSuqVoFpHtZin5UR/5j6OxlyXobnnW0w
K1VTTJLMk7CUVbkc97JSx4fMi4HhIn9lOLRtsaISTD88YH9aCfEUqjp+IPMe
0j78HSz95DuBFanPf56drIj+JhVx3El91aenzGBWrLomyd9uhaBXqIC5fFqQ
e5Xcb/FSmU7Ys5HyaYJLx7+434UFB/LuviH3wWc5NsNTKgMrSL/Zh6NdhmHt
R5Hzq2FhXEaHLOL7ZpbIb4D7ErTttpDzlmlY7YBFhm4V5+CEMPHSPfCrJvWL
PXBuu2A0AKb4wyxl5G+jcreVA7NGG2Nd4MLGkhhveDzjH90TsOgM47YLbCOg
D6TD3loHzNeTdXFDjSzYYVGBiTbs69QffRZOFw+TkIDtrMTrdsGCgQPMCdQT
tPbFTVUSz8k0rJM877+1xtYjH6F+zCYe6Qd7Q+pmWJDoaJYGN5zUM29BvfSZ
rKJI8j6a/VBuDCe8vdpG5p0+wZ9KkcccuC4PCyT9Fp/dLZTD/Rae2LjPiNQR
lbYdNtJ7G3CQvA9kNyy7twz3W2f/8DicfmnJRxNYu17iVTJMjSfFhciiHg/F
0RI4qckqNn8p4r0eqm8n93cwbOsS2ObSnNI7Mk+2VhLZMkzq7oIb++VQb2Fr
/2EOLNhuYWAGLzO8NrIbTsg1rHKHueeULGPhhhqxI+HwlH6+5TOY1ZgqkQbz
i/73gIn4halNRuXG5P25xqIRTq+Pmb1H7jfTaXYL8osdfHW/jfQ/+I+JZ3BK
ZJ9xB9xcETeri3raQl09W+GBWslOLzjb43jeHXK+y46qU7AoZ7CtEDaVMH6Q
DAsV1nclw1UyZ+biYeaVflEYOf+a15lAOOhiSgfJn/KXvEX61be+uetnWKKL
rtCE8xP2Xc1VJ+uFGXlTyFd4UGN4IUw/4Nb/BfWJvOJnJ9Gv7Jk5nwFpPGeb
dcxfkPv9GJ1QLIXv0w9JV5+Q74fHk42BS/A814+OkX6zM6hl+pL4e1xX+GOY
P2We8Xkx7rky3fsvsi4XptS9CPd5sMZunJjN+qldHP1gl5ydh8dZAS4TYngv
VdF/VEM+nOWcP8zg3AdD4mR+dXSVFlUtxL7bs6lk3tPLPw3tgTOFx9xOk/yT
LF5sgq0MGoqK4IYT1ovcYDuvI9Ok394rV6y6QGxypG4Czj4S8vUD3Ob1S6GY
Cf4eVR67F+fxnpzPpcFTpu8L38P0N8UjP8Cczf7+4chXOJI8rg+3aWimzsN0
w45LejDNMmLnIdTH1RRpa8JMTn19BzwwLKerYEK+F6QWUejHNy+tmDmSn/Ra
e0k4osnXf5TMSzS3fAT71Qyq9R+R/ISD5XGwRd3RnSWkHzk+pnM4LzvxypVE
ss5anbEB9t2d+HsIeV9IW6b8inwFwX6xbJg2EfDWCfX5Dg3RbUj/khf+qLMA
/ZtxC1pH4uVGur+nyLyGbVkDR7je8/SYZ1C0cCdHAxJv52DNkIhBSRcdLDSB
jZ7dqY2cZVDaqgwLJrH68zG3bwzKaMPdEyyyX36re8gXBsW5llN8AO42tep9
KWRQEezTOSRfevIReuFnBpWpFS/Dg3kacgd6PzEoz9ip/T1w0sh2tX0w+0Wd
7gxZH/uctQv2TYu6oYb+0WmKpeUwy/J3x/VwhJr1jc2IR5nz77rDzvdV9bRw
Xuh3D+8chLO9LL9qTzMou/9Vs06R+wwLabREft+Ke9/Ek/0X2m23fkW9ryu0
E4k3RvnZox6Lhlq1WPjVrhvayjMMqoGTZH6MrMeONebCPRXzJvuItwReGoG1
85po20h+ed09zTBrPt/YAu6uOfGDDSy97dq0KpxkPvLVC/FjtRJmROT5m7Mu
UMT56a+vvhgi/fz7smcw8hWpbVzbQubVfrj6KOoLupMRQN4v3RNiZhs/MigJ
Sd8nmeT/Py+XrH/HoITPzf3I+4Aes1e6cZxBiel8HEkg8xUQXXnvNYOymr1X
fJ7sr7NY3vKSQanZ7mm+DDO9jiaU92D/o6cDxWS9SXBr6SMGVXX8581NxI9b
WzbdRj/bGIokv/8+6fWUGPltwvw/bBbOXw==
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], {5.646532742524277, 18.05030914174759}, \
{0, -1}], LineBox[CompressedData["
1:eJwt1wtYjGkbB/BXq5RPTJJKR5UMhRBG2WZSmLWkVZGOEzooauTQkNWoNqm0
g1ZDxdiKSWlHkUlqh6TBpkiJHKZVV2mV6SAjMd//2e/rurre6zfP6b7/z1s0
c2vMxlANiqK68E2elEqNL2sW9e/XTBbFOLBbUQHTXKbsGLJkUe/NJg9HwdIH
dgsHYdqH2B0zYXaGT/sYPObqEfXcikXxfOpj9LHe03ZM5zTs8OFC/BK4J3yR
7RbYcv2vBlvhnXeFgTawfHBedzasbTB9VIUnzeCtUwueNnMTOp/hKU1K1jXC
PMn0hTm3YeqqtXUQPDZZZV8BW762Mi+E2bw4xnXY6Hlhdi8stDVWVsN8WQjD
HnUadfpZNcKqxIdN4bD2CpvV3TA3qDgmB85qLEgbj3URG+z318HTphr2kvqU
QUJxJ+y4r9BlNawwNXBWwSzzs75hsODly+ckt2HN4WlJpP8X50u+wDwOb89Z
mL6r1/s9vC4roPgyWS8TdT+Bb6WVf19G5m9u7pDAkpWK8RKSx9Fg41Q4YnU0
Kx8Wnxst8iP11rbkpsMsdtSbuTB/SvvSHWT/KU/MvuC5syTs7Aqy36uP8gY8
uSkdt7TwbMo/ZUfyubt/w5Cc9LtSEkzqLBg93plM8oztYETC7ip33gpYODd6
oT9MnV1eO4B7lZbp+G+GMyIfDVyE5ax6r2B4/KPMhUEwd7+UuYfs13/lrDHM
v86rPwlzsmodKyywX+A1k2pST+JwNRtmRR39qiR9LB5/vM8c99cV8JDcj/Ym
5wsXifvun4iGFVWx9H2w9qwKi2skT8+u2C2waowyI/m2dQx/2AiLWyqtXG3Q
Z72GIwfmliubk2DhBYsJCTDN1mJEBiu7PseXwPz181JHYM9HZpO7YIeNs55Z
zULeRevv2aA+tujPX91h/t2D28JhTtPUv/zgtmM3UsQwbdwL01CY0RWgeAtz
hwaOb4M9Y9mlE9G/9unXhZtgXuLVi6awrC+Qw4TFz0LZtnCEN8vGAs7dn+RL
rGzov/YJ9Tgyv30zgT2fOlo+hGnZmxu1SN5pOkU5pD8/9ZkGnGe5ZbEkCmZM
CWvlkfNn38j5HnawLKbpwYwRWo0+TNV/vC9Ef7LWJS5K5MWJVc7TJ3ku3zyu
heS9e+Jgkhn2jV6fXQv3uM1Z8MGURfl27plbTebP8Fm2BZar8vbcgelFBjvu
mWBf7QtlzXBq2ToNZ5j3WFZM9pd+5gzfnIGc/ja6bITz2WOHq36AObq9KWth
Xk+WU68x6vPnX0+GI6IP552DU3ct9aqDWSNZKyNg8SWl00TkI3XOKFkDyypX
m/wEN4XM+3kFLOHuz8yG6WW2B1bBnp70xe3k/tbIsziw5TStOmNb5Jo8Rycd
9p01y/En2DfwJfc2zHLxupkAe4Zp/qM2Jj//O/ry4bbHu9xWkvoHuxtuwQK7
AbNkWBCz6vF9mM9Msb4N88b/0v0Aps+fuuAj3HSnPV4Gi3SW8UyRR8+xQG4x
3LR2+83FxN6vpx2HLU1Pb2LA4q+hxuFkv43h0XQy/v2dQ87EtUGfNGBVQ2/c
JDhVIqmrx/6pgZPCX6I/yQzNzDiYHzP76hWYvdnhtT4s63L5I5G8b5fouufR
Dyd/elYgLBp9ZWVK8uo/5MOCHTreSzONUHeAjtAeFvwW0zJqiDqvWJ2zJnn3
7by9HRYwvjjZwsKMky+bpqO+iIkPHMn6+u+4bjDjjL/dBrL+IC1RZoCct7fd
3Qsb1eaV/AhLLY6kFpD7aO7/1D0N5+t5qUn9ii6PqmzYqDLK1xT9OXAVyQGw
iv9XPIfclzxdZxnMejtmcYnksarcbDac6lXc0Qez/qOqsIMFNb4Bi2bjnHdj
Iyth5a0pbrEwP/eGSyQsn0/nFcOCDak/nIN7Xs+0fgmLtdQe7bDwxLVaDTr2
yx2YY4Z66bc9Xc1hurdHUjAsmLJ7ZB4syld+y4MdCtbcWAi3ORdFPIUjTiU2
z4FT08RvvsF8PQN9Q5jxR/o3Y+TDP21bOorz6Fejv1mRvOjxrFaYZX+22RCm
XWuVkvpY6QUrP2G9ZY/Wqp9hdqV9H8lTfCrEeT1MVV322UfOV57XMIeb0ue/
MIApOu3zAHn/jN0uFqAfabBZwENYlpuSawMzTO0WlsBytzeMM/qY71TucBqO
iEzYqQVzQw5fSyPvf5v9Pu5U/Fw0lRYRGx2Judquh7ra5h0l8+lpO/esg9v0
37BLyfvLZD29R8O46kHMY1iaX3DMA1ZqMyeoyfseuSShYQrqv1BaugT1Kl6v
+mANs+n9l/bAnjskr/In4753L3lXAVvKBww3wJKZCxZ9hTklC0pmwZ5uztbu
yNPy6OUeYk7NsM8xWPKj+651sIg5tu8B7DkrzCMLFiRqb9Gcgz6PtK/5BAvj
3QwYsER96usunM89omsQQhxdukYJCw75zU4g8zcH1jqhfl8XKuPEHPL7KvTw
QdhhQtyXbNi3tUO/nIy73io6CYvXCjMUcNOl5e6JsLTfZLsa7jlwrzccFq03
uzIJeWl3TrRZRda7Fi7QgoUR1Q0mME9DndCL+dzeAJ1+0k9MqG4lLHefb1tD
3q+B9tmxsLiYcywTdggeGZtO8l284bcQmBYXYuhF+jF/I1gOU62XLLag39Qd
n381gjkb4h6u1sU5TVODKFhw0bXRehI+txNFDSJfZWluumoichtZ+ucHWDJQ
UdGgg/WPh3pVJH9/H40Sbdz7uSytyeS8tWO3cybgvWEklc6Hm951ZhVoYV7F
iwl+sKyeYdigCZ/4/j6pV3DoTt4MmL1uJvshqUe79ZtgPO5RXytNF/3L7l2O
XAQL3Hp8vWD+E5m3+jt8nmTkd5bYzTlmBG5alWmrIHmWBUmnYT4rrHKb1Vx8
XnvpjA8s5z9pD4I9I5YZlsM9XaVZp+aS/48W6drifHmCfWcNLNJ6Hn+R1PN6
65E3MMs2s8WO1K/uPjEMU08f+V+BBf+cL/tK5rcsirOaQH4f3/oyCnPF52lJ
sKXvHfV7sn9OS2c9zPP4ve4p7BDGbeyF6b+Y1JTDlid9JnbD8siX19LJee4a
wZWw76ORalIvP6tqDQfmO0dYLiDn31+rbsf5bSOnXNTol5by++H5sCz5ws+P
SR7ZyRH+muTfrxp78b/+/DYc/bL7Wbt+IdYzC/dDXjxjsWkUeZ+lW/c6aaB+
Pa/bfjCHrrmeNg7jabKDPsTeh5fdVzMp5cmhj/4k3z38pfyvTEpbGhcWTda/
GIrb9IVJOUSsS84g49tazvh/ZlJ8q4bM6+T+Kp/55H1iUk1beN49ZDw3fch2
hEmJstyZ1qSfrMZm6iOTSnUaH7qd9Pt+xQyHYSYlSJ+fUwQrpurxKoaYVJuD
63ElGS+8MeMkLNRtfrrUDnnVimuqYX5q8NSDMOddaxdZr5j7QFMKKwx4CxQw
IzSvsB+mNPMaqnFe24Fpjqb2GH/Ton8T9YiDDH9iEi+aaXwX9SrGxWhvJn6e
E/ZAxaR4/ufbt8KskK7iKvSnLBpXTyziDu4+Osqk5It6Xcl8WaFhnTnJg2pb
7krGfWMb98JtLIW2Fdlv+/7ABFhmLg3/gnpEwT+sWQYLTfv8G0n99iU3hdiP
2v+dtQjmP4rbmo/zRLSNJlwyrm0Q6Yd6OMq0Ylcy/ux+wF3Uz+p4P8eQ9Hfc
/u9e9EvLN787SN6nTXv9XgwiT8MrEa0w58rloAtKJqUyNyivhWWP5V6i98gn
ZXZ7FbmPjHlvP3Tj/Eex4j/J+pvCcO+3TIr72TGykeSvl6ejeIX9btCHe8n8
e0Nr61pQz5iHSI+cn8ups2rA+5H6u89KYouyc90y3I8W91Q8MZWQl1KC+qJf
8avs/v93o6D6f0971n8B6FQz5g==
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], \
{5.4795171869873505`, 12.616685794522454`}, {-1, -1}], LineBox[CompressedData["
1:eJwl1ws41OkXB/CfokisdWuIktAgGlGmsma0rWuXKaXptiZd6E65TGKbSqXY
TLdtVGpKaWxlpyijqMG6Z5u0QlnNmjAbZVKYqPy/7/P3PD2eT+/7O+855z0/
w5SIXcs2jaIoSol/5DulHMHXVDalJt/d2BRtTEuCEhZ8urfnISwZoazvwzw9
I+ckOL2EXnsATm3Yy10AR7+LbFoAaxwL/7OAdUes3lOwMnFmeN90PL+xTk9m
z6ZEyx9VvIRtsoZCtsOCa3Nzn8J/F54abwdL224bP4P5ObaZjVPw3Bnj2Db4
0/YHMzJgoepx4wAsLeloXwxzth8uouG86hTrQ5awyTa+73zYvHNeWpcd9scu
9YiB1/ZdMCmHuadcHbJhnwUhhbmw/vDj1Eb4yZYZNy/ASp2ROj13fN/ickkE
s91bYzxgihZZdxmWrp3CCIPpMTkjf5D4a6aN3U0c7pVTBYvnb1l5iOyfqG15
A9uVGnxMhZNc1Hv1kJ94668uB2FejB57GqwoY/+9EzY52tESAKcuGFq0BK6+
Wq6zCdbscdzrQOLdMjiXBDMlfnd6ka/scuC9dBLPZF7JXdhhtqT6NBz4eV7x
LthEq7kkJJ5bYewMiw7xYw+Sfr7T/eFf9M/HaeOXKBJ/ueDVeZgRqN6wgPSP
Yu7iwhuXr+dYkP5Se5bZwElJq5tbUQ9vOOyC2hX7z9cnXISZv4XrPYb1HSZS
YaSfhZI2MaxNiUwxJG5u/HwClgRvPPLLZDIv7tePwc2vGTZdk9DnOctuCGFx
4dn1K2Cm3hW/bGKvw9J6W/R1XRBTDvOijw6EwtXizNcdsOL2suPdNoh/ztDd
FPnJhaVjz8H8ygUN82Fx2U1PLkxjTFoYBytWKtQzYNnwtbE3YCrqsvEkWLlN
w28k64U/nZ8CSwVi728wp+J9JhMW81tpk9E/TnJ5EA8OzJb5z4a1o8o9zsKp
ZmOXk3njiz1DnsPMmJIQYu002nRL5CtqDXo4C1Y4N85eBUuSIgttYLWn7pNz
MP+G76tBnMe+vCaJ1MuxeOlXDWs3C5kDMC3POzEDplm6JRujP1ROXPwS8j75
pPDNSL9+fhY/Dmb+6OA8GtZcWv2hjNyP16E9rbZkPtcn7IPpjYNul0k//yzO
nA0z3X+xXwhHdVvWD7igrn7PMR3In+MSteQRLMlQb94Oi+7Iv8uA2ZVHMzom
Yj5UmzK3woJFxzYuh1NdHEcvgxnXO+aUWKNf54Wqn2C7N2HXHGBG0rVgf5hq
aQvIsEI+h61LyX4qOPe6Diww3L2IxKM9jezeT0MeFfG/pMHq616VRrBk7d+J
BWR/vGpu3gTsjzS2UJF1++2HN8DVw7oqc1Jfz1/UDFj5YCw3gNR3JI72PazN
WadMgGWb8n40gCVbaF/JfPFTdhtawqKLY8JrYJGOt/UsWOh9dYTMF1U+eQWJ
L7N6P1sLC30Pfb1Inq8Jq/8Gp+qEtfwDm2Q26n8m+yfV8qYg32pBdUEn2X9i
dm8ELHNycaiGAyd692fRyHti6n4JVg51Of8F04OzHbaSeE+ci3phzb2aSjdY
s3ho+wiJFxvh1o16o8ymKoZgrY6o4Bqpf3pVoBKWN0W2r4WZB6XOf8Bs3Y0h
luS+Fl4pioT5ihfxz50x14zVDEOYGxRX/husLonNvYD8m49ULYqAlZPFRjYw
23VNizcs/jrrY4Yl3rsD90tocOC0fQnDFrhP+5dNenDziLvpBljz9J1ghI64
9OBNdebow7rk42RdaDowbg4cuGQnewJM83i5QWqGOswzoz1h+e9NkbNgdnZ+
AteZfM547KszRdxundAUuPpyX1AcLFOOv19A8vM0u+kFC3bGTe2CGYrs9HEw
3bVprBXq5fr9+d/A94i7VNQYQPrj9apWC4vyE+1i4OZ6fY4x9lfr/ll4CpZe
2FBB4nG9VCW/u5A6HeVRsPz26eJCWNj+6485sDboeoGMzOfq7m41rCx+RL9N
5r33i+105M9IzrE/S/rfdJO5zYzcS8tMcp4wQq/qClkfitk6n7wvz1ZJ62D6
7Zwl42BFOn9jB6w5GVpfi3q4Q66jesh6YeCkI7Ds0/L4f8zIzyHve76kn3Er
Tslgfbq//SD6rZU10ZLJ/lLe4B2YszBS7krWVftuxcDNyY9dK0k/vbtTmHDq
tynNi2HxgQ/x+rBJbOyoGvQnkC20VE1DPw4GpDBhfWZSSg1M7fD7/YoJ7ovW
u74Yjnp7W88AprQtNQ/Jeuqy+E5jPOdVtqQKtlMNimuMUI/+Ct02mG1+bLB8
PN6XcMH+b7Bg8Ft3qyGek2f3OuH86PK869Ywe+IstxV08vn6+tGBcfh/d72G
I3TyOWlrZgGnjqOHFhE3bRU3GiC/ti02b2G75rSkMpgTO+2WJZkn/3dtzbCg
dF2eD6xwz/c1x/PN4U8sVhOX3Tq0E+aUTpy5g8xbiG2gEhbZ0cpiyfNZZ+jr
kQ8zw0cnGo6emThJDadafvnjZ+LExH+3oR7ZmV2WfrBG/jBEBWsTQnTI+xGd
dKX4J9QvsvctekPuw+lTXBqsMDbvl5D8Jft7b8NsunfVZpjRL7aVwHQN56gd
LOiquhFP+nePKmpGvxj3Lo+nwdqK+5qTsHJ62N10nCdPbSlcDMtVnPYXyE+x
aH3M97CmM1k6hHqoM6bsVic8Pzf46Vf0Q87c0SuF5Z1Wy7r0cU5tkFIIswtf
8h6PxbweGvicBIsNel6fGIO5+DdWHEfWHc1NwvUwd6F+0kSYF3XSZY4u+vGw
YX+aE+nf/q+Oo7GeUNqZQ85bUZ7uNgrzUBQYXAdLs1Iehumgn5/O5w3A0cXP
dW5QqMNw8RMn5KsYvuZhD1P1g/RVZF5kHhfOjLAo/fsajzQyT0FZnb6wfIwN
9wFxfmgBC1YYHXN9Q/ph5F6fAWu3lMeNIfMQNsIxRTzhD/eXTibzdLLyZz5M
+82O7Ub6X97j0gfLwx95zyAOXTAcj/wYWQlSB1hedv3SV5JvsG2uESz0cVYk
oR6OUfyNtziPl+d9oRtmzjp/l7wP4qvziv1Qv+jFq4DDJD9a2+cE4ry7wf7k
fuIM96TCUZ6rNDrk/YqIa9sJc4sHbjxAPxQ322V0WN6zktpD+tuwknePxP/C
SXeD7RQfrC1h9eePlT2O8Hi6wWLkR5tQpb0LU+EGuhGoR82xmXwQVnJLn0m/
sfD785kXa2BB5TtJzBcWJciUBfmR/Z75VyYMsSjOsXUOnjD7qm9fwSCLsquM
TPcgdrJ1X9vPohjmDDsfsn84K3nyRxYlTLs6tJScHyRv+e4D+l+mLo4h8e+8
yeW/x/2M9s7KJHYp0kR0syjacZvEKhIvZdreD2oWxTM+8kFL4iXW+jO64IG9
ia5kvoLM30/tZFGBU/mCtWSePPojajqQf/6K/ceIcxusLLEufRs5icyvICVq
rxauHmwO+os8r6oQcRGfPt8iqB2m+jf4Wb1l4ffv8GdvyX7fBBerHhYlOV5q
1kX2h3jyvJCv9HR1xQvSX2Gvyl7Doij/HAdyH3bRDK456tOEZ/WdJPdRO2PG
P6Tes4qd4ST+QHbpjj4WpZbXBziQ/XPuVMlgts/mY+2kP6Fr1PmwZL7oyEVi
yWJnLiw6lyBfDvNOBMy9inicuQ51RrB8qFN0CudH9/V51DrAN9ss1yA/Tsin
Nekwddqvox/1KPNG7Q6DBaaL/jNE/zSqXQEuZH0916ConUUx+xb5G5B163LG
vFbcn4DO+4S/u6jchg9FDVhXPB/dQzzVeF90GYuS/fqYpiEmX9dKKO3//+77
H7HAGTU=
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], {4.598569410125094, 13.907661179749812`}, \
{1, -1}], LineBox[CompressedData["
1:eJwt1ws8VHkbB/CTVHLJuCxjikYhrTDCFpETSRSbWy4pQ2rdky3hJaObqGXW
61Y7MWX1utQ0xEah6a5SplaliEnpqm1EqGT393/f1+eT8/mac/7P8/z+5zgy
DN/ms0WBoqh2/CNHajr5ZkRT//1i0NShqAXZjfNpSvj1zbGf1Gnq+a2j/dEw
5bxAQRF+dtzrnh4sY8617J5FU5qj51e1zaMp9srbC+Ww2OeAfQpMXdty3xnn
ZxT17bWEhTEzXnbAWRm7698b0pT0K79gNer1epuPNcA8xfU9rXBDZ95wNizZ
+ddyVw2aco8oboyG+eoeoQ/gpv80iwJhSpgdFqlJU798rM33hYUPPFeOwTk9
95ODyXofBpf9S4umLpTPfxxDPr//Tvkv2I3nUr6f1B+09/XQpqkbNZ5BFbC4
4bueQ/CCXg9OG8yoHGs7Axc9OmzzjvhCd2s9/PMAK0EF84hvP/t0FO4WLtMw
gdeF7vghAmbeNslbCnNval3WgncYK9ymYX7aiKkI9W1c08wcYc6d4ll28K9L
S2sXwdKxzbLz6F8wcHWaOslLMJppD9d0M9NekDzaE4dbMX/KgDtDRPoNCB71
go8suRYYB69bW9ggR35MtmqiEek30XBnFWx+bsnzB2yakv+d4ZkOP+Wop++D
hYqho/FwZORGW2tYmmVbngGHNF+nbs3FeoVlwyKYE9XsZwdzP7uOf4Erjy3a
2mSAn4s01nJRfzG3ItjLgOxXOP0E5t2qdfuqj/thqxJrM/qfzKlTvgzznw5s
GIGTmo9wyokL42ZnYf7Fodf+OgZzvcXB2sir2t/PXAzL92/ZXAgrq8WfeAhL
HnoaKH5HU/v8mN9UUY+tvDt8A2xwIVaf1Of+lrO0GF5v6B1QAK/7unBWA5w8
7NX8GBZKTj86C4/6tEUyMQ/fv0y/AA5mlkk9YHpqx6cAmBqOnBELi/MtXyvA
Kzv3U8mwPKNPcgT92M95dCUGTihv8J4HfzkaVeBKrpemm5RjnvhW1oxpsMTn
ouV8WBSioVSD+lRReGQV5o+vunTXjuTlfDfVAa6bqXupHvMJw2dH9yO/3ZS9
G5vkoXrbRQi361rlZ85B3nmfn6bA4wlugb2zMd/2yIrt8IRPVY4DzPd7m35Q
gzyXlNIJFs53aP+jhVzvMfmjNsy3/lNLHfXGmyTLSvRwvXrQ22TYJrC61Qpm
3Ff1HoUfPhiqe87E/Btfh2aif75tRv0ZmFZnpZP7mV02oVJEPvcar6uA08y+
rymE5cfLlK2QV/X6cvtTMMe77KUI1gwLW/qQ2I4ZpKdDUz1LYo3VUU/+ZjAh
BrZX2yrxhjk1OqnH4UmtMXfSH3vzE/MmOP9iaUcPOX95tLQW5izXT9HDPBJh
ov1h+IeYA52rYelMnbse5Py5hvpbiW1fBQyhfoljSkoczH2x4+k+cn9Yp5uH
kHxK325QgR1qWK0cst4UvVTy/Jsk5yi+Q70E+x4rVXI/HvuRcximZG47C5DH
iWV3z+nA/I4fOr+Hq0UrluZiPkZrl8kD5Df9Xu2qMV2sn1W0ogQ20VpjEwAL
Ly36Yxcc+cTw5ln0uc6EU7ETnjft1bgmzMgMOpEPK90IL0xFX7SFwuk7MHdX
pYIcffCnWDsaod51fp98F0x7/xaRD9/1sp2rA/OSLk8h++NXpWl2Bz+XCLoU
hGR/rDTjS2Gph6R+MdZtL0sYzCbWXMO6Cpt2dfvlwmJnOzdP0kfZcY0qmNO6
4fwN+P5QSPRDWH7Ouc4cczzxjq7XwLpiS7PkVHg8oibPn9S3CzlWDb9I27NI
AEvrHyxohreu3lXcR843Vjklgm0qTk1noS7v8wafvfCJdUuNV8GSiSltDvDk
zYOBoTB72G5OH+rrTPOdCIP5STGHtsGRPhO/roGF/L/tR3BU4uo+I+txB0Pe
/IyjuHvtDCnJ6xOr6BN5Psv6kmJJP/f6TXg4ntrT+/wj5uGWCdVYZL+XjLF/
ghOKikbacHTmnH1Pcqdcinf8Ct+vrGhcBDOmmD5OggPLzwRm47mS3ij+lArP
cx2WvGGQfbJTIznLL/uf9YXpmLGOXtjIUPFdCd57MllsjD2p75DGrMV7krvi
5JlTsGLB/Cljauh7bZUrh+z7YNrmbTAvc3KkFU5LaomdAwuv1454Y/7GnAzB
N1WSf41LP1xgEXBbHZ9TAc+mRiG/EUe5rye5/u2lP/vgNB1BiAimhSsNV+A+
7fmY67gQ9RPitiUehAUBJZN1ML1dUFYH//7voQEn9MtIODTRAh/s6mNchelS
0/hqWGGjzQwW5qMi38ekwLkCg/PO5D3hcHPQHJ4oMD4bQFyYQ7ej/utRpf3+
MNuq9VEQbKTz4YMdyedk70QP+l8dUTs5FZZJ4vaEwCtVzppEop60xDC6D/PL
WtZfLSZ/V1RWZcfClVdG/xBgHo70jJUy2f8GmXIG8hD6C7pbkGfkApe81SrY
B6O1/eR57srZuV5RGdfrBbuT56Y59pZxqxLqB/cWZsKyo849mTOwnmv5+Wry
vFh8eBQ8HfP33GMOwRMB/WG+05CnVLXQG/UEnnamOxSxvvqrizdIfYnGnStT
kUfMSXUv9E+3mfFXwQxRmGkvrC0T6E4qoL/Cuxbbyfwt4cFvYJ56tiGFvIxe
vT2tiPP5Zu42+2DKseeTOyxzjDAdI/kLaofFsNBar9QXv3dKGLp1lqjPYB8I
LoRHCvKnX4DFLY27m2AjW9k8N/TL3692uhUetym1aINllmOsCpjHS322GPPx
PN1y4+HOk6o66cSOs1cZwGk9Lz1LYTb/iLQR9dt/MWXzYdnBig4X2KZ3+LAX
zLc5fOYa5uEtz7LqwvqU7RZfV1h1r2+wBcmr7KcLN8nvuVr2Rz/Sn/vlqiA4
LZ71ow/mkacf9fiK/CKuBcoskAfft+Y5eT+/0PhOMkJh/y8K8rLI+5vlxN30
txMl/MxXSoG7+g/P6pxwwv0j3JcNcza7W4R/ccLfg9onG+FxfoTR3HEnit/9
PU8R9drePB42GHWiONam4ijy/HxQs0sccaKk7gnZz2FqIs3beNiJYjyJ8Ikl
84y3nHf6iOuXD+d+g9uSlWqvDDlRCR8V/fmYv+0GR1MEC5dkndRHXq/f5x4Y
hWn+zvZSkq/aufd5uF52y1WkhvfKa4OkmVFYn253MdwCyxZu3BSH+vyNnWbH
iUPjlh/45ESJ+63tLsLiU/7y39CvuE19WStckki/KBpDvwWu50ph9qbMl1zM
J27QvhQOt+Xn0S9h+aHZvaTe6rrSJp3PWH9od9fv6Mf00J0o8jn3KJ9nTt5r
7hb+XrAkY26YCPMw1a5dX4v1GQ5roi1g/ouurQPoh/psUVyP+RP0E1QMSb8T
X/PdYKnqRlc1zMfZPT/8PfKTzd8UuusD1u/8olUD8zq+ae95i37bH/L2wZKV
qUGRA8jj0rhuGiydt7chSIY85Y8v5pPnZcWks/Ij5GOXeIu8b6hsjazgdidq
3UytSSbZD3sPj8omzDsYXrdH9///TznY8r8jk/4H+I+J5g==
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], {5.441261304060914, 6.601506520304571}, \
{0, -1}], LineBox[CompressedData["
1:eJwl1ns8VHkfB/CTS7GbW2QRGkWEyCWbhzhKsmUzuYxyyZTaFVYosWU0lpDa
NYlWNyZyLxSFLRpFF9nMItFKg8j9EpVKPJ/f8/xR5/We3zm/7/fzPefM0Np7
0GW/GEVRjfhHjpQK+U+bpuTJUZ6mHgQGljSupCluR/0+STmaGq3qTfsD5i9Z
NWsiS1OGsgPXtxCHvUlNlqGpN3/n7fu8gqao7rLjOvCIl//RAlgUO2k8s5im
1FaWdnnAgvPXF0hj/bPGN0lSZD3/vS4Ljtjt5lGjhXqzDnUv4aTZM13HYPan
jzrJqMft1XbdBDPe+RgdQD+pu3V/Via23hZghH57LTzXfWDQlPD48j3FcMv2
h6a9cMgFHneNAk09Xt2o9wrmT0a3X4Vfy4x9T9blTy/rkllCU86txr1TsOCW
Uu1euGYyYqUM9hembq7IgKO2vo8xhAWP5axq4KVupuud4dIeM8t78AtPc7cw
mOfTanAFNrf+pysFZjZu0toP79H8QawYnmjYXEzqsVYYGdfCNC+8MQP9qL6t
2tBA9vs+IVcDnpnoOvkIDnkn4c5DngV2+VKV5HxOv8YX5E9hC90vEpc/udqO
+dht7KoMJf2dFS15hPm134/Tsibz+4nJbsH8VYMPLZtFPrrCnZKGr7VY/FUG
M+jVTqHf0tQrP6Po/SS/k520IvxAfcZMCWZPaSm8+4amoiPeZ55YjvXjlsvl
sB5yuSV5QBP75bEe/QybPglrZ8HUrHnaBzg6bzz+uQbu29k41zLUG7Jpa/aH
GbZNR86S54Vt/VYRpgIacpPQP0shvqpdHfUOqPieQj7rquHxCngiMadpE/Kb
pizuKIXX8s4LK+G/rn06XAvzNixz0MS8eu5tTO4n/nHLH8Fwbl/pwDLsP2H8
US0H5vUlB3vD/BMy12vg/Fu3o7Lg0urK6Cq4LWJ61QAsz4j3TINFJrrxushT
aqaa4QpndStIesETG/bpfUT9lNPfFHBgvsEP5nEw78ozl1MwT+6kFnl/1Hgm
01wyH4PLPj3IJ6Y+VOFN7P2AeRf5gxgRqprEbU7LL2E+brt6h+vJPBjPjidj
fmGtss4smL6iqp+N+b/xl0ptRj66MtukRxrnlXUp2ML8JIdwd7juidoofxlc
ftdAHJawqm/9qgablaeMSWG/oN2VXjC1Nb3uO6yP5CQfFahi3kXrK47B2zPi
rpoQ8339lFCPe6VVo1wFxx2uih3ER3NHtsECk02tNehP79L2BbPfYU4x/0pU
of+5QXn5hzDfqfpTFfIlSn88Wgiz90aVlCG/duBLp3xi/aUx6eT99eveXA3T
1k9G1mBejOynM32wvP9o4K9wpyLvowbqMTP0ggthF4tFMmxYPuTUbDXs1lrG
zYXp0EuZN+Hy+PV7huGQXw6GJcL90zf+0UMeJt9eyw7W717E2gVTz2Pz7qH+
S383tUiYUXx/UTP6U7ISmMTAfF9WQh15Pu2vPAmF6d/9BrORj5lkt92RnC/+
dZCD/AyL4OMSZF7nXU6xMR+1ntpDeagv+s3JdxfmyRvnJJmRedV2tB3G/Lkb
Cp2uIZ+gbSyzehH6uLPYVpnMbyxMzRpW8WHmHVHGerLx8PuFqOfhuaVlKeqL
MW+OwkZCpyWmxPFGgytw/uxjqdfpSrjecM3gGfg+R0tdhtjGbpk56umzGSfP
KmK/7PofKfQj0C6bMYbZw+sMh2FN/oBmH76HBO1VzW/Rv1SxeHA5zNaaDx9A
vsVfromT7z16tE35NfKvsojI45P1/kPrazAfbsmjl1Uw/5M471fMb8TT9RPZ
j5qquLoQ871bkejPIPW2Ke/0gW1iOS1+MP9AkXMkrH/RLaQQZhyq/I877Fic
tm0M5vqyJqaxH1M2O2018lAhJ/Z5wcp7do+xYHZUxWHye+Ogp10UqkTe57A/
LqA/FjtZ8QixzjnzRPQ//Wz0zB4yjzTugf3I94w12mpK1i1vSNLIn3WjQTSo
SPLFia/CvLwPMuQSSX9ZFk+0MU/5kx5f5Uj/4j8ddcT81SwvB5xAPq63hOdF
SbwvX1QWjSqQ+1NmrwPf1emycFIg35/srcMSNLV1tPxpPp47duyuoHFY03h7
lRSx7JrYtTg/MTsquVeW5LnxYyFMnfTjNSMXI/OXfHfUO13PznyLXAxB8pAe
+pmRG/6wGhYdrvRTQb/+hQ2xGcgpEDedVkae9POSOVtgrvXzCmXkVTohI6MD
ix4P/iVNntfa6nozcn7gs5IeHNtXT7GCiRUNL6Vh34HYepm/yfV2fYdV0Id2
zH22A6nHaeX7wY7tCkFNMP2w3CsMFvaZHfcmzwFrzfRGHHk83VvdOIpaOrrb
SN82G5JdSb6wtTdN4dOuVUl55Hc8y+ZvH9RxLCgqaIUpe9ule9Ev//7CgRaY
f3li/zbk0U5b8CefnK9p/pncH3N39Qvrie8I74lhHp3ORb9dQj36qmrWCOY3
cjo6kfQn0rzZOol5lwaIs1+Q3D/n6mrCjKb58TukTmT6L8fEacrJ8/pQPOow
Clq/yMMTmqHOm1BH0CPc2iuG64WX/53FfWBrTt2Zgt/Mnwq9R+6T6rkEGueL
Rv7hnMO+dL1Fax0sURy197Q4eR4vvY/E5wMOr8YLcB1lWC90wXVBsQ2T7xeg
/5xoXwfsu7PB8MVhmM//4uSAPMJHOyL1YJFDYLY9+qjzmJ6TgynqXowZ+rRX
M5rUJdfr+AolkYPXVLs7gHhhxnAJvNPzoFETTBfZWOkht5vq3gQn1KdjvErI
73N6tc+OF7Dgg6t6AHm/k1bV+6FfgcXSUCPY3qNJsh+mlWbrbmO/xv6Vd1yQ
Q3D9orUUPOPmkZMJi759+lAf/URtDF9RR5zFvqWHftkJjRlVZM4G/1rIIo9o
6MLQMZh952nFAPLbB14KkSZulDd/iGMkfWsrqc8fruOW4zhdl2v2uxh5v1am
C8jRKIH1O5nHu1MTZG68hLC5QArn69u+9SG5a5Tcf5qzpURygQ7z+Dz/1/jv
Or/YUrR0zcgrmOm4sZ/5yZb8NXvxMyyczzjY+cGWYrzZOOSC6yfs2yzTpnF9
un5gNyxoLeUkv7Ol2CXlI5dRf+1Ky+WdE7YU93xfPwf9MfNuZMuNY91yVDwc
/VOR6v3mo7YUf/yRIBz5hNetHNeM4PwLxhphuL/CglfOU8Po59PADm/Mg+98
ViYC64IU3ThdMq+pzSMZuF5QMxD0GBYV7JhzxP7cPx8Mr8N82zed98pFffpI
BecAzJQr4NRMwszxM77wzqyUdc/RLzfQoJL8nnPne/uap7BfR3huqhT5u7TH
4gry0TkvlnaifojGAUvD9/DrjogP6I8RFBLgR1x0MXEM/c88UEv6DzGt+EBI
nusue6tCXM9YnlpTiPwq3jF+pWT/4U5OEuaTH5rmwER9SvpaJQfzS5Rc7J2C
fkUftVafwbwZ5xfeX4R83BeyjZnzmFv7BY+gAeyf9PTqCdy3iUxm6rFerCee
cxV9xXUNBm31nVg3tdl9Gxbk5F7LbobjtktIzZE+dW6/qsXnH1usmub+d18p
Kn3D/48U/V9RE5iQ
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], {4.558738695939086, 4.601506520304571}, \
{0, -1}], LineBox[CompressedData["
1:eJw9lgtUTHkcxwc9vBtSrMfRdO81d7qDkTEsQ78oPcSO6OWRFIk8QhjUNnqJ
akeKRGG2jFZFil7CqGxmh8rmEWlqPaNWyNJjsP+76/zvOXPu+Zz/vb/7//8e
3+/w/Le4r+3L4XCi0I+9/3+REGf4hi4r4NwyW+xdR8A2/pI++h95wGn59dqO
cwRczV1ASPYiDoox6lESYEdsPDepArHVT+SASAIuHA3XXRhsjdZr6qT7CAic
ZnVjjzfidw9qMhIJkGeVKOdmIs4+mJKpJqDnlEvgzTeIuc7MTB0B1736RL8Q
EogXm9d0E+A74ahSsw5xyYczK0UkHOHW+FalIZZ5S5QbSfBpaHfW3EA8o8Xw
Rw4JqhAzxw96xH6cC15tJEgXd88ze4842yNOTlPAiU9cP78L8ajM3fF+FAT5
V/a1+4dd/yiakERBtNunRcNeI4bGMlEJBecfbdo48z5i0dxUQz0F00PC/46/
grh/1DyvZxQ0VyzRjTzJ8vZNqS8o2DoxLPmHCMS3vs7OekxB2YO9uia///YT
/KmCAk/6SFq2I+K4OKPkUxTY21/Rpk9mn38i4Wyj4GbnHfssK/Y8JuFiKQUF
1rtbl41GrOF+UXAo2GkreWUYx+5vs2HXDRKm1loO8mHzJTONrdtHgtHAy4+r
2fh1YXucHUjIcn1ayd/Axj+7NHYQCRO2psTrj7HxSjt6HxGg+HLiXTOqMyfI
M0l3kYBY14UzSrkkOu/w1fkpBAQ391AqT8TZvbK2KAKKgpzy4k8jzm9ymaYg
wLWlfyy0I1bUTy0+QEDuMmX29ukoz/ljpvY/TUC5oStTH4FYkyG0rSAghqkr
8qlEzJnvV/4WxdvUkNL5DbHflKwrBAmtxzPqTcQT0PsHE1/5kuBv4TvMzRfx
rfSMwgwSQEcObQ1HHOK9MriJhN1lVWN2HEassZ8iG0PBPUNbmGk6YqhLL15K
QflqeZTwBGLZobP0fgqSSmn580OI6a7xu/IpSJ8lUab+jHjULmVjDapnjz7A
JJDl6ocmf1GQMsRcLXFB7OenEr2kYOYjh9oVNoi5wwzj9RTc7dtdXzmI5bw/
J2opiHTTNhV2oPM437O0z6agYjOf9GlAbPWlpiqMAiHR1JVTjbjFPfSYMwWk
vwV3+XXEMrVb7xAKzF/P7izRsPwpc3stCfodLsF5txFzj38qUJKQnuoUlfOM
Zf0c+WISCiXXknKN0ff7y/O2jkTrfRojRLaIGy6PHv+cAJhbu2BeELv/tTuL
SgmY1NBxYL8aMScycNBxAigf462Obez7Z3h7YwlYt75XFy7mo+fjAppQH8/5
jOQggo/XLWKMxJE6Pn7f80jPL2UjaBx/oSV3p9yHxt+X5ooulafSeH/N7aSi
9g6N968ttt+8pIfG52vxLAlbOlaAz39SXpTiPlWA87PeuGKwk50A58874U1H
FghwfmU6a9OlMwQ4/2URDY1qvgDXp0clsXbjCnD9ctpMhNKPNK7vXIsrosz7
NK5/a0u7j7aIxv2R0WmV3p1G4/5pKdCGBO2jcX+1iR/uH7OFxv2nSdgfVr+G
xv0pMh4R1RVA4/6Nd5r1/OAmGvd3laTx/chIGve/ql31tlBF4/kYu85f2K2j
8fwsSuEHD+YI8HxFPJjsopYK8Pw5G5uu4CkEeD69zoZ4JdwS4Pkt5X3efd3c
Bs/3wrQS99BVNnj+06yNH/v+ZoP14efigur5HTZYP6KN1phZTWawvugPBYfy
1jFYf1YVj5M2HGGwPn377ErNKGOwft21ff1RXc9gfUus1Y7q95TB+ufeHDvy
zAsG66PdUNtry5sZrJ+VGgdJQB2D9fX8ow2BXmz87/rrykSLrU8xWJ+T70Vt
fKlgsH6Tdrni1tUM1vc7SZHDQx0YrP8e9OHkmzYM9gfF5QEX31oy2D9OnJJ+
0QxksL/027XtaKkpg/2nOt+k/N1QBvuTf9K7siE8BvvXOYF5sd0cBvvblvdT
VLMCGex/6sb1IXbHGOyPjue+7h3N5uu7fw70L0qbaSHE/pqw0ink6goh9t+T
t5vnxJwVYn/2CI4UyzqF2L+r9Mked2dPxP7u5HHpiTZ6Ivb/w49zv/J+R/z9
/0GYMXufBP8CEV80uw==
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], {9.0548, 11.75}, {1, 0}], 
       LineBox[CompressedData["
1:eJxFlAtQVFUYxy8gSLxteSzr7t2le+8Gom6kWBrCF4qJCAHFiCKP8sGCvJ8G
xEOEEpfXMAY5CRggzia7PIpYi+ElQSvxUFtYhnBlglYhMUQnK3Y6OzWHO3Pm
zG/O3PP4vv//7/RhYvApQ4IgwtDQz/99NHSy9LMNEPUnhxW3KXg8o31W+hHi
GuvltgYKfq0ZlBsZbwLCRlFqUkJBfN1h1ptXEAf6vc3Kp6BnzPaDEI+XgWCf
GYwopsAsps3TeQbx9Yy7VV9QkGZAdqZmsICIutJU1EfBaHPKtz7GtkD0Lmi8
nlKQf+PJl+8U6jnVyklEQ4cmvdpkCTGxba8umYaInOQ2kYcdEAeNHvp30TBP
Zpl1JyPuypg7oqOh3VbF3iRBbJrZEg0MxPQUrOkuIhbEt+iyGJDxhoJ6UhEP
22UafYXWx0st7xxAnH9paPEnBtT3RfyxlxBrhrWzDxgI3Hf6Ded+dH6NuG10
noFb3eWs++mIuxSjRWoGKoraXXe6Ik7K+UzazYBW7GITrEXvq3iyp7OKAasT
F5dftCMeX53UhDPgaqtsca9AbOMSbcRnIKy4UMo6j/jsNbfkaRqY2j8nEiv1
9dn8o7KKBrlYrRlRIG4dejgSQINCdVzrtYZ4KnSWZ03DpyUJLonH9OcTLO4U
BYntRqGNo4gFb6W33qDgulAe+EeIvj5is1fLKfCKCQo8tYg4yvOudQEFqo6y
X969YA8EdF51KaTgTm2+utTFAd3/CBF6iYKj1YYNM4OIBR0djZ0UUPt95reH
spE+pH2H5yk4u/FqlW4asekj/ymShphVi++qfR3R/ltNPaJo6JI47witR6zx
jDa8RoMymxzXzCA25ZzLWqJB2ifPdtch1sZaPBIxYNGmLlRu4CAumuiJY2DJ
JzIudwWtC3Ya3qpjoCY9qyZfqd9PPLTvBwZ+tyIZYSXiKfsR91kGWsymPeR+
iIelYyELDEjs9HpeX48VCAcCv2bj/7dw56bVCWy8f943RdF57mx8/tb5+qoC
Sza+n3mWMMf9bwd8/3DvwPNKAzZ+n7/8gYhPsfH7o2onR5oj1+sj2/V0v7hz
vX51VGScAeOI67u6cJMz0eyI699TtXac2sPB/fGR5AlTVBzcP+/M5FdaMzbj
/k71yeSXbbm4/0kbguRWUi7WR03QP81hbjysn/L6SlVFEw/rK+L9BodeQxLr
T9wv5O84QGJ9rkg2bq9IILF+v2/MCVnKJrG+l+x3BSsTSax/s+E0GxN/EvtD
1K9abnEgsX8+afK/d/seD/vrvfikJUEJD/uvq/fz4cm9POxPT79xzWvPudi/
smMpK9sUXOzvWMvdMpBwsf9lZ3INDdK4OB9O22/57XEqF+fH6xbFz7zLuDhf
FLKygPEBLs6fk4dKxC9YPJxP1bnW4V05PJxfhwpLD978i4fzrcFlzldygcT5
p7sc0DdJ8XE+hoYt1koH+Dg/fx48+vyEmwDnK8eX55z7sQDnr22zufHuAcT/
53OruX52gn8Blpkv/Q==
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], {11.645199999999999`, 6.25}, {-1, 0}], 
       {PointSize[0.04], PointBox[{10., 15.}], PointBox[{10., 8.5}], 
        PointBox[{10., 4.}]}, InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox[
            RowBox[{"C1", " ", "N16", " ", "T16"}],
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->6.137505285412264],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          6.137505285412264]& ], {10., -0.5}, {0, -1}]},
      AspectRatio->1,
      PlotRange->{{-1, 21}, {-1, 21}}], {66, 0}, {0, 0}, {22, 22}], InsetBox[
     TagBox[
      StyleBox[
       TagBox[
        FormBox["g",
         TraditionalForm],
        TraditionalForm,
        Editable->True],
       FontFamily->"Times",
       FontSize->9.206257928118395],
      StyleForm[#, FontFamily -> "Times", FontSize -> 
       9.206257928118395]& ], {32.75, 91.96}, {0, 0}], InsetBox[
     TagBox[
      StyleBox[
       TagBox[
        FormBox["g",
         TraditionalForm],
        TraditionalForm,
        Editable->True],
       FontFamily->"Times",
       FontSize->9.206257928118395],
      StyleForm[#, FontFamily -> "Times", FontSize -> 
       9.206257928118395]& ], {37.25, 91.96}, {0, 0}], InsetBox[
     TagBox[
      StyleBox[
       TagBox[
        FormBox["g",
         TraditionalForm],
        TraditionalForm,
        Editable->True],
       FontFamily->"Times",
       FontSize->9.206257928118395],
      StyleForm[#, FontFamily -> "Times", FontSize -> 
       9.206257928118395]& ], {41.75, 91.96}, {0, 0}], InsetBox[
     TagBox[
      StyleBox[
       TagBox[
        FormBox["g",
         TraditionalForm],
        TraditionalForm,
        Editable->True],
       FontFamily->"Times",
       FontSize->9.206257928118395],
      StyleForm[#, FontFamily -> "Times", FontSize -> 
       9.206257928118395]& ], {46.25, 91.96}, {0, 0}], InsetBox[
     TagBox[
      StyleBox[
       TagBox[
        FormBox["g",
         TraditionalForm],
        TraditionalForm,
        Editable->True],
       FontFamily->"Times",
       FontSize->9.206257928118395],
      StyleForm[#, FontFamily -> "Times", FontSize -> 
       9.206257928118395]& ], {50.75, 91.96}, {0, 0}], InsetBox[
     TagBox[
      StyleBox[
       TagBox["\<\"\[RightArrow]\"\>",
        DisplayForm],
       FontFamily->"Times",
       FontSize->9.206257928118395],
      StyleForm[#, FontFamily -> "Times", FontSize -> 
       9.206257928118395]& ], {55.25, 91.96}, {0, 0}]},
   AspectRatio->1.075,
   PlotRange->{{0, 88}, {0, 94.6}}], TraditionalForm]], "Print",
 CellChangeTimes->{3.5431217363790503`*^9},
 ImageCache->GraphicsData["CompressedBitmap", "\<\
eJzUnXeA1dUR79e92xcQW2ISu7HGhoogiGIBAQEVEFFRBBSxUKQIUqT3YhdB
MCpiA0WwADassSX2XmOPxh4LTfbdz5yZ32/u3d+9uyToe++Phb13f+WcKd8p
Z86cdt0H9T6zT/dBZ/fsvsPRA7r37312z4E7tOw3IP1VapOCgk16p3/G7VDA
71UFBfZPnYKqqqqCklTVui8mLB/Wq+uk+TfeOe7YNuf0v/KlTb5fX5WSP5fv
8tNbfx03aMQ1ze9a+ehJ9980Y5fL3/qp4pcf37z8zvOat+1/11uFP/5SVVAo
19ZL/7umzUf3XNBqxLIPClf98vN5b1x+XI/W8z6oWBVfX/Tj2i/HPzR8+NHX
LV96yRX9ZtR54T/ri+T2OumR/KfrC/Pbj2g27uHST1at969Juq3BrzNCub6q
al3Tbx+/5O7Djrmu9O1VtRlh0m1ZIzz8rodWnnTfRhnhf4a+MGloq7nL7p02
Z9CUes9+V8sRVrvt16Phutaf3zuiy7iblw27bcKwrZd8trZ2I6x22zZyW0F9
+a9uYdUvawvWV1XJp/Dz3fwnuh6188x3VvM5/ffVJV+t/iX9+6r+b13c+c+X
vb26ILy57vY///PWbZZ89FPzr1deOK3joOtaXbLs04I17rqqqvWVa3/g+d/P
err3MTtc/f6agmK5t/Kg/zzdq8uxN39SsE7emf+e/QJRN+bY0vd+0+uZ2dd3
Wrxw+r2Htb6y/mPfrK1pbIn3/Apj46pNqtavT///09iXR7bdbdIbq2pBt+r3
/Dpj++qO+47vsPn9X63r+Nmidk1OeeK7Woyt+j0qhltGQ/x+7lM9W9oQ01NZ
l/p53fpcQzz01keuvv700+Zu9s7X77S8bkU18lWs//H9lk+smDuj34ClRf9a
W1Ub8lW7Z79fZ2zb/fzBsmZ3PnrP7M69nir4vqpWY6t2z68ztrVHf7Z8WsvF
K5acMfealUVf1Ipu1e/5dcb27YJHT25z3CWL7xg4e/qCitd/XF+LsVW/R8Wu
NNhqtKXP65f1OnfAFYvaLrvrhgETZzxW+NUvVWXy57I/rf54yaCJ0xYcct9j
j526/IapO8199+fKX354bfbNvVr9+eK3V6ciAF999MfL+z5y1KEDtrj/yzW7
//T6ouF9xj+46b++jS4F5Nt9svTKVrcuW3j9mNOmlb3xs3oEdcurfnqnz5zL
Fndffu3xww8bv7TH3fNGbv38Z3lvLWjwa4wQ8q09/KuHJv31qNNFzGo/wmq3
/jojXH/oV4/0GnHhuGm9Z8y6u/izNRswwmq3/koj3O/756/qMu3mZYMWTZtY
/8lv1m/ACLNvzZLWtAJ9NeeBM4/b7oYP1my95rMVK/s371v5/A9V9eTPKWC9
cM0vVZH2ZX9XN+G7pv8f3rtDoEpQ0uLNfvn6oafOaNTyypPOGbv//H98G2CA
v3XNuK6kavV7c+aeOaTLNTfPazvrrvc3+Xl9VcEt4fGbfvvttw2ee+65Lf/9
738XnBi+K1m9evUfPv3009S6desKOodHFRSfcuONNw6YMWPG+TNnzrxgypQp
ckdgcfHm679acX/bo64r/XjVJ8sXHN3ud4s//6Wgnfyt6MRbbrnl7KuuuqrP
ZZddxlP/kB+AGsmfK3gbdx11//33nzlnzpyLxowZU/Hjjz82euqpp3rPmjWr
46JFi+r85z//OS7Q79QbbriBgZ28YMGCCydOnNhz7ty5grzr16/f7Ouvvy5a
u3ZtwfFhKmHMlWU///zz9IEDB27x5Zdf7vPiiy/u/49//KN07apPkyKYgvaB
Moxg2IQJExhFwdb5ZTPwuXLrzz777O8HHHAAE+GVO7/zzjujRo8effDf/va3
btddd93A6dOnQ85DH3nkkYJjw+QZztyePXvyql6zZ88ePHXq1H6XXHKJMCR9
Rd3vv/++8JdffmkbJhQsSUmnhQsX3n/UUUcdvXz58hb33XffyLFjx/LWwkiQ
Yn83vCg1fvjw4UIaPv0+j1Sp0DLQvpdeeul2H3zwgTrxqcoffvjhpb333nvP
V199Vb+r4LWDpk2bxg9sYfBDJk+eXO+7776zCfz+X//6V8vwCBh99VlnnYXg
6SNKt/3www/5jlmcd/nll3M79OB1BW08J1N7v/TSSz3mzZvHm0wiz7r66qsR
iqGTJk3ip8kTTzxREISl+Jwrr7zy8vPOOw/S88jmK1euLNgqj67o7GEDrGl9
77332ux5xgF///vfkUf7Drm85cQTTzziwQcf1O8qmfG0QYMGQXHG1nX+/Pmj
R40aBaVgK+zvcPvtt+/65ptvFhwWNAdpQ+PaLV26dPfXX39dH9/mnnvu+evp
p5++zUcffWSv3Pyrr76a1bt3bySroBA2FaTQA76XK47KoBjERDUYvT0CgULL
ZgwYMMC+Q4wYgXwK+pxCIFGvzrfeeqtd12rZsmXMSD5tkQcTmoSZ8W7GcPpf
//rXHd5///3CeFjIAApuj4b3qCii5EUOYsp1qs4w58pzzjkHRvPILjfffDMU
4F6uO/eKK64ASGBOwcFhGDu9++67xy1evBiBqP/NN9/o40eMGzfuz2+//fax
d955p70S6Z7dq1cvUVMVUdT54v79+w8fP348r4fsUBDRLWieQXBEkBF5MWHy
u7z11ltObEuOv+OOO64499xzuR5qMGuUplUY8FZffPGFoR8SkYppJHDMp83D
k3IlY4QDhTBMbx47cuRIdHqvl19+2YYmxE7/xjDsO/jO+z0jyn/66SfuR0l1
CnWR4qXt2rUDdvkGAJwwbNgwtAZK8cxxI0aMuOP444+/rE+fPr/7/PPPC/YP
z0MuuAbN9bIKpDV85pln7L1oLVqDTfEqAJ5DVuMQ2Mb44AwcQiDgrsy1aQaH
mIp8zScnj6gFQ7LvgC0UV3QsfFeCck8eMmQIMtT4ySefxDzw6qB0KSgA3jAC
fV0pM+1/8cUX39q5c2eTHcRQIH6LBMQ+NHwHB/7yyiuv+GHCfigKDvmh8xsz
tu8wEAic52rxmjVroJBcr9h52MMPP4whYep8M+fMM88sKJRUXwqOyVX8HBTD
Nwjvx8TnP3388ceYOPsOQUf95F36HfNFOgJkBXJCF66BLoyVOUDWg7xXk8JD
4E6U2Mtt6apVqwSzwtPKUPqFnTp1OuSxxx47/KGHHpo6ePDgRR07djTZOzrc
ykubPfroo1xuj0ORhYB8Okn+rSM2ygiQ/jno6acfXXZOq/0ndx0y1fyY7ldc
+1fkBDENjypq+vjjjzMCYAhRC18XI0lMBFIhJs81aNDASH3TSSedFL1JTRCK
gbLxCBslpEPanESmAIjd3njjDWblMWjihRde6NhUdtr111/PfcySn0lDhw5d
0r59eyPOvoHkdeM3YXVifC5EMwuK+AOSBceeatSoUZKwHBUbNdQWmNjjtdde
C4MrAh2gDyrIi08J40tyrrZ+/LPv0EggWaeLRkAarKtOrRxfE3eQJ3Mpf0NW
rjnjjDNwLCB9wRHhfiwssuRNqpAuS4PwNIBoJ63FvPfa7t27Y0ggMfNP1Ja9
M2h54LPPPgsdnM9TIkNK/4ahQalQQJQvNzlFf4GeM6655hqTeL5jhLedcEKH
q+ac3frGlqecfdMpJx0/atjoJbjYQaqSHb2QWShvuWLFCmTSXmemDoDFwopr
k4rVOhpWi/Ad6grB09rxtLlAuGimFcACygrB7mnTps3i4447TtywfHCjBAz5
20rsEY+6+5hjjuHn4cMOOwxU5a/YipXNmzeHz3/85JNPCoKnXAYvUeq+l106
2cRq2x8/vOefB23fsP6z36xRyiQ6gRXhEQRMUANeMUOACmIzYwC2tVy2GTwA
z9EI+MPobu/QoQMizxWYCHTnxX322QcfkO8Y2bMHHnhgNGrVvkr5rx6Tw/0A
oQAyjLaZAmAVIeZv5rBhDuBT8NvqIEyM5qSbbroJLfPsbzdj6QuDJ4e/4fMh
lCHwS3bjQrxazmWoCWz428EHH8zAMUZw/a1ddtlFfPUgqKX8zogZAvcwyikX
XHCBOEuKRjjXuAXyXfobaA1UQ0Acq8IEgVMaBe6U4nSAYZgwfsfPgfROsSug
IVCDG47XBJZirsDQtnfddRejg64hyKjDoE+47bbb+GSC0e3K62YtaHty/3nd
evTA2SSCBpYxICfk97+C9SrnahCKT/j82Fts+A2nnnoq3zszVEOoXJr2Oj67
c9Cxje5sdmzX608/7YRbO3QeMqn/0AvF91eSEYSDKqCvd+iQGxwi01GkGJmB
Hkg538JdIJnv4BoS756dc3h/DpwpCVcR98J7+7m0b9++sSGsz4sRalDYtJgB
4Jt0v/baa8XKp79jAADEfs8//zyWHjXExW+bKa0XDRkz5ME5R7Qa2X2sOQIp
bsXGyqdj8o+9JMED0+8QH4MqJUExeIOAmmQ6DydnfiC4vHWQdfADNOR/wqq0
vPe79u7u7eyWd5rtfMiUMy4YDmEK48kwb/wJYyjGHEZ5/45bkCt+bERg0Ou7
7747YMw3uK1IeQ0DVn7qai43oTHoOoOx3AQDmN+1a1ewUF9YtON7772HCmGK
gZ7CWCSwpqbLjJHLCsXkplCRKDlxTKZWLWzZ6YTnjm+wz/iuw29Hq5QPiDMa
hMgS2+ICFbTOP61NAypAexM8UfU0tjEHrBbpDsO6VB7jGQxUKZ4QIzADx2Oi
ySjUEb6iUP45l53YZ3SDvz/3HJ6ESy8A3N5lBhVxYgXnNUHKddhrXsm16DSc
yDda5Wd4BE6opZsgBaCJfhkw4Pmgn5AA1iuZfrqnb5sDHzzgiLan3nTD5aY8
pnDb//Of/wR45FOHIO7MDXD2moUcA/HQhM/YTrIJYGDrPBMInlQdsJw533ns
sccyf4NVpgFsQAe4SBAAjVJ5jPzuYbbgOULIIyAzUikaohERgsLr2i9ZssS8
Lq7Dfu751qsP2XPnt+86kOdKIBmIAtgDcoBaQSicSEXBUwwzycOLWEYChkHa
XZCap4T8T5gEygAgEXqQbZSBqxLsMu+t770SGMuAVXNHNIWRQk1hvWBnWLUU
3eT5kkDSeyGGvcdQPxe+7hMmicFniDjCx9x9992igPmy1oFgdeEFaTA+YXMB
FviFn4/PT4CCXw454KG4ofly1bsFzSVsgodGVgzUk40bN973hRdeMDDjO97P
c3FqVKGZBh7H+VfP7GePf3bogY0v7tR/GEK/WXi7RA7p39AtRisZ0aI8IzOW
bwkbIiFJ/wCqjJeHRxmBNLlnz+rV6p6D23TutHjhNUbuJPXRYJuBYI+ZFkrH
APHwm4UxIRCEKogr1JRwJaSYUuB1hLL6OISC7A+KyN+gJlqTyg/CQR5KmIcZ
Et6Kg80bS/MQqDI2y0QtziyXIKV8Lx6OGjoQQB1By5HYTy6XbdcgHKQE/eVo
Mv4iLooJh1kJBo+ToMJBuINb2vjpJ5cnvSEIRwlgaZk/PFc0WhLEmcYv++6d
g4gEKaqPDoGkqCOq79U+m+xJOqarCYj4gpNPPlk856oQBgPUITedAlQj+oXh
p5ADpNKxQFIoyAm2xb7D/4Bowul8Fiq4SCV42KCtkYahEDvVQJYQEkS5TD8q
aARuSI4yhLySHomu0+8y/L89AouxhOANPIUKLuFG6lzopYho5sK/OuORIZQt
IeQid42SoeYknjE5pQm37BSYrQPE1kUulIp1EimTNKco1mKoGZKcIUeZMfCQ
eSxGGBEK/mfAgtWaqeRevHWX4UzhBUn2Lx5aMqY3iHmCjkiKSllLSEuiCJwD
mJgqXlQSLQOxisAzPALWz8Rvi0lsy2h46pAY5T0g3MXLyW3MPP/883E/dA4W
AsnPH8McLCGIyWVsYoY1NRFErjJpmrmk1OQCvsvqAJ+ODDNixeCqs88+G1Fl
hJgxyCNRnILwmIsuughlkgApDLsCpXvo8MMPt+Qpsrnr52/eli0BSnmghtVP
lwMuxTaRi4CLfMNnXi3ircE2Fpt7iH74G04WNBa9VhgxyeATgMgzgeEDw6u5
VNxMPoXV7UxvKCO8TzYA+qbsej5zZQIti1guIUCCptDHOdMi+Q7HMIWSunBq
C9hjRlywXAobJg67sP/Mhed3q8bWUAqUwofldcicGQlblYBeIJA+DlqQnAQq
DeZABFG0MMkyhA1X3SaJNcPxxEFBepQWRHZYX7hx5AMPPADFScyEdGdOryyE
QiW8HCVAe3kC3hk83MvzIifsakTCA3gQEyQRhiwCm2o/iIkQazGequ3QZV6P
Hj3M6yYFCi8cyGBfnZiWwCYAHlZINkGFQKmPd4VjJotjSn2cGyIQZoXoKYOB
FjIkIvCFsRJAAHQLPAaOeJNAgMInigPHkC+r48hwLIIXXUP4WYK0PtOwYUPL
c8BBYnuleVzokg14JRCXpJmtrUM55qsLRlAMsHMrBpIgRmEhvi3TsbDEdyjE
5rEiRjqvBGe6QAtj4834hOh/w3ALoAiGiiFQgmNMoBi3wnIn7jgYEAszhveA
kLD8qU6dLKzBJ1hMOhPvEvfqyDxOgxIUMpBkxQdEFUgUQVwl6O+VK5oeIf1k
AR+Kotl11hIxIoIQahMYQ+RT/C58R1ID2xgSF+E7pBdfQT4FuCvLXjyy0NQW
cANp6vARJwnwwOsEPGDGa3vsscfyo48+mkw8I+U7RFhtHLxA06Es3t8DRx55
JG84Mo/xDdSSPEM25gYSpaKVcD7JYlkhUyuoiBb89QeIvK9FixaMiufBTGJG
VV8+ojx+pRHywyAkCF9VULdRTD9ZXYpRuJxnICsGj1bes6xVq1bECsHLFG0v
JqOA0PNsggB5tgYGtoYDzyzDCE4emcfMKKVEspMpRTQbjTgsK5alhf+HoX+b
dJqH2j2efk0knUcVxo4Gzg/aZ5YdFmJuJNeq6oepRgJwZwAypByrFpYHN2PO
JBfS/w/s+9qlAvDzzuhx0oWjJq5YdlSrViRdLVYEgVk3IbQnbEevZN29JEEk
Ds+P+SETUwRrSBxRneJWD1XXwAHmw1UmI2Q7g64lLvWN6Dduit2mC4VAAoQD
b3nSVjEMM3rRTNVAJMoy91ryUYb2gpQXTpo40t42buKInk+c2aTneSMvn6P8
ACmAN/e4MvLiCJ2Ftga0/JXPRydgtMYgtib99EEHHZRvaUtLytB/WCN+Xvob
wBZ66lJKNuydMfuaawAx5wKWINHE4fi4KCrChSarMjIPFMdZsiJbi+btkDMs
t8siD19DdJbqjrtv8TTefs+hbU65stM5I8p+SHt3LgjCiru0UBlklCU9nSuO
LmukK1q2bInL0incihrCz5pW/xxwg3eYaHNxSYq1yIN1arHRFzxpSda7gBAA
ESOq+odJhmnCBXWLSS7d1bZtW1w6vscFhvQC7CGWqCBKhtxmyhHewx976LZn
OjY8zI9HXw0GQQdfT8Wr+c5l94sgTJVuuYIwoZpRlrlRaZxrIIxvGZ2tx/mF
RMUpVMeyZwWt8kBeUcxVHsmCWZRFS4MShh6a49aJE7957F6AKMgg+ofkYN35
n3ClEEcnpBAi7gaHrQJL54MuCDF8xviz3tpjlxP/+NInL9vQCmO9kqqX2Eak
yP3xCFe0U412ofyxnEHBPbgKspJkAJks/BWsb5BBO1kYzKRdDfveZO0NWZOw
SJ0fcAMZoWYPecFRQAOYrwLwFugnQkFKXhKQSg/E3UqGMMyW/CTqpczokn79
+mGHKQlAGXNqVJAKKWpF58OnMKWd/vnuc7eNPuHo7CmpbcA5Yfi80miMhJAr
NaHTkllmKsFPzKIKSxpK+Vb6GwINPmOWMUNQC0dGfbWCPwH6tmhsms6DDYqx
pjDRfAOug0RIHy6puXZcj8riqtgKDWr/xm677RbVoh2TgOOaicFXgVzOvS3m
neAZPjg0CUs1kk0qhX1WNINMMkECeletUYH/d123bt2MLYgDf6ckAreU73IV
gYS0aRG0Ai4QfZAsKW8UPOpiC00gN96tZAh1kQUqk0KFQmgPn22UBJ54DJb9
YDav7rnnnoIJVaHKD9UxlpVidNxCEXVST3OD1F+68tInmjRp4mpgUpAMD8ct
lhXjClJQa+tzOSU6JK2l5BwWwWKUVUsireLU1o4ReqAoPKnkka6H7mVu2pT+
F8x/pMmhhwJlrj4W1RKhdbWJTNTVoJUhc2RBjVLoBW8xvdgxzIl5Wn6GsQpd
wtJHqVVzwU8YRCUY6ICDqSswJWg9cyfBjtjCOOYdGFDMr/AQEiBhAmkhWinl
FngF6GA/qUvBCgl5dXmX4RlvuZ8cLBBp+QAZrjJbzQR/YhRw1biJ5rNAgT9h
32EPIZrk05XDKBZctrU7sneJHNY1KSxdlAfRLCpiC7WYBuujUCVWnJJXjvvL
TtGC+qE7N9t76UtvAzw6KmiLrIjiKnvhAeoouwn0OmCGrItfkQVGkBT5FBZs
JPWAKy6EDwpZauGLzYbnoziyardl7LjxbK6F4EAZ6QoFa7wnqbblky7GQfSs
SEkkE/7KMmNJzKAs8DfeWfLb+0S248DVFcrCG8Ar5SlVYRmL78iayIp/+jtG
fW/r1q0j70MzcMwEt0FSXmmqhJxGPZAEHUFiRcBVZ6xOb4+PXlto3u7Mk84f
T5CPLXCeOm/O5hsS5iWRyAp4hn8WBuII8RlIJ5ULn8mDhBx7MZ4FwmclK1xi
r+AyQXFHc9TWdsdYBqMgR6pN3SgLsqAjroUgpngchahNyJPBW3GKAsWKSGvw
HhwDBF2Tfukbbp150/nHUgdU/VXiZ+bgPhrJhHDVbTIIGUrvyqkruQ5DQFAh
Y0xzEYBBG22pCegTQmmwwsBxFEnsQTDwDvaJvmgiGV0BKRgiwIOHHS23q0fi
Pfox51w074KJU6RczWVbJHp1/ODVslNHcDkQHJUk6wT4ABCIRMGOsavCZ1/a
zXTxWc30oGs4Y7pilyur50qOIprvHxOEJyLf+AWwHaQmDlepKcUgAvjkryEU
YkHs5TY8yKvvG93ioI4jFq2s/mpZpkAg+WHA8NJiqKJYdaIAR60X9gC7mH7r
dya35186c/TCYzsOLPr3WnO8yeMJtMTkLoG0tiRglX5wUDO+zBl/xu+qAAwj
NNO6blsH8o4C0o5gubruahHL7te//rmuR5UAMbazx/YcQEtlNLSxdW+L7ABL
lB05xf/A5jJDkcFgYZLzjcoO0JLpoSO8jv8B631jgAXqfUE2vwtbxOLGGI0q
ejnmXjJYgvH51kt1KKAnKRjMCqpJwItXoua6Mr/oaloZDlLHRfoTljAIBhbS
ylLSxVIKssLXmp0BriA0P7iYmlqAMAAtV5O2UgKAIyiow+6cwZQG5fgiEX3U
1MJp3F/Z46XsRLvwyrEoyDS5ECRQFpeUnYlJAh0Gw3rskEMOsSJoeMfo943N
K3OVuExvYVhkbWzjG/CMIquLgwECpeAw8ixyr5qIp4VK+R1s+UaHM80reAZD
gdOMWDlcJ4+MaK7Yl32Am8giXFJlJVlKYMSKh760HkpFxS4r1ZhGDBQ6jxJD
HpKPeCoEXFzH0gHircz2pckFSfWVuvqWkXdUDlu1tNcK2yolHNXv0BI4zxYG
43JiZkPpiORACaQKUMAAQhHlMvpvXo29wtZJhH0az0IBZg+0A+fYMltXgRps
D+AVym1mEm3MK6xxlJmVCft6Fpc5IZk1e1Svk87re3mCmyHZUSnZ51PIWqQs
Ywg6+JVJJsdPLLpFSDLGEYkAC7YPT0CjrVRbqyNSt51wwgnojN/Pw62sGfEd
0goi4yTW0DYoqdpb1wZ4EsR2b6ngLUQmxGgidlpHhP1ERhgtkFRWq7dmWO5M
mhuryj7++dWPhm2zdYN+z61KsP0AJwgpn0JuuD6ODsRkTggSNg4HC6oQqhDz
I/+ENkTfeCjoOTzCVwiEL0FEYRHhC7dyC68K2lLM2iFIQwqQJyKCfr8XZSpu
FSaF0Y5WeIKPWZG9mi4rK+n/0TBog/IjCmFhq77tiLPFBdJ/iC0rVR9uu+22
OPKsZ6BkkuisCjlziEEkq4iV/VafgFPqe77dM7ZNo/f32qHJlZ1igFNnGOm2
ciqkAnVFIkIssilDh0R4rRCWy8EwRBeSsYpBBAETGQSJLtIGEgn+PoKwRNde
q/nwYXAo0HbwWiqwQ6nWlnyHDGAT0E0ei3Uy8sFMLGyaS+OyXzHx/AuHmSZB
Qrira54Y+5u7dOkCCjNZrBMYpkzibVYAj9RhfnFRwH4gyhZk+DveKAyDUIyK
/zXORnURFybAD+rMY9T4bBqbr2vmnjG4y5xqGXjZ4AdM41yDk5gv/g/bwSuh
lGkvv+NMsHKFlTR7jFbI4ksNu/CdwSS6ZxpQBQoB/CHSS/FUS0aqpmwGiIOP
VjyINImi3XLzXP+mV9r+5Zgb253SzcoDwU2cJ+y5alMJI0eHeZbVpcY7GjcF
rqxjARRlZMAYJo5XWjEK+MujGSr2RBx35T3QwjIo0krUTQUir83kSj5jCKrw
NkiPTqIfuE5BZTbnoZZbZfw4ypIeSzvIqD9zY9BMRPLC6btQH3a4MmBklkH9
Lo9zooBkkYN82iV8B4RLDYOzxbwessoyuwYwEjakf7PnX9uh+5Cppw6efPL8
BQuYgnpX4AG3EaoCVvI6rTLyHghiKaFqWNzZ0vKG4AoyiF+JMPFXFAMtBlCg
Bo4SCI7kcJ3pHu6C7VxVAYGoqCfmFNxBNRlSBvdqslkgSbQzJSyEbWnlA5ae
QpfxxHBXYDQpErLhSK1lm2E60adhPkoDnWQHeKzdOZxTCWtMfc2BwyRhCySN
UZH5jFFDRg8d2XfsDeOGpgFS3XdoQTUOggYQokyQzFfZZDgGrp4M4JW8k9tD
gUENW1XluzpIEpgFDDLeqAYtjeksnC9vdHRHj+mVub2CGhoqqb+dbdmQERgd
IK8MFvndJ4yPl8EusFbLPdEzFF2Wa5TccAa9kk/5ei+omgO6IDu+HpKLi4/S
BN+iFGGA+VAG88XIeJ0vzbfHV3zw44evnPmXffe87tXPbDhcTzmMLLzrd3Au
0l2lF/rMzFBEoAFsI1jTmkQYJr0wnLoDhxBE0qVKEasjc3ueokqC2W16Dbh8
8Hmd2T5FJQHyi1KV18jMXNZEQ2foA7bizQBtSBwKFpYfSsAV2w2G8LEYF291
TmHcmQJul00D3cCj87UeqC6ZCMbJ9CSCSDOtfn4wUICDnriUKLUVbxZsFwiE
4YTuJnEAEwNlkAhlYHNlzpLVqrDhlGwULqjkMNxiJ4jvVsFSUawT87IEnjE5
q5DiGUwwZKhKcNSBUCSDH7ZHIuSpWM1hAtlPIyEqTEJQIEZhZMS0cb3fab7z
3kuOaH+6GRlbiVYYkWIL8muMAGcJ3XDQm6/XkooDfMby4TOB6VbIc0igNmIc
ORfqICD9EAcDmVQsrpEiliJaRFPphgxpyzNx6fntDjKwGT94+G34hTwjQEA1
Bx6GAR8oDMwB9VCo7WLQlvU+p2+gA2Ii6911quOYdYxBBnQSuGpovt80D0Ng
lHgxKtv8ndsBL8woaANTA9EldrIeNb7NAQlkyegGg1gHwe01b/aUh844vO25
U66YFpki9dcAGOsBgLMUREU2qRCQollYJjx7hNkWL4tRUcv6QxlXApJvc3iJ
rVPziXGSlQLpAzBE/UQ8kSEgWi0iGaZVhkdd/9tv3n+8T9N9PAQ1WPzc6zjo
WosA0cTQ8UlTmxlrPKFiXQpno0UbZQAeLz6/dUaBSjBC4Rf+RDZcR4oMo8ri
FoSR1uWx887u0faNvXbr6o0NFAb1UQsoDLIzDHFP4vWKxRYI2Z5FV6FZUDca
QPqHF6NXmBEeyLwTrVxFgi/UPEaNLBySXQqAsSxpqFSRvGIHzY5fvrfE6/xB
Tz79NFhuXjC64QocM0iv1bfsKeBxUlekr2QKfMfffFHyx3/605/MZdw394iR
RUgp6fei2jgfZUlAPnLE2HEMnhIjt1oRNX1wWpdtJMNLK4AFFiVQf4KacSNH
DPzrpacfl20uAs4W8zLbD4LAi1UIHecyFncGD5q6sNvc6653a3wgJtIkUKiJ
YKYfCf+hsQmI1mHV0DA/1nBBWyhPii9Xi5KD81v/IFpFQOD5M2bOJPLAmKhG
gdWkDgw3cBCgqKYvlMZmDFyFXDF6hyIw476XXXrJnq+8+qohCpxGQbgGIiM0
AKp2GfAq8GaXXffYdf6b/445KsWS3I2ri31T1wFpxHwi9LbvnN+1VB25RiDB
BAQVJc9VgdKkRvOYshIxL1bEOVgjX6SFyn76hz/8IVMHfBIUdXBLQLLrmYHB
d4iC04iJUMvO1JgmlgCIxwgx9YQODS8ds/eedzc+5uzKz3/4MRXDEz1EMJiA
LpEd2S+NpJFHqhRANsyV+FdBDispOWZmJNrYjk5dmVT2VmUubYv8HpLHrNSP
GYIOMF/Aj4mR3MtTJqlUs9VZqdVW2mOUoLUTwRK+sz3liCFaAkX1zwxeFoer
Qpk3uWT09+TgZmX7GgSVuFE+yQhfrIrNnAlox5vRWRZWITOvUqHCVBJ/M3X8
RfxDexx6IHtHYnzPV7ZdikEioGSS+GlgPnBQU7mpvo5hyAKtk2FzUHwlCAiF
JLhwpBSOIS3MEp+ehB3rJ2KeesT2FpmXRXpdNMODRytxYkAwtWywJ2qLEOq+
pZuY5VhgNayl+t/5woLk+CSySbZ5dRXwkB34U8eqPxgV6sCrwU5b28iWZdXY
spjjpBlcdiZqAeYbdMFWSpBQNBx4aiIplLaCvNPDrQgUuCrFYiqX3EqpCQEn
UIwTR5SnER56EkXVjYOQIIMkanDLbG+Pjc6WjSVVq2SzinVxnnRbSNI2HDgL
2fmBXggY71Bwg/k8CjxlSCGdZM2gGCj65Op9ZQUSPxQGWMk8ZEkS1p7hMYTy
pN58LQxAHu0r1LGiTLZXGrJxDQMMgyrFUuBrYZNQUdjOwqZIk84HUkFpuELY
6CiIIIq/ExroVHCb1fpiB7jNHBsoRCE4iOn21xOTAVukbTMphdKgcK5mocTy
VBS/2t9y2SulFOgMkEkJj+obkMJUoR4Ap40Y8AQpYGGm4L806QqSXoLQW5cn
iAp3mZpSQ7Yfpqfhtw9ZA1AJY0JrphK0m8cybYw8aIEWqBUHLHizLb/p04E/
BESSrUolXfMkBEPaSAgTjT94xBFH+Dpdr7ShMD9lxWISn1giJf0yNJZaCIMc
ZAX9cNYB88vYuN06vjKNUJ1ail6TS0YmeCKXsHDrxcl6VXFd3FRBlqEPtpYS
2scFS25OCwQGYtw+PnQANXKdNmVfCq4n9gVbrZcCRFIixiclYEC+CmQD/5Z8
I1Ox6iYW7XCL4Chc7BeeRBjLFPz+L0Q+SjG54sGo4iPEObKTwfScH0vup2Jo
QKvkUTofK5GxjGoQo1IQgpDeQkx0Acl1heeSfMIgeYhA7BB+QdYAk1aZhSoh
Z/AQkMXDerxp06ZIrI0Gu4g0WxfVvrG9AWSc1Za5oplMBiYxYgQ/GNuoGaQs
gxXGmooK+s5VTDJK47iUkO2XscJ8uGf5RegIEiADzqVEG3y7WcTD8vvqzlnJ
BLy3HligPCTDW9E7gTAQEz/RSIP8IhPIBwPuG3sJ0kg2Fo0y24mI3hsDkVvM
G7oZOtOUWGbEmsNS5wNjdEqMj3H6tlC23VhQKGByie0dQysYuFlKvQXCotGO
zVI/iMa4NXfZYWWrH1p8rem4UgbFW40nzIVebq55chFahnfDjzMiOKdRcVmw
/ttIcij9SFKZZjwgEwgA/0im2u5KSGs4hEMBARAFCACBbjzllFPgii1aW6k4
bbq/2GqrrdBcXUpnwrwGsnO5q0oX/LVCCb/5hNtFMlUt+TtCgSXAyqJ+pD4l
reacMwvW7Fk8BxkTgodFOE1Qg3EMmL9YC0Q3siJr1sSEHZqClExCajaCIMjK
J5LpYH8nkIygDe21hRFU0nqyEvgyKZuoNRAlH8X1IJitj/E9PMDlYjhoCL/j
HvEcYIyMJhAHfyEokhc3Lq8keEUrvDeHeHDpezvuuKOlLXO68qGvgAR0VmfO
sMkA8lrHAigjLoFLXTITqY5Q+wMb+Q5W8T/VpHEFnOA12udbpEMQ0h8SKbQy
ToJEkflRXwiyuFYpRTiFwBFGEJ11C59RK7vwwC2gIiJpG9WZKr8DKlDc+tzz
2bb6mSaxxIalgBvOLKf4/oV9991XKkh0gkgGnlb4FP5ldVN6LDlbR+hC8Ov8
9Qr8I/PW+IGdsBKC2ea1XJ6bFh1h17OwU0pL0RRv6EC3qBmeti5HAqx22a4j
KMw201Ze5NtLW2cfaXZkPCyzgnX7IQrAOiHyyK2z+9H23naxvYhu1etIKEjd
t/sOzaMgWu5VeiMm1izWroP/iLV0XHMWDtyWgE2vAxyyNzpwH8jqa3PhOeN2
RrbMsoGW6sz2JTUJnUEVtwrL0qNvnm+ttCQGC2Qpi3pw6w/2A/GwbTZ6K7PE
wxVqhVvNjwfKwAYccsKF0MhUqrvRbann0Hmjw+gFIUl2CydeKvAfLrWadW/+
+B02ignU61A1Ykxf6Gs7hT20IJt8FnVwORLYKFmAv4TvwIxot4se0MEUYJfQ
MhXTMqJbDd3XmntLLRv8rduwHvchQgdU+9ka/rry+CLLEOD7xa1MUuAOE/EJ
IOQVTPI9lnGEwBKXDpCgCZyQjTL6HZOPKtScQqJmMnElFtYHT0CAQIllvfxk
+UkTT7kyvEqY0+Kn4WKLR5eKtRY7KiKu3+EcyzYJNzoIhX2TWmW9jhFE/bFC
UWly4lSH0S0G+yiLEXAvOVuotwUgCtclpsSqX5czEXSYuzR4oEld6cPfz/6V
f9+5VkIdjpfZkGMICXWSjiF8q9tb141qfe2994y8ZuytJR+u1sK+sqxjB3/u
9n7mZQ03eAS1Pgjx6C+WjzjlohsXT796YG2Pu0y6bf9fbYRV2fenajXCarfp
dnD09NZ7Ou9/WZs+V3dYfPuMVzvs2WyfIS9WG+UGDDL147pvZjw2oP3IPmOn
pc3Yxb9f/q/anCeZdJueURUqEDfkrMHyhLMGP2ry+RNXd5tx3cJZ83ofs9Pl
7662QMod8rauyddZ1xy4we+u8ZzDNM2/XLS844n1H/5mde/3ZrXfb9DzP9Z0
4FziPQ02eGx1anM+pL8vDKsi3/mB/rMb0a2PdT7ghcb7HgXuHjj/2S9Kvvjv
T6wsW//zhx0fXHTbNg9/tEqQsRbHGla7p5ow1fYEwfLsEwRbX3fvP5bc2L57
vce/40DMdrtOeXNVtjClDeSnS27NuubADX53jacXosAL7+u0ocJU/Z4GGzy2
OrU5kXKjCNP31z7VvdktJ544CGvcbtbSd4q+Wftfn5FZ+suqn4vXrfngzmuP
PTfNndqc9Vj9nm28LazlMX+YwaRj/pZ1e/a64e1nLVk67YpBV5W/8ZMd55xw
rN+Q3ktnZVxa0HBDRlDbgwbXHfXF/aNOHr0Ae3Zx5Ys/bMBBg9Vu1V2ZtRxh
3VqOsMrfqu5fndqcJenv05H9ZdUro9/afZfeh9/00OKXhuy9Z8Nzn/nxv6fd
qp7vzb2g/RVL7pw7o+ekipd/3IBjJKvdamKmkXnGSYUdE76r7SmHh+S8tyTj
OzUmfK7hz/tHnlty/bReVlHLAeoxjDV5xeEMm8zjFOWCUBiRDlhJAVlPE8LV
EH1tyGmGEghbyaKGPFH5GpEZ6RW5PlQ9WCxCmCpRL5+6BACo7bGDmsAgkWAd
A/V0JKnrIH0nowmdnay7NXMlX0zyhnSWFOqEQW34AYDhuIfoPEb5FIYg1bf0
WIGuhKwQj3cd5+cfnb9FSpoIkUU03iTLokF4N+r5e9oczM4ZkU8aoBLAssIh
CR19HmlZa2CnhzUa54g0STD4xQ8SB3ayjArGr3q43RHhFaSIqNZhbRwJD7qS
M0LT1XMSK1E2VBeGoBNvszextib9tTKmDjvJv8m2Or2TVUXSY7YkyFN5urYf
+k1PlAvAVYLucA8ZP8jCCpgcthL+nCv5oOThiSyMyFtVWhEb3yOICfJ0yS5k
HoYJL6ImvDoRFNf6ffr0CdIqeeqOsRr+dge5FbESCsShf64TC0AYZWm1bVFi
mkQJxnIRI/czJonEerKXMdI5EA0wQVrsNMiwBcOqVlAXEM0t5UohEmlzcBZV
k40yCl3/d05kE9Dgz7J7tyiWHJOQ7E02GYmi1vEwszpylkJ4FqesmyyLVQC6
7G5rkUEpbmO9S86L0NvJVFI0x0xJrLIKBeXERgQz89sctqZ9vVEQ22kIFASq
lGelxdoMu2LCmdloZUeZMfMIyjXtad0AsC1xjliWt+Enpo4/o/gQ8vAMusG6
qAjA4b0ZOZ8ulNQjn8KJzhvtXLXrTzvttIhWDWKTSJYeCScpC195v/Sk0xO/
sjyoFo93bHrE9nP+mYFjCkh14R1Aln7GMG8OJg8YsmBR+46dbEM6Ug2BZU6a
xVOvC+cFWotpdJabqUAGO8EXEkiKNBQk/tenryEq9mwTIbK73IfyI86FsbJF
1l1Raotfvry/GkoFapQjiUxj/+f+sdLQ/w+rP13O0XNHXP/g36TMRaUcOwsK
gr2se8jyzSEZlMH0Rtl0t4oTwZMOk5FHuBAcso1yFFtRbB2y5CgFH2GKnEug
Q8MBkTILR61EaNKKKMP7G9qfOmBQv2nzz7s0bNJRK4zOUULEa1AnO0RLllP1
XNdQJ17EshRaAVC6039YOUBCrI2yLEEFr3JjHqhWZgeqQWekDmOFaUDouT6U
nIsjC3LIcrvSJ8+h6hHtus6aP/vmNl36dLp54SKjNezGqrtmQXJ4AwsyWCE8
P6mkb+QJlUKSgFAHt+XoHpLh21TxOyV7Ub/EYIZ/5YPMovoYylpRXSwNFMP/
RKDDZOohDUgFsk0sA90hiGsqmuibKoLnihCDZGyZyBL31MXNjus6bPKEoZf3
Ou9KsSFVIWiDZkAusG/npEIfPdF2i1gIImXSATHlqAWdPg0ky9398Dc9fkz3
nzAXruWRvAqgQ/GUKdY1DudaSgmqQiWdFXDnPJ4mvDEjtg4RQf1cjLJHTes4
aPRF08acFRml9F1Sk5jGNTmuLugFakxdBeiLnRQ/JWQLatrYq5v/YCXeJxpn
hbNY3iQGhdq63+x0MXF2CuP6C1tuty4qBFnR/j59D2OxTgZJTnfw4ep4liT6
5lWhRQNc5jXqgrNgTS0qJIcTjAZl1z0y4ajsaIecClf+zbjSqRKE5TaITxhg
thz3RwpBA8z+mud7qQ5n7JcKZY3FYD6KiIbAKznJKzhUZYiMlWcnGUSNcTBP
OB9SkBfaPpYn2s/0X5BGFFDqosLoyxE5Qi2rdEFagcZ/7L///o82a9ZMgHxf
4wK+B0GzdH8K+efkCEyDDEgOWeE4jTp8E/YMyx8U4Nc8SUt35/BW26WASRax
D/OrkB4C+mZGDmfhoAEYrKL+QVeHsfpoK/KEzwFhOt9z6/hsOxA4VQylMfTM
mSeKW7p5HouutRpwxk7KIDK1tsCKI7w9S64MkM0xDZ/y+FZB5ErtyGg7UA7O
YSP8EV1QPapNC57nRj34SjNFeKsYfiACkcUsARnB9d6CBA2uuxV28lgMoTWe
o7wdAMPQ2zXH3Hv3zQtHdWpZbdN6CPNlw2fUCnOz/FY/AFApygLnaa3Da40w
PqBCibL546qEsoiR71TlSmYoWRm9xwr7MCWIAakmMF7yHdrxuDbnV2nbIuAB
AoI6PJYtutKHKH4SUR+WMa6VrweiEmwD0CTqSB3BeThIiIL4sknfqoGN2yHv
KXsrrF8Q2h7Qsn72xjHbcMATqZTBRrDjVlolVGXWm8H4zC2C0TlOzn/KxVrd
CW5HVjEVXgTtY+e0mBlTewQkkBWRg09CTUzm0VVhF30xaG5t/63fn7oTku2i
Dhx75QrZEPtI2zSixwThQ1iETCoQLQed8HstSypkCZXBkpiEKQglkAXrQXxJ
I2pbEJKRhLtoMhjjDm6U3sQ4SDgA4BfPAzklwjPLIC4RYQtX46JAt6i3fdKh
efp00FDyCMoeZkBoKo1MlFXgEe4uGGOHSIDhwffO6YdtFsNQxHw9/onxoxGy
09ppIxrk6hDFubJOX8yMclbQkLbd0qkgTIK6aEiMceAWHgW5vCJCHB5l21Xd
jgXpgc0n3ZIIYnEZvhoOCCPCGZG2J9bAIh1KYgVBOKwgCkvEI62vIq6A4KgK
P9YVm1hXED1knaRHPPJiSK97i6w6lKkj+MpDO1xUPunZy7n8sLDnSBLKUSHt
/jH+ZLcRAONhiDuPpxwRwl2xPYvkX9ATKM53kudW5TB7Y89FiHkm4kOAgcBC
BLebRUJi1p5c35xihBzEwv7ABtmmqA4N5o13Q2beJ7vi3eYbOI8kyIpY4BRC
QR0+q0BwlCngqIhZNE4VwSlLu7ggmPFGKUGFJhTeWuoR8LKmJR1swi0Ei+C0
5I81UGK40cYJPRE9X6PYXCqlfyZRYCcs2BkrCEbjeARZx+TVRbIwKJhLbJSd
+s5fgWdLJNgBJ24RqxKG47BbPT8EIdDkfzuKDjSTTHvwEKQbJ4joGoWU2mEq
9i7+BrIJwmondpCBNBbUYtULoQFxpXuYy6NYm9voiN40stqZPwiYeLqF+akZ
zhY2HkGRqKeoVhQyw+gEjqrgnWMCiUphgh5/SyrZPCtwR7KZWQmhpG6xNfTG
g2d4rfAEfAFr4m5GddFHpk08b/bODieA9EZmSAipfT9W7jOktAgTqOMUSBYd
8fvAArZxsMkQvQslI0WGjnZ+oKt8z0IUoQskxGhEiw06AmtFJRldfQbOPmoj
CecAj+W+QU8ueukp0cq1SjQbGcLiIvPIC3l4O5iEibMyKRsb3O5P5FcyW7rB
lGfgKNg94sa0V3nLfSxPXs22HfWE9sg0jhOyHhZuy6AUmUn4QpYX1QJf7NR1
hVrQijtRfGYGu2A3rEIzrW+jd4R5TGSHNYWO2LCiwD0xZFbyaPZi8SdGQqbR
UA5PCZTH6XXKXWRl9KiQ7+aaFgliIMoawCWsXdwHI5lUu3nnsa6diQhpsLr8
jwwyoGglPn0leopOyrZGlxKDcxJZOq4yAkM9scXtC/I6pfmCN108ymgyExZL
tgIueDzaZqENLiWhOL8jqAiYgTIeNMOFFbgM0JvGG1ab7tkpO4ftfdpHFFL4
zjSAMKYI4gOmkA6SITYWyACiuJ6Qz+1VRG/EuCofEQME01qo0YEc6uajTAYf
y+A8E0c2IYL5sbZcVBj7aSRToAsypTl37JnV2iOCArFaaZPh1+aL4/T4nWiv
BJ/CEuDWSA16CegxOmAHkuCpA12AKmOwTie0ILd6EYIG6MWGbmua7wMiWBs6
Z9RF6BBmHFk7yNsKgXBKUBVMIkMAimTKGpOj9LyaoUFEXoXRSuWZcQYwliIf
1krBtsOxKEzRjNXcI3t4bbBFjxhPNJ4q9rBKNI5PCf1bqnfDLLGugFZOArZh
e4LSVOBW2VZrck+WimTwyAuDp92C24GCvZCITmUIZlk/ZLcDHRMdqWnwlepi
opBloj3b6MbbeSz2lqU1mAGsEQMIqTSXBTKZ4c06XC8nDcKR9epKbo5kWF9U
pO/O9u3bs9mV7XlyfHVVWNoxAMhlAJUZPmepVVfV2s2hvPAYYeZ3HDukLCzO
VRALYWjIMFopA/oGdpNiIMYBhTU+QMyRZZJBoJOhChxg4G59oswO3iFbgx7Y
9iRkAJ+jBm9NGxAC5YzbkgNsw0Z6NGwCuxifHRfi9oui2uKl6bpajefKhwa3
Ovw65EbJQkRNyapCKzu8VwyltQtHcgDcfM6AJtB5JJTC77E2QoBqqACQwzJQ
UeQRCQB7kcOwOFUBHIMJ6BO0tvPisTbQc2GnTp3ig1jq8nDGT56NW3kqxgCP
HHbwJuAH/eN3t7lKGo8Qr5sXxd9oKO8qe3I6s9o50E7e8p0DwSCY5aM4vFlW
MQFOkFHRDcuO28EtUFceo624IB10AavBI5xVZNiCO2kqzrvRDWwigkFkSySH
LCHsPHx0eloWpsFmAXhV6LSFe+2J8U32u7ZF93PGnHfRzIFjp/vzgvCgYAI8
Il8lmfUzEgQt9N6oRBCJInCBEWnYjnLAATnNIw1fdJLy29l4DpxyB7DUtdNk
UAfr980yJFOytJsdJ0EcIWUDKn48h/gNyYVm2FTcgXy+mXY7IAa3NqAAMlrI
41wuB674Ukg7TtlHhLyNiNsKXkFajI+kCLR0mFlDIfN3sbLxURAFBeVWqWYk
th7tPJQpSdMKd8JDVI+pgrvF+i8Xfdz4T/v/+dK3P1h5Q/PGT7Rr0sdFYUge
qMK7eRQ6A8WDRZeioai13a4JvmDArVIrwIWxqBMCS7TlT0BHnaAmHoJLQqCp
3O5OyKrkO7Aa6kEdJo38IT9W/QJRpGxWF+Qy+jJXJS9rqccg2ymjMmQdB8Ni
9jJdV88HqoRjFcM0WEmG2whJ3C5AUgJRB291K62MzNpMQmiIbMwtswSz/Vj/
SpgICVVWMU8MF/MMUMkCmcs0z1g2oO07DXfe+719dtx1Uquhf9vkm/V6no7M
1EqNrBcVuA6FoRgAIQC1Q2yAbJGYKA78j8+BE5H2PjiKxax9Qz1sL/4Kr4VJ
SiDeRDJMNorrd0gaRJIoR1f8kAWcPyYLfcSoaR1Yhuilf/J4hZL7jK4tjEUX
f1b60qnmwhArO9Qoqsg6yWFnGaPSGh6TrrEab6iBJNsOg/RIo1TkPt4VEt8F
YXblmpKIxWpjdiAOt1sRkzn6XojbzVr69iY/rY9OBQVUoyXOpjFBSaZILiJs
kCjGclpwAWuZgcZU0gAJ9gJdrmUHMoiQSYNvt2ka6y9mQ9f0MO3YIkJjQAmd
RYdkvVjpiyzbyYIFhZL/rpBDChwfc/mTur8aP4pRSrYklDPLOggC6lucMgSM
ty84xmRFlWhJLdx11awiJghWg1eCLurdYczsJKAkoVOWUM4fdYnQsmxUgAyt
rZ4ABHgpfwp/RhzRIMbEwgukQfw0hwEiQLmscno8UTszQ097kKPzACeni5Is
zToGV+TB8nkEBnJqkfrYGR7inrFYEzyI7G4Wm0A44LsaoO/WsMqXySMc5uQB
NdKSMRBdW3Xi8kQ71DWgtoWVGsItYiejLANAYxmwbuYhxkMaXEmXBMjomJQE
bR/PJ5IIXUVAF6OuGFpnAXhhEAQDXZGbX/GUBW7djAE9WEARCNYTkOyoNneK
saSBwAdW+5g5EmsAhq+GHYWXSAnCJIGZElHjNV5LNImzAjC5Bijl2WESS6mk
sWArJ9xKk03tFm2nivrT0YAGXst3/FjuNshwZgV48whIEwMdtaKAHk4p4RGR
V9JZoS1jTIvoqzyEJvjSrtS9DFpbzx8r/7fu3QCZkitoS6ntRIIM5CQgH7An
JSlaHEGIAhfsnAMCB/5+SKxwCIOsl7r9DcigrI+oYmAMo+PCt4xNiXU9BSHx
hPHFQtYrZ7ihA8ONB3dxBjAtmAHeotbGytrlJxQCF9kRH1AJtrv1VwSdH4v2
rVteQSbFkFtmTzBgPiHTFQzQPWzod1Tp1DQ2HFleacoOORL+aSxJpaLftiGl
yVoqAYYxPN7H70TlDDOsQic784EYRUAAXMKzkX4jYTbANC4nAoj4gz+ItBwi
ekR+GVZ3G62AGO5o5jK8NtJeWEpegYyY/wVNM3pZ1/QCKICM+n6qdlBPeF34
Dq5Yj2vrOg4qYTNFtd29JJZ9ryUGGrVJ1gNfWKO0Tm88l0mhA0rtRM+6ODY4
zNm3CWcpFTuGAcHgsIIP82qQdfX5gEmYwhOtnycVBSRlMF1SwZtJ1vxPlGMh
8S6JDEkW6V1gOspkLZOtGuTweGa4AH5ZAN+RsBv3CaaoRcAFsl5d0FCqU+rH
1icKmQMFkpObeiYr4Q65DlKwaAZksJxiQT7xL4+xGa2R5rI6bHJZxB/8kJ1X
6uUrudMFTFvrQqT53/IebjNOMespOI9IHjGhYLpuRBSIS8Ol21kh35FiEogs
jD0C2WMUS2WmbThceZbDO5DJF8riZglL43iKjBeqWYI8nzQr8UBlmOX7Tnri
sUyUSbzEp6nNI6IgdcXkpGFmEHDQOjpbVGEC7WWMAJesISr9rOTRJUmKrFsc
UoYDrmww4bNUosTKWlzMLegU+RngGVcIodK3JDQalsFjJOA03HX7UaCO6xaY
LM71YjNEeVNW7+biPHeqbw2JmKbMQ0UHVbXj4g2BYHXU8VuNn235Q+zk8LBw
KVaJhIzs0tTvLBpyj5Ru+PgJ+OoYdlLqPEZXaIixCTtct3Pp/YqkkOWCwUfm
l9d6CYY7gzQ57wwwIY2eKW9mVQbIUGLwa3ReeCioSZkxzPanolZhKkDW7tEE
SOq11e22A5dtpYOBE9Qclt+ubVZdhUi5J4mdLgvhIyHsiB5ID2YzVz2tozzh
TkV5jCfTgrlyshu3q2Gl1kmSKHwKO7Ql/4hPFdz3GPOBMwmh9DuMIy6P2AF9
HrAYRf6H1sYI5SRRDpRpn/8u9dPRBxonWpoGvWbaSq1wilodO/sFYLH6VTsp
xUCHwM2ysW7Lf/ZpuFwOgLjFIam0sJ6ngJAdgMhfkZPmNRqtnLQrjEGERTID
kRpCjrL8D1Xa4QihyZYNhce4qHYujLAa0cPmQRYNhaEvKOgaxxU/cuihIgXg
Dr+LExbc4T0BEu5B1fwxz+AY35tqorp2RLJFD3hQOGOQ2+qP4CTqyHfItK3b
EnYik4AVTr+dv8D8cCJQbQ5TRG3xi1m9Rnb4jvk3z2PQKvKwUElgm8GxGzjI
4lfXSjVqPKMxGyELKsB2K4uEXvAOfwwMQARxJRDT4IPJSjHRhp2WhgwB4OJX
hz0bu6MEPBYnnziQEItsHaRCzYAGLDHwwKBgofYBvOO+Xi32u+fgNp3PnDdn
2sAJ0x9tdu+jj+MTci2KRoKCvBQKyPcECkgWvjZhNtexCIdywipYQ0UEf2dc
ZNa1UALnJqKHbvzADlmzZighdV918ljYfJu2VTtARuJ165OJRCKdQTuk8zuU
tEPjpEts3RoVPe+BjlG5vGf1Fhk1/qo60AO3AHrxGdGGfvAMcbASPstcwzvx
oIKVLLf6b1MX7sNVQAWZsCyI6l6e7PeDdqiMLGW5tQA7etiyEyVrVv/r5Q57
7Tyi27jLvMyTc4BRrvqP/IED2QqGg4NsWG1nqAGBiAYWK1f72iASlRknOqV/
CKrwfKydMxSyInTLfuT1rfMf9mh7AK1pCNJDUjNIS7mnIZMiQwcUcimXkRzK
KyE1D6FYaJqeNWqPBZKuG5rrVasNYgJNIKCxDruHfyrV0OG7Lfg7KskwQWhm
A3SgA0AJqMtMISL38SrxBdN3W1kxPrJ4qs1iHIMMvlcDzwVa3Hf1QPnmz66c
/cFB2+1qCrTdex98gDFGDkwmQH0+W8t3zSvCBLIaSDBDQjbe2G233YANW0Ct
djSQFrlyPU0P3AbOUsIXYIB7LRGInso1SVUGtTr2vNh8J9spIOu42h8AoETB
EQwEBLsZdRopzSMI5bV5dQkmmkVX9J9wnlwIuL9Xhqgg0Hj/knN3u1QRDdfF
V3Jd0FGsnZYmkCIi4QrtSGBgaVhEJx5F3XkOv7OtiKSGZGOaxe/gN3cMg5yb
AL1d04p6GHf2aD55YuMjTFP2e/p5OXIGsbMFLsSV8ULk+PATSbYjNWRmbKcs
r0QsMEhh56YUVEJ6InYEXQfEkgUpClFbFRQ4iLlET2wJFBK7s6OrFe9wDeZW
TrhIeynoA2ZRe4+A2Lb/x4AGXwy4tMfzKunVn5/3dZIHgA3hpXDIlmrIe2XK
AhSA3h7x7VAmt7FE+ER6SXjoKpPhm0uuFwPv7OmHujgqbP9IbC6i+VScOSDF
t3+2yNQdP1IGlEwfMfDk1/bZo7spxh9u/3SNtctRdx3Rtn2bvB5EZE0AFAQO
1Of255IBeNpMx9o9QTbMnosnESjf7olL8bokr6ti4g+ugoZgSdTiQg+pZlCY
NyuAtyYDKhYoq219sYbvqB+ybL4wrOEW6gcQI1jH42zfoJcDzTblPoEwBSZH
SW43YRjuOqREyuuq9SX4ZnKudEwWybgWLuAOItS57HnL/IKt/TbhG2TVEkdx
eFgXkuUs52nwvdAtcFPiWIRf4hW38cQaxSF6OhFuw/j4zlWQFofE5VPkKBc8
Dfxm69NgrSIMovmev1sIYw2blMOIHNGZP4vGaGZ9SvRtGAXqq9BRDAaFGkCQ
yJOu4WU0D1HOah6BwdpGOpsUphN1k31kCrcMFn2xRiCMDlPJqzjfwVoqZJvW
tur/OHnjdoTJWibwKleZlbIzHQWWXeE3LJE01yHxddFx3nqdNYD3ReOwFmp4
x4N7EGB/fBxjQCAxt/DDVtMkPNUVG9+fA9sp23KC2S6DXP5occJRNN9KuvTV
gDa+k+xSU32AeoAUw7bN6+S2No09O3sqXqO8VT27wOJyYIVVCF6KaUXYGBAT
YNOHrNiF7mOyg4przO6R32FdQQqr3PYPTLekpFvG3hqjdPvdo5N2feMK5AcX
TIoO1CUAKXCjbBrc4+Ny7ufZL+29995Rw5NGMfMxeQ5apWUg0AmVUBwXh1Bs
6+qFiu2gKj4xdImDtKkEDi3yB9+BVUlcpsFO7d9mMXuQVKQLQmbWcxURzAIK
CAyaqVtKuAvrBAwjB+6wuyLbGAn0ONnAkEe94jR5SWaLW32Wzso5PNX5O2rl
u3gRM1HXiRVADImfEg1tkxhjcAHw+1FTfTQM4k+u0Y0cCcoKDUJhHgT2TwEO
RYXffI1tgldMWAmraQlcDVQY/Jf0cnq8+FXilKskwhpUUFiqJ/2AyulxXjR2
xcgug86ddv3s3r26PrN/w9abvf/1t15C7MBX3qNt5OAfwuS3AWOiLNluuwH5
HQPCFhzxbavyHHyjfgqm0JTK5wvhthgix2YkUlI7Vm6blidIz/igrQ1d1wms
+SaXIR3Sc0EhQGU5/e9Pg/4xrftVx589bOrQwedM6X/B/DEXXDQqFU8cB9hv
0LIuZ5K8CM3qZE80L2bADFQcPZe+Onv+VUOf6t6o24SzhkULWvCG5wgwhW6b
mzHSk/Wwa/xisoJ4WVYJxbtxPwnOmlIYkmA9dLlQUAaZ9JWKVnzsalJL0UKY
ZME/70BZXfFKYpJFVx5b3H/fHc/0aLjnEZMffKnB+88t+KjBNvtdclq/Qf7I
J1x+5B1g5PcgkXXJRzISWE2ggG20nLmlg25t3fmc/gMuvuX86TNnui6yYnjA
QVtasCUwyTypa4v/Rlxi68EYNDaU4XygQdqnFROAl+zyMCmUn+jHb2cgikPR
7JVEt3jk2h8mBJmVqBDghrqxcoTM+tzWpV36jtnmnx995IBeYujIogeRKkak
yL+gH4iUO6muDCMAwaCpz3zM7txr9NgLR45Um8Uj8EEs3cYEkQjZzFsYI+Vc
61DhMgzYRhc6Cl4zHKSFbIUCLSAT7bZQt0cc2fRv0A7Li+EmmkTIcFwZPY9m
xp/88Y9/fH6//fZzRyqHvFId8APhQP2wBDASOvn5jus9Ys7ef3/pZa7TpQ98
LF4M2WAqpVJopVIOkWFM3JGUDghPKbWTQmESlzJ7a/9hVEJSow6IrnKUx0sO
R7/jlVm+vCzQEvCLdQ+rj5sjuVwLniNE6DLv4JlsF2E7OO/DoOCuQXY+gwUS
U1flPp4qoydLMfzD1wAT4anrhSeHKEGvYx+4c4oRZ8X8lm2ndhks52G3iR+B
uSJ0QFfE0KRifxLuSZWfrl5zPQYZ2cgVlWjlWyVEhvB2nCHuCm6OZSeAB8BO
MirO/4VJUmHg/NrsI5B5NsAqlQWhKc5mwIqd4GznXgGC4AJqY5E85oR5QXyw
APmFyg5gK3Al2U1klU/4xWS9sYpWP1MDkwKQgGcQgdQMWTz2XQm2uXiclwyZ
OnlUEjH1PDjWAlAHjBOODo8BlVKZnqi49EmrpMGWVCIplvpGtmEJsmkRDOhB
QOV3EzNC5NmHJGaRfaElYoRoSFJEV4YJFWAl3qsdJcfwCwWSyng1HMMngetw
hBmSYXfbsS1B4zWUN+MtSo9BTX/a4Xq27QVtBW6sb2milY36UQFK0tQyy4Fh
kDJ2/Y67yA+7Ng+ZtNb1bRDMSgl9xIA4+iMviUCBU1GDstidSVrbPExtddp/
gz5WGcbj6DLq3GTJ3qF5KDtaq2/DyY/KBPQ7cMJ2e9mMoqIzfprFnie8AHMw
W4yYPYUumpPgknSn6zQq+9GlZ3kWwoKAso7qqI0BkTaETvn5zW/45z6mLDw9
0PiXdB6cHckld3cI3yVdx+wJj+Q6rUXItWypPPCNZviB9qCKby8GEfEbQCPk
3I2fN0rtuNLI+lE4bS2Nerm4V2C9ACIbOWEH/HPtQKVxsHXlcT20MITs0vPe
OGqEeyGlKPodt1rfYV8aEVVpKsl1AQA/lrfLjp4a5Ld1fAsCIfn1kPdLXjcM
dTRF0BqZR7FhfGGMC5BbislTsWGIaHZMbLn53m21KAfheCwTtV338AAigVbS
tUjfg8YiSVLWqt9xL+/3ex8ET+zdesRx/fzCpAek2rpOwLFAkMSlMCUIWG8t
blysaj1f5ZPWcSAsWDnf9JqkAlDtWxZZBsCrBcOKmoSFV2taIJldoTFy8vqM
9hgkASE6zyc9BxB4gsbigOpwkGGhLZ/aZbw6kTDh1Tkzpd9nPCFxgKclQPl3
/racD5drA7po0U3mU+TfwI7f5hA7/X3jnVL36tBnJw1tNXfZvdPmDJpS79nv
1iefUvf90BcyLzt4o43gvdYf3zuiy7iblw27bcKwrZd8tjZ5BGtbf5552YaP
oDzHCD4oW/Pz67dNOuGqkndXW61gafZpbmVV7pomG232b/V4c16/DpNvXzZ+
/vBRWzz45bocpwT2eC/zMj1DZuMcHvfpJmskwctZXm13m/RGtfO+wIA00GVe
03ijvPuVO+45vsPm93+1ruNni9o1OeWJ7xLe/dUd92Vds+HvLstxFNtPvd+Y
NWLzR79ar9USWQdlRX8++H+fbetL7n154d2dTqz/0Derz3x/Toe9h730Y/Zs
N1m3/suFK7Kuqcbs//pwt5bXrfjw6A+XT2u5eMWSM+Zes7Loi7VVCQRfe/Rn
Wdc03ijvfn3Bgye3Oe6SxXcMnD19QcXrP65PePe3Cx7NumbjvBtmV5Wv/+m9
Y+++881NflifNO+wkuOv2Tjv/rjFp/f1P+/My2+4Yfypkype+THp3b+0+HfW
NTt4sP8fj2F74Ig3Huw14sJx03rPmHV38Wdr8hzDNuKYlXdnXKolU//rCA58
99mruky7edmgRdMm1n/ym/V5RtDs8UczLt04I7irzxOXTRk0edq0GeMGnLLT
rHdX5x7BwAsWTcm4dOOMYNmZz845u9OYhfdeem3fCzZ/+Ktfco9gSN+ll2Zc
auKwfeSHxCeKnfg/fNe4untxT0HkJEYnj4XDkwsKinA7id3w6fiLunqkKfH6
ZU9SeM+GHEQmh46RkLD+/+JK6qFjboGBeFo29uhriRCIQqX2K6wa5oxRwl6T
Wp9TdmxMBWIRcZf1TDJ1ZYmdJDxzLi9zs82r2sMlZ4ygO5I2+PgyzYEyYLpo
EL5ZtXNUS6anfumh5nCBoJRkFc63LhsR9x+iqxTWZTrPkdIb9Ugz3UXLgJmo
fNJVo+jMlqpQei2VQOnJZhznVUpMTiaPrB3FZeRNWAaR1eqt8ouC9qDk4aRR
ZOA6/zxnY/+qh6KFKEzCI8J7idh0RxsJPXKSrNayJAMd+b2NV48ikgpoEdnE
rNXXqEfGlvkFMpSPSEcDhI09ZUwV/YWPkoUKcW++o8F/21PTQi26hO3cI63N
UvHUScm4hvIlpAdYZrF1EbI3jKFFBtRYn25JG7nzsaL62y3zKEugoqwBkaC0
5hOGfMTnZMp1k2au2LNFDA6/xaFqTWJVjjJW+hhYaY2fTPnAYCrLICEYTLUF
E5VSlqMyaEkag3S06KWOAsVDd0m0oLO8QprC5NFBrW0iy4zSuD7HKYyJtFaL
cSwzUNf01G992prCjK1TuIbZKaTAuigaVcA8UrDonNVsQLWQmLQdfCAET+Qq
6ekaHgggRB1i8ilps1hg5Dd+eoTvNsbZavbMnGUFykcsWZRXUwiz/YsIJzxR
YWOmPA75hh5IE0ZfFjcO9cSRVGh0NowqbtQ4g58atK5JLJ+gE4uTthEFXe4V
nphwjlrKn6Nmhgwt4XZy8gweurKYmnSMmlZbsFLCXjovehQ5gJ1ug3oJ5odJ
Iva2g48cbpMMcoDYoJ8UVuidEBbLBFl4C4IA6m6WoDdBgMsQOS7HdbLuwxgz
BBYgOifcChCwgCKXaM4FYMDFQMuRVhw4qGtnpQmjFMOTzn3IyGMrPcB9Ci9c
obKUZ0U7JNWnDeXBZdbLwaq/+NZOx0PigltRxMogQs7Xrq8V5LJ+mVbKmsut
0DQpbMfOwxt0WBaLXNOxaI7qAGK1o/M49Tqgxg5RMM6hcuY78IOoweED/XTl
+Cs8CvG8UrEliJbCa0jlKz5E6Wb5FP7N2LVVw2pKq/xv0Z2yZiD94WiItlSu
8klPgLBz2BBm1ywTPiFBvlcOUoSpkkWWAzJIAzOss6u5xjzRjrHDHy7JP62w
glOMnaN5hbVWECjKt1GqVf7HhgGWAxDwCR5SUoCUg0EQnu9Fj1vFc0cpxetM
xcaRxQzxeBT+2HKEXIeFtmDEMxaltHot2M1ShBZgQpkRG2jGq2WG+VoLBGEu
BQeJEQ11CeS4X+x1nTz2vXWeZ4dSpgo7g9XcMNhOC2gUn+4U1A2hr3p6L/rB
630dAjjBKrRb9JbCbXCLxwMMcnBJWopC4yRdJCiCECCxVEjEZzNYq8ZwUZ75
6Vl91kEjXBk7CEiRnMPjRBtbLG5TvjP9Wud5p9INm2pHMfLDM1kTxsHHaSZ6
lpPAw6uRIGyNaz0kTiCre7JUpniEL88yMdhutc/SzzDQLRSEIk8EMBBVT5+k
fAkPW4rvVQ2RTnxybom39ifPOFTQ/o7QCsniDQwXa8RM0E0rdcY0IhVoPCy3
OmSut520wDW/s5qIlMrsCqFXYX5nQSt5waaosVG9POOuiDkbrZqXJpiFUGci
i6OWDsHT2DQ/omoHAUYCs6wHos4BuUZ14BEow0OxMYVUJ2WhvbaULSjGz0Pv
oRDUEUWqE88iukvroeEI9XvoI2E5L7GGNjmLijToFHywEaiMAl1SJxCevzPC
x6lW1riXb22zAjA5ZfDgwRhErAocxW1jHEgGmISMg0s4SozVmoMiKX0vu/SS
4tVr1hA0eumxfQT4QMwLjrigvgi8Qbpw3Pk9tC2UtgUM3Y63qZtflLShB84U
YMBdVDIyWCZSEjtDWVJSTH0774VeRG/iJNarjbWpJBtkZEf3mC7FrFhU/DPw
E7J9sN122yW68iooino4UITWRCHWWVNtYhHpEaQHNXcNCnGk5YAM52RkOKAH
x/4LTHQBRz2QHUNlZ0YhpNbyFye7w+2337yid8sGo3uMugI9ueGkU8dc1fPs
c9QsUtkXNfoMw9mSR2J2wURzRqEt8ma7RjHBDIfZYjQYPnKEeSAGolyH7X/o
hrawtKaw8ql+wiyDGaiHVQbyrWgAAuLzwVaIamrIa3CYeCXfByenhFEQOjAr
a1sen1qd7wi+uryJW/gBmXmrHYqOQIHUL++1117MgmwdUlKzRJRiIJ5o0qQJ
/xPYkFJhglLbpU0DEXXrz2MuC/gVbTrR4IBnYB9dWe6mdtq6FbQyfAjD3h2Q
/agH7l885/4zj7v4+P4jd/nyrcXvNdnx4OH9x0/1Fdf8bsfT+HoPsMfvs8Kq
kLJwZ7xIv2dLXmLU/HnibEaNyKItd0mAW68IPVAtZblEJ4dlVkcEo4EAUrbg
jwVNurOXXCBDdBX3xegxZCBnB6mIv2x7bb6GX2iR5YMKCqXkpz66b2wAUp9r
0KCBVY0Av9yDUnPMAD5AdglextEKEtlGh/ioB4FxQa95OrOBwTxZrSLzBrOF
X3oL37EZBn20zgjwRvdPAf/AtGsMvimSDInNyPJIKzPEYSBeRTv+fuoBh688
qPmxU067YOopN9x4o6QnVEwQUXTNIZCc2Bw916WJeKYTnWKGCHQwDkyFT43Q
WChbTMBk6dLjxCTDQSiO/S9rEGGdugBabXxpSxMuJVhKupPKSSgGsgEhSJg7
ga0yyXfBilpZPU4woiUdnJQ8WERaW7gDrcsBd0QEVkBKxkHaC5cRMJEY7y8Z
MgLwWucHSzUCxBh97CLGmVkjR1LKGkBEju3AuwGrrLgIyYXiuE4qHOBPVKOk
IwfPo/buuh6HKJLfAVtMaW7qeFKnW1qfeN7F5/XvL7ZB7+d5UMa3QjM9953F
uQYPVFRLa4TtpEQwkW+8AjHFIA+y0IN+ITcAvDWSFabpGpPt9AEKCUzRY3Sh
PEY5Q0nb2scloKRtBML8mK9Jik2Lb8neAGa2BMVIJARPE+GERbddu+Kclk3n
t+166gN9jzz07sbHnN1o5VNRUgypz1rdEeIQXMqWFd2rhDHltWPT4gFRsIBo
F0Hdh9tuu+2re+65J9oqlnGPDJHhNir1fV0qXgbKKn253fZslIMf4nwJpRVn
EBPERkBDbVDkofOj0fthzz181Tu77dzh/sOOOuytE3fZY/JJQ8bgTOtrcdij
9S1XXwniya5nXR1GclEECI6U2pGIpI7ZzIZX47Y1Z5xN+OcgEhCPNBqSa9Gk
HeSjAWsZIkEUYLEJnriteCG1SV2Uw9GHv8/o25f+8Ssmdvwuj0DorWusOU80
H8Ihl42XVaHXkpwMP3XKZPF4XKEwFPNFr+gvFHMWTbZuwWAcCTvYhrFAOZTU
WnoImVQ2wtTkNIn0VJZMvX1wBx8u7ffo8y8+3rRpU0AaA4nLI8d6u3MoQcgI
F9TDtSwiz8URE8qHhZoy4oTB06eOvnHqKW0n9Rw6FO++T9/LnhszNKBf8Psq
Lc41ynIbr2dPPrOG6oi0VNCqPUAsYSxaYiKOaEft8UJkKO0f/CnwTIcYD6zA
nmibUTwY2zpaEM5Lk5AfIosGqCth5yOAGxhmTntWs1VK1iUSmqpwegPIJkx3
tddZ9qcC+Ytae6e/Ia3NvVCUlqa2AqDBFQAM4oH/iHIGe8ukpdvYMRf6EOeJ
Xk3OHH3eqAmyoh/mAaraITuMT6LWoPllFlgwd1uN4H8+oz9a3Ir5s7gsyjOm
PfiiNWvXiuO6aWwMZOVSPgXQsA37PANSkNODrMpcRhAdzaDMRWOjI+U2je1H
RHGXI4r2uetiMWhu7YDIa1pLwJCsKM8o/6+Kj92gBTF+k/NNSjM8+6rgXkdH
CBXGJhXXNw7TC8WbLUU1BZOrwr5oQA3DJA6k67cXzT0c2mH7Pn20MvXUwVMq
v/vhBzkVNeAfM2cTK0whpYc2Wj5fNVh6+OIwpPk73CdMLhg75aFRQ0eP0RXW
KBnnGJABueWxFQap7UwqVCA6olt5jeeGe2NF5cgD1AleTgleEraeS5gMBIc2
ekQM0m5brnHS0FtEQXcfWzMEBMlOa2ZQWo3K1PmacwF4AcSttilG54cxBGFc
n0hZvbF1anOEQCZrPmFJQ7a5UXbCZhDZVbZPBuN8kDH5jCFXTBo0dCieYCr2
CAhM3dJZMSSwLfhww63rVBJiYSuPfPCBO7NTGQOHTL/MzkQWsQqLBaXg5LJW
rVosvuC4xje2POXsTncsnGNZMt29WGpd9o3LWDasnsi2AmXkMMXiWQrxuZaw
X9Zz099iEcVdUFyC62CTZdmRBsyIbdq1RoZpgkpDc21mi1lgKtqhDMwgjWLy
yYoST5BVopIYAOx2O/QCDcdHhsKyfSw8jkGY+4yY0N0aVJdzPDL2XOfrx1Vk
S+XQgDhHBR8/EvcFgcHPsH516vF4bR529oRrFnbs1IlQBKpYdRiUCXBbZk2v
R4wfNxym73vVC59dPKz/yU+d3ug08ldqonmC2MQYEmV1nEFYzJeUXw2slIIO
EhtiC1U8Qazo5Ppwb12rf7D77ZAcFDsdFj6TlIw1Ecp4b3Cu+EtiAhcFxa9z
AQO8lzAuJPTKkHbrEYxfTq8pkgQwNd5EK0uAIKLEJJn76fO30ZI4AYPr99Oj
jtFOPWUoNIrOoa2KT+kZeeHY4RPOGnb1BROnTHVFSGhntAclLKHVR07RQpiN
H+hkZMy89j0GWj0uQ4LU1tYUe8p81YZYS2i3WCHn7MIl66sptnPP2PsxF9bs
UAbclyQov+ZliBnkNJH1v3yZ54S7jFsD08t9KvaUJTeOIxU1qs/oiaSUEEDf
7wXMw6jJqmZIoJYTdEc5ARWgpU3bnTxs8oQLn2zYuF3xF2vW2XTAtegoHF3d
2zR2WrJOoRRvI8q2OUfcTtazCnqzt5ilsRNH9nhrj106Dxo9bfQLffY9YFDv
abOKYpEnxSsj0O2pzEaqx6oyD3Qa33v47D1eeO11dB/nWhapXEWTHVNna9ag
L0ND9BBJknTYp8KIc3nOUC5BkPFTsK38D/TFK/2yoR/ARVDpOiVZfj2PNd9p
uUgUPismAcjhvvjolzJufaf5znsvPbxdN7sVgcQVxdq4Io9o66E2NrPWfmJ+
VYCuaXVGv5tOP+noH7ao3OKivmMmQdaQ8LHx5KJC/Zi1vFe2xKo649dgWyw5
IqdRLRrQbWnzdu0eOvfwZlnN9hg6aXaMHrdao85Qw1jq7cfz5+/X8OJO/Ych
SKJ2Ln7B+LlD5ksYkW2oJykFlVgP1LfmWs0IjvSmtnbOopWtKXA3IAiX+XvU
FiT9N95EkkDyEPnaviuoMFnkEyyjshW/Ss+YkR3xxMhpcv/16U4HNff3W6SG
ryW2W5eCoLXNlh9wLe7GV5o2fT1ePm6vxre36HDGwH7Tb2z28KOPolqyy7VB
BsNzEUYZDgJGuyddYIUg2MZL9fegx9yePXsOnjZ1yvkzZs5E3QnR4AQo5U9p
Qi+l9oBPYfGfbUtfXHH9uSe9uOs++3y97Wb1H9n30C5PNGrSBIcDQXVxC+ot
6KIAlwGa6Z9EjQuslsViliwyz/WS5WYMOlyOV+iLmABJBoQeYLLD2PM0PiVB
ZAuAeDp2skgA8zqQAhcaB7DHLfOGf7rNH5oce8Od8+0xzA/SYUmhtC6Z4u0g
RW75oZK3gEW4ZpiW5o+vXOglcNSIUK4ieqJsz3dop25TtKoLlwYXO46bLVTX
71hkhOlSraEAHnVF55MuYRFBRqsUvwvvJ9VAMMvQ5eAzbEth8ByoLIhSEUEO
yzN8oaocJ/tpVIygIVySu3J1fFGJl44fyIiOTLEDQHK4OCWxOkTCFmKXCta7
ojOv0j+7vvPmM4su6thyTqczez3Y54hD7RGbxhSK4lZlpJ2gwP88Plu8tr7j
s7UwWDRRGVlQjrjaQVFIUyJNAr1TwGcUvrvyOL5ziyp1ACiWFeC9nQjPe7Bv
FP4hgnzPe5GTkFIsxg/H/JGfxaESYxTEqZzHn6WV1OZZ8B2/o4TS+yakHcsz
TpGqynG437aBYbzTekWi0NbBOu3LYY7e3XHHHVlLlQx1vQQPRlma8crg76ai
cwFiahXzTCSK2UfPUcfY1s+ZIpQBBuMa1AqEGdQnP4LS9Lx27qWT7xrSM1vI
1BQriFsrp4ZvPDOvGg301C07fsrZY8mRk19wW0LK+Dv5cAZvhRcIIcKICgZN
LWb8ZNmIyAiQXGWanEFLbAB+wj7SAgxRYzvEl8SXrSkF2JLjs0xeoBCJDYKO
VH51041KiEZ0TqBm3Rgf+VfcOHiHuOHKkeYDuGs4VknraPC7otJ4XRK1/LaE
9u6IQVDJbz0AmRFc2UukuUkIacUEoDvmhL34JvAmMRnelixPXd7nvDNuH9Gh
xaCB06Zn1Lb8MbwNnYdF3gKDxqCZHQSlXIbzxK+IvQEDl8AEPBl1ZfEWWeVm
KYG1GmuNXhnDNVAvWRGdMgk40q6ubZg8Bvm7q23btjwCEuDjaMYJD4FHWJMe
UAWdKE1Qxe1jkCaQdeevlbEqQDaCueCFwTTADK8A8ajhuCetyCS+tcSm9T+B
sE3zC4vOnpyTtNWKWVDCzGGuRabEA3iPyiE7Cpw0B7Rt6FW7DLqgLBQT4trg
YTCk4nVrVkEUpQeoRnAgBla1GyViNYNyJUMKhBl4skBbly6WyVLjTuE+BgJL
xGNVrxTjDbhbtkjOGFb+APRRdtPtVcKTcXtHyrgHWEAd7Yxi6xuKgVD3nCEi
mgwPjeYxcghN+DOzQo4ICHg6M4l7OJfjt5LdYvCWs0auGDTUFe8gX32pioGc
abFy5UoiLGp4aNcIkYIYlCcJ0RZPf/mznccppdzqQME2QMDOCXKn2InK8r3I
cQbnZeuGHYJs30kVvNUs180vka6AjqBJ4CUVGzJcVFftXgqgv7bHHnsgHcAw
0MVuO7lvx3CftaF3xXJ1mTHuGW4FyA5/4Kilsvgfw4qk4dDKvTp7Qlgk1vdE
x0fifmnCpOPF/lgDJoPbDGMc6oGkOR1+NMyP25pIEtYWTLFXTDE6ZkYLQ1Fa
DC7MAJFV7hMdJRURO7Yc3YNRSCGyHaoAyr10Deg/Y8GwcRMm2OWkBiQfqKcO
IrUQiNwmqtFUHTf5MwqBoeAiWS1VN4OpkCW3zvoC/eZm5AA53bVkpTuu81I5
MABwUzMBwQko7fObu+66q4ho2B0sK9m81rdZI+C1mjBL7CPeyDHXYkf4n+kw
VBwPV5qb2TGqLBa46Ds1OlE1Xcz4lB3f4A6YLYPjCDALFdxzeNoIgaSkzONk
Tl3kDBxBKBga4QACY8XfeU7by8zANcmUmFFDRg+d2OvCq0RinBuNcDkultn5
csit5SoRTjjK3w72oCDdVmW/o74VJjF6W11HJhEs8fIq88BcCJbqEvNhs6yX
tnWgZ2YI6eu77747GQNWRXkuRytYTVFUccHPdjHa2ImIfssSKOKqbSqIgvAy
CeCgNMKDoJDyweqSkQNR1DfksRCIofBnhiJVM2GGiKuFgdFxpBpSItZghauy
qodhQBSogsCHIcfNDAF5cMOKMhATjAb4CaqrpuC6mDHPWW9ckVtETKRGXTB6
SCRShbHRtno8ExGGYItA/OA8kKpmXYWhq4hkRSl+i6qdPyLlIfmOSgl4tDVo
iJCiDLAOMw1I22ovembb48h7EO2QVMIYE77YkhT345L9c/vtt2dcJFZztT3c
ORAXDAd25BQd9RDgIQXf5MJct3gRC/SWv5FKRd1BSW1JyyhBU8tvIjGYFkkQ
qjeIjbdKfUaPEDKTkM9OARawBMkwdmDRWCXjNmsViDVlgmTnXHVpNLmkomMd
AbeCg5gOaH2wHh4ehKUsyt9Nnzr6wZ5HNHpht333e+SsQ5tknYlix4XYG/2J
AeYhTD9p4MT5p3XtOHzk+Hvj7ekqN5V2MAZ8NcIjvSwdMC2mikyJooV7NiNc
OGXxjaNfaLhvv61f+exVpLn7kGsX8RxrjUusAzzBOMkDpKkPrhOF+c5rrBRK
690YOuoCbSgqcmtb1lndx1+Wg+mrEjoyBkdxU9Y5kU/klgCE68lLWMEQFTlU
eJKAABCATvggXcT0VEDeC2xZn22341k6kseslR3fdn40f0NyeGxYk5eT2aEe
S2lQWP0LJmKrU7it4oerUwCqId14RIRxmrVAgtFPHs6cgVBFlpTZW5f6K8Lh
AoKb/u3xx5C9IHaVkA2/zI6AFOzM4TUUZEjK1mh3BPLpH9wtoBLDwZvtNEuC
DyQZClrvYT5bOmbvV1567Oprzup8Q7tTT3v/wB22m9554PVukRC3OypP0e9Q
V0Ih30oPgYR+LvaRJCBDtPO5GB7CBcNxRMQ7DazZynrSgiYwHEVgKqTRQCKu
xSIgKGmH527vbC87qlXPC0dOnGT9YRFQcSt17RjBs5UA3ykvKs9WOcDyS8m3
2nAB8bCUWA+hZhwULpEusvOCTT4whtZeA6G32n517DG1yAy7ppF9LIeUuODg
aMzFNXAIshGe8khk7ODY5cpOCeICkv5wad66ZntRW8QTlOSz1N5V5Ui2q2yp
dIMcdvIzDHAORwmVvxGiVoWTUkAHzSsh0YDKUQ/cvwJBd30FeKo/xtpOhHK7
8YtgCSE0uoLo6KVcgtkCOuxSYBrPG45Am4A4xTyRJRi8YmuWadlSa9jCmy2b
DJW3+vcXb5nKHfnsA1d90HC7A3tMmHejvh2zH/V+KY9fAxORWSmgBTNK4tFG
JAoe0KZMHF2yqhvUF4KkdeLtJ05osvuE04bNvLzfeT0uGjZmqRQVKKi6qEyw
CP2yvIoOj49RYac6xYhedLppCGmLMea2BAHOiw1xm4aJaaUeQgXJqmhtKiy0
4b8gdFi5RN9FBUmTSlAFTaGGiFdjXmPXo1rRGRqBc+2XhrFYKK+vrwa3ACGf
5bNVbHdyjxxaR+UUmT1gFjWBOcjr23/+85+95cMSAQpSPxCYJu1hUXo7x4y0
GobC7QuRFvPW8sIO2vJq9sxeDQ9vPmvl+2dePWeOmSnmZLt3rMEJFNWtNOQq
wA+kHQbgjUFF2b9VHKNBloxJi9So02cgQX1AZdjECSPfbLnrdueee8WCUVNH
94osSlU4VZAYAPIhjzic1hs8TolH1PUyFskXP7oPAYrjwfluwgyd6ciCs8aU
CRWOkg6F2lA3KeBT0QpPqJCjsgYOHAjfMJ0YJAwEkOc9EbedHfstq8U6MKtw
jkWrUNbQSiJjURXaMsMfSTCE+9BdlEMSyPodIoa34c8B4l1RZbUGybA5ypro
OMAR+CYlPFmBwYJOJ58w4/QBM6mcsOuxL9ZTyEQdywChGRsOobmhiCvzdk2+
JdplrCzyMQ+rEMDYIEOh8jYzatK6kC3Wfvngi532aeqNBxKPe8QrdISYuCht
oK44kS0xhLhFLq0fQdcBscJLiy9HISgWdbwpie9FeoUKuqcy/+5dSzlaZG8V
urJk4XYxWM97exMTs0brvquubTn1PcKiOkN9l+VxeZcddeu7DJGJEIc7EF3a
olgnDxROH82QgH5xr7KO0uw0b+G1/xi4/0E+grV1XZckLGP4xO6WtMUm45uD
ps5VARRRJtkUnVZn+IgTKXwLS7Yl1iSEUVoNLGKgUpJkGWCTHXuv0AmnUSvm
zJvw+wAAnojumIyLk6SBGvS2Kgpkl0kg62GVVbqW4bEwGDnEI5CD8QJBkv1V
lLUcKpYUCbDdsFJ0kdR+P2xeVgecu/ErcVQwnBhXzXRCFIYmZa/pbyxpKoJa
EotP1MM8rDRL6xtSLubkYWcxAW47iRSnw1s5JULXh4hVGTg+I9+zOxr+FsXe
i9RVCWsCeOZMmFSFWhkeg9VRaUIUbO+0OcuAFokrggByIK6Hfwn2FSrYYQ3E
xXh1AQPL8NzwmS07TXrA9r5iai13mGADwGdgDpoomiE9eFZ45UgNmoYEIQpY
MuclRcCrdpg5oRUAOckFtrKgNaH0Q6pyuQQ3ANtLEB4dY6qV4mBnVJZfFUJ+
TJOURujevYIciwOKSgWbcgMGBFuGvSFKsK1RXGMrn+aEIt2AinwOy/ZF1sqQ
EBgpUYHB7QFj/HYnaSxowL5LbFOig4Xcpg6GJDZM23V5jUCypI1FKjYYcgxG
vL22LkLO6ZjkSLExDBvzzHhIPnOPHdvOHSJiOia0NWu7bMoSYK7fXE7UT8WY
ADt4BQKiT6LEkb1uUvPu9iRmeVDSQwkh4YffSfzhx+pJh+iA7PNzg0Tj0RkJ
nMti4xCZusJ4ZMAo+iL1q+GNuTIAJi+VPN9v/gFTMfImJzwTrPV9vPCRopZ2
upGQcfMs0IqxYQylC2i4xR4pRmSv2BZmF5CCLoRb4jD8MZYFVN73STRXyvUA
lCo0Xk+OwM5KB43xhcB1udYtMERyWycBoV0RGO46Y+cZatiI/HBvQCRb58fU
igkvS3iFVpdkrH/oVBBl1EVcNlsiT2sfSCIxlHa/SQy2Iz5mH0xubzLPGp7Z
jiyrDEJEZaO3Gw1GMDqUR5kHEeUsED6FJEsq40hxvQ6Qi6rg/xADhJ0ab+/A
AUIZ3Xa9chwaMJOVKSnrTjueqAabxzncRva6HhybYGTNrVbJNhvbDImHg7PE
80Oil8A+CBxA4PfrJXRQyWwolortlh1B680+z0M3cMbMfZFsudUkJUW2yjXF
UKbJY2SVQovkMPgMn8divH1nJl4BeWThuEv4jlwj9kO2ZSjaoLYYc8ht5KDV
gCbrAa1olofEMAmIOc7URTZ5DBywPaE4dnxnh0FicuE0wxYdCM8T/8XH/bZd
R3xPpVCeXj3GJBia1UNTXJwovZz+QfCwAuLvu521vFKWJcNkK3yik2tBDLwG
XAE4gMuUa0lj3/xGuDRWIdwUdxp0HZ7Mo+h5YMsTiBO2jAUW7D7uD4KKo6b8
IOqUIjmnPZhKaC+HdVTkN1vqZ4YW8MWYHMIpwNiqzf0OFsySoNDpYdDoPQMH
5QBTBo8AGWhnZ+ob5Lc5pTFTsBZuN3xdZIhEu2EmARlk5Fry4ZZtAYWQKcnq
aOtDZC+SsS0SoFzLMEJHhBJgm9fgZTOMR5s1a0aKQS08fpI1P0UU9BwRfDZs
AIoBQ4BN3FalHmhGoCMpgUZ58Fq7LYGuIDOCDWXV/7TaC2vPbNln62TYWAmc
/oo/QQlcVYQGx0obHSu6R710ItkJXdxK/P410wKIGKZaCo15ulWqIi0srLpT
ygSBuU7Qs1EepAvzlZQ3bhoZNEuLg97wHIlCBWAKSogHw995dphwKVS3Qjjg
g4kjyHIGq7YzVqcSmbagjh9ZtVPghKTRNnFlLNBgfZv4O8iEQ6i3wHMr3NG8
Dra/UR7oCua6Lu6Ad6x4CgUpZLQtJ4HW00iLRSRxwLU1GHOz9gq+jgaRkS3Q
OudQOltKokHONNZXQSr8fu9Q44sxckndhz7e0q6Ux0IzRIznxKog5MpaFUtZ
kYgk5ZxvF+0pPyg/IGkzMktXQG1GbufxKujKHgmT0IaxaYrWLPTNYHmUSgwN
7aybIhqJB4V3RWpHNkGpjkN25m1lIcGGlloeBpHAwDFHhFHiL5UHNIjHedJC
UrBdSrSbJwCQNhS103TxT9kFC7BJq4mq3GcHhkRWMeadW/EwQGTJB2ivdi2p
wMpjqgkiAHcysW71GkxDxiWZp+eIouGghOkKj4AmrqeJJBQxtZJhcH0ykCdJ
QIVRFPkTbqWsTAKUyqiEVzWXJR+rFay20Bsakpbi2llCgwgJvx/Ulhxp6DVo
eWPc/Cj34bL3sERSbDpi3CVhGZ/CiEuss67ZG6JmhqGPQUdZWfQHeuGJcalk
QF2mzkriVS9rc4htKuMQW7caCmvFPdIu0NHpl26KEBiBFsxQimizJuTaVut5
PbMy4UW/iQME/1QGoAASxdRszYJQVoJlnSIiBUb4HSAwDyiSZwXD86ueS6vI
mJFIdsOL+qfo0WC6XRsJjSKcqtBsBFUjnPQMhJBSJ6BnJCCqWFQoCRxwX1YR
dAo3Tc6DdYzhOqyHL4pE9iLgCs0DfttzaAMkF1u6k3oLuCQkC1JgFYg8GgZZ
IOd6xEpSyM5KQCfC+Wal1lbJFsBJeZA1lA3WRfGouc2tdYkqRUmilvLvb3dA
bKiuKLWcHZ+QfbxNDJ6osp7fFvSKkYKUaAvSjIZI53idIagJFSR9F0RQ2mwB
ZdaLk+vhqSMKeu6JYm1JBQ1DV4Lf7ojW0DCvDL84Oqa0KuwVwXEg7EBkjS6y
Wxx49vLJiwEw8YN1MIBhlAHQo7lJ80QNHPVenDmWkryOQSR8e3GG9DsAM9ql
EyTn/9IBqJnJA72XMBgIkG4UEbGSDhnFSOGqyVPyHEYK95mI5E51NIg7joI4
AoGov8EJpKmI3/yE43osRkfhkA/pYKcnBgGzeFICh6Gt4X99dmdY+izoFv6E
VEIXkVR9cm0OwQwSV7Ai/Cnj8Mlw1nlBOO83Z4x/TcZVuUJdvSrYneRIMPOS
xOAp85LEYCPjkpxe95xwVQgFM33TcMBLziMj/x+bZwjv6+diDn+tzemKunOr
IMfBjhWrMi/XRaTssx2zn7qRDrfs2XruizMeGtB+ZJ+xeNIX/375v5IOtyz7
5OevZzyWeVlwoOslicGun7/5v5DljNbXPDd+xfDhR1+3fOklV/SbUeeF/ySd
+Vn+yU//Hv9Q5mUb78zPDwrWVK1r+u3jl9z9f8o78zirqiOPt92v+/XGopFE
x2WIE1w+qCGJIIhoBAXcJSoaN4gLxjWoLKIgiiENsigTDUJU3JIozBh0PgRJ
0BmjoGQmOjP6cctnJIlmMEwQdRBEljfvW6fq3LrP+y6gQP6YP5qm37vLObX8
qk6dOlVHn3h/8XcfV+k6SmwqdVlnLzwdqiZFfv6ukPE63a2r6BEYv+6WjzGa
87gNA8psz9m4ft0fT3/qH+bu/S9vy9GyrM6FjZsrrtHOheV3rXrouc/87j+1
rF0Dxnw4c9l3T+x89/JPMt69uWVDxTXboTXoCXcseHXYklkPnPHzeVN/cfTx
d3V8dvWGynfXbty0ethvKq5RGQnB5faZSLYVzRydeGT0kdxG8agmqIl4fK7G
lmVXYF39xk/+MP++U69o/9wHWU01S8VNFddsp6aazes/Wt5/yaJ7pn3v2icK
72Y2Ey01b664Zju9e98P/7Cwz/xfL5g1eNgLNR9mq8W+6yquSYtHphUrf7N1
bR6ZQVabx6c6vPt+vNQybTJ6PI7b46UV8bqv5ZhelcbP13zyF5cuu3vUKXc+
Pv+eaRe1Nb/8UU4L0FHD59+eunT7tL98ctC/P3bXwEcXznvglgumNL6+LmcE
15+z8CepS7fPCJ4qrNyw4ZhVT7fNOXaoyEP1EYxr9x8fpi5Ni062d5McjE4a
bDZlfNaY8Vm3HMeqOeP6bWzwuXu+Z3lazqxC5TPdfEp7nafmP1VLLKY6iY7M
t5m6yVNTYCvJOlsRv2jJvy+8qsA6iVUKQRJWMlnl9kOZom1pTypdT1kTEzaW
wnX5yK6T0OWPVeJz4lD1zgHJLayiZAwN+TMPYYpt7WtK2DH2hfybHPDRueiZ
aWK3lpcFV2TVVcy5XbsVEWaUXZ5SBOqqNAgT+qx9UetZrMIjRIAgi9z/pRzt
Ss2wgds5s0b2E7uF1q2mIecJYZJy3JHREQhAEGVLI69aT1jwb9e+qloDE04j
sCT1swvF9glEk3DeF3OUPS26LPAJUbicUQltxCK3ecWUdChEAoj+kd3OJ8SB
kG2JQeQd51bq7ISuq0RSiLL4LnPoTszi2wJ6HpYiGgJJyEMCi5rzhhay6WM5
xvy2VJyqmZchKFZnAWt3iLqJaF+s1lqqchpag3QZ/Vjbpfqxhmes/afhJ3W/
6pq/nzvrsmHnG7h81n6sfE5UUoLxmpNHFJMdUqsvA7JDp04ZGP2NFEWt9oc/
noIGEBb3x4eIIlk1h8yjnWqQiC4xatntVJcBZLOcZckQq8KVYBHapRqzBu91
1dLLex3SY8ay319974wRBmaftzFrr0RCeZRvPWBbN777HXFBZEN2u3R3OXgb
BYhDvFaKwpYf45J2oZnVO5MdYUVtuCOF8vmrNrGwBN+BBPbWal36RIrWYXO6
8bsPzBzz9jf2/krZBR9nwOebrrqDF9uj56ruL/FVbOuqMwWOSUzA7EFPqfg1
wNOozvKmneoWyZFgi9c6zEI7iCDmTJtHIkj4CGAltlsnhRmStGz+CnlLmYnw
vvGqC2fzv23pu8rIyObPbM3TPSEMrHb7wEU4OPfMM7913YtTL7zymh/Ou/62
thsX9e0/tHHFuvWqMuq3NMXcW8UMHJIFvU4YPPTBOXc8fNa5N0n0TnehrGMe
yEq0WAyxOjjgCbZI2OsKvJHoIltQZ+cYFo1Uf5Y2rCA6hoj0xBwqASrWSMSC
Wew7M+RRt02+ubLk/PXXtk1jepAn2BTbzjcnZ+LZN7SNnX7rZUsuOeIicEHH
xhxIx0KgcFistYBCP89EprwPhBij8qSeczsagULKeAfnGypdjGypUyvfgZFs
kZHOEXf2QzpbKwIEVcEL79gcM/Pptxb37dcPasNhhol7HcpDWqlH7njjuP27
UdrSBWUkf4m3+1ZMTDCmUh+fID+o5Fs2m247TcvM3UBF2H17pk+fPsAGFQrs
UAbvDuarCUeCSWBwTGHPm/nQrPKQh42YNGWq63MjvnqsQXh0aqbV4gt4ZrDU
Nb2qRwz52wyBtNdRMcBzsx4CRhmgHPdM9qdCY+ImO3lstXYRHfYU8X+sVpzW
6oyadfbsn81+duqRx0w874aJNhY00VolWkE55b1NLVMxy9+AgiCozz1BKXHL
fMNehh4zIrXNAhoWyzCqglidT3LjTKSA1ZBX1J5HMDqr/gq2U4UKHadELfID
cAN7UBdKkrdyZFpPvj/sxrFv9umy390nXzojOeleBGzxtm1HDhryNEnS6u3p
UVXjtGYA2gPMYndYrCh6s+a0rn1MRaimS1nMO8SHAkCpS7KIWVphybOFSnm7
WZ0tyychaQlx8r1UcS5Y9hihSG8DXK10EwnJISeq6PUKPURSeJxInWYZgL9g
LZRCmTQKEQSM8WDr2RJ3m8H4j+LTuh1YPvNVZwubNqzf//U33nAnNNpzL0iG
O2YVYnC5MHGAIv6QJSyirJAA0AxSV4CgXIYBdjXLrYirp3O1FWugcxEaSgEE
tSZwD3V0jbtFpNAPjpYxQRw2ZF7uUz3AUyNTTABN7wNxqJEILPM9LgMTk9QA
O4Z2ABqEkmNO0ETsAokAvBEJQNZgF14DvyEZQIIvA8tgI8rP0+E4KsUygfu5
hzQ3y1KFjIgz3wOjSBMpcVZXn5Sw/95zzz0xb7JvG3z63dBeq5JqvwlOwGpb
UiBxlr0PhRAlxIBwA9fwW3UUPgG/nPu3lRU6KrcHOK6LwScx5EH1MhfkIZIh
p+pxtkAPQMctCZESgVF1QlInnkNeeYGwgRXTY3jFfC11zRzgmT/bhwACPu44
QCxyIj6BhcuK8Xis/iDJ1GuUJaw+jbHHKnX6NEwKBRr9Z8glLTRdy5BmzJNv
CQWX4DicRzJ4Ls/JcqpCbHsv3/eIH5wlrBPrYOMOWIHYo0pYQoQTew1XwRoA
0xoGUTOE1QrfsY5FaABKSWVTziNsmAwhYN5RjsCEVutjDFlQNRx/4ifWmRWB
pRof/Zp4n0snrZCCergPJKIfUEqwfQvtxTWt3JJ4GQ0xDl0jQgwCQqY5aC18
TtWFliMkkNGd/ZAcEJTCu1Y8AX2WlYBeh4scEz1cLhxKIFKvVhmWkQSNREkO
Xql66qu61HAoHlN1aUGVJ99ZblGIwUW9mpAIFjksbvBpEGpge3nnzp2x8gIv
ynG+l9wV8ffSvk7GKqK9nTC18QKXkI+pEV+o1o1VLTiUQpChMC6bOJPdEk2N
PbzzOgloFiyQBdL6Eos8zyKdRiL0kucKxHVLMd9S8VyPpgJIhh1GolzCFE/E
enhssdNm7m3tWfNgcZA6Jo8agMHUbeIQuPUBwV/xi4XDk9eYMbTXQDC02osj
IwdgJBNIxYxryDS29EwsuDv5lBKzoxKpjp8F4G3JO9oMqCDBAI48Tx0YXmWB
LWcCfGtWC93Aesw5xhZaIwYYWz1lZI3qeDqegDWvzAt9hgMBsiJmneVa1EiH
VzugaR0/rcmLCgFPBzzlNiU5/gPLOn589Tm46bLrJNSGvMluiAoQYSD8GAKY
oFn4uAUjhIkBI01LGJFFjKAFj5O/Q4i0sYytE0YvmzRk3jFnXGg2sPvTv/k3
om9SLDKMAmFBSNwoGngzmGrJeowIE5AjDNZPMIw3YIl5rzyO1yCquBhwEJj2
SzvsPxZKin/ozg0OMfCHwPAjVZnLzuxXE38AnJajagpfQEqEpFKVYK2y3Cqj
uHTyeCYSCEQu8YSQSVELbfBSn4B15Vlc6B+poJ/h4VS0by9aAzxmwzSgDr9d
/a4WKIVTCAJb/NoKJQNdOI7cL66r8nzvd95+ZdnFPboeNPvV98zYdXp+5Ueg
q5ydD4Mwv1VKZCrl4D/ShyYi1cTn8HFhSgxKBGY3sJrgOpZ/tpDGk1Fwte4v
jgpS1x7Xn1FU66CaWZ5GS0tg0kECIJL4iQbnIRjmCYEeuGjh3IkLM7CnY2Lu
KpuGMmvU2u+6sEawQyZagEz3ceSgF7fYfgA+D4rhNlikpxAzEGOt8TlLdrZY
vJid7jlmqj4xPxKdSIZcRJZQSCuxhQyCixKND5ZZCr8ChMiLwTSyiZ+Fx6Pb
iIgwjIF/5GdLRrh6oUg9QSoek9fbVDfifYDeeIbkMlJ+ku4/zZxxQL9sQ4Tf
CLUpjsFGpwSgcLkl8FOXCCB+IaiANYO+sE37YOvBNrjE+p3lDgsF94QCPgay
xPSSwvz1sZmTEkz2bXvlmI8g8i1WBQwXCQbzeCiEHPEbJmBKBLxDLr2k9aLg
zN1VW2NREpcOmmiDiCLqdnILYIaMPr+ZV7H2dqhaqOxLWsxQsFA7qhGl9ae4
8U3RLGCG1+sTGShv5y2ovJ6cxImPjZJrExhgfiIaOkhYEE+XaAv7AMfSThM+
Aj54iXig+P3ulClm0Jr76FKOFQP2Rf4KoY9sHzSsSFrhOYxCnEFPaycFlWAe
2gvWWHV9PTGLQkWwr0vsT6SiJg4x33hdKRS6h5K4EHIkO4MBLgoSd0F1HYt5
Mx/HjmYyurC+LzBwVME8XzXfaAtdDSA8TIGqQL3WF0DbMS4+JErYkhcAKMi8
HLHYL/BH4RNjELsQuWMjyKFE6XRueE0xSKuLsFhpXefMCMGxAIFVI3queEeM
DykKQlCmzzz5BARmSS+L8xA9k+Jw2Ayiz0wMylnjGCYLszhPJgn0Ck5Ya+DO
DmFV6xSqew4oJGd3cE2Qd7wmLgkMaiq/7R32esddPGGm+WB7vLHiz8TOwC2/
x8hbrDCr9aLH7WCU7mBeIziP4TUxs2M60tCwrH6aPKUD9J2++CFLIcE7yfwA
cGR5oPFVHsTyC2hkxcHfMFhP16Vi/QooVvPDqwc6HOUgHIZoB4nQNFZ9yI7V
2kbzzMAgF8g7cOlO4whnMOGu5+efifE8fuQp5wx5+P4Zi7/Z73x682n2EjPj
UpAZmJSmjWXyaK+4rLDA6OsmTbc+kGpoeKn1kIVGKIAU+A5zxN00X874CH4h
DpIoo6iJz40UEg52ffAAUmJ3rB6wGOImhjLitlAF1W3Zb28gLBjP0bhAkkXl
fd8zJIVr0Q3mRQgibEvIBjZzksOlrlRXrFsSmNaIYEJFUAZVQdVgnjUZcVki
EFjWwwqH1tDTqN3zjuffumPM9779+rEH9D187gtapTrdGD0sZouVbtFZP33k
EURCDm25lRbiJAsS/Qw6xr5ajQlM4QJLvE+vs1ifbxcCoRA5t6KQHhQwQGot
q/vOPRAW5xXWYpOYqpjnvQP/1MVCO3GlGAJaIorm+jeiWFK5Vn0WMJvHIHgQ
W0oK6G4A1EUZuQYvlNUgw3MHgKQ0MmThe8RKDq+rVwhzwU3u4TfuHkFFa7Tu
lmLAn8iBMtIfIjXO3HP6RWMuH3XXY7ts2LxZGRmPJyaMzHabCgnmxYOYauiJ
SsAAhoEtaUisFk6cBLVqE5OE9+iDGxAVlZStTBdXo3aLqyjfZGlC1KCwfESu
Qx+pniO6GJIP7Wgslg7aW20V0Jnb5dCVA1TzKZSnaUdB+/eV/1372OhBPb1l
aBt+/RgQUbKQggrDIuLD5hjwSiy+cpQJxc3zUvAL8XZp+cSiPriPLZn9NktV
+sJpywS02w7woeWycuqe42ApS9FR1o5u+SMbBxAGneHduHpYF6no70r0MFtf
VdaqaHkdRVkwYo7ozXZe1MiA6OC3/nGfffbBdGLIqaKcVSshOEUmfMAo1MKN
QKv1pbi3wJ5v1mtNpcWGu6YiMVdMOd3x/dXLn7uq96He0uzx3IoPsMYQRTmN
UiJzdr4ZIOcVYfu0gMW0OBR6rZQF0TCemARW6nwFxVwWQ2teO84sTtZGzy3n
qI0YF6pPMW68BKaCjT0s36XTjUQ4Yu0N4DKLE+aAdNiuGePD5pBAwndQRwWD
LTzWf64jfJ3t6rv+vh0ZECgJ1SAVbi2gb/uSkMI6KFFFhoA+hKcShCuukQp4
qcAEgAf9gVxeAJgxKFfoo8CYmYcllGlFHaIdXA7OYTi4BMU5KnHajlvyyzsr
wwLOSMe00IAE7XkBbGCGzBoPybwvnowq44EYkIMafB4Itbs18rRZ+k6e7dd8
8PtqMd38AzcNSC2eu/XaQjRRyLDmbIY6eFRwnbfDIinXOnlS24jbpkwB9UC8
kH0rTXrBX/NjOK7PNxxbZokK5FPtMHBtdwIzvAdhgRy8CSSBdKAhg4LSPMr2
4rEklhfB6JBDcACkUrARXLWWlKVQ4xedr6zNobYjlKOIPpUKMO+ytD4TYGge
E7c7bI0S1hNFJZTCK5iK1J6x5kvvvfceawUcnweHnH/am6d32XfOcUMvu+XK
m6ZfN2FqOP2pr2Z6cW0XhLAFXbC6I0ZGrsEKgnuQBo5IXWwVd6aJakMjyFZI
PIq4FNDIXWoZUapSGF+Hx2viqjpEfztijxAEq3MFZ0E/cIghYYNYFlHNzuon
wSbsH6pfm3ATALViQNw+74wzBs0fcWrPJQcf0feyWT9qo+t3kKkCQQlbB4Cx
rlRCtMOhfWYDXpmlgfCDp8Vq8m9NLnxXd5MLLozpSiEAVnUHU3Ha2q4jk0wa
AymRr4QldjAfGmoNWkaH30fAC2C67aaRZ77b7Utdp5107ch/fvCbPZecfMRV
TpF5oAUSgR88L7RVwyMZLUDrkE1wTlYkuiWHnAGX1oTKdWnO6whdF3tgJAJQ
hImxklEp7CZa2N5MH0KBTth18AgOo7MW7AIKGAfCpJmvZfwZP++eM/r9Y+9v
nQvFl17U6ztzBg2Nqq2RSTwtTLXPpOFtRFkle1OXchrMZWVBgE6cZD0YkCn1
+ijQL5brC2ZVTgTE1VJYYjRjIz1291z2/JPPDjnygPe/2OELbx365f3bBl6/
dJfVm9V6NKDX2EScXvSYBRTz101dyAdpJRKq3j8LCtCSypJWhR+LDIKxHmvN
cQuVg6nSnmENvidSixBZHjkcMTdfstlLoUI+AUPWwdYASnq5lyeMLcDY8myC
MAtOOaH3yv077ZUipkZSrDe5l1CmAZ8kMqW82jdHGPU2lJjIqPylW+4QNSZd
1CfXxWo3Cti7/e+qVx6eeu4VPPfkmU/8bpe1cTHUYE4JaMcUsclSUTswgVUB
kgUjkDhmQ2IA1p5bWvMdL0ULUBurbBVjoSFrDt1Ht6WKS/jcncssKMMneH7M
C1tlPiWqADkZEK9gcASEnhw44Ohlp/c4evYFlwwxOgZ9b61m2lATps9QeCT2
y0WsMC8wU8xVmml5fcZtpcR8USAoBsP0LCBSjxgg3YCN5E+qUQM8eBvuEr5q
3RbfJjmyUU3D2QApHkrajm/OwLzwysSbC3HW5krDiFaQ2GURUKKYDFE5hvJw
u2sKJlF2pEe2g2sT7yLuaulnto/nPqvvt2zxD1/q0e3aKybdOfmpWX0HyLSU
ZVmWqP+9i56JFWLLV1nGBAQP/a61ikBVX6Z+qwQXjrzZpUsXTA3kZUlGLCBY
g/bYM8QC6uIHwlAkSLY4S6FYEVKF94mVsH4otVvzctlliFAccqMLvAkbxoCc
fFoAR/7SmaPVuE+4aUgZ7EPpwj6Z5IhHbNQ8GnDJsmlJ6HXlfGSwT1454MiF
vQcOXHDjCf1tsO0+bVMOe+BfV00YO26cyTIDxdBZQb6/S3GomqehJxIqJZNp
YeFtT0WqzQWxLIg1LUsun2NdlJBIBYDlongFNkOJ2uG9IbEqD5VvY2kO4cKB
GVnVYrqQawbg+1oyS9hFUVC0FqZ/IcMOBU+3aB2jbPMPMEd2nOeSleFe32X5
m79eelavfnQJmd/31AvPeviRRy2cwc4Nw8Ej075+dp450+YH3qWLtWlXF+iC
8ktKutvYQ9LYkkh6tUpfLSRblv9a6BYry4zgCLdgRxDQEN2VWj/Rg6hNPArr
QAWOEPoAMGEohsOW2bsmEFRB0/qYjKWfh8QXCazWWc68/GhBTiZ37cxpVy8+
sd+9IOpvR3y9x5SzRtwkTvJBKfpl2malX2pjLeTqFkE5nFFUCdW3fF7ZKFVn
nXAd3h0oio/F8EGcvgl4xlpRChlINdKESHM7VABt3AmiuOrTLbTUOkY7YfI3
W3zWU1I8CxcexfzJcb8QYmqyNHCPWItG9D/m/gFDJg6ffPsdEqc7MEWwTEul
BGOxy+zCTks47hSHzU/AqCIEAY8IgyN00vNL86NiYr6dnCz/xfPQAcyBEhF6
wgdxjV0JLF4n8U1X5i2+XtfBuIRIo6340AcwTFkMK6XIbNlTlKBZ+StcbXG/
grdez4jsxAdi4F953bSpUwjySCZkinhVLYOCrSWYs/rizZKNExS3CRUih44B
W5FJfBBwAS9Odo60kj4TjCvwcK6paF3vcLxYq1nXO9cBQ1aenJsQ3ziIWQOR
CDu5DHERI4Q+EKvRmmQYja0REUMkBzIgZRHNg362L4fwwgIRxkMDjbIKFSg4
MkFQ3ZbAsrUZCNPCgAABq1YG8BJLZDOXJET8FwRLIoRakQFPM2ZF685UTlu3
txHWsECSfRN4gGqh5NhS5FkiFwEA6qGrZdbFcHdYdBX4m3A2KCqnHfm4Nhw1
sL5+Xs1TO+AKBxAXF0Aqyyn19k9YGM/ndM/AMbegRof8OUVsqZhdEbhEJBEz
7IYdcrOU3YwmZQIBPFOc0EAyOfuJW3KOdcguhbMkcBVDrOiRyvrRzXyWt7wG
qrG+JLHIxYLidik/SnzLe8ZZYF3p6xmiWCgMAm2EUzmvqeJQKhtYWkaJ0YwJ
noa3AAAk3Uwb2adnN2b2KZeMvHX82OG+OhqkUVOKx0Sw0Rw21ANYOSrDeKte
Qzw0x1c/9ospuy61BarZfOhu3FUv/0AWK94JZquiImroL/MlzAsFjU+eirEX
wyEpKlZz+jQtx8pZW3sF27YPrNiNeVl+CYiLnkhcuewq8OSFEwf2OuXmx5fY
k/d65p33oBNhOCQF6qIAul0KwFiDNy6TXTw9QVat7ZV6dqnKkpoEQFge4YJJ
UBxthYph8OJFgVFWkVVFFLZiu8QQ6c4O8xQHzCkOygVRRSH1GH2gWraPpxQF
QAkGWoiDBR1oFdiyO8AY879KIe6K3Yq9ykrpYOnhc15YOWnU6NHYQFvMYXmA
AUSgPgM/tXDpllpBqfG14vnwmYFDKjBUiczdJDYgc9gVPB8mEObTgHPDnURY
kVw2zeGFiw1bfFbxoAD4gv2MQ86KhUux2DgA0tgkTe+c1O4GJNd37rYjtYck
chPDZ5pvjQsId6VyRSm9UXrD8Ik/OfzZF5ZBIDFQLvc3hnt0xPAynkpXlNhi
X6UA4+2qoRuigoXhWgs5AeFyaF6BinFZswBL1QB4tY0QfJZXuSFY32txuHU9
aAULeA1BI5jP3zo70yz5K5j2mlAUxupOwC15YF6EcNeED9E57pZoWNRpzSXz
z1h8b7/jJ1wwTnr7afwCaUS8cFItl9kWzoCSHVvEYYI1TKB3QoIK09RUDR2t
cAQ+gd/7jyCb1dLoqxkzdYnIQJEYfsUcVhVWbNmzievkKIkd9WxJtRYqhagp
sUKQ2A768QZ3PKaqY6vWM+WFhwzYzCqZthMI/LDfgpjZvai8xIbCGwFr+s1Y
nh4IBSydlIOZuvxGAqN7rKRNOR9K2qw+RNwnrp5DGBAHLbAljEo0+IruCBeU
uvoVYo3X4IL9RXQC/xNA5BaehFGTaxR3U76xAqpFi2EHhgVrx7O0yLa/BWTA
X8D2uFo7zRgPX1oYWUTTrOoNiIszcFIOPmqTTMCD6AnnkEEFsQZZmcLhzKxk
czBiqzdOVLGyfjnPlKPs/KWdiTQExaisVS9sUcEmlZ7osTu5LjWokCmsPmLM
xHCUZOWuXdQsxRk+YMdZE+Avar1paGbrIFu5MwHQkWgsdgz/A2EalANS2r8K
FWe+OP8APp4gfrmsZFSxmLud2jUQlGZ9CUpUFgHnUmyHiGmfFLmsJhNY7AJp
zCnu2roNIwLYEnNSEmJpII9tbpvPJesbdb+RGUsciSeuwmhlZc26Exi1ht7s
HknMZ1A+kqj+QR+GKUsiHao1DgkDCI/B7yNIztSAOFww7gl2s4BSIVI4LdIf
OTERYLhgTop0EtrCKRFvSgNnVuQecYNRbj+eMbnmeLITxqrURdaFHAArTIRp
dj5U1lSNydyiOx90psnOLmJxLMkX2SFDibPmrsdIVlM96Y8dOxO5SLMtzi2P
m/fi2zBOHBQ54heoIstgKz+E+QB+OUUuheXcOgHIkRO0Ss2mxCCgiC6/RraL
sHiymtHPoDbS5WuGcA9sdZX0pbYV7j4+imVkc4/4NDochhFX0oGUDUwRNllT
bOxatVydcxO0Z7ZoLtzJOkqsGXWMIgJX+Yf/swhBB0CuEHlQzZEKEdagzVto
zJA/RopNwdyIWGhdMMvNsDdxDyxl7Wwojua+fPDBB1vJJY0MCYLh2zMx1Auj
W+1QsHZtYhI8ngAIwm9ZDHUZtFBP1eIeXuhYDiKIco5XiaELMNwVvvZnHE0P
PDH4nkCwr62EXpCGgTW0zkaZtZUCm1qszoaVXqQkgRWX+VSTHJUCdBRhYknN
vZoICrhGL6v8Y4fZrFyEYLV21UI9kDtDStAWnfABC6gGLAjCKoU0ToY/BLuE
eLrUsHN31v3FutCQaQIaWlMr2JtJkbA6loqIIAtYyNDElDjzwmcSJBySoBti
JuqltX+9tQdmcdbgKO4k4xAjqvnZsae8Xo8sMS8JCIc9Gi12uatvdIQ5J9OO
mKl1OmIJyCqRvl69yYXOYmIAI1nZ4G7hDyFcxKOlg3WifFaET0v11PtZ4SHI
tk5t6KbMddEYd09cBlk1JPhbIJ7G64xbWsusUwJlW2he1JhqXlQK3UVZT2Fh
ECHdN4EtrLWRQjwCZ3wamTNste0ZPgWBeSSvDUmtsuBmXryNWQI0vCEwTpbr
eAFwg99chmAWEhnFeXQlxDRStEObFQUp7oh7AeiZZCF9QK/Fq+1UKjyz/FEU
lTkCSxcFSnEZJs5aX/MpbAMmwFnlNP+FmCJgToJ4sixbtTVSCHTs3BZEYcnV
wOSsnAQ8hluouooEsG3dmMyIQC9eRVz40kBtov92Cig5f1LHi2LTPM0wApkt
0cYGxkSRC0HsVLuondeAKKzR2zNB2SQu08Daj/ENv5mh9BzXRaBPptNHQs5Y
NyjYBTnbx7Al2KNLBGaLcjBsZBERlVI3YiclPM7HlnyIspOm/NqBBx6INmo5
ehQGd8jqGZP/zkBV1fgqglNYqOm5rW3pYOTO8W9zA6NgTTtwH1MBbAjX24Fd
vrU4CVSziCVz4BphVqjL2Bmicw02yMIRMBAKMhU77YtqWvVNpsd6D+PgK3Ii
g9wDxTEOgAokRhAQHN5l3ZCxUXJ2NeAnIPBK165dzTGuajY1+geLkCNJZHIQ
YB1pk6ZWf52GSa3wJHr+pZD8xivNs4IWVqJWjmOG23D88bgxy9b3DnFgdAyF
y/kcFwOkdCcukFIJLzmXL7qHeh2PQTX9YgDi8ErBbmUHM8Ye2TbZlthh/fb8
u5AClEqkObJjx7duak11liqFQkxM2A7Q8hnXYC7x+rQTniv0Kz/Qg8iGr/7D
fIB6bxKATLjqZwB3ARiLejiLYp0P7XYAwHJkzGOwHSnbG6n0qjRqFo+dOqrz
NvRNkiOV6gG3PnM/Kq3gytuYDz4JbxmcsD52itRHIjaM2bc9BxDAQwDMvCDb
3MA18Pl1cJnhSJTWLfW5zy/1GY4VAayZnprs1rTI0k5kwF/crxuctmu+Jg9+
E/FPV/qpCf8AqLRqut6Yo4A+lQ/DRNDAYxawCgN84UeIi6yL86Sz0qhkqo3X
/EQKWJ3IfrGL0yDevpsc3lGFfyw21DqD1oSNzaoNsv6//V+yNsVf2njsX341
9sdnXzzhvLsfemjszFvHfflnb33cLv/r1h1594/8CIu7lDb/ZdHC/j0OuvFV
sZ1fW/PilXf1ufzFmjUl26fOv6ZlJz7nrtTQy/9u6rV66fRRIybfN2Tu/W1L
L+x16Gnn//xd2UNo3YprWnbic5JOGWs7vrv6E4n1hXnUaEC0sbTu1efH9+w+
+juTfrrfM/+1pmZTKSZLZH7XbgfcF/blCoXShpXjfjlh5IFzXvuIod7iR0r2
wJobX/r+4OFX3n7PmDt/cHvnJ5av46p2+V+37si79TBy+d/NB3/48kMjZpSh
NyRn1N182/ihv+369fFNr6wt1aRnUqbBa8vG9+jbaf7KTYes/c8xiw/r92jd
io02lmpft+7Iu4OkFOpKG/9n7K9uHXnQfa9+mgXI2sdD35pz2eRvj5pxzezp
lz82aNDVJ/xgwYqaT1IyW/2alp34HC2cUJ7RR7v9adV6L/ttCdsaNq7fKF91
zPisw+e47s6/rimo2eX/AG5k4mo=\
\>"]],

Cell[BoxData[
 FormBox[
  GraphicsBox[{InsetBox[
     GraphicsBox[
      {Thickness[0.005], LineBox[CompressedData["
1:eJwd1Qk4lGsbB/BX1jLZIhQish+NmuJombciyyFLkiRJ9ClLQuWUmDrKGupQ
WjC0yDkqQ2XIEdpEy5SytDAiTUhDlFJ8/6e5Lpfr53mf+/nf9/W8Qy9gp0fQ
FIqiWvFDflNtk/ho0pQSgT5NNRSUNQfDmaKnFiqwRqJccZsGTcWUSowzybq8
zANPmJN5rXUjXDtZMNClTlOi1oJ/jsF83v+kE2Aqm2oXwJdsbBSXw+Zm3j7q
BjQlLlr/URkemPASBMARlxd7UjAr9GRhKZxUtrJODrY2mK49AWdatXJM4JGx
6xkO82hK6Mqq3ww7h84KPwobdxzkF8HiCvOwRljM8Lv/Ax5zMs77Saw+wN+A
vCxpq8PzDJHT7MN3Plwyp9l0BSw39r1TFf0G75hl5AZzV9m8/R/sFpt+0QPm
FH3sLoHHtk8LdoQblOJCOuEBGZlri2Cllt7WcbiBcdRFE47YtiSVzLPW+PSm
Lzg/pslt6gf44fH7G56Q/LMMpvJhOvrA+4uwg+WCmDDYM/FTdTzJm3Rqpzys
NWvdQV9i18Ozs5H3x5Mnl9kwx0/ihAIsvBAWYQaLdPpuxKLfaOvTx/XgS7PM
XvXMxPxNzAL1YevWngvOsEbOz38tybqXT02lGk15h7fnOZN6x0qOWsLns6Tf
RMENT0In+arIU168h+TTqP9o7wmLDBu/vIVpxbEyGTjHeVO0EfoNbjI48GwG
Tfle5F3aBcfsOlfJh/0HtKfdIrbKt6uEqba6Dwwj5C5tfUCeZ6V9P+5NPLKh
cQrqxZRohuTDbhcKbtvBUo79ip2wt7Bp7UlYPHA+Ss0Y9yN1LGwYXpr7ZYSG
xdrx2e7I3yBnEOkPZ4bROldh8+jVXlGw0E1/pzT6Z/ppcf+ES+tLV7nCCR7q
b3+t3338IRFWiixashWW+3Yv5l/4ku0MZ0eYTlCdvAH7C3fPMYY1jLrOX4J7
OutmToGN+bl18bDn566mdpLXo7J7Kezgs+wzD5Z7rdXYhTw5y6SXHoUjdCpc
d8GCZTXMcFijRs7pE/rJEu/RXA9nHrPy9Yf5x+W6HOFS24raB5jX6/IzE/Yw
N0eSYQl7/xcT6EHOm2LTf0YF55gMRm+HlaYc61KEaeHjn2mw/7xK2ePKeH+e
/2dTTeYdqy0wJJY27xgl52+pffZUiabaYvJ1rcl8XTXOZcNarzJecGBB0Cte
FJw52J3wCObLaS0NhTWyexJnm2DfcKxDHHypwd04GFbanVtWBAd2m9eWwsH1
VrbvYCrydtswbL258eUCnG9elW5vboo8eSo5qbD4Wrb9Rrhh7ZzZfbCWg3F6
HMw38bvlgH4850r4ZBPTtR0FMHOldmw+7H15cIaYrLd0bcgl+2US/7TAfEo5
e0UZcBt7f7c3HBp1rCCGuGtEMRTmP9OP3EC8Jv5RELmPFc3nWDC1pkrVDo4R
GdczYF3tYNVpcJLWzdge5NcdcJx/A+cJxBWJNXDSze7+P2Bf1wWxuTA3/V3L
Y+RvO3ml8i9YjpW1YRUszHBzioJj9mscuYJ5WO8Yagwj9WaovFaDI1IXe0fD
bguclSYUcP81Eg8mkvXesZWd0zH/xD9XFsH+Y+GCdgb+niEj2QwLOh8qfpWn
KQYrPm8q8rqpJtctlyf1RyIcYaUj6dduTEO/Q5E7MmHuiN6hAPg5z9LoNenv
r6tbV8Gxt07Im5ph/5udBt5wJrsxYC8sDDg6PxdWio6Iq4M5pvpVDNQ3fzuz
RdoczzUay+bDtGmPwUrYLfO3eifkS6qxSIgm65urQqWR31Pt9sEzMHfQq/02
XFr4nHmDOCPjyj706x3azLoDR4SN9+so4v0+UXT3Lsy0Mg+5CJsn612+CTt4
uplJYV6qL6qXFcExoecbdOAk6bmrUuA2fXGCLsy4q/VxGyz6ajguS+73sR/X
2bAwbO1IMeqxPqXaqZN8xQwFZfiHzLC7GP1RDvKFjsjTYNEf/whmBsxj+iCv
qPjhKh6sm7pm+h/oj/mq5k4uzN31RcIQ/Z/3ir+dBWeaBbaOTsX7PvHs8ElY
0ODcflcO70HsqfsXYfFv4e4FssgXaFlWT+bZukzybxn0sfz4yz4y/+aqy+el
cX7/gtU6ZD73TE91SOF+fT20ZyPJGz+xyB6OpSP2cUk/Oe5P30rie8jFTLof
pjftDyiHBxTmJFv/hvP7qGg+8anOdUdgpsVX40+wam5pxVOYCsn280C9hjZL
dQ0L1J8dLnoJt9nUqK+HOYapPfHIE83XLE+DI5Yf17dC3tc8E/cKmHvIjDsK
My0LX76ABW2WVCn66+E8uvserl1Wr7kR/ZtfbdP6SJ4PV9kzAEdHbTzQCwv7
lR/6YF4iTT1lsl88Yh2WBwskEzlVJE9Yaj4PNnZT6syBmX08YSbsLKvydyRx
srriEvh5atbvTiSvj9leHuo3/FWeOBf21zW98xV5pLremk6Qfr3mvpgB19ak
FXcSbzOJmY78vqK9dg9gseV7hUEp8n/Uo6saVkq9qFuLebFCsvpuwvSPoY70
KbgH6+863CfzdQgoDJLA/dZ840Hq0TLcIFcK33/fHJokcT7N80sumWBTOWnV
bxeSeaxuYcj8ZFO+Y1dXhJN8fUtCKsfZlPWb2Ro8C1JXeFbwnU2VsKsWfCf7
+SJZd7h67Jmq/Xzsp6kVS2Dnd4Fq2bD/xWSpVDjzwrq4LlhoyQ22Qr3Y6dot
qkz0tzDXbuEPNiXcV3BiEUz/4yUIw/kzdw0NusO6t6Q2NyOfjO8navsvdxsZ
IT9Hy918H7GfjmQPRb6vR9UOw1yW7fcs9BvKVSpJht1WtLjPxzxY5d8Mk0j9
hNT1xXDvwxyZg3Bt7lDzd9jzfQpjN8wMubZDG/O8F2e3MIjs3zPvHQPu+ZBf
6EHOE5zeeh/Pxz13KFxO9h/aGuUCnw+4l2JK+slxkyvE+XvySq+rE9vq+DQi
371PHWGyJN+tc2vOTLKpCIWE2lHMg7Iprd2Ofv2vWmn1wlydlAOqmM/Z5PBD
ZF60tsQZ3hieP7tW+gOZ59i1x+u/sCmDBHWTn8T83q3aI2zK8I54UAH1hSlz
F6sPs6myNbb0PNi/rKp6vZhNdUjIDNGkf42MwNcf2VTbaKXpFpL/veWdpn7M
t+BmVwLJO5hpn9rHplqkOF3/kPXsn2pzYF92xcunMIfDyjsI61wpihwj9VqL
Ws9h/5X9Cmu1LeH5DcNhqK+wrel3NrHS4ojaT2wqhcGV3QT775Z9YDPEptaM
r3u0G+bULUzlIa/3fl5LElnf7DXDAv1wpvDKsmFh+tmyU6O4D41867NkPfkI
pwP9e+mEpxBzg4o3ir4ib725ykmyXn7ixQXM68QR47g0mPqpMyn3DfNQjOYf
IL50Up5YheX0OoScP1JyOxfPU6vVTbxJXian/gHquam9/LwKrm1YvS8T5818
kXiSSZ7vW0iNI9/SKpOgOeQ8ZYXCmZ9xn3eGZymT/XwXpxHMu9c2cJEc8f6m
KFfMQ3RA0kCK1NuctuKoiE0FD8+akCZ22cJ+0o39LmpaCiTfyOR4Qgfytfen
aZHzXOac1m9hUxb796hZkvXrBmoZj9jUD3m9hX/86qdNMbCOTfU59OrtIHbY
EriulE2xfnd696t//tZlxsfYlOBc39oyYm5W3vTIW9TSl9rz2onJh/sfJUN+
L6D/DxfQ38Y=
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], {2.623545358885346, 13.413252333265266`}, \
{1, 1}], LineBox[CompressedData["
1:eJwl1Qs4VOkfB/DjmiTGJUnDULNFYae0NbI1o1q3FHJNKkmxuSSXbZLcNpq1
QhGKv8ZlESq5RCpJ0mjbjCiiC6VYUUPTNlLr/33/f8/jOc/ned85v9t7zjH0
PbhtnyxFUR34J1eqbwZ/i7nUV1xiWVzqoQKdI4JzBM5vd8Nt9qapZ2Cpe57t
JtgnV77aGa58+Ga3GRxUeOC1IpwuVdJjwIuCFGrqF3GpsdwO+ny48Oubkf2w
K91coA2v7vTcMx+O4C/5TQ8u6bs68qchlxo5p+G9HO5WktE5AecMi3/iwMmu
iqs2w83jDUs8Ydu+GpouzNbNPR8BexdNTUkMkH+BGzODxJ/wL3oG33h7T7Ua
DqtxYXTCtTcf1HTAoWkTz4nTe1x4o7CRZVjtczgz6vIbagWX8n12990k3Ppy
3g11eChrs7sa4jVsDZKlw8rLdgSyYL99mRoMmHfHwd8FjjYUFOjCugkHQiJh
nbmJd1Th0/4aVzLgqieM0WnEy/LiplXAtn9lvnwFx1ncutYIVzq43miFm0N2
Ot6CXS2snhbCAXk1knqyP7msKQZm7nR6U0Ty0R+kecGrwg9+S4B7W/lHV8PR
483X3eC8Eb+8eXAv29hSD+bLDz2f+B51Xxcy+1Ffc6Zt+B14CW/63Ck4rvnk
dAEctNNLfyMsmEx+nAr7TCx9NsRA/t9kK5LhgXKv+5tgpVJuwBmyrtxWWaEP
X1dbdwkOdRwW6cPNvoqlXbD84+//LtTDnKy3tsggn9ZgQaclPPRaLYfMX0lx
ZtcYHfWvzRZZwg+eqlpehUNdfmsn9TXUpXachQXVc3p4ZP7lClZZsNK9t56Z
ZL07/8gFeNNLrY4K2EA1eaMI9mm8NnYTrjyRcUiRxPt0uqyd9HPxhKYNLM1V
t39I4v9SfjUFTnc8HPYnvMn+REknzPr8q+FtmG6qb0FDPfROXt1l+MZ0hNZG
mNkR+jYb9ksvD9sH85XtbkbBQ77bdoXDDWYpSdtJ/OakoZ/hOIZiyw+wzos1
a230yb4ONXU47+OLR8qwtDl2TR+Zz/JI/zrE7z1xlpYNS4zdxm3hnLBrNTvg
1tQjx4SoT/rm+3vL4DwNZ1M26Zf/lmBFuDt3fn/eQvTpjp+x2AznY+4G8bQu
9g+UPhiBtY4q6e2AefzOQLJ+vOQQrXkBl6Km9HeR35v0hrBYsNC95Cdj2Iie
5Valg7wCBQYecMTlvpObYPG7+74nYVqi/d8f5nMpT6pwXjvsneTpUgtLi8Zi
5FCfp3Ze1GlYvFDvlSHs6rVG+Bv8NWRCbT3M6nP0z4G79wzHusMilbXe1+GA
fQ97fyb9tl9Z/h72k3TJHCbnx6gt0RTxu8f2sI7BX9cfOhUGU5WMyaNkXn0H
DRtg+ZTsleHkPOkd/FUKF4db/LiXvC8sT1mboT5+48VaB/I+U2bHucLHn5Rk
smBuEUvZH640PbuQBg/0m9b7wjqRI7FPUR+LPxX1E0y7YWuRDvs57z6uCrOX
p16zgcUcvk0T4kntmFvkYHr7Bp473PBKrNKGfgtuxEieop6qAqP60/BAhorA
AY7TzU8JhF1jDpjXaMPMDau2wRGiuZQmbGC5vsQGthXRLx6ah/v7XWE4wMUt
Yx+6tbA+VM7YDetc+GvjBrhXwg+OhXmNdcVNmshPJtCogsQbsnDaCgv//Pji
Jbn/L+I0iQbO10uzS7rId1P467QamG2vsd8TFq1gbEzRIM/hwyvkeU/RqPeI
gUdGP1h1wAEVT9byYTqPPk2hXyYfy01K4dD1ZxLI+0cov3RvD5yiIlBjwtK6
MQstxC+202wj73t6znSQJ9zqts7ABC5ebrUjH5YUxHwi+31qbm8ZgPOMNkeT
74eKXM8tHdTHkxyxIe8Tg1uSYlJvgP/smAfIRycsrmw7rDP6nTE5n3SHLD8v
2OncnQAyH0GGwkmyX2B1cv+/qD9zu5+KOtn/2CeyDm4oaFdvQzxxuO3wQThu
RazqXli64thrFlzFvFc0inriLietnzZFPozceB9YPHTQvRNuCJ7NbldH/bJP
JLWwZHXMN2N4YKsDuxQ+7tEVxKfh/PxgnlQGc1u7orvVMK+7dYkNcKh6/swF
VeSz2JT5BHYapHJz58KO1YUzsFLqKWa1CuIVraxciXyE2x7kS+bgGvMhLAju
TeEN+MMNHR+7LpD1Hb96qMK8waaY4f+tu4wOKyNOkhljEfrh6aIzNQEL+Vkn
3OEqLSp2KfbT9Cd648l577/iHA/3bjEpJd8H2va3R/+BDaLa59eSfh8ovRSN
fGjaDlP1sG32+TtKyLcqwfFRJWzw7xz7NJjLTxw+DbMvec9XQH3pN53ZgfBI
j0/3buIWk7A15P5ys+KyYKfSkP4p5Kt07MfBAph/OGU1mU+V/+ZX0TDPYdV5
Ui8veWUnE64SUXsXwyLle/FnES90rLbnGemX5nvH58jP8w+1FXmkn4oimU+k
H0e2ePqR9XPRv5N+SAM87q2Bxclfrt6cjfnyDv2sA49ELqyLV8L+r5KEWWS/
dkbe+llYf2NXoAALraufzyjgezfxd4YGmf/LuisieZxbbluIKeyzqzPluhzy
kYrPuMKe6l/Otsuib4GfOxNhEXPaWhbmLngX2ATHzU55e0AG9XRedSTnK85p
TrAiTOPNNbdAfc3xZpsfU8jrrcKtCNIfn+gA4vRCt8Zyss58vE4W+308tFb2
wiNl9apusPi+/PkvMP94yPq7sHD6dwUa+q0UL75hi/gjCS2q88n832kldcMN
8XsXqMFl3o9NdiL/Zos7VlL8nrWzKbAHzmkK8OmCxTUhNWzUKzziPVNA+j9L
r+owbJBXbb2fvO+WpNxKgSkPm8FFJL7MOecw2MhLob+P1K9QZPYdzGvxiToF
U+XrBMWkXy7j2vZkvdw2ahL5BBxf+IH0n/Vjj5wmHHp35cxfJjiXdnq3VVCP
QXdafz4syp27QTTDoYyE8unRcPPuBd/t+sahQi9+TgyAxQm6qk+/cCixxYmw
vbBPd1OHh5RDSSuztwQTn5ucM/GJQ1Uts9iWCNNW5c1r/Mih4lJ9lcphp1/G
X92d4FC9pxI9npqQ706+HlMML1IvoJH8Ux9fax7nUOzg04MO8MAJ5hK5MQ6l
s7PzSTJZN18bqPmOQzUHKRrfI8//e0+7d6PYf9jgzL+wII3xRxTWBz7LaZuh
XwZddi5l+H2ARaOyC3kfzUy6u7znUNwHFz3I98LpuLPVMhJ/o1N8JOl/gtCc
i/zSU3qbQsl8VNxvuk5yKKG2qfxOOP3FsmXOqIddGC1rSeaz0PwzQ4L7L41h
qMDUZ81XF+GR0La9j5BPFav+2ShclqmxJ508H8e8e+/DIsMH6nbkfFcs2WUN
Vx3dUzODfgiSsse9cH+W3db/1JP+qW6mz0H89J6n2hFkvX9H5C7ky7teYMqG
B37QXNWC+jwVv6Uqknlxy52sR1BPosH+weXYb+zw4uBr3O9IFfc+HOfLHul6
hvqHdadvw9Trf2RbH3Eoyq6mTkjWWebrtFsw37AFXc/JOvkrufn/qwn3vwyU
trc=
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], \
{5.3759302188063165`, 14.351079124774735`}, {0, 1}], LineBox[CompressedData["
1:eJwl1wtYy/sfB/BfuVW6LMQotUSFZJ2SIW2HKCmmiyWXJqXJoXWhUWpyyz2d
jtMRNSQjsf5EUgzJcMoUFaFVTk1WTXQKqf/7+//3PJ6el+/t/fn8vvv1zDo0
yi9cl6KoLvwjv///M5lD9Q8ODiYzOZShXl9emw2HEq0z8AqGi40qYh/AiXdd
NK6w19Jc1glYwavwHQdLrjmsDoQz/43hfJvJod5WzXtIg7W79Iuew30n/3z4
aBLmnU1feR1Omy76uR0WlneqcuExFJdjB7N42eHEHxati3htzaE4/E/ehTD/
ZqFrGlyv8PB/CjPiveYsg2ku0Vc6YCGlOWsG5+7sSjFEnr1zFjPVDA51pTy5
djL8lr7D/DGcGjOV5w4z97oPuQ6/fVaRyIMtbBer82EfwfGHW2EHf0eHQlgS
eOFuCiwdS//rPqxiHZyaDqsO7xA2wOWPcnqzYBe7HeJ+mJFtsD4Hzi36230S
8hzZMltDxuMENW1L4LeBstgTMD9pq0QIi9Jb7cRk/43fM3+HLTY1HRGQ831L
Z8rg06UdsUvhoSJL03LYcGfW56lwaQozoBIOW76HOwzOGG2c/hSWUB26d9EP
i0HD3hLSn+Ibo6NhH22jTzYsyzButoWDRjj9jIP55larmx3Rp/kZhhxYZZtn
mwe78UyMdWA9Vfz+OFjmojQpQX3c+6/mLodf6g/s3gKnFXz/bTYcxntDt4Tp
Tk2SGXBQH5t3xgrrBN1XnRzJvltshsJ0w0+PFsB07yeD2yw5lGBNY1wI2X/6
yqreiRxKbdVSug9m8O8VHIXpE3dNvQ6LVn2smAvXe5R0foDVWxba6sCiuqiR
dHKfzhSda7LAvbyit3UJLGKtqWmAZTcnTNhO7sf2Y2M6yXhSn08W7GXSnWWG
9ZLKpJybcOaIvFPLYFqT2KYCrs9r3pwB25tsTlDAqjUvK5tInqrv7aWwZPJ3
ayfk9/qTzT9Pxvu/FCbC0rTtcYnE8fE9d2FWws0wkkdvxKjablLvgUe6hnAx
PaFjNPrRt6c6uwL1aNfuvGMJp7Zaf0qAqYBKJQ0WztVvcIS97v3UqLFeZVCZ
1DyDQ8lvlRhdJOddMH//F2yf3LvVBxa6aKt5MGtGVUID6efL3FZLWMpplPFg
4d3GXz474HPl+Vf0I/RDHlLvqYT5KXHVU2G9zzPHl8GMwaLgQ+bIF+7VfQtm
BRXJNRM4lLJcGiOHRUkt51fCUtus9Few2lDjWTkedd15dq0HptW7BQTCXL1l
Z8n5Cn39rG461itHVfvCQTa72y/CskWH+GKS72tC+3aYfrnz1+tw/XQXPT7M
GNgf0UJcahodCmtdx38wQj/4EXctEsl4/H0TJpyZp996CbbfHS/1hFmCzYVt
sNfGGx1+sDR6WQ4TeVJnthZxYUHIHc9k2Ms8P5EDM8MO9ZP8ovW2mybB8q+f
jcehPtFoa59enM+kW5kFwoo+o5NymOG9x2EPrN0Xueh/+QvzZ52BWcKAKhbM
WVw+XAILjyX1a9APxfrV6QfJ+nNflTmwavghahVMjV2xNgCW1i29bQwz6HbZ
RjAz4EDIFeRJS9yysmo68jTrlrnAgkOXOzJhiYObJB/16a1O9ouClRfKC8xI
/a0/mv1glluInWgcclDvV3vAivrM/Pqx2O9J6vOFsHDLZ60bzF1tc4EL02Kb
ki+bYVz8MWcTrAo0i7KFhfcCOo/AMqXFlKIxeL73NnCKyf4GBycFw9qGzhY1
sdSwbhws3nf1H3Pkp4Ze3tM1Grmur5u1jNyfitXTm2BRmsezRNhr2Jf0T3Bx
hXdlLizXd+AaYr3UuLPwIbmPGk4bGw6KWxZSR+6TU1rPbjiT+dHjPSws8I2o
JOcHybeScYVxQZEF8gomDj/xANY7cnRaJKnnfelICTnvaaStDOZWWLUKHcj/
zw3/CEv0DR+4wqmWne6m6Afr8VDFF9TDTd6psoHtex4duQxrWbd2WsJC6aXP
a2FRy5OwQazniEJ1TOG+2CRmBewlL3laMQ15RqVdi4WLNYx5KdPI++DsR33i
9GffF00jf4dChhxBfskdB58xsNp/YNwA+sEKXqjtnAqntA8Ph+1XWJrWwQJ3
M1bFKOxzLNO5EpYV315lBzNm/2S+gJlZFROOmaKuhiZWM5zZxvlnkIZ8BoyG
AVg6uidrN6yujR0/BeeJBefWjYMlS9qS/WCG/NvVVBOs4zQu2Atr2e/tzeD6
9avW3yJ21jS8MkZ9cbeeqGF+fvq3JzC1MjDZjNyn4qz5nbBg3sR7c6eT9/GM
sfNNyHst2HolzBT+bLtKzHC4FU7uS1TxrIk4XxvoNEkA2/dPPB4JM828L6yB
OdeGN9+GvVjnZ5D7Sq0xFQ1DfeLXp/0tYHVPpsIT5r4S+39EHppDQmkCzIoM
HciH6V0xmtOwpLfx/Ea477FB3UWY31XbYw6zjp4YeQoW/hLWVoX+1G/W9YqB
+/5TnpoCK3SjU5kwlaFsmgMHdc0bUYs8Qo+3f/fa4znW6TqGk/75VdTchbmz
mNoHpH9u72knYG2r7Hg2+pEaa20mhGk72tZHGOG5bTN4tQYWusbG2Rvi96p3
p3mw/N4T5w4D9MFPx4hP5q/wbJTrI8fX3y23kfG0zYMFeshjOTDzD1i87c2H
shHIZaelk/MZeT6ufcNhP6VHhz15v7Skh8K0QF61FfJzh/B8KeLDdTf9YOFq
7sLqYag3PqmF1JtWq6yuhTlzFZEFsHiGa6c+5iuXBuc+h5Ulb33D4b5zx3zb
yPw1Q8pUsH0n40I3Gf+5MCkGeQQ++WItWa+peWCCvLIrn4JV5L6GvHYk+bm+
NsEPYNrkPWFs1CfdtGDZn7DE2e34HZi2/d88PtnvnZ96HPrB2D8mlEHyp5U4
+sB9na5f6kl/RA6GfjAtunjKUdKf21WhU+DUOYnf2TB/+aXkcuynPT5lz1c7
rC9OnMmEqcO7Swtg4ZtvNzYjj9q+a9NWmMOsliQiv2jy/i8smLHv4NFI0q+Q
LC8TWDzf94E7+qNeYajotsW+Nz3vDxmKumbHzfwAy/9pqijXxfxmenoLLGub
yDmqg34cG+BpYWXdWXcB3saqEY6L9LGf6svS5nsDbIrbVJPqAEtm7fP93s+m
6EuTa3jkvF/tK47+YFOZt6NiU8n8y7dpe7+zKUXwyW13YOpA4uzmb2yq7/nN
Jx1kfo7CRwrXJ2oiLMjzX+IS+QJOrVds8yAedUrjj/VaN49NG8j9aZ7Qbo39
ZXtf2cWT/u0QvZ2K871+ODOSYI4sN573k02p9qWuJeNis0XnMpBXucDm91DS
X9bSvU8H2VSQ0JbBgWWeq5ZHoz6q7JuBKbn/xildLbAsr+xrLfLJe4qVzugH
jR80LIP0Wz/TexUsZNNeeJP6TYxLl8F86b+sAfSL8VuwkganfbzgWUgc2Xwx
G/ulXdIxjIBVTi8ffcH5woH7sZOINwaZ+yKfnk6GXesU5G1NfReIejhbDkTe
gFV6mXGWqJ97JGjgGMzpKAgu6WVTountRvEw4+3iGeweNj7vvZZbyPy8DbkP
u1Fvb8HIaFjyY27iOi3qrU8YmkLWl+0q89agX79Qp7Jh+d6MGzw1m6L9kVNV
TsYFyz8M/YdNqcVtjt1k3FMh3dzMppiDGV025L64z9h1WsXG56jKhAdTjuPD
3BrZlP0Jza5UWLynz7nhPZsS55rOLyLjj+3W/8C4pPDewTdkvffrOawm1HdC
9qOHmJVcPYD9xV+Xnx9G+pv5ZYMDzqd+jbLWI/2/tL39ZBubYsw3Le4n80cd
jDdtx3kMsT+5r5zr5kFbUQ9T7X64lJxf7OKxu5NNSbc+PXWQOOb8XRrq59am
+PmQfq/LVf0BMxq26Ywgz6fB/+d9Mn5t/KpS1Ms/7uxzGJYt8fOJgqkzml2v
u3B/5QGfJpH+yL8l/d2B+1k5yf0NvndSD96t/9ZOzt9klQmLh92PiEXe4oYj
40NgefJD/soWNiVYsNfTicx/GXv10Dusjxk9j0Z84nb5ixo2xbc69rEf3zup
pPaaGw9xXvIESS8x+ckso7T4fjtow/kvTDuJfw==
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], {5.239931943422892, 12.555212394734014`}, \
{-1, 1}], LineBox[CompressedData["
1:eJwl1gtYjGkbB/B3I0rR6DREjAoTqx2dCfNaW1q77Y6x2pLDOG3TOsygE1q9
qZS+lVn0CZ8O0nZQGWWtlmo6ik7DJqHR1KqmWu20paK29v/45rq65vpdz+m+
/+9TvQt2SYR7dSiKuoAf8k2pJ/CZTVNa8m1FU4xOV1k57Hl/ttcvcGaMauoB
WBwSrZLC8is2n4zPwrerXZoTLDL+rfEYPJIXwp4CixPMUrvYWFfXbPF6AU0l
brI13ADztnu2KGGqvdIs0xzzkose1sKytwbDU2HuXFncMzglqF8pMUMdJ6jJ
WlixS3drhylN0UN5/qbYn3I6c/UALLq+9otPYc2jhnRDmJmlWx0MszZ0b6k0
wf5HNCl5cErnK+ElWB7/x/5OmFfYVhwLa1uulFtYwwP14nNkPGwiwBNmeU8v
L4B9MuLD9sOufcP63TCHtyQhCtY2c4KW4TxFbGhPPJk/RRN0HGYpPPzjYGmR
A1UHa58U3A2GFfwLz+egH7HFAeE3sDrrQc9OmBVWIbaBfV4eOXsJHrn1Rq0h
+Y3qqIvg2Ns81+vEx1/2P4K5Fzfv9iXPxzp7WjEsbR/IMIDpJMuKBFgvIvlQ
MfKKjVgzTwhXn7deGATT/z0cPkjyszEbtId5+5dcC4djt08qeM9Bfi+4h4bR
H+tP8e16OEXo2igi/Xety5bDd937JKXGNBWqaj+bCifmV/nNh5mn+leJPbeI
njAzaUrZyV5H5vt09rX2snBOjdCxFuZ8aWTyHdz8ZCRwAJZPMxdrjFAvsyLI
GvUwykhDR5h7UGHvC7PYL5bdnoF9J80R/USe/6owl31wc9Pg2WqYk2NZ5QPr
XRjcOUrm17XkHIWZyX15i8j9LH06rxqWNy3KXw/LDhqOumF/rf25ZVthTk2t
cw0sdbSN2UW8+zTPCfWFnlGrPuQ7sOB/p2CfTbZm5H4pUjak/w5Tl75rmgOH
soO/NJ9J+vssVoPzR8IGZn8Oa3T2rMom9RlH7vWHQ3XdL+yGPXM2nj8AiwZf
JLHhzGdu63xh7btI+UPkQZf8KbGFqQuBLj/ArFV02CucxylriHeCxTUudsdI
nuWS9N75WJcV88kE6hcM2EkiYIGBlaqD9HvyYB0PVrcps/KnY/6v7eVj8+D3
3R8fMsQ6r+7WTlhRW3x3mQFyyXey+QumxjwKB/WxjyBXz5Ts7xc+84ke1quC
4oWw7IeGcOVU7FNp5/8z8bPvZ76bQp5nlrku6pO5q24I4epDh5+6wcqTDflt
uhj33moWSMZ3JtVnwPLEheJscr8qbjWlwTLT6tCXsLQtR/0YFo2au0wmz/Pl
zSNLsZ+eqGliAcnzhoEqA9a40yXk/spyTK+tmkp+jx0MnWBByTr9VzCXyV7J
JfdpT3pBOOrnmkbtMSR/T0oUa8zQX+awvbid3D/LW53nYNd721Q3YLWJLacP
1m7Ro/bB1Oxwq3nTaGpWgPd5K1j0TcGWuTDzoPrYDZJvd1zpa8wXsazuG8Gc
hd+ygmEqLa0yFHnSvILHj3G+VJjl8MYS89z9vMZIvZ6B04/AKV/YCMbQj6J9
dbARrDjR/+QF+qca/w6omov6+pyjr03G9+uppy/DjNpw7Y5J2M/cdOhHMu4+
LrHUQc4zBjyuwinOUeJuCnX9Yh/3EKaPTSReneBTHG2UaAY5P6yn7eY/fNy/
Lq4/THPTcy3G+JQ25tPV9WR878aQnvd8itfmu2o16hfdmyFbBMtW+GzLJfdj
84YS5Ts+xcxMqmajX+bbmKUdsGj5pv4gmO6t+XEL5rP0rHtLST62lj9bjfIp
dWTZr0MkH8fGiSU4j8mw+UyP5Dmw/vk21KOniQyZAiv2BbqnjfMppeiriR6y
/mvzPe2on/n6lC/JW3A0aVME+uNdHLcSwCkzfOKGYPy36G4h9c3fXujxEfY9
GxbsDbPoiMwAWOBkeKYM/UnrWyW+ZNyxLXUxrPVfW2lMLGJHkzwFOx0WJ2A/
Vsc2/ZE5qMdwx4NKnK/oSc+WwqL7moGPUF/K0JoVYxbox8w+/w36UxTdPZNs
Qfbd988V5KGIl3y+HaZNXd5aDSP/Cp2MlbDaavje5UHk4WWzzYnMf1S1cu7f
yO8dP8ELZp5n3gn/C/kbBQ0xMNUsk7n2In+psKIGVjCLTsd18Snp3jIjW9RD
3bm8MeE19n97ffgcqTe6eLGkHfZ89FaHPP/1RgXWbVifttXxMExZbN5foOZT
8q1+Xc8/jCdcNME4vfJ8ugPyYEpSlXZYz9TH3D9K7GJi3fkHnxK0TDqeQe5n
yI5k4070fzTiYCFMCf18YjQkHw9ZLrlPvdY3TVCv4HDPjkgy3yOgIfoN7kNY
e7cb8atLbrnojwqoLfxw/vu6tDwt+v/eslBE6utSyl368fw12tGn6EdNX4ze
BcubfzrBJ/12uN62gemlNs/SSB6tZdyjWM9hS1r1SX53/vNM0QfTPL9QvKco
GpXOpaiHDj6T/BbvJdSybOdpqJcV9TEdAyvGnCfuoT+W2q5qOcycStSMqZC/
qi5wBO8pzMnl3uO/Yzw5dZ4Kpux0Nt8vR/4NZdPVxORzvej/701s+l+OJ3Y8

        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], {3.380054725704277, 6.990069795120628}, \
{-1, 1}], LineBox[CompressedData["
1:eJwV1wtYjGkbB/C3FIpqOiklOx1FDmPbpliaV8qxZVAUybBRzrO2SOkz5fvU
Wmpsq+TURJEOmhwqrExTDlFrUA7pMGwpg0yFomzf/+66XM/163mf+7nv+3ne
t4v9uu1L1+syDNOIfzQyrYP4cWQZNY2jWUaSeXJrEyy+mXxmF1y1P7+5COa4
dbr1W7NMXWhvaDSsGhfES4H7ajI2esGK1vgUT5gjX/usywHjtLm+vVYs459g
8+AsrC7091XBMpe0M8Gw1M54UyVsodxfOZLcvngzzdcV/ZShtEceLasbP8E8
X604Dhbn9AimIr7XnLWhAljoNMZxL+zPCFwMYW7zg9kv4Gw7wwktXJaRz89S
sMg/+vDFoJuwcPzaxXnwyO/GOeWT7y2PNrNhmdb+VXtOwzzdqMe/wiGvBx9k
w9rCZt9qeMvep2bFsDrIkm9si33O76q+BXNmLq32hv/MeTH6JSz94b5eECxO
sFMzyEdaNtizAtZz3XjbAdamZtyYCcuDx67xhZnydwUGcNiub4KfKX9eweQb
2C+bO8WO6pUe7VOshMuW9L1KoXm32KdtyD/Av78mA1bFVV1eByuamBgyZ1Pm
9Ceo38JvS/8hWDZl6yU/OGhDQctOmLXqTCtBP8P0PTwDYPlko58mwxz9u6ku
1F+XkK7iUTjPiFG6H6gfj1pHz4F5i5l/L8BsoepMpyXLHI3sXRsBcxOdky7A
VVHeS+2o3zZ7riXCitqG+bLvUG+as3ksLOEfThkKiyyv+CXBZSftFuwYi3nL
Fa2FsKqpmdNhh3yPP9z+xpL2KTLcAguP7/7VE/sLt2y7qUPe1pqfCqs9YrT5
Y9C/q2f4X2DVp+bdW2Dxl49316GeeV1JM31hLZ95ew9W3Akf7U7PrzL2mIh+
DJd3dnjCUo3BwXg4N0N9WAizXdkrb9N85TPbGHJRdtVnWLI26aEclkyzfGSC
fgfJPTZpaV4TLyVzdxZM+4Hyn3jT9RPdf8eksF2Ur/XSDgUsfZc86gqsUoz0
joTLRpSXUb3cCfp5pvDRqDwnY/SDmXIs6wTlO6T3kT3M/fFmxGjYuvipLpnN
Fbw6iHpdx7Q/M6Dnc02CB9AvadTHX18gniTa2G8rHO2u/nwE1laqjNosWCYp
xjpxOiz24f4dAavzbwnuU/599TbfzHEuu/g2C6m+kSkPcuDoqNSaG7iXqnsx
/6yHhdsXy8bBbK3zPAHMTHDxOYR7ye4oefw9Pd9YeagHfRCmJ3uycO7nNSvW
wLKs60M2wIqqAo961KleZVyaBVtH714UDPOWuLz4QPHz/Vw/oE61iO/mT/ne
q03IgBknVWUx7LpnvtdK+g5cOBVsS/VmXXL9HpZn5Ufuo/szagjPnr4rDWmF
rZb0HVOMc4ElweaaaegXu0zT403rw/XS/gNL5x08FkHrNdefXICtw8zXZ8Ii
+ZiSO7Ck5JlBCyz2K59Ntr45ptEB+cqeZ+YVwNycFcwGWHR81/Ro2Kv5yOkz
dM57+WFu8PCQ+IlP6fmY9vN36f6XX4segIUJpxKWwdzbs3U46A87vthdhfru
sj1D6R4p4jWy2bCXl5e8F8+r6lWWl6h/EY/tqile9FpDJ1g2+VTkPpj78Hnb
cTO8rw3aF+NgRc105XewrPaquIze61du7pdNcV8L6id5wazvDbPVsCql+F4e
1eE9d7kdrLYtPGwBi3rnv//MQf6dxrwY5Ml5rsjXwBE6Z+PVyIuX0sj2waqe
dSvpnNiTv08fi/XzlAuESuQl+XreciXstZWbNAdmAx1W5sJivl5ioxnd/1sV
ehglm01GJJJTXSI2YZxnn/NuLkahMFSnDmPHxb8NuBjFFsGWMxDH1efADBOY
l2w88ySsNd0VYkF1jugP7SbH1iycRM8/dO/gUz8nG5qsgLlGRwc3kI8HdR6i
9eUv5XthaYhTZi3l8fmyEdnrF8dIU8ThqH6cHQYfjc8/HEDvxX9Xn5kCy404
Tn9QffLxWa8wJklyj9zCqKrLVOzFKFbZKzU0RibFGGLs8Gpy+peeP37MkurU
Vgcw9J6pFsp2fkU/JH41e9pgrknxm41wtMXnv0rovdrS/rqB+vtLdrsY5uW6
1i+FRedGu1jCaueg44UmqPuqQXoO4jLy2ltPjHHulc18Z7JbaYMrzFXOL09H
XJnHqIrzRogflxatQz7ycNlquOPsEfNwxFVofuP7wfJ14ifHEJf19q4Uwerp
i87uQBxmbrJpIcyW7KgIpd9bzbdyxu/lVgu2h49EXltfqCtgsUlgaeoIzLs7
t8QgjnzUXrM3hohves7REfuIZa2TNsPSDnfFQdrX7EqFLSzKGF77ker174/7
agAnRP0TSHnudjDWxzzPrEKTR/fnjrG7J62f477kA80n5HQfgLXu0wR03+Uy
eUMfrEoMU3rCorqpAdEj6O/lhk4+nXt2/BAG+ap9U7ttYfW3YVP3k030HNsR
T5rU76FDfUh//TEDFh0K7winehMmd/Jh4bebOhdhTmDQbxXIl7sxMfYZzLTF
Gntz6Dvzpake5pYpb6+jPi6fG3eW1i9be34W+qN+cPX0PFi2eNYVR4yqtteZ
f2F/hh9bao6RU+ZyX28kfSc71LbIW/jP5vXOGJnZxgF+qEuWlL3JyZDyqStP
R5+Ek64uMsDIehzSG41RylrnNQ7DfLfeQM1wWBn1/NxQ1PHyf75XYN6HT39G
6iPeowL3hzDna/A+fz2sP9XYaIf1jGt3rdcQ7DNvYGoarDpncm2WLtYbmM5w
x74Mb4f/Nh3E75y28R31edqNr5UM6l105l0p8pR1rNs2B2YHvSf+jjq4DqGl
nYMCRhQZ6bmK6t67s6kAliSmz7JDP2QrBKeUMDtwz+YOLCrlXzPHesl1/dOL
6f6k11wMp3hfvN2KYMmfzlX1sDpsQX0LzFuwNTAQ+TDc7PtNMCPUGDTBigb/
X87R/F3l+J+Rv/rTkx0z6X1JLzduhmXdDeWn6Tx650h9Ua/i1Lj1jchP6/l2
YzLV3z4mtAv5S5w/pF+GJRfzZmjoHP54klNM8yYhf6tQvzgr7m38EPr7mVlY
hH6JT3NKHGmesb1/GP1VLbZalY792N6pPfHD6O//Xz+0ID+RmWvgAZyLRBuX
OIh6ZEY2ppdxLpI6ZfYA+iEze/xwKCxbnWd1+5uAUbzv2ZmEc5L4TD+xpR/z
Gyc/nkHOGXiv+0XAMG+i4p1hWdz1uBOfBYx6jP7jWbB6c126/0fMR+k+TYa5
d8YfdO5GvKKtscP06b10fumpFTDcE223suleDN/n4fge51NdbR9K+R2O+DFW
g3hX/RXjkb/kttXm/R1YP8Nn6DeYlfH2L2zHvE6jbi3qVYQGTKp+DZc7aJLR
D0VWxodPMFepOuSFfrHH/C4r6PmVfg8UdJ8eucaYvoEN0vS51F+pT9g97Ke4
PXeZEGZPdA6rfof7kd3V/hO5Sr+zvRPPD2gmWNF7/crEVkL567vWFtB3puxx
dlQX7B5XYWpI72GLnw/qlRjIbBciH9m733fXw1x2+dM1yJctbp1p34P90hYd
CEI9ov59chuYnW+kJ0D9ssjopGt4XlQ6Vm2H/nAHX4V/Q3zJkRAThvptU6LT
iv0VnjtXa3HOkpQXjq8pv9xRfX04ZzZ2wpINb7FfZteAA93Lt3WpItQvCblk
vhPnzsScftD9Cudz9ghPS+9FQdub/zTC105cDIaZ67x/nz7CeP5ygxt5X7JP
nBJjVbLPejL9HL3BKOj/a4OC/wNjGfTF
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], {5.031265249859636, 3.4413216669785855`}, \
{-1, 1}], LineBox[CompressedData["
1:eJwt1AlMk2cYB/CPowgKUgpO5D6UNQOUy8FEsOESMjZEYLIOEEROjyFQxKYg
WlGuKQ62AGJBwK10RQolg8hhgIKK7WTgJmHo6oF+im4wkRFksP+7jIT882vf
ts/zfs/72h74cm+SJkVRsfgnSS2u4s+eQ5kSmHGoWQemZRtcJeNtJxbceRiU
CKuHE7mWcOSYSLQJzvC2+3wfrN7BNbxvh8+xdL6TwvpcC7YIDh47FGFmzqGi
QxRLGfAiQ+ZZC5e/v1UjHBYvsO2dLTjUwWLDtbtgeumg/U249szJrd7wrTsB
o4mWHMrLtn00AE6t16tbhqfy/m7kwqZLtp6lVvjdhm97+bDLVJpCz5pDKQya
WxpIPaIOvyz4lmuH6C5Mzan6BuHKyWT+CsyOFxcvwhnTl42c0E997kVnXRsO
NSpoDoyCl2fD2xhwrm6Py3HYZqItYAbr9Tcc//gCvCiVMOSw7nzrV5fI5w//
8DgZPvx0sKgGZgsbzfTh5TkHfikc7cCViFGvIswn6ijZ7y2/rvjBm6tXB/1h
ptWGhkfoLyAvwcqAfL9byLMSuGv2RbQS9TKVzysCYPpd7IwQtnnXKjKGY5aH
ZB/Ce9bypt9h/7oSDw08t0UfWX+srsKR+6+F1cDx/aaWtlhfOd+dHQ5Tr397
EwcffO3NYhLL+4Y74aoaDfEE+mZO5/DZqE9a0ujRArs8du2TwvSYyPwCbBpa
4r8L/THrooxPkn0SR2pNwj0/jpnnwbOmTwK9kfTQ7fwisl6L+uAcUup5b6IO
qd+SUKRCZhRmOvYjl7mawnWoI8OEXngBR9eLxL6wBX2FuxEpHfjCJAnpIhfu
CELKTPaezUM+zfdMyULqSnqzziEPh/NuXkIGz2itFyKbXjkW9CCVvu6cY0hx
/ulN40gvN8vGCOQ8657oAXKz49VUJ/L+gE7XJDEvbNcK6pioW7h+G9afKtim
hMsesDokcOpdl+xqWFnbm5RP9tduXXga6WN3ji+pz4O2pn3h0IpPgrThyOlA
I0vSP6NCu5us8/PdroPcI2PuP0Iy+c8YMo9NMXnZVvBUso4rhRTHbqQb8LrF
mG43C1aPBtAsWPbM/7w7ed9aUvk1nkvwTyHyBJh9KljlANfv1jx7CfbSHEoZ
J899aW7kIXFb6z815DmXOSnZtuScq0by4aZbJwQ5ZG7k5peJy3+eFinIfvhE
36+CPZy6Zw3JOft0vnAE1g8fjogic+jPLTTE75W97Vu4CFd1VncegOd5d04M
krmsuxHUR+b+RKABTc7dYN6sOepX812LyTlUHw3dx4OLBB8JdDD3qU0vIxVk
ruzSXCl49OWaqxpkvhgJ0ldYf4bfKH8P3lnoVquCC4av8Kzh1C3nA6/C84uK
ZjNYMBeXlAPHJPL71sDB8WEG5B4R92S2q/D91DYtgRGpr8yn+RjsckDvzSP0
W6C4nr6Ceqdivy/rIucierNzLjkHHvXGVTA9/tbiKfpXD2n8fhouL1VvCoZl
ISo5H97zWpIuwblbZDGuFcC5ob8cMoI90kPcvoGZDXY+QtyDlXE36E4yp61u
mQx4p1LY/9+5PeU+Ukvu3ScZmvbknpNE/hUKFx0RxqaQ+nXNPzMlNutd307u
tf/vbW2S9px/Ae5aCdE=
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], {7.846073371143249, 7.42795226633379}, \
{1, 1}], LineBox[CompressedData["
1:eJxFlwk0Vdsfx2+SoUEyZMx0zrnuufd2SO8fovz0eqFU/l4eSj0VjbounsxD
hoqQq0lRCYkmPJ70KI3+V5okEhpkyD9DaUBy8/ZZq7XfXeuuuz5rn73v7+zf
/n1/3228yd/VV47D4dShL/vLGZ1AHwJ0ZOyvDnDEN7lD9QSYac5vsozWBU7L
fruJPAIKts9Qs1DRA05mkMw+mQDpOkXb1vOIW6YcUIslgKhZUx2wSh84vX8H
fU0k4K+2qUPtHxEb2USeyyLAvqTF8ItkDnBcHOq+1hDg8+KWrJUyAE5s1hzl
IQJ6NKNCfilCXDh3089CEt7wozKlWobAkaqYpIlIONNt/FxVhPjGHIG4nIQV
ZrsrZ55HrDpEwhgJ1EEFZ616xOa9F91sKVDxW+7W2YBYu8hnYQgFfdLlPgdv
ILbib2w5R4Fx6crU8BOIY68cyKunQHzZkNH1Qbx/yb2q1xSU91uaXDdBXGJO
KfRQUMGc3efUjuITnz1u00ZBhrzvo86jiKG4of8GBR96ji4s8EBsFJsenklB
zpNyzeWmiF2srSb7UDDJRuVrmyJijy7vZVz0/PQ6tdDvaD8eu8li3pCw/MBU
BXUV9vmxb7bZJGhati5xtUKsJCsUuJOQZSzuC45CvM3e5d1sEiLUKsRubDzm
Dn81vyRA7vaQhr8rilc80fe6lIAavbFE5Xb2/bd92JxBwC2rcz0WC42Aw7s7
QyGOAO3NnpETyYhD06/l7iHgo+JptR0vEHsITe0kBHgHihK9GGM0XtOqXEJA
p4/r1qfhiLe13vNtR/mvaNg47QbL6UMT6iS0T7SJsr8hNgqOHvwVxT8RO5In
MAGO96S+Z5kk6O/5znu+CjGnv9fwFQlrog4LT/sgVsp6pEVQIOFdXjdjF+LY
qRNmGylobJs+eXAbYtWHZ0yPUrB6tkttmSdi3sOVVjUUuCY1WWyxRzz6aqFN
KwVRW/6/d68J4hKRfm03BbsSonQHJ1A8qhK9xR0UWIxfFhS2I+bZf3p1H+Vj
cEClroodn3qruogCZ5moe2kOYum9qgthaH35HjlpCvu8XcQ8OwrmSFU1D8Uj
1lZdvEFGwtZ7QQNee1keeZR/hQS/TQFxNkcR55xdcTGAhLXdgV5Hytj9iZ5j
aEaCa4Bgvv5LxOZaz8M+EWD0dGBygwaKd9v3P9pvEnD4BWfnrN8Qt8zzfp1N
QIRNQuql04gLa/KC9xLQW+oimvKefT65SxpDwEu+iBTaE6gedXLnJ6H8OMbq
zjyE2OpzomUuATuX0Y6nOxBXRsol1hFgQlfbjNEkyq9f73QZAVt26z1I344Y
3ijoLySh5RUd6HQKsdhyc0wUCQp6GtuyaxFbJZgU3yZBNvLQsrADcahCt0yJ
gsn0eNyi9+x6Gtr3nCg45XEkooPlQs2iy3EUdEqn9NR2IU4PSSkpQfWmYy5/
/RE737JiSwMF0YUn7PXLEEtt/HQ7KSjWXvY2W8KOL7d/2UVB/8SzcFsRy+cT
TjRT8L24v0zVmeX7MSpXKUi6+snQkEGstDagNpWCxMC0Uz9pITYaqFdwR+v7
GjTVKCNuSXt4SYsCpfC89BJFxDkhKjMaSUghLerXq7Gc9aU6hYRr+SdKg/iI
HS8l+zmS0Hv12Yl3q9n5tHIJWud4jtFOxTg2XvXXjxsJ2BMt3OBbw+7f2qwz
RQQ0JClVKClQbL4VPVIJyHbdsCbsV8S8jAP+SB9rlFKfd+ZT7H46HIknwDyY
SrUbQdybNen0UQIUo5vUQhy46P2GvFIrCfAL06qTZCAWC22OvyVgMaVU0NbE
ZfXjyApjFF+yVoTyTFM0P/bgqU0knP58r9LdFrH2gwmqEMV7p10z1wuxVMtr
0SAJ7+/cbA/0R/z4S4bVPAp6QjvUlIPZ8SXOR3ZRUD+twtRNxK7XMUrnUDA/
cZpnPzs/dpGNSy2qh0yd3Z+WIBbLi5VeUpBpdsFAjkDM6wjXQPq4eITtH1w8
7vdkTYesnYvnl27vSZp+jYvXb4j8XKCex8X/bz3s1HJewsXxGSQZDAwnc3H8
KfRiIjWdi9+vkyberWfn/3h/3xn/cSi8/e/+6If0Jgx/+Hf/7raPeJJ8U7y/
x/b3LhDtMsX7L4vnD+yvNMX5WRHWGnhDiYfzV90dyNVfx8P53Vp85sLeizyc
f4vQEaeRrzx8PuLjG8+cABqfnx0bXx0ejaLx+dJ35PlqltD4/NU4+a5KaaLx
+fxQ9+Cn3AEan9/xfV7+q0dpfL4Tszv4MEzj8x9zMGBjfS+N6yPCcfrr1w00
rh8FV3Xn92U0rq/0QdPE2xIa19+Dpqvam0U0rs9ET9/rnc40rt83vY++2ZvT
uL6Nrcd0rPVoXP9binYkGKjSWB84zydH3WL5h35ED5tL3Q1orC+7G/uObbam
sf4ITZpTKzbSWJ9OHuiy8D9KY/160/LznSnNNNa3zKrmK94GfKx/xldjuj/4
8bE+nrwtaWu8zsf6qedSLBlTFWB9TaqNCHT1FmD99ScnDg8WCbA+d81VG2f6
BFi/S9Of3u80FmJ9L9JPzdvhLMT6r5qSFnVnuxD3h2zLFLW8MCHuH2+t37/z
ixTi/vKnTEdmGSTE/adSXqJb9bsQ9yc5DbWhBUuFuH+t+Ojy1J0Q4v42c0dc
9yyOEPe/fVmzw8JeCHB//DOU/+D4dQHun+V9xdbOBQLcX+dxP43POibA/Tfo
+X/zP2YIcH/mBexs9M4S4P79+65Jz7ilAtzf38vFKHk9FeD+z5MjJZvlhdgf
2KxgTn22E2L/YHTyUqYgUYj9Rf5BSXhegxD7j+Qe74EjJnOxP/E5UBDPCZ6L
/Yt9nYfOg7tzsb8hP8st+jaLwf4n3mhfsPQ3Bvuj2tF8hyYJg/3TgiGHqb/c
ZLC/+vgk42VzJ4P9V3PhWOTwKIP9WUpE1vBtjhn2b/FdoZPRicD+rjyT+rK2
n8H+LyWt/M3FRgb7w6qYldpp5Qz2j8buc23b2Hh++Mvz07oGc0QM9p/1/A+9
H1cy2J8G0Z5Xb1kw2L+mnWxdWWnIYH87Xr/WTUWLwf434O9xzz90GeyPm5vv
EKN8Bvvn+TP9D404MthfH/K7Wab3B4P996wQ+6XrLzDYn7seMtijNsBg/95V
pC6eYmmG/X1ubPg+yV4z7P/fpTUZ/6/FDN8PVPnfxU6a5vj+kFkQGRFka47v
FxU2ZVMDvRH/uH9UT0J3kVhz+AcJQ/j8
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], {9.0548, 11.5}, {1, 0}], 
       {PointSize[0.04], PointBox[{6.5, 9.5}], PointBox[{10., 16.5}], 
        PointBox[{10., 6.5}]}, InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox[
            RowBox[{"C1", " ", "N17", " ", "T17"}],
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->6.137505285412264],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          6.137505285412264]& ], {10., -0.5}, {0, -1}]},
      AspectRatio->1,
      PlotRange->{{-1, 21}, {-1, 21}}], {0, 66}, {0, 0}, {22, 22}], InsetBox[
     GraphicsBox[
      {Thickness[0.005], LineBox[CompressedData["
1:eJwd1Qs4lGkbB/A3FKk0K0Vl98PnEDludLDre18a2YQlKhRNSLRNFElJJtFa
KbK7NTlEm0O7CZWwOk3nHAqRJqodUihJjFOpvv+9c12uuX7X/Tz3c9/3+7xD
NyBs5UYFhmFu4o++mf4v+MzkGA2CPseIDtdXh8MpOkrCmbDAXuVxtwa+j0Tp
LoRzB+vPbYGjjdnUDXB4fnswA5/+n3P5UTjNbZ9v4Qysu2Ni0Uzr24T6QbC+
n7KtlgHHMIPukYthjbULGgXk5sYv+rCWevHVMzBvjmqMMbxFeOrCMCwoKcrk
w0kDgwLWkGMa/K8YRsJyu2up+2GZgpPKRdhrbu/i63DpyIxIRdQTaV6WMQxb
npqqthaWrHVboWeEek4e1qqA3evfOy2F0y7XF6ij387A9C/eFB+3bgyBc493
egfCpYnbespg6dbQCwHk3UuLBmi93s4Xa2Am6+rWb2ZhXhqhxnzY8sJSRxu4
38NL3xiWGPysR+YP3Zeo0HkBfm+1Ye25u/Vfoj7Bk40pvcjXG/T9MQksOa3V
lQcvnj++ORvObZn/1AlOKvnUEQuLhi6aSVG/qUnL3CCYx7QH+sB1dh/kHjSP
gKDCesxjXdij8R9oHvu9fmdhUej/BM4UH9dWK1bnmCLD0WerKb6weIIOHKJ5
++pWuH9E6buMr7BeInh4hOo7usRMF7aeJ9p2jerxsb5VyeMYpc6bCTRfTu2z
bRC8p88jzQb9NdiEjBnA655k3twNi/bJ5Z+nY33sn1Nvkfs37eqAs6RzzKfP
Q7/c8V1DcO/IcIsPHH7JMGYO9guynC+dhAWBV6e4wdK2tKJOmDvdbZEOX2Y7
SnWM8RzfNY52wJUack0vONfN5f13qHfPe5VDsXCDhZWrGFZS0zDIgsNX+2sP
wkHRu0JKyHaWcU7o/2mdoncFzPFcWtPgqSOtW8pgnuqvyrWwQLTn10I6z2tR
/ADN6+Vr3XQ6z/ubFKUZNJ891TtgpkRxxRfEe+2fJ1A9/UKjp+1w5ArefktY
pljhV0TnJVrwplJ911Leroc1ktVie9CfzM0z+zPq6286PqmW+p90cN1Bqpc3
/ep5mGfj+2QynDakGPEHXBod4bMX/UuWG+Zm0jy9Ama3YZ7uL/etzYF17qeW
V6ohn6bcuRgW+TkE5kzD/Yt2yr5H67fyxOKpHJMntlfpo/Uz/1I5OwXvk6ii
9mvUJ3DwdepURX9Lkv5eTfPJT47kw5XZ8xyOwTpb/vjUOBl5u2wTn1F/A3Jh
Kqy/ed9GIxOYf9EzFm6w9s7ZDovWqNlmwFzUHdllOLfpRGUHrHTKqENxPvJl
XTjmgfy/GQTvdYRlO64py+AE9TvVceTk6z2JqI9/w9XwHMztFBvYov7IrEEv
Ke0vPKM6CJdVt8bLYcagq7wA/cpD1FdONMX+mTfjVmAeXhm7n6nCgusfvKXw
LcuCCorrDJRYO06n5367c5jynf/kfRCWlj2u/4f8UFiYD4uVc767Qfkv+Tal
wXU/d1nkUn1B4wkrptO5Iy9i4Ny4ok0tyN9sq1C4huLCGj1r+Gntybs2sCQq
2S4U9UkP/hijRfHlbX0xqH+Lee+dCbTfRdAWgX5T4paHDtK8Qu1u+WAektis
e30wt1fdZBHmF9me9UJO8zZR6J6pgvsS2b9sEu3Pl9d8mQQPrFT+L9UfH2b8
eSLej/uVEmeqX7xKNBt2N47K2EPr/Yq1fJTw+zNq515B612tq24ocox38nF2
DBbxO4S+sJxbvovDvERV0zz14PCoR4+SyatakuZQ/Hrk1BZT+n1oM7WHOwc8
a/9jhvwZDmHpsOV+u4aNsKTd/pIKzssSZDAFMGe0bSALthyqi3tOPhhduQz1
lY2O3phmjud1u692HNaZHHzyW1jWWhlyEf31W9YLXGDRg+aSYGWOUWnQvuIL
MwocTxnz6OQteuNH8cwTRYfg8LlNR1eb033f8vcALN61ss2RfKmu3gLz7A5k
FpuZ0/1Ms+Loft43FqnR/sPHPurA2h8q775BfaIJMfxG7Jfu0HO9S/1UsYYr
YZczhzacggXaJ88XoB7t5Qvd42FZQdTDJtQrfjVlWTCt10n5SoZ+8t6k23qY
UT2zfJrQv2nieCuf5vU4L7Mc8yr67BntADOb1KN+VcB9NYkbc6b5PF5XHTEB
z6+7oNGf4iF/eWxgkHdM+DGW8rfmx9Z8Zhl9vvFYIdVbG5k//RPLRHKarW20
f/6sGbkfWcby2/V8LZpXYs+JAx9Ypr9OuH8tLDFXO1wzxjJZ22dlnII529mO
YbD+3Mo1fWQLRf1IOO1lQtgSCzjifkoz7PWnPC3eguYt1khCvh8S/UV3KT5P
91k8zjMc9NFUtETc7rV6+TjL5AlLN30Dcw8fJ/NQb9XZsiFrip89Ex33hWV2
u+xZvAxmTEIyd6K/7fn+/3jAOg3pUwzRvyHr+mgNLGn7KuM6PEv1gr03LNNs
yrLHvBycGg94UvyHxMMnYL2EM3bOcG5KnP9DuPLjWQs7ypdueU4KD9/0cDOD
BXdD1UrgzTGaf86lehZlfvSCUxodAiZT/os9TB3Ok0/MdnxH/fn1iDVh6UYr
7XpYMH56ih3qNdX9/acymDEyEx5Af5czR7RP0vocnZ+D0D8/aGbtUZpXiHue
Ieblkm18jsxUBZvJRvC8FrRk03pJs9ervCGWsf7x8OsKim911E4aZBmZ6PnO
J7R/LFqa+Z5lAiz8HivQvHbq2svescy6N4KbX1P9x/eK9d+yTN3t7Hvfk4Wd
fVpv8PyrjJTWkzMumNX0sIxzy7vw/bT/1aFgO9h2e+bAafLe7dlhcO+zlRse
kDOiu1e9ZpllPZOPDtD+nJYXz5CvOf9alIYV4o0BO/pwXqnpAoUF5NDyn6z7
WaZc+YivKyxy7333G+otlhY+CCAXvK+aiH7yfnFo3w5zNokzIuSoR8XXLdaK
3i+9jdXoPz62a1o85avW4A0Ps0yu/hKvfWRTH4tuzOu5253UGPJrXZcjo3Sf
jgdto/xdopGX5CPx+YEUlz1f+hx2X79qhSfFk6xnR8FZPPFmezpPL0lwFvm0
1qnMs6D4cLtSEs6Teuwo+prqSz1bPQ31REcItdQovtR+dDnqX23Aj55g9e//
gS5n9Jdw+23lKM2rKqfWoY9lXrXNOyEnF7crSjDPhWp+VUNkv5rfrF+ifv8D
IePk27nDd2WYV4zwngrlq6sp456wjMLmVVfmkDUbjW404v6cN31nRe42/CXv
Dsvc+8nmAc2X0XmwILWSZbqXfRILyf2T17T/gflqBAelkRk2s8MD769rqMFF
smD10YMHrjEdpeaXW/+N45N2hVGl72+5/wNAu3RW
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          
          7.6718816067653295`]& ], \
{2.0775350174909804`, 13.726680324525049`}, {1, 1}], LineBox[CompressedData["
1:eJwl1wk81OkfB/BfqHEbpNwN5dgcyUaubSZFExWlolrnpJw1KldLi5DKv6ZY
O8t/Z4culTsbXRoiQtdGZpccSQlbWLdiP8//P6+X18z79Vzf7/f5Pc8MvYDD
OwIlKIp6gj/ynvB+Hq/lLOp/L3MWRae1rH8M82YP99eZsSgTullsEmwc4vAl
y4yV8HCdaNIanjq9/EIk2r/d+lfUe30Wxbr1aBMH7QNFLaMZcJr743E/tMek
LjrpCAeFF2YfQvvGCFeLcT0Wxf72L9+zaL+6fGtzEZwg0Xzpd/hUallTBOy+
egF9EP1V360yYMEWtR6Vxohvz+TqtVqwjbmZY6g5K2HdneTfJeGSuSTlYrg1
cvC3aQbW7WDFDsNjGUaOX+DhnVlDJqsw73jYd7Lo322XYe4D/5pWm60Hs0wy
45NXsRJa9A70MeF8FdvK/8LWpvmuASRep4nYK+i/+3lTbQrx7mozAdr9TG7a
XiPrH+1SOwWff2lc9AimysPY/ui/+KhVsBhmdDYKzdGef9FDoxcWvb17dQTx
yYuK/+kh+VccCitEfvmbTZtfwUG79gYGwkFxOgaVMP/94Fod9P+h/q3VebhB
+HO6GPXKSJLs3wPzaus7smGh93ijBsmn1XHjQdRP8d2q+RcMkm+sJwtOjL+i
kQT3t3ykjNG/Io+xwILUZzL84DK4O77g3L1leO+s6zSEs6W489qw+wKr3u9g
rSBf0zO6iNcxmIH9pugH2t2k4Rfb3U9mwkY5paIcHdTnz8Fdz+ELzYMVm2DW
SBGHjnyKPmcbKMKMprgVO+GLx7uzPmsjzzzaUBZMa+eZD8I2YYu1Wkk9vF+U
zMH8WEV3OdTT0l8h1xDjg4S+mdbw5GAt1we2mTFN3gm3qQruC2Exj3OIQ/Zr
yfXMDzD3yMHQAFjWaKbJFPGKrK2Ct8NO5ZGuITDjsIfpapipH8vJJvlxTjlJ
wm/pmuqVME+p7csTxKPlOcd5COeXjFimwc+8thwqhKe6+HbrYUZNV0kCTEUr
FUwhfwWjanlbWHi7d00ZnHi2uakN8fD0cg5EkPO19vB5X1KPvNZUW/i+Gses
Bfn2y4VwFOCBPmacHfyis8H0symLcqNlqvC1sP4SgVc37DE3ODuqifwcHM71
wGf2VhzcDtvktP06Cn/aumX3HQ2M30U7qYL5Lh3az7aA2XUhR5jkfOa7jt9V
x/vovZEouElGKOcNS8vLT5PzeLt8dF4dDqoJ1ZqGdYK6Bj8vRfxDb8odkO+i
mh0/9sDiSROteJK/4yOpIdhCR+H5bVh9VD9GHuO7DRRuvocHuncWr4OF3Q8U
ZFFfe2faxXiYl//1iy4s5b3Q5xGcYHmctQK+GxY+JkPi95Y/ogFH14lMXOGG
P5Ul5zHfr8lJ+okwdyzO+jXszFU5dxUOWjmglAu377m0oAJWNxDYBMCu13/6
phj203jdrg0P1WpMpZN6/MGOa0F+Kc01IjdYrKxSlw6XnchaP4V4GKk/em2G
F9gt+yUN5up6/Eb2Z+yD5EopUq906ZwO1Pubt7nhh5G/37GTDyrhU94ylc+X
oP3AhoZLcND1xOGVMLe2tVwAc6d3Op5Sw/qd1deuw+oH5BoHFmN8neDTI3i2
MWzDPtgmN0xmCK5Lybr/RhXPx/ytKnJe81LMdkTBdBlv2+/JefSymzKCLeSK
zAXkfra7uGNMBef7+FHZt3C8UZegHRb3UctWIH83tbDSDpgvTn3tB5e96pQa
h/sljHszyX3rI9fBwHwxLezQB3C8ieaxfXBCcv0qMVwl8tv4G7G99o1euLAp
k/0eVr/6lNEF95dGb1+J+PPFRqWN8ODSGs9AuN/31tZrsPS9qeYLsPrixNIo
cr6KPvfdgPlDY2x7eHabWnsBzGt1VibnKSjPUOsnMl4xnFsCv9p/OTwAlvY/
TQuCjY/YSqrB7gYOSfrk/GlbHS0i8YuDA3tRv4SHtldXw9LxtO5CeH2EQ3Ee
8i2RPShMhjlrujMXwVPvWCXBsIxIRpGjjPWlvPf4wE871lhV0VlU5VOXxRx4
rINnrQuz+UpJ0XDYnO+MshKe92pGRDY81LyhnqaIdU8c+PsJzDdzFhsqYP4f
uHslEd9uVxfpKHk8Xz/HZW2AT7wsL5iWY1Fep2NXnIIvu+3Zdwv2e/5ybyNx
u1NrLpzw9UymDOpj7pW6tBrmZhkGkPvnnGiWJ4v5+j+UVxyCk3cePR4Jl5iV
qJ2HLaJ9t0zCYve4G0K45Q1tSzLi4bs0huTBJZ5PjemId8qbv4zsv1jgnHsO
HuapBpP9sfj9otEYzH/57W0X2DJnU5w18uXanFytStaz6Vm7FZ6aVb78B+JN
vxdvbwnTfbTdyXmyFMxJvMX4fivPOpKv6O66ln1w5SfT0i+oT0xMT0Mu4mkI
CC28C1tErCmrRLzDtCmlRDhJL1t8DflWuqhU7YC9jDt/iZFFOyduoSW5/x7w
Bq1kcF98yIhnwBJJ8/WDNMTTMTWiC0e1Jv7n6iI8J8M9nmZk/r5UryMLsa5c
4TMXeMBQ03+vFPpXX74ZCSfPcvYHSaL/ue95N+HXgbL6lyXwPN+PPvORtP+z
eUwFFiZa2Jsin0/L16ZVLMBzKkqX4pL7dX3/nQuwaKLHthRmcwKzBHBMtM72
IVhWsP6kGGZ/tVfRRf38JupPr8V8U5rHajbAaQmN1aXw8F8v2PtIvb/74bU9
4vEb2e7CgZs99gqewP1Z6g6k/Yi/c9U2xO+XXBhCxlu8MnR7CPOFc+Pkvlvp
lBJPR758bZeaj1j/3dl7mrYLyX1Y7VMAu2/TVreE6dVWvfj9QBVp5PVNYLz6
M+Fjct8URZgVp8DGiTdK2pB/fpdGZBfWZ8xfYWfAmm5v5mgwPYwntRsW7grI
X4j4pelXZvThmjM18j0Ufg+4jVd8McH4a8UGm+eZlEjDQrcPNk0OeFTxhUnZ
6Ox3eQNvbI1NM5xhUl48pVTSvmZTuXTRJJPyM3Te8BVOy5g4GzjOpBjvGSuW
k3jmp1v9/8F41cUKu+A15x8rlY8wqUppq/U8ch6fXugJGmZS1Kmx1Jcw44nu
RaXPaE/z81Aj+3XHMMTgE5MSmlyf9iT7lZ7SJgezjUM7foL9uFtjS+C08pWC
JuK26ckJjHcvO7ZtAs7c18x6g/nZ2psvkPOQXlHf/gHr8/ZUVemR70Mt+nFJ
xCcdZTW9DObmCPcvHWNSxnfGbRThctUCVznk06CWueVvMr/iz+kN8LCS3rMq
OLnqhL/9BJOK0ShSSIG32AQPeMDdDi6jjuT+f2gnQSOuUHs1i/xqrzq1bMP4
GGaUyy1YHJm90gTrpcXULgwn3zfzk9zcUZg/k2EKO1iYh91H/MZ501bjqO8w
M9Zj6d+of1pf2ROY/fGYj1M/k+p/3GNZAAc9Huhf1cuk+Kf19QVwd6isWLED
9X/4WkcIc1c7iWZeMil1j8HBUjghiZu5qJpJiY2WnPjD5P//dyQIH1DS5IMp
61+RQJfE
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], \
{5.1542307644825485`, 13.562492355174516`}, {0, 1}], LineBox[CompressedData["
1:eJwl1ws41OkXB/CfokisdWuIktAgGlGmsma0rWuXKaXptiZd6E65TGKbSqXY
TLdtVGpKaWxlpyijqMG6Z5u0QlnNmjAbZVKYqPy/7/P3PD2eT+/7O+855z0/
w5SIXcs2jaIoSol/5DulHMHXVDalJt/d2BRtTEuCEhZ8urfnISwZoazvwzw9
I+ckOL2EXnsATm3Yy10AR7+LbFoAaxwL/7OAdUes3lOwMnFmeN90PL+xTk9m
z6ZEyx9VvIRtsoZCtsOCa3Nzn8J/F54abwdL224bP4P5ObaZjVPw3Bnj2Db4
0/YHMzJgoepx4wAsLeloXwxzth8uouG86hTrQ5awyTa+73zYvHNeWpcd9scu
9YiB1/ZdMCmHuadcHbJhnwUhhbmw/vDj1Eb4yZYZNy/ASp2ROj13fN/ickkE
s91bYzxgihZZdxmWrp3CCIPpMTkjf5D4a6aN3U0c7pVTBYvnb1l5iOyfqG15
A9uVGnxMhZNc1Hv1kJ94668uB2FejB57GqwoY/+9EzY52tESAKcuGFq0BK6+
Wq6zCdbscdzrQOLdMjiXBDMlfnd6ka/scuC9dBLPZF7JXdhhtqT6NBz4eV7x
LthEq7kkJJ5bYewMiw7xYw+Sfr7T/eFf9M/HaeOXKBJ/ueDVeZgRqN6wgPSP
Yu7iwhuXr+dYkP5Se5bZwElJq5tbUQ9vOOyC2hX7z9cnXISZv4XrPYb1HSZS
YaSfhZI2MaxNiUwxJG5u/HwClgRvPPLLZDIv7tePwc2vGTZdk9DnOctuCGFx
4dn1K2Cm3hW/bGKvw9J6W/R1XRBTDvOijw6EwtXizNcdsOL2suPdNoh/ztDd
FPnJhaVjz8H8ygUN82Fx2U1PLkxjTFoYBytWKtQzYNnwtbE3YCrqsvEkWLlN
w28k64U/nZ8CSwVi728wp+J9JhMW81tpk9E/TnJ5EA8OzJb5z4a1o8o9zsKp
ZmOXk3njiz1DnsPMmJIQYu002nRL5CtqDXo4C1Y4N85eBUuSIgttYLWn7pNz
MP+G76tBnMe+vCaJ1MuxeOlXDWs3C5kDMC3POzEDplm6JRujP1ROXPwS8j75
pPDNSL9+fhY/Dmb+6OA8GtZcWv2hjNyP16E9rbZkPtcn7IPpjYNul0k//yzO
nA0z3X+xXwhHdVvWD7igrn7PMR3In+MSteQRLMlQb94Oi+7Iv8uA2ZVHMzom
Yj5UmzK3woJFxzYuh1NdHEcvgxnXO+aUWKNf54Wqn2C7N2HXHGBG0rVgf5hq
aQvIsEI+h61LyX4qOPe6Diww3L2IxKM9jezeT0MeFfG/pMHq616VRrBk7d+J
BWR/vGpu3gTsjzS2UJF1++2HN8DVw7oqc1Jfz1/UDFj5YCw3gNR3JI72PazN
WadMgGWb8n40gCVbaF/JfPFTdhtawqKLY8JrYJGOt/UsWOh9dYTMF1U+eQWJ
L7N6P1sLC30Pfb1Inq8Jq/8Gp+qEtfwDm2Q26n8m+yfV8qYg32pBdUEn2X9i
dm8ELHNycaiGAyd692fRyHti6n4JVg51Of8F04OzHbaSeE+ci3phzb2aSjdY
s3ho+wiJFxvh1o16o8ymKoZgrY6o4Bqpf3pVoBKWN0W2r4WZB6XOf8Bs3Y0h
luS+Fl4pioT5ihfxz50x14zVDEOYGxRX/husLonNvYD8m49ULYqAlZPFRjYw
23VNizcs/jrrY4Yl3rsD90tocOC0fQnDFrhP+5dNenDziLvpBljz9J1ghI64
9OBNdebow7rk42RdaDowbg4cuGQnewJM83i5QWqGOswzoz1h+e9NkbNgdnZ+
AteZfM547KszRdxundAUuPpyX1AcLFOOv19A8vM0u+kFC3bGTe2CGYrs9HEw
3bVprBXq5fr9+d/A94i7VNQYQPrj9apWC4vyE+1i4OZ6fY4x9lfr/ll4CpZe
2FBB4nG9VCW/u5A6HeVRsPz26eJCWNj+6485sDboeoGMzOfq7m41rCx+RL9N
5r33i+105M9IzrE/S/rfdJO5zYzcS8tMcp4wQq/qClkfitk6n7wvz1ZJ62D6
7Zwl42BFOn9jB6w5GVpfi3q4Q66jesh6YeCkI7Ds0/L4f8zIzyHve76kn3Er
Tslgfbq//SD6rZU10ZLJ/lLe4B2YszBS7krWVftuxcDNyY9dK0k/vbtTmHDq
tynNi2HxgQ/x+rBJbOyoGvQnkC20VE1DPw4GpDBhfWZSSg1M7fD7/YoJ7ovW
u74Yjnp7W88AprQtNQ/Jeuqy+E5jPOdVtqQKtlMNimuMUI/+Ct02mG1+bLB8
PN6XcMH+b7Bg8Ft3qyGek2f3OuH86PK869Ywe+IstxV08vn6+tGBcfh/d72G
I3TyOWlrZgGnjqOHFhE3bRU3GiC/ti02b2G75rSkMpgTO+2WJZkn/3dtzbCg
dF2eD6xwz/c1x/PN4U8sVhOX3Tq0E+aUTpy5g8xbiG2gEhbZ0cpiyfNZZ+jr
kQ8zw0cnGo6emThJDadafvnjZ+LExH+3oR7ZmV2WfrBG/jBEBWsTQnTI+xGd
dKX4J9QvsvctekPuw+lTXBqsMDbvl5D8Jft7b8NsunfVZpjRL7aVwHQN56gd
LOiquhFP+nePKmpGvxj3Lo+nwdqK+5qTsHJ62N10nCdPbSlcDMtVnPYXyE+x
aH3M97CmM1k6hHqoM6bsVic8Pzf46Vf0Q87c0SuF5Z1Wy7r0cU5tkFIIswtf
8h6PxbweGvicBIsNel6fGIO5+DdWHEfWHc1NwvUwd6F+0kSYF3XSZY4u+vGw
YX+aE+nf/q+Oo7GeUNqZQ85bUZ7uNgrzUBQYXAdLs1Iehumgn5/O5w3A0cXP
dW5QqMNw8RMn5KsYvuZhD1P1g/RVZF5kHhfOjLAo/fsajzQyT0FZnb6wfIwN
9wFxfmgBC1YYHXN9Q/ph5F6fAWu3lMeNIfMQNsIxRTzhD/eXTibzdLLyZz5M
+82O7Ub6X97j0gfLwx95zyAOXTAcj/wYWQlSB1hedv3SV5JvsG2uESz0cVYk
oR6OUfyNtziPl+d9oRtmzjp/l7wP4qvziv1Qv+jFq4DDJD9a2+cE4ry7wf7k
fuIM96TCUZ6rNDrk/YqIa9sJc4sHbjxAPxQ322V0WN6zktpD+tuwknePxP/C
SXeD7RQfrC1h9eePlT2O8Hi6wWLkR5tQpb0LU+EGuhGoR82xmXwQVnJLn0m/
sfD785kXa2BB5TtJzBcWJciUBfmR/Z75VyYMsSjOsXUOnjD7qm9fwSCLsquM
TPcgdrJ1X9vPohjmDDsfsn84K3nyRxYlTLs6tJScHyRv+e4D+l+mLo4h8e+8
yeW/x/2M9s7KJHYp0kR0syjacZvEKhIvZdreD2oWxTM+8kFL4iXW+jO64IG9
ia5kvoLM30/tZFGBU/mCtWSePPojajqQf/6K/ceIcxusLLEufRs5icyvICVq
rxauHmwO+os8r6oQcRGfPt8iqB2m+jf4Wb1l4ffv8GdvyX7fBBerHhYlOV5q
1kX2h3jyvJCv9HR1xQvSX2Gvyl7Doij/HAdyH3bRDK456tOEZ/WdJPdRO2PG
P6Tes4qd4ST+QHbpjj4WpZbXBziQ/XPuVMlgts/mY+2kP6Fr1PmwZL7oyEVi
yWJnLiw6lyBfDvNOBMy9inicuQ51RrB8qFN0CudH9/V51DrAN9ss1yA/Tsin
Nekwddqvox/1KPNG7Q6DBaaL/jNE/zSqXQEuZH0916ConUUx+xb5G5B163LG
vFbcn4DO+4S/u6jchg9FDVhXPB/dQzzVeF90GYuS/fqYpiEmX9dKKO3//+77
H7HAGTU=
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], {5.088381073024935, 11.718437853950132`}, \
{-1, 1}], LineBox[CompressedData["
1:eJwt1ws8VHkbB/CTVHLJuCxjikYhrTDCFpETSRSbWy4pQ2rdky3hJaObqGXW
61Y7MWX1utQ0xEah6a5SplaliEnpqm1EqGT393/f1+eT8/mac/7P8/z+5zgy
DN/ms0WBoqh2/CNHajr5ZkRT//1i0NShqAXZjfNpSvj1zbGf1Gnq+a2j/dEw
5bxAQRF+dtzrnh4sY8617J5FU5qj51e1zaMp9srbC+Ww2OeAfQpMXdty3xnn
ZxT17bWEhTEzXnbAWRm7698b0pT0K79gNer1epuPNcA8xfU9rXBDZ95wNizZ
+ddyVw2aco8oboyG+eoeoQ/gpv80iwJhSpgdFqlJU798rM33hYUPPFeOwTk9
95ODyXofBpf9S4umLpTPfxxDPr//Tvkv2I3nUr6f1B+09/XQpqkbNZ5BFbC4
4bueQ/CCXg9OG8yoHGs7Axc9OmzzjvhCd2s9/PMAK0EF84hvP/t0FO4WLtMw
gdeF7vghAmbeNslbCnNval3WgncYK9ymYX7aiKkI9W1c08wcYc6d4ll28K9L
S2sXwdKxzbLz6F8wcHWaOslLMJppD9d0M9NekDzaE4dbMX/KgDtDRPoNCB71
go8suRYYB69bW9ggR35MtmqiEek30XBnFWx+bsnzB2yakv+d4ZkOP+Wop++D
hYqho/FwZORGW2tYmmVbngGHNF+nbs3FeoVlwyKYE9XsZwdzP7uOf4Erjy3a
2mSAn4s01nJRfzG3ItjLgOxXOP0E5t2qdfuqj/thqxJrM/qfzKlTvgzznw5s
GIGTmo9wyokL42ZnYf7Fodf+OgZzvcXB2sir2t/PXAzL92/ZXAgrq8WfeAhL
HnoaKH5HU/v8mN9UUY+tvDt8A2xwIVaf1Of+lrO0GF5v6B1QAK/7unBWA5w8
7NX8GBZKTj86C4/6tEUyMQ/fv0y/AA5mlkk9YHpqx6cAmBqOnBELi/MtXyvA
Kzv3U8mwPKNPcgT92M95dCUGTihv8J4HfzkaVeBKrpemm5RjnvhW1oxpsMTn
ouV8WBSioVSD+lRReGQV5o+vunTXjuTlfDfVAa6bqXupHvMJw2dH9yO/3ZS9
G5vkoXrbRQi361rlZ85B3nmfn6bA4wlugb2zMd/2yIrt8IRPVY4DzPd7m35Q
gzyXlNIJFs53aP+jhVzvMfmjNsy3/lNLHfXGmyTLSvRwvXrQ22TYJrC61Qpm
3Ff1HoUfPhiqe87E/Btfh2aif75tRv0ZmFZnpZP7mV02oVJEPvcar6uA08y+
rymE5cfLlK2QV/X6cvtTMMe77KUI1gwLW/qQ2I4ZpKdDUz1LYo3VUU/+ZjAh
BrZX2yrxhjk1OqnH4UmtMXfSH3vzE/MmOP9iaUcPOX95tLQW5izXT9HDPBJh
ov1h+IeYA52rYelMnbse5Py5hvpbiW1fBQyhfoljSkoczH2x4+k+cn9Yp5uH
kHxK325QgR1qWK0cst4UvVTy/Jsk5yi+Q70E+x4rVXI/HvuRcximZG47C5DH
iWV3z+nA/I4fOr+Hq0UrluZiPkZrl8kD5Df9Xu2qMV2sn1W0ogQ20VpjEwAL
Ly36Yxcc+cTw5ln0uc6EU7ETnjft1bgmzMgMOpEPK90IL0xFX7SFwuk7MHdX
pYIcffCnWDsaod51fp98F0x7/xaRD9/1sp2rA/OSLk8h++NXpWl2Bz+XCLoU
hGR/rDTjS2Gph6R+MdZtL0sYzCbWXMO6Cpt2dfvlwmJnOzdP0kfZcY0qmNO6
4fwN+P5QSPRDWH7Ouc4cczzxjq7XwLpiS7PkVHg8oibPn9S3CzlWDb9I27NI
AEvrHyxohreu3lXcR843Vjklgm0qTk1noS7v8wafvfCJdUuNV8GSiSltDvDk
zYOBoTB72G5OH+rrTPOdCIP5STGHtsGRPhO/roGF/L/tR3BU4uo+I+txB0Pe
/IyjuHvtDCnJ6xOr6BN5Psv6kmJJP/f6TXg4ntrT+/wj5uGWCdVYZL+XjLF/
ghOKikbacHTmnH1Pcqdcinf8Ct+vrGhcBDOmmD5OggPLzwRm47mS3ij+lArP
cx2WvGGQfbJTIznLL/uf9YXpmLGOXtjIUPFdCd57MllsjD2p75DGrMV7krvi
5JlTsGLB/Cljauh7bZUrh+z7YNrmbTAvc3KkFU5LaomdAwuv1454Y/7GnAzB
N1WSf41LP1xgEXBbHZ9TAc+mRiG/EUe5rye5/u2lP/vgNB1BiAimhSsNV+A+
7fmY67gQ9RPitiUehAUBJZN1ML1dUFYH//7voQEn9MtIODTRAh/s6mNchelS
0/hqWGGjzQwW5qMi38ekwLkCg/PO5D3hcHPQHJ4oMD4bQFyYQ7ej/utRpf3+
MNuq9VEQbKTz4YMdyedk70QP+l8dUTs5FZZJ4vaEwCtVzppEop60xDC6D/PL
WtZfLSZ/V1RWZcfClVdG/xBgHo70jJUy2f8GmXIG8hD6C7pbkGfkApe81SrY
B6O1/eR57srZuV5RGdfrBbuT56Y59pZxqxLqB/cWZsKyo849mTOwnmv5+Wry
vFh8eBQ8HfP33GMOwRMB/WG+05CnVLXQG/UEnnamOxSxvvqrizdIfYnGnStT
kUfMSXUv9E+3mfFXwQxRmGkvrC0T6E4qoL/Cuxbbyfwt4cFvYJ56tiGFvIxe
vT2tiPP5Zu42+2DKseeTOyxzjDAdI/kLaofFsNBar9QXv3dKGLp1lqjPYB8I
LoRHCvKnX4DFLY27m2AjW9k8N/TL3692uhUetym1aINllmOsCpjHS322GPPx
PN1y4+HOk6o66cSOs1cZwGk9Lz1LYTb/iLQR9dt/MWXzYdnBig4X2KZ3+LAX
zLc5fOYa5uEtz7LqwvqU7RZfV1h1r2+wBcmr7KcLN8nvuVr2Rz/Sn/vlqiA4
LZ71ow/mkacf9fiK/CKuBcoskAfft+Y5eT+/0PhOMkJh/y8K8rLI+5vlxN30
txMl/MxXSoG7+g/P6pxwwv0j3JcNcza7W4R/ccLfg9onG+FxfoTR3HEnit/9
PU8R9drePB42GHWiONam4ijy/HxQs0sccaKk7gnZz2FqIs3beNiJYjyJ8Ikl
84y3nHf6iOuXD+d+g9uSlWqvDDlRCR8V/fmYv+0GR1MEC5dkndRHXq/f5x4Y
hWn+zvZSkq/aufd5uF52y1WkhvfKa4OkmVFYn253MdwCyxZu3BSH+vyNnWbH
iUPjlh/45ESJ+63tLsLiU/7y39CvuE19WStckki/KBpDvwWu50ph9qbMl1zM
J27QvhQOt+Xn0S9h+aHZvaTe6rrSJp3PWH9od9fv6Mf00J0o8jn3KJ9nTt5r
7hb+XrAkY26YCPMw1a5dX4v1GQ5roi1g/ouurQPoh/psUVyP+RP0E1QMSb8T
X/PdYKnqRlc1zMfZPT/8PfKTzd8UuusD1u/8olUD8zq+ae95i37bH/L2wZKV
qUGRA8jj0rhuGiydt7chSIY85Y8v5pPnZcWks/Ij5GOXeIu8b6hsjazgdidq
3UytSSbZD3sPj8omzDsYXrdH9///TznY8r8jk/4H+I+J5g==
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], {4.696019990535815, 4.0848999526790735`}, \
{0, 1}], LineBox[CompressedData["
1:eJwd1ws0lOkfB/DHXaQmIhsyxe6q0LTdlNa865JYG3LaTVKjaCmF0j9lt6bQ
ynVQbkmzua5uk4jcGqUoKSnl0mWqpXEfElLY7/Ofc5w5n/M+7+/2vPO8x/wd
ARt95Akhd/BHv4lsCh9thnyl30YMkS2qt1PXYYjAyzOkGCZOz99O4jrrbJPj
bpjV6/pjG8xZ+LCODfNqOXfOweLY8aXtC3Bf3Y12R9j/xe6MszCv/8Sr97MZ
4u3t/nonzHK7PrwHbnxacGQF7PJhsdwHLYZsHm0TzIKZol173eHsyulPxuYj
z4OwqVpNXNcvC+6Bhaoxuavg/BLXtV2wYKX8usuzGCKJag8ahMnVgeNmcKRj
pEwe8dgZp2MrWAxp6Wzj6NP4J2onPeGYrO7NlrS+0Vd5s2HTUpbLNupyn481
M1HnfE7zCVgcz3otgP+oKkjOhSXRXMVY2MVI6edamKgPuJfA/h7L7r+j64sW
DishXuS5GMNRWNQwHmpN4zvsz5fHvBjXktxYWDb+SE8RFhTOs3wP81lFGeO0
vmSbBCvUz9GKuN1B8/Uo1qTDm685n7tL5+uj2TEEr5+5oDid5stxW2qNeTi5
71LcResxjbAJhwU/H+szgYW9Muti2LdJy7SDzlPkOr0JrinPuZ1B52Vj7tYC
r/13ZYcrnWeMQ9k9+I9Lb94qw+z9Ru8yYNNgZ9UqNvoxlfl7wPxoy4TDsKyx
fVQBPv28+qQlLKh+Oy0N9Ym2lV1Rgpns/jED2EWucqDQEPU82H0vGf2yM/Wb
A2Cea+6wCpy665KlDcyvf3G5dwZDQta47TCD2aKAigYNxKlblEzN8/e7XzEd
/a8aWG1NrfDb8G117Jf1ohe+sPiCzu9SNTwf9TssMmGJg87UMjhVfU30axq/
zlvx4jSGqGZF1GjS+iySB11g0Yj5xlWwcO/jDd/DNX9lZWyB2Qf4f5tNo8+n
x/Yj1CVHgrxgjupvoadhIjXdWQUHxl3QyIPFRv0+Vsg3prUrTETjLdk73Aqb
HE0vuEqvN6d4R6JesWNlVRaNt7DAhkE/L1PHAmPoep3TZaMwz8Ovxw+WSKJG
stE/u533eC29vicgwQrzMem8bq5M8xde/1QOr1erJPF0XuvSbmrjeeRt7Jqv
ROfjO9lnB+vWT3uzfx7633HAcz1MVgZefWkAS8dK58KqHabL7WH2j9GiCsRL
TWtXLtHHfLqDR5bAHO+qSA4sSbMzC0E9qXzzohI93K9pVp2Oek0iNw45U6ds
upKJ/nQ/to98mYt6TbJWxqD/wMZfsiphSWrfKX/My3fT5NAZmGfi4e2giudj
Ik8WTtd3d+WaqiCf2ufiU3T96wP9hsqo98W3By9Qbz5lZqoEN8yJeUjXv9/2
i7si1if6CxWRX2Irbr2sgHi/6t1ZR+uZDC83h4U9tulxMBPkq/hGniHSj0Hx
L/To7yXg0S1YnOZGDGh/tss4jXBdLQncok/rSVqngfulQ9k3omGet5fbfli0
MtfsMvXErYExmDd/3/Ny6qWLXdJQj+T86iPFNJ6xfYqjEj1PM6tTabw1s5Yr
oB8LzYfWPnS+wX/Z34THZIMRevR6S5zGTvRv0Z02VUHrm1dlOwrLxMvlnGCe
T6VgL+bFUw4V1qN//qDx0yo4tSMvmUvnWbDwUAcsDuvSvfQN9tNu6NIrWNBb
cFEbZsoNEnPg0uOJQ3xd5Cust/sR9p297NjQHFy/4PohF/nWy0KF+2Dx7wXH
OlGfy8be5Z/xXhD/KXguB9elBx0/A5Mt6isI+uP/mzNjHXXzxJxuzCNVKomd
DvOP9zXXYZ7C26tru/BeYCfftsyVQ7wvFgmvYOb6eeMYgvlOJjZ1wnx/hwWq
U1zSuLUlVoHm0+wJN5vgEuGc8yMcmDHaU5byhUtcUmzi99D4JI/jNs4lIQcV
N1yl61eojPh+5pJSh/7aUVpPlKP76zEuEcx8vJ2h/XkYXyuCJTOsDoXD/LOK
G7rgSL+r529RzxUmH8T9Iq2o+30w+VNtgzPib/ZyClDHvMizw8QP+UOWfyrT
pr6xNLHwK5eInxhnq8H8a/nd30xyCZNUrNRF8816XBSNfuosPvwjgoXBVjpH
0C8r/KzTDpgdxYwZYh7k25ikKdTL2+nkewUudXz4NQpmm3rZG9Dn0865RoU6
f/CuD6zaG1N9GPMi5Y6XTsB8P5FVB96rkunqiYGwyTP5+g2wOMlT3hyWPDqo
Vo73Km/LwehyxDexdA03h/mVOaV6sMV+1oHLmvR53zS6EfWFkIAUS3rOL3jz
+BHtZ2kY6yXOcbFt6Opq9Ksqi1uTQO0tSYzDfAKXSM9shZlfLRscMM/ABwol
9D1GDH5IVx7B/JKcmFUwf3FKestHLhnrVum0pes7n8Y2DXJJKnveHz403p3C
KCUZnLdMI5neT9KTSB/2S8tgvIlaYq95rhv7qb6drUvri6+ZNyjFfiezlb2o
I9/lKcF1YRXT/oHJGo3z7R+4hO0ylthDr3va9e/BdfGDZhtj2v+V3+/kdaFe
8vk7Z5gcPW92uAf99Re3+lJrHVWuQf7ANBXRPurck3HLUF++bKhxGzVjWZ+J
+sV6Jo4WsLjm0RoW+st/N2vuF+RjrEv1g4e5xGShdEk+LN7myZR84pL1x2q8
fqIOUn5Si/n4lsx3v0/70/TRSh7F825x5n821EcbpmvT53Og7/J1vCcZQ46G
JexybcXWeTCZ0NGRh1nDOT+wcI6LTbbP9cX9Lj4BM3pwTovvqcwOQHzBTfuf
nuOcFqeaD+gjf2D8TK02nNP83G9+DkW9YiG5N4FzWmzYq5WCfnhyYQ72MN8x
bmiqH/d7zv5ShnOb6OrGx2P+7HTJIQ/qdx6bFDrxe8n5zF9ILX1Zc+It9qti
00cj6omBar829DMifWpPnSs0/rMJ8fM3BwioF0UcUaxF/sqR6FHquubV926g
/kuyiweRnwi/Sz+QhPuTBrfKo14i3uHZl3GLNO6RJpymliTaJBTcIqJnqxSM
0B/Jb/37Asyzd03IpmZnVO3LvEWErtk5LA26X2qH86K4hES/jN1OfToz624h
8pXnNERR+/JaO26jfp/EnbH/t+p3Fxu4RBbnMLmT+r32obhn6HdtraEG9cMV
hs7oT7Rvtdkpmi9cXFX3BvO92bibzpd011b+9g7eK3qvSOc9TfvBtn/h0a9W
M2h/EekL2juwfw8eh03gHCbmV78vwjzZxbGP2nAOk+1Bci1wo33p+BX6HvQN
8VwLc/wbbMPoubsg4eVrxOMEG0h5eO+Q6E+L7yIfe+7FChecwySvI+Ez6iHj
Jq1bcA6QGvJ+eSv6zfm69iQ9d6Sh8fufoD/btogW/O4JZ8a9zmrUc4JVtIma
fgSVhE//P5ji/gdLiX+h
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], {3.4224649825090196`, 5.726680324525049}, \
{-1, 1}], LineBox[CompressedData["
1:eJwd1gs01GkfB/C/S9OUoXG3GUx2RGveUJScZEopoYtVTduI7cJ0XqLXpCFq
3qU9oyjFumW9bLbjUuvyzmZ6KRO2Rqs1WYpcGpfCIFJtk27v99k5x5nz8czz
PL/f7/9c/ksOxAQf1qUoKhd/5JvSfsbnSx7FJGDyqPS83S9r4ZkH0ZMc4px9
6iMw/5XPw0Nw7OKaOkfye+7LXbdh0RO2wbQ9j8pzaHi63JhHsVrd3t6Bi5n7
a2thtV8+7SdYaWhqt8kE/bwe2WaS9o6kRjVM36ARpcNbxjJunjZFf1rj2Rx4
R7L9ApYZj1obwfe4DrPzyn6vgqWnz1T+AatH7M56mPMoWcKeQi1Mlf2RXAZr
eb6BTohPzQ9s07fgUdnHT9d9A2f+Ol23Gd5h8qIuHeYJeE0x8GS/jFsPS1rr
byfBpfJLS4ZhdqZuF2nn79Z7rcNB3gPB/wqAZTX7ReawcpbmbAqX2YTosODi
qpyM3zF/WVdkoRmcuXnneAKc3Xjsr08Yb8yzyIADs5Ilcb1wbK/B23bko343
7VAJhw825qbAY1YvFTHwFuFn8Ua4MNc5xRmmT8SftoSdYr9fPIh8M22qKik4
3Tbhuyy4e9uvo7pw32z6wCZYG3BsyA4OLH8W/H4J8n4QP7eH1E98p+8GnFkY
uqaCOGyQexJmnukNM0N8I5W1Z7aS9rn5ulkwO2e4aCnseuNw7RLk6ylXXmDC
sRHZa+phwaErd+iwZNnU472WPIpRc1xjBFe3t2e8hen8n5n2cNmwSeR5K8T7
g08uj8wnGPzN6gvU95xvsJCMf5xffhGml74qyYHppkcnX8PpjEdZSjJe/IJE
n8VYb5qW+SQftrMiLgZO11v7+CvkO2Oy0z8VTpK++RBC1qN3XeMpWKEz8r94
sn44SaPhsMT6WkMGrOI26y6H+cun3PNguTREoMF8eTfHXmXD1Ypy48twW0hU
fAosPVjSsQkOebxh8iCp73adghnkE67q9VhN1mOp/4ESmF7v1/MJ8cn10p6E
whu9GdMNsNhp2NYZ7hvqmi+CrToDxYawkuvCcIS33P15KR0eob+x7GGjXtGP
V9vAnlyfrzNgeej76CBY8N9f7vvBvMR2jzw41s3cnw4rUmeuv4cVK64Ly+ww
fpjktgjxsgdPD/DhWKER7zOs1RSmcGBP626XHOQv7PjyEgNWvW5/sdIa/brG
B5iwnLNT2gHL7fN7XUh/A9rHf7LIOvKtiIAzzb4+Pwer1HHra2DXfRdpCTbI
0zth+zzEo16UMTcE8/0PpqyCrWRMHQ9bjONb7nAEpiqa+6OI074zLIAljA0/
psECr+eOd0l+UsOSc/DkkRVFGphZf6dABCvse9/po148mTJ+M9zWH+5rCitc
L6+mwzOpC6zNSP0tvmmux/ylUof7NLjYyOtqJLzWjR44gfFcz9xtM4bL0jZs
a4KL6cI1CuTDnLNxIvUubu6Si+HMlDutQbCywzGfB2s9uq7QYGGOXSQLFl+o
ND6O/IWJU7JFsNpjpWkP4qi+snGKtI99SPvRB1ZHzLpvIvXaxxn6BfNaPREL
pHDsZ0UpF6bzDgyNkPGdx2dv4dtJ6Erj4//dkQdHIsg8f77T9MOq/fLIr1ik
P6U8RuZhB9ssJM/lo5pjhDj4LJovDZ6RCWyvw04nDWpsYEWbO5+DuMMtU8eC
SLt0QhINz0yqV2TBZbMTu6vIuivPUY3BnIXjKaOwk98jd3/Myz3EdCZ11Q7v
Dfg7fpc4yh12yn/cYkyeW+TOvX7wTBI/Ihru7El0DyD7OuD8nnoS55zAy5c8
l9ltUX/BvC9uyVzgsdqCw4sRp2j2+1MmZF9o3y8l61Omf3JyisR75ad+Yzgv
frCqBe6+sd1ymDznUzWyfBJv7st7ebA24tGHGJh+tMKbrDN1QVjiVtJ/9JFe
A+JV6p/QOMNik3/fcIM5R6ZrLWDVzaPKy8j3gzmrhQFLda6so2BpcrRkEZyn
qjp0GPugc2RepR1Zh17nkx9i36iuLdnv/Xc9B0VbYcG6tgVCWOsmye7CPkuy
mE0sIvu29fX6E7CSeUIzQNZ1IffeClhFyzIl+766yHrZQnhm5b4d5FyQB+wy
+oR9XMowrm8m9Yzov2GIdvdVWcEmOGfEa3PnrYb1PziwQ8m5dqqvIB7OnqgT
lMDh3ZOf7sEt0w+y+mD6U7snDuRc/BTWxCD3zDNzz7Mw76p9rCtMORZ0vID7
dKgmP3JPcaXhQchXGNSdup3ck+s6R/4Dq3fpuQaQezKw650aviaNe+pF+q+x
NWegXvqRLZvYsJh5SUHWW7F0OOcj5ucLnv9mCkdxwqO6YInLsa1T6C992FBa
Qe75h896KmD9yVAfCTzmlhC2DWbV9azaS/L7R4thL+Jz707Z5wl77r60ahd8
zdDAlU3O3fEfzJqQr8jzeSupT+aDijRH2MrUts6YnNuioc5zqCe3/JbGBo5d
MOf7BvdS2zx1NTm3Ve4WI0dg16aXFfthxbflHtO41wL/3NV5kbxXPF8/mgYf
2rzyQju5Z/uuFnjDctV9uTmpB7WsjgFHWYa0fAsXyyICtLg3t1xg9laT9yjy
fgUzyPsVh/d/Ft1VFA==
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], {7.1148, 6.674799999999999}, {1, 1}], 
       LineBox[CompressedData["
1:eJxFlws0Vdkfx28Yo6ISSV3EPWdzOF6ZPDLi9y/JqxgSMoyJPJJCQqUiCiND
8rh5FJVielAUtYgaj5skeY2KRJ5DTWmiP9F/3/Vv9ty17jrrs/Y9d+/9e35/
Kjv2OuwU4XA4PfgrfP7/Q0O4uvC5BDiF54P1WyiIVTPMywzDLCFqCL9R8PBE
mbfRZ+H6rGNdMgWtL89UoiRp4HBmIv6MpmB71qbbCC0FjsDD0gpza8KmgeJq
zMqvr40kUbCvcrpolYsMcFyaT5lcpiBM1/X+8ChmgfMY20TB34/2VdUGyeL1
p28VZihYOHzNZXwEs59ri7geDXmWPtGGdsuAEzHqFL+HhnrK2WFjPuYgI1OR
6zT8yG0JSe/BvCTQuewNDSYTGXf5onJ4vUukWwPBN1lhP5fLYG5Z3da6A4GY
6IUw28WYR269Z08jqPsk0pbxCb9foiP25A6Cfc/EtPNaMb+74r+4A8Fn63Z/
rnA/I9Ome68R1JuOnvzeD7OuqLHxIAKbky06xzUxVxisCX6Gf29i7ZUzgc8f
wfMZqkFgVP9wrXQ1Zv70TFEOgsLKfdpaGZg9vbo270HgZq6Q9fshzPJb2HZD
BB/NVDZ+uw9ziSp7ZoYGq2XR4z5HMNdsHDaqpGFeQfOGkHOYX/U7hUTSoC/e
cE7Qibkw5qWEGQ0Xo4IXLKXxeQorbxaI05By326R6AmhfRyt7nZg+/IcFgdM
C9c3bdh5nQIxB9nTtkewPTxzhrenUiA+HRIwJ7Uc++eZcesxCpaklztuLcD8
ziQ2PIoCkxtn1z02kweOpUGndyIF25J5tnVdmEHljfIFCtw9xuyLAlbg+9cE
XayngOu8J0X9b8wplMfOvymY3dbN99+zEttzHddPg4aS+1ny7B+YC9PCnHxo
8NRu6nrPcrF/+s6mFdAQFvjEdlWAkD0nfAdpkKyyPy6WhpnP+iykEMynAmtG
L2GusF7T5oZgi9u9DQsLMDM6kVZJCFxWz7+YmILZTyzJ6haCRbm7ZH7cjTnI
/MryVgSV7+yquCbC98WsQ/sRCJZHZP0lill5qL8I+1dWec/BrQJ8Pl3jtrQX
CHRthszeJGEGg+GLtQiaGPtwO1fMFSuOdeUjCLVVj27Rxuz3gX8jFEFjgl6M
01LM75hp2gzBrolF+sy3mAUy2bGiCEzDV/u2LsZsadS9s5aG5uzirnnC95d4
98XG0jBdWZG2f4dwv/DvL1nQULbzy6WPVzF72q+JkKIhbn1HjJMkPu+rUOn9
LygIjJJdEH0Ec2FQZsNNChzKjJNPcxSAEz85p5dOwWBKzOTUr5h1c32+xFCQ
5rV2bwpSxP6yzxo7SgGq1FcZqMbMcW2mE/C6TWiTvasSXn9UZH6Ogmw+f43p
G8yMym2n+xToPtVT/CF8Fa4XFSIv31Bw4HJoXvYHzF3cE3/xaDC/XO3lraOM
/W0Wt86DhmsWujXKbpjtp5QNcmlYzX1+hY7EXJJcq9SD8zn84QuJVMz8ZUf1
uAi8twcF9OUI12Nv1GxFcMjCbsYkF3PE0mHrOATyA3VRSmmYOaVH8koQPAmW
lJw4hlle6eNkMwJNe4V5hwMwj0g9mH2FwNH+UkijHWbd+PFx7F9ty/cRsnqY
o7LKknoQyGULjl6RFe4fP2EiQMAT0za+I7xPDSU9fAnHF/unfEkDZsueJ7MH
EZzrLW5fXYQZlpv6WSBwPZAafjZ7lTC+8wMXIngr5747Kx9zy0mdnCYaFvWc
0HpfiTnqTvnVkzTc6fzGNfotZr87e7230BDZsilmBRfvz2SuDZOlIeSHlT6R
VkJ76ZR691GgeNa/NDAa8xJxd59yCjqzXz+Iuy+0B0ht5lMwGm/pvUBCBZ8P
qoOPU/DTRJDNWwfM8py8Auxf/TMSqTPnMEvozjJxFGzhKjj1jwt/f/dQYTYF
tstWuG815OH4ulAGlRSsl9xQqnQY8ye1JfHDFIQ0Bkqsr8RcWBR8lktD1YIv
PRIfMMfvFV+/jYbgaP1DK5UpfN919iNpNEwGeXQnrMcs6HR63k6D4f7gyV5X
zBGnahxkELj/cqhH2Qdz/CA/ZzOu15Ky6Y98MadM2a6ORhBe90NS+0+YOWpl
7Vewve/em59th1n3c9e1RwgaJJRGnhlh5l8Mc+tFYGE6LyhNEbNRt4XoEPaX
krC//bv++M+55IB+HnnfVrl/uWoDj/x/6J7/THqX8Mj+uV7XQ9g8HjnfYsXx
XWv4PHJ+05uxvN4zPHK/7tJf5ytf4pH7K1bkU2FV/9rnwuXG2MHef+23TWke
b0qSIvY975E6VbWBIvZ/qlBl24fr8D/+EcgMn78ioIj/6qUGflOUoYl/e5On
AsU8aeL/WwbJZdLXaBIfbF559scpmsSPaZLCughTROJr6pcM29QjiMTf+T8G
z8TcRiQ+M10qIocGEInf8nWHHaslVEl8n7xr4h+nokriPyf36UM9HVWSH77j
BrW6eqokf8zXFi7zZVVJfu2WSfygpqBK8k9EbXQHJa5K8nMuyTBq6xgi+Tv0
alHc2GNE8rumyzVJH9eBf/J/uOv13LE0ROrDxvIPH6QOI1I/ZsyNj/YFIFJf
+P0lYr9jnfBP/SlpTk5T8kKkPpXfMKCnAhGpX6+lVLe+iEGkvvn2PzHrvYhI
/WuJhpzsFkTqo3NHnY6e8D5f62dkjU+ws7kqqa/13aWDngmqpP5ai9afcW5T
JfV5ns3Ov6SU1Uj9tg73EhgGqpH6nu95Tyy2Qo3U/7HmHUa3v6iR/tAz8vFg
NTCkf7TELTPtOMCQ/mIcFqV5vIgh/Sej8YJ+XTND+pOmW6HMlxGG9K/9gb5N
cp8Y0t9eFkcMBnxmSP/TGfAx7ZhkSH98diygOlP4/tf+eU3WxdyljSH99ZCo
lOf8OwzpvwtWPHzQkc2Q/qyjWKsncYQh/fuWrovKxM8M6e9Jz60nn1oxpP/7
pcxo3TVkiD7YPaPscVCLIfohOfPhqkRNhuiLpEbnqll9hugP1xC+a5A1Q/TJ
gHSWzLe7GKJfTAQ39+1KY4i+SZ899d0jAUP0z4lZgeHYN+pEHw0e+MWZtVYn
+sm/761r7ml1oq/CWnR/XvFKneivRA+600lLg+gz6asWjZwDGkS/LeWE3X5W
o0H03SJ554hGEZboP1vLrog5E5bowwd+DdOTgSzRj/8tUCjJTmOJvkztlH9p
UcIS/bn3bHVCUw1L9Kl8wl73yHqW6Nch8Qk9pQcs0bfV1vV+o2Us0b9TG7le
4Xks0ccZC9yab5xgiX5+27/cr8qfJfq6JCFxbb8NS/R3uqicTYgOS/T59srZ
kWI5luj3G1ePZJSJskTfn7p8vdb1kwbR/9Ld5nb0pAaZDyaLy85/N6dB5gcf
Lt9CX5ol84VuZvs2d+F+X+ePWrHNZt4uLJlP5KyK2hISWTK/rNxgkZ/bwJL5
pivFcZXkQk0y/zzHznjnqEnmIw3vbikmT5PMT0Nu3XTgG00yX+ltLlUJXKtF
5q/iwYLHr6O1yHzmkD6gU1aL+ev85iIrfGrD/wD9F1SE
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], {9.0548, 9.5}, {1, 0}], 
       {PointSize[0.04], PointBox[{5.5, 10.}], PointBox[{10., 15.}], 
        PointBox[{10., 4.}]}, InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox[
            RowBox[{"C1", " ", "N18", " ", "T18"}],
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->6.137505285412264],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          6.137505285412264]& ], {10., -0.5}, {0, -1}]},
      AspectRatio->1,
      PlotRange->{{-1, 21}, {-1, 21}}], {22, 66}, {0, 0}, {22, 22}], 
    InsetBox[
     GraphicsBox[
      {Thickness[0.005], LineBox[CompressedData["
1:eJwd13k4lOsfBvBXlLFlUtbQVERKTbIVx4ytKLJLouzUUYRKqEb2E47tRKVC
heIwJKRTKSpbcpSsnVCKkkaWJOp3Pz//PNfHs32/9/teM6z0CLD1XkBR1DI+
iiIjNfkLP6vZlCjBSjYVeNTwWjlc39pwaBFcW1lS4QOHWJlck4Xlfba0K8K1
dfdjtpD1q9YFvF7Fpmj0NA9vMq86VX4Ntq4X48uGUz67uh+DM/jOFfXCFgvX
PbGDW+wdTVZhlH+9Kf83jAKW110PkfFquLYmRnrkL4cajInhg7I6GO29dh9b
hHsbThp7m8Jt0S5LrOCuiWU3XeHaJpu8VFj+6vtFp+DRRPGPzcR/i/1G6hHl
vKXNwRFiZ5qewcPVShkMJTbFDq1bNAPHx0Tl68IRf4UaMrBOKX7PR2N49IXv
gDFMT4i6ZAT3q3ifcYMTG7KStWCeRh89hOQxeGWpIkwN3xmIINYonp0nOSbn
PT5B9pcuO9pJzlXNlDqIMX7f5p/FGHnahx5YYuybem4QSXL+8UhfmezPPDXm
SNYt8c4cR31ObnYVTLii0dupAm7QsaMtgdsUAo4HwNlCC6RnSS6pcibKJC8j
x8LPGJlFdju7kPucv4YIcbbDty1n4eoqm0XfSW7hC+6z4Yi9Ds/Jedk95b4/
GKhXy5mmA8+9mj97D547rVHvS+rqKlubAHN/SqTmEdNC2/fD/gd0E4bg0ZsP
sozgd3KP/TYgj+ICT34NOLuupyAMVq3LEtwA96+uy3wK54QdFNKGW3I6IyWU
2ZRbW+2gGXFs3RMneHToEs8LtuirnsuE/ZNmlePhlyN6Iq2wC9NvNRf2izY1
/q5M3g9f2x64zSc/SGYNm5q5rcsvgP6czreMq8Gjgq1n1WB6qkURE9ZMDPfZ
SRzYKU/mGxL4rbxgL590G7Lfj8t1CYYzzKVfzeF86y82MsdhRm56fjesyrc8
6TAcvX9auozcH1dgtwc220G/FwMLLMw7pwOPSo2bOcOUYjddGBY9/DxgEyy/
vFugndQ/MPhUDKapHdyQCmsWnCsaRz4VqhdKzOHEJH/FN3ChSsD7HytQ772G
250w7VSpljv87mNZbB95P1vs/25QZFOT8U6yY2S97ug5HVhpZNJDFOc7dZi+
L1dAfyrGT7RhZpgXxYL/scuU84cL5Xri38jj/dmqe+cmPMzt0smE/Wp8Unik
v6DeGl+4WE1bTw/5sLtscm3gwLpVCvFwls86R3uY+1WF8xKuTk9ecxh2efrj
loIK3mfpQw7ZZP2fguru8EzaUr1eWH+0OjcbltllFrCG1PO8W6kVZqgsnQuF
6zVq9SbhHOWhc89gExPHL2KqOH808bUi+hvW0OmUg/ubt2T4wpov3RSXw4Fm
dQN5cMhvJpHisPWm03EtMC1vp+l3nGdWvFpiAA6d11brgbn/nuH7D5YZ++ZQ
AavWOw49JPkFT+r9AVv/bD+UCI9qPuPsI/vV9QMM4AbmaO9muGG5a1c36os2
3jojSvbrbct2hzMmPB1GkQf1x+6UbvQ7+qf4OpIPz3U5extsdsza6glMH/tc
Xbwcv1c8tbKevH/0FisJWGahZ1grnLP1g2eEHOZ5J/KGyHk7HjF4sniedjd3
CZF8t+cYBcGcwzeu6sIpvRNvFsEM525WEDxcZLK1TIZN6Qpq7iT9yUzfyAqG
G3L/SJyD3fTPqlvBLluUosyQF6+pg2YCt+hmRP1F8pbcJm0DW2tEvOqHu+Zb
NoSQ/WdedaqsxXxDpMpNOGu7u6QfzG6lqC9wiHPzwSswpZkuYoB63n3bJ9cC
d7mIqKbBy7YuHhiFh+VGZoZI/Y2zAnxqWC8rr6yJfl+W/+tKg2ulLmUch+Vt
LjryE9+SKSqC/eM+Dn/Fft1Y2skWuK8qL7UL5pzqnHsFm+R0sCphNxNhxUa4
QuOUQTLsJN85mgv/kysj5wkzRxTOu8OaYdujdGC/OcMQIbirrHPjYlIf6+fA
RdTHDIi/O4L+4xcM6svD69V+JrTAbqXlpcnoNzpQr6ga5pw/vHBGGvkV9tWV
wk6iskGucPSY6mw5sXSzY70UnsOJ9uFHsK7VXX4N2C/0V+Yb8j5HLgovksTY
8SmChvv7P81qa8ERaqocfThlx+np9mXI4626cBgc+no4NQ6mnaiSfABzWRo9
9rAJQ2i7EPJiW4tF68G1zgqCjrBuysMVxNUyEbl5MOeapqItzPHy8hyFc+4M
Dp6E9SMHapjrUC/r20ANnBjgbX8IDsxRaxRAPfY/0rVy4H5OUpkjTOcJvXwK
F1ryO5H6QzzlVN7C1fIDe+bhviWVt8ZhxsHpoO3oV3ViInUCrjXWqomGJ4//
+H0E5qSxergwb8bl2EuY4u4yboAzfmd6VMJmkjr2/zftgnkqzHbghpbC/b8y
Mn1humCM3kmYUyc3qgcPu3TvJPm2uX+Yp5P6kncebUM9MvPa4SPol3nU7Kwz
XOv+7uNTmPtfpNlL9Bt6xuLPEjj+wdxqI1jXY5vFFTJvdF3hxlI8r4y9qRdh
t9jq6MVw6Fl982uwtcjFmuMSqPPqxud3yPvq0jc5sgT9909+7IXbtDT4DsIu
HyxfCJH+RFYsnqMjlx+iOkZwvNajsKtwS6aRRRTJN3m+1AO24PS8a4JDS7gC
enB0ZE2c1HrsV9hRsh7+h2mY5AkPH3G7rw1z5Pp+K4Xj3x9W3w1HdNqPT8Nc
yy1f/6CTfvzVddWRn3ujUivZv8HrUSBMzz+yTh71RXDWv7sMt91u/RIAt+lK
sR7CTu2esvWwmbicYCc8Y75x51L0KxC7kK8fplkfcXeCW5SUYvrgFN7r4mR4
MnBb+DOYeS9FtRwW9bC3roApd4fCB7DJjrdDaWT/FeZ8BewikBjxOxx4LGZx
qgT5/p09zybzq26/t4M1xQY/LYP7cwvLf6IehtCqtZ/QXxbPrCIdNik58/Ux
zLaNVJUi/RQcqiiAVU9NryT9V1ALzqbB1h8MKobFcW5A/dp4OIVVNXVrMXIL
FGhIgHnO4485Yvi8OtIlkQXndN9o2yOKPm7bKt8i84xWTXMRvA+C5nE9sJv/
G3EnYXx/WN7TEEN9vC8jy5KFcG9B4RVzmOPRvHmchs8PidyOJJKHZ4N9DOw0
lXSG5Gk9EbPOAg684y2ptAH1ex5ebQrbi9T2BsL9lzx9DsFugx8Yd2Gu5pH5
B3DiFkFLaiPOPysgrI37mAcW8hsQl0hJPoXpzFq9IDjnTGXgAdQnI+njehG2
PpxcIIH6qwOGLKthanb/VBXMWJp9ugHmMoTqdqFfp/rb35rhwIlTjGdwoAXP
so6cp2Woo4Z84keeXi8l66tWcvfB2cXOuWlwrVuLoDesev78rsNwf5hx6xay
fvCKuCnxyNHWXpz38iT7tCxM71WRt4Dn3i60G0N/1JUkwWTUU+wxr/cEbnu9
5ls+yXfP7adXN5D/X1LWXkZ/tKwXRglwzhdpjwjkMdx/7nIobM1si9opSP5+
DXEOhhl3uSukFiGv3M6gMJiX/9/sewE8D/UHDskwXfl8WgM/3t+C1tclZL/D
/qv1C3Af/6xdL8wJq61+y4fncqDuuATqZW9617QeVoopTLIleezbOnaNQv7O
ssHnSf4W4zJWsOY+iap3ZL1BB7UerhVZ0SvDRP+LVi/dCu8aL+4zgGtvFsUe
hd/Xs4Q94RTP43FdcMq5qVXRsNta3om9uO9R7CGhXLK/JNF2Ch70vtxWDTPj
aD8vot4NVpwnTTC943iHCfrx/2txxCsyXzYnMwRrfDZt6iXzJVm/B6H/ysCh
Fz0wJz9+x1sB8v39H/9Lcn5/S9jGhfi8ORFNa4DbpMZ9reG5qsrmKpg99m+A
Iew3vMfvGjmPNSNNwSYDlxX+hHMcldQScZ6ZQz77BKm/tLbyA+6X4Kqoe5H5
yyvmpWD7v5u1bGBuW8ZWBupv6h/LMCTzhdkeIuivvTF8nzbMiMqMrfvFotgJ
p4OZ5DwxM8298ywqP5AWSpzTZqg/McuiQszrmsn6/vZUWu4Mi3JKKY4xhqnp
a7QT0yzKwl0w2JHsz3rxOGkS68XzZQPI/vxGsS9fWdQyqYP3Esn6/Qf1b4yz
KLPxu34lxK5ef9fzWBS18fy3dtL/5/69prDt5jtK38nzy7peoQarKm7KWrEJ
80XV2QFwK21s2gTut9MrFsZ5tvp2X31hRsa/F8bgymCz3XHEORVdwhMsqq1R
WD4PptISLC1Q34z5Sv8qMh/pqXl5ikWFpn8qe0LcSBP5hH6y8lwuPSf37a9M
UEC/tm4ZKu2wW5Re1srvLCrtwob0VrK+yldrCOYNGB94DOe4eW7bg7zojQbB
5Pxa01yTIPj+8Zay62S+O/ORKjzdZG2TSpy68+EJ7D/Y7ZEdDnPo7e0+uK94
/+dRb+KbbNo06mk3v5xtQ2zWUbQJ9XL/cppikf7XRDSpoD/RB3tXaRAnCqSN
IB+p1uZVa8n9gulSkp9ZVLy11n1l0o+TTxBrmEVFl6eGq5L5VlfLk29ZVMal
zRc3kXwuC9aMv2ZRpyIHlhoSN8YybnWwKP+7rHRH4udqSkLPWJTBhZjII8QF
u9eyHuL+07Y00g8VO+V9l8tCnfbyFcQpn8UfZ6D/SquEbmLyw7lHCZBRg/0/
7DYxUA==
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], \
{5.9448862893080605`, 14.276448725587432`}, {-1, -1}], LineBox[CompressedData["
1:eJwl1wk81OkfB/BfqHEbpNwN5dgcyUaubSZFExWlolrnpJw1KldLi5DKv6ZY
O8t/Z4culTsbXRoiQtdGZpccSQlbWLdiP8//P6+X18z79Vzf7/f5Pc8MvYDD
OwIlKIp6gj/ynvB+Hq/lLOp/L3MWRae1rH8M82YP99eZsSgTullsEmwc4vAl
y4yV8HCdaNIanjq9/EIk2r/d+lfUe30Wxbr1aBMH7QNFLaMZcJr743E/tMek
LjrpCAeFF2YfQvvGCFeLcT0Wxf72L9+zaL+6fGtzEZwg0Xzpd/hUallTBOy+
egF9EP1V360yYMEWtR6Vxohvz+TqtVqwjbmZY6g5K2HdneTfJeGSuSTlYrg1
cvC3aQbW7WDFDsNjGUaOX+DhnVlDJqsw73jYd7Lo322XYe4D/5pWm60Hs0wy
45NXsRJa9A70MeF8FdvK/8LWpvmuASRep4nYK+i/+3lTbQrx7mozAdr9TG7a
XiPrH+1SOwWff2lc9AimysPY/ui/+KhVsBhmdDYKzdGef9FDoxcWvb17dQTx
yYuK/+kh+VccCitEfvmbTZtfwUG79gYGwkFxOgaVMP/94Fod9P+h/q3VebhB
+HO6GPXKSJLs3wPzaus7smGh93ijBsmn1XHjQdRP8d2q+RcMkm+sJwtOjL+i
kQT3t3ykjNG/Io+xwILUZzL84DK4O77g3L1leO+s6zSEs6W489qw+wKr3u9g
rSBf0zO6iNcxmIH9pugH2t2k4Rfb3U9mwkY5paIcHdTnz8Fdz+ELzYMVm2DW
SBGHjnyKPmcbKMKMprgVO+GLx7uzPmsjzzzaUBZMa+eZD8I2YYu1Wkk9vF+U
zMH8WEV3OdTT0l8h1xDjg4S+mdbw5GAt1we2mTFN3gm3qQruC2Exj3OIQ/Zr
yfXMDzD3yMHQAFjWaKbJFPGKrK2Ct8NO5ZGuITDjsIfpapipH8vJJvlxTjlJ
wm/pmuqVME+p7csTxKPlOcd5COeXjFimwc+8thwqhKe6+HbrYUZNV0kCTEUr
FUwhfwWjanlbWHi7d00ZnHi2uakN8fD0cg5EkPO19vB5X1KPvNZUW/i+Gses
Bfn2y4VwFOCBPmacHfyis8H0symLcqNlqvC1sP4SgVc37DE3ODuqifwcHM71
wGf2VhzcDtvktP06Cn/aumX3HQ2M30U7qYL5Lh3az7aA2XUhR5jkfOa7jt9V
x/vovZEouElGKOcNS8vLT5PzeLt8dF4dDqoJ1ZqGdYK6Bj8vRfxDb8odkO+i
mh0/9sDiSROteJK/4yOpIdhCR+H5bVh9VD9GHuO7DRRuvocHuncWr4OF3Q8U
ZFFfe2faxXiYl//1iy4s5b3Q5xGcYHmctQK+GxY+JkPi95Y/ogFH14lMXOGG
P5Ul5zHfr8lJ+okwdyzO+jXszFU5dxUOWjmglAu377m0oAJWNxDYBMCu13/6
phj203jdrg0P1WpMpZN6/MGOa0F+Kc01IjdYrKxSlw6XnchaP4V4GKk/em2G
F9gt+yUN5up6/Eb2Z+yD5EopUq906ZwO1Pubt7nhh5G/37GTDyrhU94ylc+X
oP3AhoZLcND1xOGVMLe2tVwAc6d3Op5Sw/qd1deuw+oH5BoHFmN8neDTI3i2
MWzDPtgmN0xmCK5Lybr/RhXPx/ytKnJe81LMdkTBdBlv2+/JefSymzKCLeSK
zAXkfra7uGNMBef7+FHZt3C8UZegHRb3UctWIH83tbDSDpgvTn3tB5e96pQa
h/sljHszyX3rI9fBwHwxLezQB3C8ieaxfXBCcv0qMVwl8tv4G7G99o1euLAp
k/0eVr/6lNEF95dGb1+J+PPFRqWN8ODSGs9AuN/31tZrsPS9qeYLsPrixNIo
cr6KPvfdgPlDY2x7eHabWnsBzGt1VibnKSjPUOsnMl4xnFsCv9p/OTwAlvY/
TQuCjY/YSqrB7gYOSfrk/GlbHS0i8YuDA3tRv4SHtldXw9LxtO5CeH2EQ3Ee
8i2RPShMhjlrujMXwVPvWCXBsIxIRpGjjPWlvPf4wE871lhV0VlU5VOXxRx4
rINnrQuz+UpJ0XDYnO+MshKe92pGRDY81LyhnqaIdU8c+PsJzDdzFhsqYP4f
uHslEd9uVxfpKHk8Xz/HZW2AT7wsL5iWY1Fep2NXnIIvu+3Zdwv2e/5ybyNx
u1NrLpzw9UymDOpj7pW6tBrmZhkGkPvnnGiWJ4v5+j+UVxyCk3cePR4Jl5iV
qJ2HLaJ9t0zCYve4G0K45Q1tSzLi4bs0huTBJZ5PjemId8qbv4zsv1jgnHsO
HuapBpP9sfj9otEYzH/57W0X2DJnU5w18uXanFytStaz6Vm7FZ6aVb78B+JN
vxdvbwnTfbTdyXmyFMxJvMX4fivPOpKv6O66ln1w5SfT0i+oT0xMT0Mu4mkI
CC28C1tErCmrRLzDtCmlRDhJL1t8DflWuqhU7YC9jDt/iZFFOyduoSW5/x7w
Bq1kcF98yIhnwBJJ8/WDNMTTMTWiC0e1Jv7n6iI8J8M9nmZk/r5UryMLsa5c
4TMXeMBQ03+vFPpXX74ZCSfPcvYHSaL/ue95N+HXgbL6lyXwPN+PPvORtP+z
eUwFFiZa2Jsin0/L16ZVLMBzKkqX4pL7dX3/nQuwaKLHthRmcwKzBHBMtM72
IVhWsP6kGGZ/tVfRRf38JupPr8V8U5rHajbAaQmN1aXw8F8v2PtIvb/74bU9
4vEb2e7CgZs99gqewP1Z6g6k/Yi/c9U2xO+XXBhCxlu8MnR7CPOFc+Pkvlvp
lBJPR758bZeaj1j/3dl7mrYLyX1Y7VMAu2/TVreE6dVWvfj9QBVp5PVNYLz6
M+Fjct8URZgVp8DGiTdK2pB/fpdGZBfWZ8xfYWfAmm5v5mgwPYwntRsW7grI
X4j4pelXZvThmjM18j0Ufg+4jVd8McH4a8UGm+eZlEjDQrcPNk0OeFTxhUnZ
6Ox3eQNvbI1NM5xhUl48pVTSvmZTuXTRJJPyM3Te8BVOy5g4GzjOpBjvGSuW
k3jmp1v9/8F41cUKu+A15x8rlY8wqUppq/U8ch6fXugJGmZS1Kmx1Jcw44nu
RaXPaE/z81Aj+3XHMMTgE5MSmlyf9iT7lZ7SJgezjUM7foL9uFtjS+C08pWC
JuK26ckJjHcvO7ZtAs7c18x6g/nZ2psvkPOQXlHf/gHr8/ZUVemR70Mt+nFJ
xCcdZTW9DObmCPcvHWNSxnfGbRThctUCVznk06CWueVvMr/iz+kN8LCS3rMq
OLnqhL/9BJOK0ShSSIG32AQPeMDdDi6jjuT+f2gnQSOuUHs1i/xqrzq1bMP4
GGaUyy1YHJm90gTrpcXULgwn3zfzk9zcUZg/k2EKO1iYh91H/MZ501bjqO8w
M9Zj6d+of1pf2ROY/fGYj1M/k+p/3GNZAAc9Huhf1cuk+Kf19QVwd6isWLED
9X/4WkcIc1c7iWZeMil1j8HBUjghiZu5qJpJiY2WnPjD5P//dyQIH1DS5IMp
61+RQJfE
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], \
{4.7761166322027515`, 16.134033677972475`}, {0, -1}], LineBox[CompressedData["

1:eJwl1ws41OkXB/CfokisdWuIktAgGlGmsma0rWuXKaXptiZd6E65TGKbSqXY
TLdtVGpKaWxlpyijqMG6Z5u0QlnNmjAbZVKYqPy/7/P3PD2eT+/7O+855z0/
w5SIXcs2jaIoSol/5DulHMHXVDalJt/d2BRtTEuCEhZ8urfnISwZoazvwzw9
I+ckOL2EXnsATm3Yy10AR7+LbFoAaxwL/7OAdUes3lOwMnFmeN90PL+xTk9m
z6ZEyx9VvIRtsoZCtsOCa3Nzn8J/F54abwdL224bP4P5ObaZjVPw3Bnj2Db4
0/YHMzJgoepx4wAsLeloXwxzth8uouG86hTrQ5awyTa+73zYvHNeWpcd9scu
9YiB1/ZdMCmHuadcHbJhnwUhhbmw/vDj1Eb4yZYZNy/ASp2ROj13fN/ickkE
s91bYzxgihZZdxmWrp3CCIPpMTkjf5D4a6aN3U0c7pVTBYvnb1l5iOyfqG15
A9uVGnxMhZNc1Hv1kJ94668uB2FejB57GqwoY/+9EzY52tESAKcuGFq0BK6+
Wq6zCdbscdzrQOLdMjiXBDMlfnd6ka/scuC9dBLPZF7JXdhhtqT6NBz4eV7x
LthEq7kkJJ5bYewMiw7xYw+Sfr7T/eFf9M/HaeOXKBJ/ueDVeZgRqN6wgPSP
Yu7iwhuXr+dYkP5Se5bZwElJq5tbUQ9vOOyC2hX7z9cnXISZv4XrPYb1HSZS
YaSfhZI2MaxNiUwxJG5u/HwClgRvPPLLZDIv7tePwc2vGTZdk9DnOctuCGFx
4dn1K2Cm3hW/bGKvw9J6W/R1XRBTDvOijw6EwtXizNcdsOL2suPdNoh/ztDd
FPnJhaVjz8H8ygUN82Fx2U1PLkxjTFoYBytWKtQzYNnwtbE3YCrqsvEkWLlN
w28k64U/nZ8CSwVi728wp+J9JhMW81tpk9E/TnJ5EA8OzJb5z4a1o8o9zsKp
ZmOXk3njiz1DnsPMmJIQYu002nRL5CtqDXo4C1Y4N85eBUuSIgttYLWn7pNz
MP+G76tBnMe+vCaJ1MuxeOlXDWs3C5kDMC3POzEDplm6JRujP1ROXPwS8j75
pPDNSL9+fhY/Dmb+6OA8GtZcWv2hjNyP16E9rbZkPtcn7IPpjYNul0k//yzO
nA0z3X+xXwhHdVvWD7igrn7PMR3In+MSteQRLMlQb94Oi+7Iv8uA2ZVHMzom
Yj5UmzK3woJFxzYuh1NdHEcvgxnXO+aUWKNf54Wqn2C7N2HXHGBG0rVgf5hq
aQvIsEI+h61LyX4qOPe6Diww3L2IxKM9jezeT0MeFfG/pMHq616VRrBk7d+J
BWR/vGpu3gTsjzS2UJF1++2HN8DVw7oqc1Jfz1/UDFj5YCw3gNR3JI72PazN
WadMgGWb8n40gCVbaF/JfPFTdhtawqKLY8JrYJGOt/UsWOh9dYTMF1U+eQWJ
L7N6P1sLC30Pfb1Inq8Jq/8Gp+qEtfwDm2Q26n8m+yfV8qYg32pBdUEn2X9i
dm8ELHNycaiGAyd692fRyHti6n4JVg51Of8F04OzHbaSeE+ci3phzb2aSjdY
s3ho+wiJFxvh1o16o8ymKoZgrY6o4Bqpf3pVoBKWN0W2r4WZB6XOf8Bs3Y0h
luS+Fl4pioT5ihfxz50x14zVDEOYGxRX/husLonNvYD8m49ULYqAlZPFRjYw
23VNizcs/jrrY4Yl3rsD90tocOC0fQnDFrhP+5dNenDziLvpBljz9J1ghI64
9OBNdebow7rk42RdaDowbg4cuGQnewJM83i5QWqGOswzoz1h+e9NkbNgdnZ+
AteZfM547KszRdxundAUuPpyX1AcLFOOv19A8vM0u+kFC3bGTe2CGYrs9HEw
3bVprBXq5fr9+d/A94i7VNQYQPrj9apWC4vyE+1i4OZ6fY4x9lfr/ll4CpZe
2FBB4nG9VCW/u5A6HeVRsPz26eJCWNj+6485sDboeoGMzOfq7m41rCx+RL9N
5r33i+105M9IzrE/S/rfdJO5zYzcS8tMcp4wQq/qClkfitk6n7wvz1ZJ62D6
7Zwl42BFOn9jB6w5GVpfi3q4Q66jesh6YeCkI7Ds0/L4f8zIzyHve76kn3Er
Tslgfbq//SD6rZU10ZLJ/lLe4B2YszBS7krWVftuxcDNyY9dK0k/vbtTmHDq
tynNi2HxgQ/x+rBJbOyoGvQnkC20VE1DPw4GpDBhfWZSSg1M7fD7/YoJ7ovW
u74Yjnp7W88AprQtNQ/Jeuqy+E5jPOdVtqQKtlMNimuMUI/+Ct02mG1+bLB8
PN6XcMH+b7Bg8Ft3qyGek2f3OuH86PK869Ywe+IstxV08vn6+tGBcfh/d72G
I3TyOWlrZgGnjqOHFhE3bRU3GiC/ti02b2G75rSkMpgTO+2WJZkn/3dtzbCg
dF2eD6xwz/c1x/PN4U8sVhOX3Tq0E+aUTpy5g8xbiG2gEhbZ0cpiyfNZZ+jr
kQ8zw0cnGo6emThJDadafvnjZ+LExH+3oR7ZmV2WfrBG/jBEBWsTQnTI+xGd
dKX4J9QvsvctekPuw+lTXBqsMDbvl5D8Jft7b8NsunfVZpjRL7aVwHQN56gd
LOiquhFP+nePKmpGvxj3Lo+nwdqK+5qTsHJ62N10nCdPbSlcDMtVnPYXyE+x
aH3M97CmM1k6hHqoM6bsVic8Pzf46Vf0Q87c0SuF5Z1Wy7r0cU5tkFIIswtf
8h6PxbweGvicBIsNel6fGIO5+DdWHEfWHc1NwvUwd6F+0kSYF3XSZY4u+vGw
YX+aE+nf/q+Oo7GeUNqZQ85bUZ7uNgrzUBQYXAdLs1Iehumgn5/O5w3A0cXP
dW5QqMNw8RMn5KsYvuZhD1P1g/RVZF5kHhfOjLAo/fsajzQyT0FZnb6wfIwN
9wFxfmgBC1YYHXN9Q/ph5F6fAWu3lMeNIfMQNsIxRTzhD/eXTibzdLLyZz5M
+82O7Ub6X97j0gfLwx95zyAOXTAcj/wYWQlSB1hedv3SV5JvsG2uESz0cVYk
oR6OUfyNtziPl+d9oRtmzjp/l7wP4qvziv1Qv+jFq4DDJD9a2+cE4ry7wf7k
fuIM96TCUZ6rNDrk/YqIa9sJc4sHbjxAPxQ322V0WN6zktpD+tuwknePxP/C
SXeD7RQfrC1h9eePlT2O8Hi6wWLkR5tQpb0LU+EGuhGoR82xmXwQVnJLn0m/
sfD785kXa2BB5TtJzBcWJciUBfmR/Z75VyYMsSjOsXUOnjD7qm9fwSCLsquM
TPcgdrJ1X9vPohjmDDsfsn84K3nyRxYlTLs6tJScHyRv+e4D+l+mLo4h8e+8
yeW/x/2M9s7KJHYp0kR0syjacZvEKhIvZdreD2oWxTM+8kFL4iXW+jO64IG9
ia5kvoLM30/tZFGBU/mCtWSePPojajqQf/6K/ceIcxusLLEufRs5icyvICVq
rxauHmwO+os8r6oQcRGfPt8iqB2m+jf4Wb1l4ffv8GdvyX7fBBerHhYlOV5q
1kX2h3jyvJCv9HR1xQvSX2Gvyl7Doij/HAdyH3bRDK456tOEZ/WdJPdRO2PG
P6Tes4qd4ST+QHbpjj4WpZbXBziQ/XPuVMlgts/mY+2kP6Fr1PmwZL7oyEVi
yWJnLiw6lyBfDvNOBMy9inicuQ51RrB8qFN0CudH9/V51DrAN9ss1yA/Tsin
Nekwddqvox/1KPNG7Q6DBaaL/jNE/zSqXQEuZH0916ConUUx+xb5G5B163LG
vFbcn4DO+4S/u6jchg9FDVhXPB/dQzzVeF90GYuS/fqYpiEmX9dKKO3//+77
H7HAGTU=
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], {4.598569410125094, 13.907661179749812`}, \
{1, -1}], LineBox[CompressedData["
1:eJwt1ws8VHkbB/CTVHLJuCxjikYhrTDCFpETSRSbWy4pQ2rdky3hJaObqGXW
61Y7MWX1utQ0xEah6a5SplaliEnpqm1EqGT393/f1+eT8/mac/7P8/z+5zgy
DN/ms0WBoqh2/CNHajr5ZkRT//1i0NShqAXZjfNpSvj1zbGf1Gnq+a2j/dEw
5bxAQRF+dtzrnh4sY8617J5FU5qj51e1zaMp9srbC+Ww2OeAfQpMXdty3xnn
ZxT17bWEhTEzXnbAWRm7698b0pT0K79gNer1epuPNcA8xfU9rXBDZ95wNizZ
+ddyVw2aco8oboyG+eoeoQ/gpv80iwJhSpgdFqlJU798rM33hYUPPFeOwTk9
95ODyXofBpf9S4umLpTPfxxDPr//Tvkv2I3nUr6f1B+09/XQpqkbNZ5BFbC4
4bueQ/CCXg9OG8yoHGs7Axc9OmzzjvhCd2s9/PMAK0EF84hvP/t0FO4WLtMw
gdeF7vghAmbeNslbCnNval3WgncYK9ymYX7aiKkI9W1c08wcYc6d4ll28K9L
S2sXwdKxzbLz6F8wcHWaOslLMJppD9d0M9NekDzaE4dbMX/KgDtDRPoNCB71
go8suRYYB69bW9ggR35MtmqiEek30XBnFWx+bsnzB2yakv+d4ZkOP+Wop++D
hYqho/FwZORGW2tYmmVbngGHNF+nbs3FeoVlwyKYE9XsZwdzP7uOf4Erjy3a
2mSAn4s01nJRfzG3ItjLgOxXOP0E5t2qdfuqj/thqxJrM/qfzKlTvgzznw5s
GIGTmo9wyokL42ZnYf7Fodf+OgZzvcXB2sir2t/PXAzL92/ZXAgrq8WfeAhL
HnoaKH5HU/v8mN9UUY+tvDt8A2xwIVaf1Of+lrO0GF5v6B1QAK/7unBWA5w8
7NX8GBZKTj86C4/6tEUyMQ/fv0y/AA5mlkk9YHpqx6cAmBqOnBELi/MtXyvA
Kzv3U8mwPKNPcgT92M95dCUGTihv8J4HfzkaVeBKrpemm5RjnvhW1oxpsMTn
ouV8WBSioVSD+lRReGQV5o+vunTXjuTlfDfVAa6bqXupHvMJw2dH9yO/3ZS9
G5vkoXrbRQi361rlZ85B3nmfn6bA4wlugb2zMd/2yIrt8IRPVY4DzPd7m35Q
gzyXlNIJFs53aP+jhVzvMfmjNsy3/lNLHfXGmyTLSvRwvXrQ22TYJrC61Qpm
3Ff1HoUfPhiqe87E/Btfh2aif75tRv0ZmFZnpZP7mV02oVJEPvcar6uA08y+
rymE5cfLlK2QV/X6cvtTMMe77KUI1gwLW/qQ2I4ZpKdDUz1LYo3VUU/+ZjAh
BrZX2yrxhjk1OqnH4UmtMXfSH3vzE/MmOP9iaUcPOX95tLQW5izXT9HDPBJh
ov1h+IeYA52rYelMnbse5Py5hvpbiW1fBQyhfoljSkoczH2x4+k+cn9Yp5uH
kHxK325QgR1qWK0cst4UvVTy/Jsk5yi+Q70E+x4rVXI/HvuRcximZG47C5DH
iWV3z+nA/I4fOr+Hq0UrluZiPkZrl8kD5Df9Xu2qMV2sn1W0ogQ20VpjEwAL
Ly36Yxcc+cTw5ln0uc6EU7ETnjft1bgmzMgMOpEPK90IL0xFX7SFwuk7MHdX
pYIcffCnWDsaod51fp98F0x7/xaRD9/1sp2rA/OSLk8h++NXpWl2Bz+XCLoU
hGR/rDTjS2Gph6R+MdZtL0sYzCbWXMO6Cpt2dfvlwmJnOzdP0kfZcY0qmNO6
4fwN+P5QSPRDWH7Ouc4cczzxjq7XwLpiS7PkVHg8oibPn9S3CzlWDb9I27NI
AEvrHyxohreu3lXcR843Vjklgm0qTk1noS7v8wafvfCJdUuNV8GSiSltDvDk
zYOBoTB72G5OH+rrTPOdCIP5STGHtsGRPhO/roGF/L/tR3BU4uo+I+txB0Pe
/IyjuHvtDCnJ6xOr6BN5Psv6kmJJP/f6TXg4ntrT+/wj5uGWCdVYZL+XjLF/
ghOKikbacHTmnH1Pcqdcinf8Ct+vrGhcBDOmmD5OggPLzwRm47mS3ij+lArP
cx2WvGGQfbJTIznLL/uf9YXpmLGOXtjIUPFdCd57MllsjD2p75DGrMV7krvi
5JlTsGLB/Cljauh7bZUrh+z7YNrmbTAvc3KkFU5LaomdAwuv1454Y/7GnAzB
N1WSf41LP1xgEXBbHZ9TAc+mRiG/EUe5rye5/u2lP/vgNB1BiAimhSsNV+A+
7fmY67gQ9RPitiUehAUBJZN1ML1dUFYH//7voQEn9MtIODTRAh/s6mNchelS
0/hqWGGjzQwW5qMi38ekwLkCg/PO5D3hcHPQHJ4oMD4bQFyYQ7ej/utRpf3+
MNuq9VEQbKTz4YMdyedk70QP+l8dUTs5FZZJ4vaEwCtVzppEop60xDC6D/PL
WtZfLSZ/V1RWZcfClVdG/xBgHo70jJUy2f8GmXIG8hD6C7pbkGfkApe81SrY
B6O1/eR57srZuV5RGdfrBbuT56Y59pZxqxLqB/cWZsKyo849mTOwnmv5+Wry
vFh8eBQ8HfP33GMOwRMB/WG+05CnVLXQG/UEnnamOxSxvvqrizdIfYnGnStT
kUfMSXUv9E+3mfFXwQxRmGkvrC0T6E4qoL/Cuxbbyfwt4cFvYJ56tiGFvIxe
vT2tiPP5Zu42+2DKseeTOyxzjDAdI/kLaofFsNBar9QXv3dKGLp1lqjPYB8I
LoRHCvKnX4DFLY27m2AjW9k8N/TL3692uhUetym1aINllmOsCpjHS322GPPx
PN1y4+HOk6o66cSOs1cZwGk9Lz1LYTb/iLQR9dt/MWXzYdnBig4X2KZ3+LAX
zLc5fOYa5uEtz7LqwvqU7RZfV1h1r2+wBcmr7KcLN8nvuVr2Rz/Sn/vlqiA4
LZ71ow/mkacf9fiK/CKuBcoskAfft+Y5eT+/0PhOMkJh/y8K8rLI+5vlxN30
txMl/MxXSoG7+g/P6pxwwv0j3JcNcza7W4R/ccLfg9onG+FxfoTR3HEnit/9
PU8R9drePB42GHWiONam4ijy/HxQs0sccaKk7gnZz2FqIs3beNiJYjyJ8Ikl
84y3nHf6iOuXD+d+g9uSlWqvDDlRCR8V/fmYv+0GR1MEC5dkndRHXq/f5x4Y
hWn+zvZSkq/aufd5uF52y1WkhvfKa4OkmVFYn253MdwCyxZu3BSH+vyNnWbH
iUPjlh/45ESJ+63tLsLiU/7y39CvuE19WStckki/KBpDvwWu50ph9qbMl1zM
J27QvhQOt+Xn0S9h+aHZvaTe6rrSJp3PWH9od9fv6Mf00J0o8jn3KJ9nTt5r
7hb+XrAkY26YCPMw1a5dX4v1GQ5roi1g/ouurQPoh/psUVyP+RP0E1QMSb8T
X/PdYKnqRlc1zMfZPT/8PfKTzd8UuusD1u/8olUD8zq+ae95i37bH/L2wZKV
qUGRA8jj0rhuGiydt7chSIY85Y8v5pPnZcWks/Ij5GOXeIu8b6hsjazgdidq
3UytSSbZD3sPj8omzDsYXrdH9///TznY8r8jk/4H+I+J5g==
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], {5.441261304060914, 6.601506520304571}, \
{0, -1}], LineBox[CompressedData["
1:eJwl1ns8VHkfB/CTS7GbW2QRGkWEyCWbhzhKsmUzuYxyyZTaFVYosWU0lpDa
NYlWNyZyLxSFLRpFF9nMItFKg8j9EpVKPJ/f8/xR5/We3zm/7/fzPefM0Np7
0GW/GEVRjfhHjpQK+U+bpuTJUZ6mHgQGljSupCluR/0+STmaGq3qTfsD5i9Z
NWsiS1OGsgPXtxCHvUlNlqGpN3/n7fu8gqao7rLjOvCIl//RAlgUO2k8s5im
1FaWdnnAgvPXF0hj/bPGN0lSZD3/vS4Ljtjt5lGjhXqzDnUv4aTZM13HYPan
jzrJqMft1XbdBDPe+RgdQD+pu3V/Via23hZghH57LTzXfWDQlPD48j3FcMv2
h6a9cMgFHneNAk09Xt2o9wrmT0a3X4Vfy4x9T9blTy/rkllCU86txr1TsOCW
Uu1euGYyYqUM9hembq7IgKO2vo8xhAWP5axq4KVupuud4dIeM8t78AtPc7cw
mOfTanAFNrf+pysFZjZu0toP79H8QawYnmjYXEzqsVYYGdfCNC+8MQP9qL6t
2tBA9vs+IVcDnpnoOvkIDnkn4c5DngV2+VKV5HxOv8YX5E9hC90vEpc/udqO
+dht7KoMJf2dFS15hPm134/Tsibz+4nJbsH8VYMPLZtFPrrCnZKGr7VY/FUG
M+jVTqHf0tQrP6Po/SS/k520IvxAfcZMCWZPaSm8+4amoiPeZ55YjvXjlsvl
sB5yuSV5QBP75bEe/QybPglrZ8HUrHnaBzg6bzz+uQbu29k41zLUG7Jpa/aH
GbZNR86S54Vt/VYRpgIacpPQP0shvqpdHfUOqPieQj7rquHxCngiMadpE/Kb
pizuKIXX8s4LK+G/rn06XAvzNixz0MS8eu5tTO4n/nHLH8Fwbl/pwDLsP2H8
US0H5vUlB3vD/BMy12vg/Fu3o7Lg0urK6Cq4LWJ61QAsz4j3TINFJrrxushT
aqaa4QpndStIesETG/bpfUT9lNPfFHBgvsEP5nEw78ozl1MwT+6kFnl/1Hgm
01wyH4PLPj3IJ6Y+VOFN7P2AeRf5gxgRqprEbU7LL2E+brt6h+vJPBjPjidj
fmGtss4smL6iqp+N+b/xl0ptRj66MtukRxrnlXUp2ML8JIdwd7juidoofxlc
ftdAHJawqm/9qgablaeMSWG/oN2VXjC1Nb3uO6yP5CQfFahi3kXrK47B2zPi
rpoQ8339lFCPe6VVo1wFxx2uih3ER3NHtsECk02tNehP79L2BbPfYU4x/0pU
of+5QXn5hzDfqfpTFfIlSn88Wgiz90aVlCG/duBLp3xi/aUx6eT99eveXA3T
1k9G1mBejOynM32wvP9o4K9wpyLvowbqMTP0ggthF4tFMmxYPuTUbDXs1lrG
zYXp0EuZN+Hy+PV7huGQXw6GJcL90zf+0UMeJt9eyw7W717E2gVTz2Pz7qH+
S383tUiYUXx/UTP6U7ISmMTAfF9WQh15Pu2vPAmF6d/9BrORj5lkt92RnC/+
dZCD/AyL4OMSZF7nXU6xMR+1ntpDeagv+s3JdxfmyRvnJJmRedV2tB3G/Lkb
Cp2uIZ+gbSyzehH6uLPYVpnMbyxMzRpW8WHmHVHGerLx8PuFqOfhuaVlKeqL
MW+OwkZCpyWmxPFGgytw/uxjqdfpSrjecM3gGfg+R0tdhtjGbpk56umzGSfP
KmK/7PofKfQj0C6bMYbZw+sMh2FN/oBmH76HBO1VzW/Rv1SxeHA5zNaaDx9A
vsVfromT7z16tE35NfKvsojI45P1/kPrazAfbsmjl1Uw/5M471fMb8TT9RPZ
j5qquLoQ871bkejPIPW2Ke/0gW1iOS1+MP9AkXMkrH/RLaQQZhyq/I877Fic
tm0M5vqyJqaxH1M2O2018lAhJ/Z5wcp7do+xYHZUxWHye+Ogp10UqkTe57A/
LqA/FjtZ8QixzjnzRPQ//Wz0zB4yjzTugf3I94w12mpK1i1vSNLIn3WjQTSo
SPLFia/CvLwPMuQSSX9ZFk+0MU/5kx5f5Uj/4j8ddcT81SwvB5xAPq63hOdF
SbwvX1QWjSqQ+1NmrwPf1emycFIg35/srcMSNLV1tPxpPp47duyuoHFY03h7
lRSx7JrYtTg/MTsquVeW5LnxYyFMnfTjNSMXI/OXfHfUO13PznyLXAxB8pAe
+pmRG/6wGhYdrvRTQb/+hQ2xGcgpEDedVkae9POSOVtgrvXzCmXkVTohI6MD
ix4P/iVNntfa6nozcn7gs5IeHNtXT7GCiRUNL6Vh34HYepm/yfV2fYdV0Id2
zH22A6nHaeX7wY7tCkFNMP2w3CsMFvaZHfcmzwFrzfRGHHk83VvdOIpaOrrb
SN82G5JdSb6wtTdN4dOuVUl55Hc8y+ZvH9RxLCgqaIUpe9ule9Ev//7CgRaY
f3li/zbk0U5b8CefnK9p/pncH3N39Qvrie8I74lhHp3ORb9dQj36qmrWCOY3
cjo6kfQn0rzZOol5lwaIs1+Q3D/n6mrCjKb58TukTmT6L8fEacrJ8/pQPOow
Clq/yMMTmqHOm1BH0CPc2iuG64WX/53FfWBrTt2Zgt/Mnwq9R+6T6rkEGueL
Rv7hnMO+dL1Fax0sURy197Q4eR4vvY/E5wMOr8YLcB1lWC90wXVBsQ2T7xeg
/5xoXwfsu7PB8MVhmM//4uSAPMJHOyL1YJFDYLY9+qjzmJ6TgynqXowZ+rRX
M5rUJdfr+AolkYPXVLs7gHhhxnAJvNPzoFETTBfZWOkht5vq3gQn1KdjvErI
73N6tc+OF7Dgg6t6AHm/k1bV+6FfgcXSUCPY3qNJsh+mlWbrbmO/xv6Vd1yQ
Q3D9orUUPOPmkZMJi759+lAf/URtDF9RR5zFvqWHftkJjRlVZM4G/1rIIo9o
6MLQMZh952nFAPLbB14KkSZulDd/iGMkfWsrqc8fruOW4zhdl2v2uxh5v1am
C8jRKIH1O5nHu1MTZG68hLC5QArn69u+9SG5a5Tcf5qzpURygQ7z+Dz/1/jv
Or/YUrR0zcgrmOm4sZ/5yZb8NXvxMyyczzjY+cGWYrzZOOSC6yfs2yzTpnF9
un5gNyxoLeUkv7Ol2CXlI5dRf+1Ky+WdE7YU93xfPwf9MfNuZMuNY91yVDwc
/VOR6v3mo7YUf/yRIBz5hNetHNeM4PwLxhphuL/CglfOU8Po59PADm/Mg+98
ViYC64IU3ThdMq+pzSMZuF5QMxD0GBYV7JhzxP7cPx8Mr8N82zed98pFffpI
BecAzJQr4NRMwszxM77wzqyUdc/RLzfQoJL8nnPne/uap7BfR3huqhT5u7TH
4gry0TkvlnaifojGAUvD9/DrjogP6I8RFBLgR1x0MXEM/c88UEv6DzGt+EBI
nusue6tCXM9YnlpTiPwq3jF+pWT/4U5OEuaTH5rmwER9SvpaJQfzS5Rc7J2C
fkUftVafwbwZ5xfeX4R83BeyjZnzmFv7BY+gAeyf9PTqCdy3iUxm6rFerCee
cxV9xXUNBm31nVg3tdl9Gxbk5F7LbobjtktIzZE+dW6/qsXnH1usmub+d18p
Kn3D/48U/V9RE5iQ
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], {4.558738695939086, 4.601506520304571}, \
{0, -1}], LineBox[CompressedData["
1:eJw9lgtUTVkYx9NTQyTJe9y797mnpFQz1xV6fNGTwvQYpcgUiVKNZ1FKRakU
CpVIoXc0k9701HAlNRpTSlfLMELci3DTzDT7zFj7rHXXXb+1z/nO3t/j/z98
n2DnLYoKCgox5Mf9/38xIJOOkcsQFExlV/KNGFBtLfmH/wth3garBDcG6iyv
PRLHEk7fP6oSwsAScarbr+aEB8r6PkYw8N22aOHa9wZk3cSo5SADmXceWxzO
J6w538RnJwPxnnYhN7wIu+8J8PIg8TdVZiydRlhW9VurkAGrgn8OzOpaQPjK
kIkqA7kPt4VYphO211if24EhUGqSs8yPcFm+OCQVQ77u1CpLC8K35yktcsXg
nSKr1eATvjC2tkAbg9lZ1euySYTdi/bFdSOQOe08XaNGeNDryO5sBOnnzP5u
/Ipbn9DxMAjBh2z1n97oEG5kbDrsEDizJ1Nb9Ql33vBXMkBgFR6ttduasDz8
esEcBHzzEuHgDxwnnfSfhWB8Q0zgn1GETcc1ewoQ2M6PFaLs//aTpm6OoKh7
u9+6WsKh+0YDNyGwu28t8u3k7sfisWMIrslN6j0fc+cZiW5rQbC6/8j0y88I
g1QxcgzB/jzxDKUn3P5OKMVbYGg3fjGcx+WrTB5mdBDD0L2VAlMuvnHM4ao6
DF4Vc816TnHx3YvDhjH0Jgfs5m/l4tlqKrMMRClunswzIpxeGCRczcD25J9v
2Ur1yXlfn18TwICGhkrvxkLC7spXtcMZaI6pdt7tTXgtqrwTycDCiZ/CGqYS
jjK4a7+XgbsnQtYl3Z5P1p/e/eRNWEfNix9FGHy62s0ZCCg1csgzI6xQm71i
CgMrT+oGTFQgfOGep/UjDOoWPgYjbXrk+T07Z+RgOP8y5015DmFTXx9HHwym
/L6306MJH8/PTUMYxkyWPU3YQRjq7119iuCydGqM3Jdwo5GvfTGC6wlx4V2b
CZcFu3eHItg0rztudjDhHrWB+DUI3M6JQ/wPER6MD2FMEGhJeFkjGRyb6o18
jSDw3ZCHuJLwheyNHTMRVI3VGl98QFj2RmmAj4D3u6qB2TDHzob3RQiCkkTI
UZOcp3rBi/p1CCojevrydAkPKJosi0HQWoHUXE0J80oTt1YhaN/7UnoJCJd5
lCu/QyCRNk20s+RY3SvJGEPm3so0528Jy7aoO4WQehtWh7vO4ZjfFHcFg0Wu
VZDLZ/J+eZxz8iCGRy+ZqI52wnornw3MZqDxhvG162e4/WcedbAl9VPQ3Bvq
QVjhYMbwFgZcUj8n12pzz6+XxIYxkBCsLIxu0yX378tCUQws/UDkIFKXrve5
jLZFCHXp82idyo82r1ga/2Kz9GhcHkvfX2HQsWqFP0v3d7SnN9L4G5buf7F9
/YkSFZaeL/2UXUzxHwJ6/r5dDgGldwU0P3Fd5u+rGwU0fwW7pml6NghofnM0
+uXFtwQ0/w2BuoxHj4DW55NI3F8uFdD6uWmPdLVMYGl9r7ZYd3jps7T+6nKt
PJEDS/vD9ZnEV9WPpf3DcxKlnDnI0v5SvaQX+vQ4S/uvxjs0xuAsS/uzsetV
uFoWS/t3T/XN2XtOsrS/DXOZSYMRLO3/7rENUxw3snQ+AkvOdakKWTo/+u49
ae/HBHS+1M07Kz1aBHT+CrvkFyWRAjqfhe4pBbsWC+j82knGH4Ehhs53uZ9d
aeIFhs6/f/9nQc73DNWHCV5OpjWaDNWP4ednZY87MdWXTM+0REk6pvozc9GT
Ft3tmOrT0dkVvbdsMNWvghqdCR4GmOrb6ArR87/mYqp/rEbY4PpZmOpj89t2
q0s8TPVz4Yw6cZYRpvp6R+tURgEX/4v+GjUdaOvfhKk+71gQnjozElP9di11
aZt+HlN9FwZFvE6sw1T/8c0dgUsfYOoPUSs/rp7yAlP/6HdsUbT8gKm/HM46
ts1Wjqn/LFkzsmLyW0z9Scdzss07Cab+da95yL6xCVN/Ux9t33gzA1P/u695
OqVxK6b+KFw+LvYZl68v/hmU4ODX+hJRfx1Krk5ZfhFR/+2dx2va746oP+ND
EW1XJyLq32b8wKKFzXzq77VFq7DoAJ/6f7DAZZxkCeEv3wexn7nvAx78Cwza
N/M=
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], {10.9452, 11.75}, {-1, 0}], 
       LineBox[CompressedData["
1:eJxFlAtQVFUYxy8gSLxteSzr7t2le+8Gom6kWBrCF4qJCAHFiCKP8sGCvJ8G
xEOEEpfXMAY5CRggzia7PIpYi+ElQSvxUFtYhnBlglYhMUQnK3Y6OzWHO3Pm
zG/O3PP4vv//7/RhYvApQ4IgwtDQz/99NHSy9LMNEPUnhxW3KXg8o31W+hHi
GuvltgYKfq0ZlBsZbwLCRlFqUkJBfN1h1ptXEAf6vc3Kp6BnzPaDEI+XgWCf
GYwopsAsps3TeQbx9Yy7VV9QkGZAdqZmsICIutJU1EfBaHPKtz7GtkD0Lmi8
nlKQf+PJl+8U6jnVyklEQ4cmvdpkCTGxba8umYaInOQ2kYcdEAeNHvp30TBP
Zpl1JyPuypg7oqOh3VbF3iRBbJrZEg0MxPQUrOkuIhbEt+iyGJDxhoJ6UhEP
22UafYXWx0st7xxAnH9paPEnBtT3RfyxlxBrhrWzDxgI3Hf6Ded+dH6NuG10
noFb3eWs++mIuxSjRWoGKoraXXe6Ik7K+UzazYBW7GITrEXvq3iyp7OKAasT
F5dftCMeX53UhDPgaqtsca9AbOMSbcRnIKy4UMo6j/jsNbfkaRqY2j8nEiv1
9dn8o7KKBrlYrRlRIG4dejgSQINCdVzrtYZ4KnSWZ03DpyUJLonH9OcTLO4U
BYntRqGNo4gFb6W33qDgulAe+EeIvj5is1fLKfCKCQo8tYg4yvOudQEFqo6y
X969YA8EdF51KaTgTm2+utTFAd3/CBF6iYKj1YYNM4OIBR0djZ0UUPt95reH
spE+pH2H5yk4u/FqlW4asekj/ymShphVi++qfR3R/ltNPaJo6JI47witR6zx
jDa8RoMymxzXzCA25ZzLWqJB2ifPdtch1sZaPBIxYNGmLlRu4CAumuiJY2DJ
JzIudwWtC3Ya3qpjoCY9qyZfqd9PPLTvBwZ+tyIZYSXiKfsR91kGWsymPeR+
iIelYyELDEjs9HpeX48VCAcCv2bj/7dw56bVCWy8f943RdF57mx8/tb5+qoC
Sza+n3mWMMf9bwd8/3DvwPNKAzZ+n7/8gYhPsfH7o2onR5oj1+sj2/V0v7hz
vX51VGScAeOI67u6cJMz0eyI699TtXac2sPB/fGR5AlTVBzcP+/M5FdaMzbj
/k71yeSXbbm4/0kbguRWUi7WR03QP81hbjysn/L6SlVFEw/rK+L9BodeQxLr
T9wv5O84QGJ9rkg2bq9IILF+v2/MCVnKJrG+l+x3BSsTSax/s+E0GxN/EvtD
1K9abnEgsX8+afK/d/seD/vrvfikJUEJD/uvq/fz4cm9POxPT79xzWvPudi/
smMpK9sUXOzvWMvdMpBwsf9lZ3INDdK4OB9O22/57XEqF+fH6xbFz7zLuDhf
FLKygPEBLs6fk4dKxC9YPJxP1bnW4V05PJxfhwpLD978i4fzrcFlzldygcT5
p7sc0DdJ8XE+hoYt1koH+Dg/fx48+vyEmwDnK8eX55z7sQDnr22zufHuAcT/
53OruX52gn8Blpkv/Q==
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], {9.0548, 6.25}, {1, 0}], 
       {PointSize[0.04], PointBox[{10., 8.5}], PointBox[{10., 15.}], 
        PointBox[{10., 4.}]}, InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox[
            RowBox[{"C1", " ", "N19", " ", "T19"}],
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->6.137505285412264],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          6.137505285412264]& ], {10., -0.5}, {0, -1}]},
      AspectRatio->1,
      PlotRange->{{-1, 21}, {-1, 21}}], {44, 66}, {0, 0}, {22, 22}], 
    InsetBox[
     GraphicsBox[
      {Thickness[0.005], LineBox[CompressedData["
1:eJwl13k81cv/B/AP2UnHTlTWEBKOci2dE5IiUckSsksqa6SUgxbZsl2pVEJF
3FKEilJC915ttk6JCJdKSfb9+5rfzx88no/3zPszM+/PzHwoeAbu9OGkKEqJ
g6LI31oR/KK0mOQ3xdJlUt3B3jqNmkwqs1653U+XyZo+cnLxDBzVmCq3G3Er
Izr/JphdYXd5M+IdVXrqkxpM6hSna58xfCr6kWcxzJq9ud1Ql8k8WVHVtA8O
67/1w0SXWZtQqxolCQcJhV7agny2NkcOv1vDpN7a+n/fg3h385ewdLgk+YhJ
APo37L6rsBfm+n7zYRycNfq6UhMuz+1zvYbn+feyV/DBckPuvDXwXd2y1h/q
TKqg2+1kB9p3t7r87oQted/FTuN5nfmCCmyYa3H7Bwk9Zm3Iult5HbD1p1YH
bT0my54/ynEAZi5+GjHXY1J1oe9fT8Nyh+l19oi3aYlZi5DxKBrLeMA3bY98
0YBr8xSP+aJ9vrHGqS1kfFLNRT6wclWqtCf8os6txE2PyZwTG0iLhFNrP9Xb
oX/dhcucSbDynasRDMSdeDfduwB7d00fU0P/xIhDay7DBRoND5eifaF73Y4/
4UHlAfNfmI+2bILXaVg+nbn1HeY/E+xKC4DpD+KX3Md6JvsVHLSA+YLDyzLQ
njVze1oKnlJ/mxKB9dnw0+9qN+ZXfaKn3A39H0QpX70O57z6oLgN7YdzfBNd
4KS1SUWoZ22s940NYrAL72zfOtghOCi3UQ31FOBdr4X+Cq2vPh6H6cJxT7SR
Pzq1YF4H/hTats8A7TWLxYSGVJHfTr/aAu0/xGd1F8PU2XBDZ7Tfzf1GJhRu
dTQRCkH7umPV/GZwt6nT+mSMp/DB0kI5uHDvr0u3ER+PkY2n4Ll2Ee6/0f+f
iNHmn6tRn7sb9AfQ/hWrdPMAnP1W/+cSrF/3fzr0rzCtlsa5EuvtGCueOgrH
l653o+N9+Bh3Y5QL+ViHciQtsP5fLF1LZeGg+W2BO9GfV8m6Wx8eXDrb6wif
yXsRaQcb+ARqOcGWbyK8D8K0H3vMdyF/VZva+VMk34lsjy2I/5EtxZ0NKzty
z+kj3hlpznkDVtNIqFuF5zdcfcx9G/7kTbvEjXii2poeEi9MdUoYxPzUf8vW
X4BzA/RqyHzzXnlujSbtY8MOYT1YtNEdwS7wqSaTjkSsT1FqRrE27G7OzQiE
qyPrXk1jvuZtw9X2aD8lVClYDU8VzjsykW97kcj3CLJ+x+KGUD+q4mGUnjYs
J+i2QgXx0y30T70qTGqI08hBHv2vbCyavAB7Nxs3KqD9ZjuOq9th967Vzupo
nx7t+54Htu1RrlmP+MYDY2fqlXG+BKt4bCXnTai6QyL8oreA5Y580Y/yCp3g
dUdKVI+Teoa0x+nA5m/vm2Qjnh/hniIG01mTqRWwy8sdXBSclNn7pRXtPcQf
PZhQwnhUh8dGEOdQu8M3Cb9dceZPIdSz6HHQ4iKsds63RAnr21D/3JSG/mpn
pjavR7y6uEF7NbHcmitmqJeOzdggA87l9FeyQn147A/67yWu9Dtjjf7xxV8u
hsPV6iFlqC/FrNjiex7OPqbNNkb/OEnblnw4h+tvd020N9KeE70P2744NyqJ
fLv6tl2ogqcilA7MY/znxuwVK+ASpc8vu7E+sXPrWorI/NaL058j7lPArZ0B
uwTs6suD1zoLrw6B48efypyC9e4biW+BuYSXL8P5XZsReKJGlIxXjeOHNVkv
v7bN7Zg/1T1C6sG6s/aMSgZcLRblReqb8u29jBWJiysky6B/xUoRMQqOTza4
JwarBrrJlytinoMqfOJoH/U60tkf3v/vsoTlyJd08ecrBZgvXGd4NVy15pPP
ZwWcX7nP72P/Uw/Nxdj5CmT+DtI70N88yyUjCPbmjtPzR/6p5bmlFjBXge/I
acRpKmcHVsPy99qUCsj7el/4rAicW3g+GetRO9q0J4QHdlSUHv6M/K033yhw
k+dF3xCbhb8LVRUKwUKZuZ2iqEdlf9kTWdi6SW/natQjxkzq1TpYWTokn+x/
tp7L4lb4bWiJgQni3G+k9/jABi+ulZPzeUbv3mMWbClkNG0EB5oOy1yCzQfb
1XSRv+NqbuBdmK/yXYEi8mlZ7u1/Aru3XeUXhun/pnU3wDmVwWrjGF9SjI44
sWNQwwKbnM+lK1Mew5q2q0oeYX4n7nE+uwl/6vLwvYz1yLTnSTgLl1dYHYrC
emT2GOu6wZn6MfPk/N52rTRAg4xPvtrMHO0nd2hv+yWP+dKu2eJ8Zi70yBvc
gdW6ipfK4nkckx0DvrDt0Td6wrCdIc1UDq7W6jfjJfv56XR+7iqcr6LRMTzI
f1w+xl0ALr+q/ksQ8ZsbTT5GrsT8uyx2SSH+TGD9xO8VyPcsdp0aXK2UpR8J
z/E0tuL+Z20NdUxbBmcfPr7XAf3lM4/trZLDeTndUBmKuJH+6OojcLlpyNM0
+A9Tn0oL+JfszPpStO+xNJjWhA8a2ne9gpl+fpyqsFDe4ImvMG/DvKweHHRW
eZQD9XjZ2NliA4ctWhhjv1GfrZZLRsD0on9iVcj+1u2wLoSHtkgo4/6nMstj
T3fB+72FqlBPymwx/aIExlvVaiWxjtT3QYnTVtg4sXmnKuKdx79WHYHFHcQb
pRF3+fBuIgvWNDjGhfObFbPGuKEIPsg60jKE+fCoxgYWk/6yXmvIfb33wu2h
i3DqbLpSGcbPx/BaCIUdRz+O4L5mqTBGDP6A99totIbBK23S+L6R8X28wUfW
72u7zF9n4Sb5mqdGiBdeFtQShzW39ixThtnBWcx0WSa128fwGw321gvQ54bd
ufppS9D/TN/JpqDlTOroNsllszo4jxcUxD7I4P1fGqk3DTvGLxqYwjmHF5Lm
YdXGSu9SadR7zPQbeT+oPna8KuwdntKB+lOCU6OGxVLYf+LOlZqkHgvhKRvh
lzu1ruN7keLpahrrlcT9qZ6Y7oHxzH5eqnwFZp9M94mGBy9ZcAfAR1/3dl+B
DZKFirfDLo9sXzxG/5cBz2zN4bDpd23vYWuNJE8S3+1q8pN8D7WdL0/2hX/9
YcDNg/rkuVayk+DUw9+MSP2PHZB5Xg3TGEv+k4fX6j7y/k3yX7yfSt6HhSat
XHWM1z3NhlcZcaX8KDM3OGo6zF4Obg5MMUiCpXkzGrCfqXeW0XfuwqU977+Q
86b/rNqmeti28p5/Hyxmai73D0z5Cm/DfU2dcnwqXQ3Hj97NLoYXNARaLpL8
k1OnkuBMb9ZDT5JvrsD6EOYvNW8nKgVz0YbW4rykttTcnarEeOWfZO3TQzyi
ycFuC8w6ED9Dzt+/YqcqGiXwPqpsmsJ+pVJ96PuM4f0qr5WmdJgsVrvbdKE4
9otxmugw6plnsy1eBOaKoq8cgnXsyg2OiaG+7/k8EGf9FbmgPyCK+3jPeDn6
U2Evxk+6EE9xPCD1Hzi9v7pTBPU0OfwM5wnrwBMD2cPwqQk1Hjrik9JhGjT4
raFvHMbP4rzVUF9PQ/7kGSnMj2q22Dt1Hm6tWZaM7xVWyYnh2cOwN/1RXhEc
5Jqo40ni9CG5BlgyZkxtPzw0wHyL854VWp599yTMvrz8zjjZHxvtB/LgzLKs
N6g/i3Zmrfc7mNbafxLnP/VB/sUOHozHNuHWRrJf61eIppmQ8RvOv5ZCPFio
byIELm1etU4Edjpi6pVH5hPumscF0+xkJhphPqvo/N8YP22lm343LLf5/tcO
cv79kNAZhJOqVF2ewWu2NVwn61M4+5Af9xc1ESlBPYWbuCdW4H6jNs0WZCaS
ePpsqw95X8Jjos3geK97h7eQfOEfKwYwfmPdZgUN8n1+TXg+EqafdVwmivaL
b/pzppdh37b8u57sz6M1iuf/E8b7KzMY8AP+7tTK/3wp1stN0KYXLmQIzGYI
4XzserbpM8zbf7fMWxDr11x2sAeWjndIMxbAeae4qvwrzOaPvaXEj+dXDdVM
wrV/DgQo8DGpvq17xgTI/XpRxd+YF/GnE4mK8CP+sZlIHuxTa54knPdUV0Ku
ZBc33q+eg2x831N3LgorBsDKoaYmkXBfTd9HBdhyYvPxCzA/NWDDAVfV/L27
HD6e2tTPA9O8zl96TeaboB61Fi4fWWrQD/vx2qeEwIPa+RsnyfMtUoKbSH5p
42F87+P/GNpFOsbTdIL2XICc/4NWfXnw3D8KBwVh3jmxUWGMf/eo2Rec19S8
tm9UEMzWTnOaQb7SSuOCp/DLdrPN5H6pdJi1HocNzgvtbIETbNQ9BLEe4moS
+x6S+0nhhOg84vuDpsJyyP3ZWyLYCA9dEHp8AvbcvpDuR/JxBgbgvqaWnNfO
6cJ4Mr22NzDgdtGFl1pwTvswlxL5nok3d3TEfD5ZCWznh58scePy4sL477EL
Rkk9KtWbdy3B/JRiBr/A48m3m3U4sb801zx7D29c/vcHLg6cFykKV5thAc59
zrcXGVR1lnNpC/zbTtR1zzwD52vI4EfYWJjJv3KWQVny200OwDv1HiXTphmU
OJ+z3QxcfV3H1WiSQTWVSdJFMJ68qfa8onEGNScifgfvJ5Xlkfvaa4xB0W8W
FVoSc/aaBI4yKK6gTaO+5L5hvVzy+jf6Hy/ZQd5/gYXOlpNwlT5XdB5ZT+/s
ZSdInCPDBv/PU1WejIlaeLfDxgJ831O5OdbjDOSrfT5yjvx/R7HnJH7A3ecy
N5DvKaZ/ftxDPJ/1SlEW39NUSZKtyp8Y39vtWV0L8NxwhnngBIPyzvcIIPW9
lH3FcAPmM9bj9H2Y2LdGrhPO0eVuJN+TP80sPXZOMSjzH/uu/wMf7dgQngDL
z5nZ3YO9tx4yOw5PtVWwM2HO77YZK+BCmaPO4bCkc7rrIeSz/W0sTO7rO4bU
iD+e36cuSiffww2/62YkML7yXD9e8j1m863sQATm07ff6j4FO9az9S+MMCjl
TsdN37D+SRObRjmGGVRYIzubDRdI8/Ke/sag+BziAprgMYsvce39aF9tptdA
7u+DTyylehgULdxSk7iKJ6/uHZtBpZ7O2Enas9QdykrfIN+/Sp4kn7vND0Xq
Cer/34MPZP//349jzf//1WX+D/4g0Ps=
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], {7.303416527551657, 17.305720701001942`}, \
{0, 1}], LineBox[CompressedData["
1:eJwt2HtcTNv7B/DdRUWhqExJKsmUJClyyQx1NFQUIU5lStGNLqIcIYpT6apo
UIRoUohCaRBCKKKoSKYbRTQqKsL385zfr3/W693ee63neWbvvdbaup6BK7yl
GYbxk2IYav/vbyqXkfzBnyKXUV4kqrpsxGVMrUIUlZW4DHfB1TNeMN/hPtsZ
1v9iZzYeTr5lOrMSLpq+4XedIa4fe+/ctpFcpm/OR+tM2LS+8qbdKC7Dvlv6
JoBscFloO5rLlOXKGPDgGNbDLabKXKZWj/1jOlx8WOnWA1h0ridDH1Zem8j3
UOEyrC7/m5PJYw3v/oC1YpLCzej6Jj+3hDGI72HehiUwu2Hi0NixOF+nL8MH
Vihb0BcLx+tHNyfAyWc3u3+CRZbPc67BvN5T1haqXCb02CorMSz4+eC2N8xc
1Hgvj/zEua/GRcAur88PGcFMhOfdcLiCP0LFFq5YbOjpBic/Nxq2juozevCK
Mcxdf2myJ1xtLvL9iPEGJlRaucO8NoPhx+H52uvPOsCRV37nW8MBjzJ5prCl
vNfTTuRTWzkklKPrP7+SSYXLP9jWPUd8BZKW2zawa4DJplSKt3iziixccOWl
qwPZNsXnJerDJPLUpKle1Vc9RXBb1yujIjaOJyzNKoXF7sLVG+GBTKVztbC+
TrvjeDqea/1EHv119HQWvJzCZbJ2l1s4w8WlP56mw6ZBHa3X4dDQV8INsE+D
bPl0xM8P2fx4Lhwu41h/Hc46+XieNtksydsO9XAOldk2Ch7w8Ddqh/velboo
wlyD9ow9alwmYuluC1WYd4k1VU0dv8/zuqopsCTUNSILZl1o2GhD45vfuaQ1
jsuo3lvVuIniq2Ed3g/r7+wsSYKLf3a+rYMlFy6vKaH+y1RtVFjIp3PNYDOs
YOWdbQp3fR75RQ75Oqo0Kc6CuQekCibD7CsTr+vBlvYNUvNhlrBXZhD9KYmb
FXhwWVT2KhEc2l3i+Z+DvT8HwRWykRZ0fsGV9OLxcMas+3MmwbxCs3F3Eb/X
weqbvzB+x/buDF+4/q3S6Uo4MkKtehwsW/t4WQrFb9La8Rz1EK5+esaB8jXe
n5YBB4RtapGBWWs33toJl4Wrp14zQD5XXDxDYObNl00+5MhLvvtgnfCxE7Rg
4dHWtHx4SEfkUjsZz8vRhyESeKB0bnwqHGlS6G2P8QM8/Or+hrMUfa/dhHkV
r7pNYN6i14Vc5MNrvaU0CmaNX9lUTfW/2lg/qI/6MSwtX9TL5pXArwcuOzvi
m4wGlzH/JGvdT96f+eI4HPNBuFIe1yucMVw4VRN5jXo3Qhd2yTw//QIsbpi2
cRFcrDdgNGE8PdcVw33JlRUpYTArarLrIbisW/t2CaxTx88uhbljTQ1b4ADp
sUYtsNjNfasEDp+vtUoG+RcsCQlph8sK+59QPQY2turdg22mmCUZw5JLp1Li
Yf3d95RnwFlbthT/BbeVzF1sSPUb8Frei/hcJnQUqcK8Z88PH4Pjd4SF9WI8
H49G1YVwkEHJ/Aewjly1exfyrb2Ww0mk/PYPVJ2C2zbJz3GAO24qLt4I58vb
2g2DB4KHfljBohkJncWoV+ScGo4xHG6lVuoHK3dXrp8JR4cYRUyAxa/3RznD
8SzjpppJ6L/V/0wSbOqn7JMMC46ox7TCzo9euayCeZP31jsgvmpV6wR92PT2
HosnMO+Ymt8fPfy/0cRjDfLNyL315D0suZ0Y9BnWEtgPvYbZ++SGxWjh+VQd
UfAGjjk77aDuBC6TzetT6IB5Z37tLILLJ4uzfsM+o4Iz52lzGftPdUcnYDyd
lgzOFbhi9tfCRTS+zD9bVSfieP/xTf5wgew7y/WwkuMsmcOwwuqUU8lwUOLB
xyJYmFj7IQcuq6lSF8PiI0FhZ2GtZ2nbhuCsiPsdcbCxb9j90aiPyy6DL+vg
/LU9y1iwwo9V5hrUX0d4vSrMtj40+zHiCU29XyQLF4vYo7fC/PB7jz+gP3Zq
7wwNOEOl6MgtOHz6jll3kV91RZR+HFxdl56yFRb5J8nYU34zS1abweZTfM3l
YH552JA0bPokWKUU9WDdC2B3on7ZR9bM3Ez1M4mN/gBH1peumAjzd3w++UeL
5idPdq0u4i/Kb5yB68Vabg6JMLvd0X8XXDTmgpYjPGCwylkMa/0pTB8PV583
SFqDeIsX3lnWo4P3lu3Jye/INx4uewkXmK3zDEH+5nxVtftw/l8tMnJoi3UP
x95Bq5N5ZfFKtJGKvX8eoe1ItzU9gVZ4OoTzFq1YWD6mDa1Ad0HKINo2A42d
ehi3Y3JIrRbamEmnHdagDRounW6DNvlSVVMkWm6co9kWtFl1J+VOoNW3MPl4
BK3zDguTi2iHJtYoiShf25zVl+k8c/cxb+h4zhBLiFZV1u/GV7QVKtNPpqIN
zXIz+I2WF5d0ZBva+umLu8nV0tP+q0u19txZvWijI3WyJ1O/GQcuvqb/h79r
HEDc7GjTU1dpnPWtSZVw/LWTndFw0TnVvWfg5NPHPy2B86W2L4uEmfKRUXJw
5M9YJ29YVWD7RYQ2tK4+ypnqkP+oMBBtmW39puVovVRvReuiHVhp3b+a6ub5
e+551N3L/HK6P+yYY2GnCYufSNQS6HfamaQrwO+kPH298AbMSwiWZcPxzRMG
6HdM9pq7qQq/c0WPyNQccbCetN+Jg/NTTqlFwMVB00I96D5JNNGqoDpVhV11
ggNORsSq4b5KtnY6tA5mnVx8yAN2fBffvwNO807bmQsLpsc9zqf+Lc7d+Ej3
ZWnUyG7Y/mLemEl0HzfPHzUf8QSN/HTREY4RdmUkUrzOUyxDYG53C68Zrg+y
aztA5+fqZZkgv+zDZ/Yk0nNyenhgMMzXnBMYS8/xxwm/suG+EIv8cLjj5Fyb
+7Cy9r5iN5j1NH3iM7h4rVHCXDo+MyaojJ77FfZRKjS+DHe2AI5WyLFsR7wV
S6JOrIZFW4cFF8PcsMLBIcQTY9H1LYHeY7ErriZQvAky233oveRZMFcJdo6/
4b0UVrikVBFB9XI71GJB+T/5vaANz6Fku8cxY+qvdOMnW7jRvuD6dLj+/d6/
LuC96LJZrZYDu7j3X9ageeiZ6VdXPZrHHy46hPeqT6Ig/ABsmsdEjKd5Tb54
Eb0Hqs26tUvwXo5occwepP5szX5vpnmh689eDr2nDxQ3zoP7bJt96D3DdzVY
O4nmgcCZeXWUf1T6e/LA79w9+nhvWRoq19D5xnel9LbAzMQVf/vAXSprey/T
PJE27clZ2MbjheAz7FP7QtgNz/+lOW4i5h3+A8NOLuJT2pHWaQMz1x8bpcGu
TmNU3Wkei3rf1wpLCl1N/MjCBf1GNM9q9vjQvCxJXcjzgs1tquNcad49vO3E
QTh0m3sH9adcm7ovk+ZR5daV+jTvWY0IT4fjB+Yo/EI8HQcUNcPhtMXlic/h
8IaGqRyah0rvnMqmebA74fhnqt/CLUo7KN/Pc8L2w16aLnFOcHXS+9rhcFtM
QI4p5Xtz38XdyC/7lOlpeu+z3PwKO7AuEQr2OSnCfOUzKg5wUYn66BEwL3XZ
nMtYx/Bb83LUqP9N6pmacPWeAicTWteYhockYh2kevT++ZUU7/s3oSq0DrW0
EkXDgsz5F3OwjhL/s16ujOadU59sneG+zT0pMrQu6T3irQGX+8+Wp3lfKGej
NIB1b0ST46OjcHL2BnUJbFz2TPUDLPCPs2BoHewmo2OGdUZkTImUAa3TglPm
hcOOW6PV3On4vw1fad1X3/rIIhs2vl80qYvWMS9Nonph/vJFuuq0zgxmFS5G
vManT9ycCQts4hwEcHzJSVdaR/P/UvvcApve+TZoS+ev69qli/zFk90MObTu
XGa1YznV49m70VPhih8sTV84f0no6pHU36fIWH+4Ty5dvQPjJ48S/HGGFezL
7tyETX+G1OvDjryXsikUryjt+BuMZ/+1WegFM/vLvv0D5w+PDZlH55v5nB1G
xz+ek2LBMbXH19G+ID7i1JUh1KfaRXKwC/UqXle57xOtm/5xXrQCzp+qP9hO
99tqi6ar2HcoHw1W/Uz1tT9drwW7qJzlSFF/xsuj4rFvybjSa69H68Ie/uPh
sML5L2HLqd5fGn8IsA9SSIvY8i/MknJNtoKjn9nxK2hdXblM6Qf2pWmdCqrK
tE4vuVT/DM56zJdyJXfvmH0bbpxzYksu1SvvHOchHGEUk/yN9h3qtR/a4SFF
pTwr7AuSE1naLNp3GcyasQdmFn36tBZmO0m3XoeFQbuyz8HGF4Qf2mlfUuM9
fhC2MZnZKo99XaSXdrMd4g8YWi83AS5TTdl3FI60HseifXLQlsqKRlikJheu
Aw/c7P+mjHpED+NqKsP1528NzYDr92lGfEP/3DEXLs2H2WPLD72geIxWvDeh
fdw5z6JcNr2XdxyRh+1nlUfsgqutV4gf0L77jPiiI/nroNIWOHt0iqoBLPmx
bc8fxMtnvrsxbJpfqgW74Rjf4dItdH99P57cjXoULKjUrYLZL85Zr4Ety/iB
9+CCdIfv20bjvfDVXPMB7fNc69y4o3Bd8OQ7tC8VVzXHsUbi99eY598D65wN
zFWg7xTbXf6lfawk9HiVhiLq3v66Zznlp+Efu3IE8nrULJdI+fn8lVY6HPex
S1ZeDRz0WD1mFRz9qi5IG/Wp9pt5XQ82v/z3eX9YPNSqRS5+6pRUDDtmO/k6
wloBd9ZJY59e8MmGLYRtqnr9F9N3g2NfGT2MVzTP2HsffScZ16Z4Fc5yd7Qt
Is/Wm7cG8fXVW8W+hh3fi579gqOvigz7qD+HrXWZyMdL36qUvstU7z2fb4x8
i2LqfMjiES0hWbAo1rmvF+cHOfTHSuAuY+cLjfQd4vi3HjXUK9T2p4eIvltU
NpxShEWGr5cchrklicVPqX7vpLt8YeW+YKE7LMjaJWUFZ2k1WN7E+BWpoatU
KJ/1diFfEJ9lbVx2J9VjtEfgAPLh72mMqPjPgWqtyN9YWlunAOaHLSi+roB6
Tbf0PU3fhb4NuxApj7wGDl/LovvzwInnPDnE+1D3dR7dz1PCRo4fhrhkLo4u
hxlFtRdSsrg/x8z50UH9HevNkpPB8/fHWKhB8ditzZghjefkm88JZ8o/ehY7
Vgr1C0ztTKf6GficVIHNF340b6bvLJIKnSoG9QjZ3z6NvnM98d5eCrPfVFnu
hJkZ/eNewzoq97wewFydfTx9ut40vVjJGMeX3XdIhS3nTBLZwQUjO29pY3zj
zeX2e2Hxwfr3Ipjl73QtD9bRvW+xAfE6Z8o8fAQr3zgjkkM+lZEBb1/DWfrM
hQw4qK2muwmW6DvWaSJ/BePc+Fdw0CxpvXDYfJd07V0az6OhNx8OerDN7yxZ
QxRfCNdOb/eOJC/v5MXAXboTLVbT+HJRTwxh/oEtUYY0XuauUUcxXp/3Jo1f
yC8raM6aBsRnE+QqqoH5bnbKEsRfdG9wZAEdr50R14Z8O27v2ZwGR36vP3ub
oXXasMZ9VB/nnAb1PxzMp8PbI+j6ZEXLs0McJuOHW3wUrFNubs/9wWEi45Yu
SofL9shs+tXPwXX+Tdep3rwsO8k3DmPsHXOqjY4rrOcZ9XEY9vIVC7QQb5np
2oCSHhz/J6PDldz+pyXnK4dRYG3wy6bfY/3UXT8lcOY5Kwnl2z5u81W4Y+yX
XKtpiNcpwPIFLGTGtcXC/N4u8RJcX3npt8kLWMf810Jl9C+U//fnWBPkO194
Qq0X/Qki5RzgyMGCtbaIR8FTa+tOWOfWgmfJiDd0Z4E4k85fMXNx43fEu+n5
P4V0/NWkL2MHOEztXFkZESw2+rtJb5DDqG4X1FyH+d8WjvgO9y2PeZND1w/J
6uxCfXTyklIT6PhLJ9s8uEJ5sMuPXLT9ehjM29s5dxH1X6Gk3YTr7c3Mx6mT
F+x+3oTxZNN7rTspH4FG1W7UN+jt0oO3ptH7+932hxTv1YoTgmk0r1+a8QD5
sfM6+nfAWcsayg6iHlqBk0q96PxcvsKaL6jfMfGJdeQDulO3deL3nR1Y50r1
lHhmZ7ZxmLR/uxUC6HijTED/Ow4jGFvDiSGX97oH1XEY5u1SSQE5PW1R0zPE
u/n8UBu5OXKnxz0OY8psu6uH+LGhYxILOUz2z53TfMi8NXscjnEYVqNJ9RXy
//8N0fdoE+7/AMeAIYg=
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], {6.325036049813624, 8.946315556040329}, \
{1, 1}], LineBox[CompressedData["
1:eJxFmHs8VFsbxyeXaRJm1BiXQWr2jkKlOoUwKyHSce0yqSPdJYWkKCQJlXsK
hVwzIqTekiQjInchOhSnhJLuCknvM+8x6/XH+Hw/a++111rPWs/z+625O93t
94hRKBT6NApF+N9SDn4oWojyvz8CMWuu9nZULEQU2h6D2EYOShebSOH7A1P+
cWzK5qAl1NjQiKXAzsleIREcRJU6mjf4egGi6HkHfQ7koLiqz/vN44CLd9dc
C+KgZzaLPhubC9vrq2JiOSg43NJs84QmopS7Lf5WwEEhiu9VXxcDe+Q2H3rO
QZTGVIW3/sBLuj/JyRAo+V1UgNSfwC6njh2xIFDW/tE2dw3gwZqS5jACebAm
f5XIAEf3XCXrCOR5pvrm798aiNI555SjNIn6elLjKn4BJ8jp7LYk0VBh8M9J
SWH/Wqb7T5KIF5CquEwB+NMrk75cErlKzZz0XAzcfDJNUE8iWQOLq8fXA4cN
p/n0kuilRV3Z0wPC77lmqPaTSLXp65m+c8DFZnMPviDR15Kte1WzgXn7nzc+
JhGHPd4qXSZ8X2nENoNEheuO7T/VIOz/xsErR0gkfuulckYrsGblmm5DEh31
fWU0o0nIc71vTBLoXLWbc53w/UDNwZFSAsm5sonwdGBFxfLHxwlU+iY0yf84
sPP84hWrCHTF4PpPp7XC561WGU0j0J6AzGwvKWBayefIJg56mSlLHKmC9dAs
OODP5yA0Xh3kexx4VNWtC+Jp/77Prk9LuF7+agMQz0bdw0tR93xYH0vDVRBP
v0vdB8hI4ObO1uoYDtI7MzmgZAqcOkBtzeegqr53Ul4U4CXjd6d1clCgPWrS
ryLh/Udl+2YSiE+9cGRWHLBFyz8p5gRSmXn5leYh4ME7Qa9DCPTnsd258zYA
q49l/fGEQOkWhxwUzIGj2+r8pEjkZLBrVdQaYBe/4by1JFqaLaF31gq4vLXv
nT+JWN4DcSHbgHuLz+dfJ9ETwfwvSbDOlECHn711JFIyOagRESN8XzdopIdE
AWKvlF8WAutpaEy8IVGZUpTVeBMw/3tXHsRT8++CfOv3wB4yf7tWk6hVKs19
v7hwfgbTUCaJenec4SjMBk5Icm/2JlGevgLTXwm45l2/uTGJTE8/2LdYfr4w
/m8NKCQKCZ6nZiIJXB4kiCkj0KiLBmvDW+H87d9v9SNQ3VGFxAsC4fiO+hYa
wnp5bl5eGin8/mH1MDECNXXfH5exB3Z2LEtshvM1Fn/RWAaYZtavn8NBti55
HbsrCNh/v6ZzIzlI5Y+Rqh4vYM1+3yGIp/aKemRAAHvkub08xUE0hl2q9DM4
d4wyP2mIZ/5EYcGL88A1ew3Kb0B8i/Ydl7AApumlp8NzISO1G8KlgXkH1etm
ECjm4YZDKl3z4PmG7c9MCQQbWq7vNrCzTavYGQJN6PgFhF8GZlhl2VUTSPmi
raRuOHBgTNB1GonC2YaVf50FVk+4SIE4R2t/lJOPAR7s+nHUj0QzRhI3daUB
81X6g3JIlH7Wp7LmHrDHgJoUxDM+XFsl9Znw+SqKH8QzwvGl29sR4OIFhn0Q
T6pjfTRdHsZr+1r/O8SzbQ6PelIXWFEmn1FDIn7fqf9UCufnIdDWzyKR2v3k
pbk84N6tI/RjJGJ+pc/duF24Pj/PlHJJlEClnHDYCjyo2dM6jUTb1rfeumMl
XK8v1/XLCRQWEDCotES4Xq13f/kT6ItqUnw2Ddjiwa6VxgT64eXGVxCOV31T
Xq84gSTbqzuuJQLTbiUXtXCQse+sz9M3Ajffq5G4Ducx1Ou0jZRwPrPNb0I8
93cUS3bdnwvj3xQ3CfH8i8eMXe4GnEB1jIZ49pfVnP+mCsx/JNgezUGnz71N
TG9Vh/4/1d3Pg/42bHaNjwJOZcTatXNQ+ezSa70OwnYpJUMagSZb3rtqzgN2
po0oryGQpuT0SpMfcyD/bylcdJpA0k4uHz8JgNUz03yrCGQ6OSsmMRN48Df/
NZVEvp2NO7alAHeWam43JRGjWFXB7AYwf16gzAkShdV+Lt/ZKGy327CDTyKP
Ut1P734B19TIGNWSaHtua+AtNnxfz11NGuLJs1Ir/mYgHN/uV+0QzwuG33iE
IzBD28DyJYlWGuzyyD8KXChwKId4jo9a89UigV02ehteI1Ht6bEEoxRgj/Gf
W3xI9FjTY41WFnBglKrRahL1eOT7eKcB+6Q4+IjDeRfvmLsgFpjHTx0WEMiF
WXv5hbB/3jO1vJMEWu+qGH/PBrjcy6uOS6DgN3abPFXVhfmpy1ySQOvcHX39
KmA+0doRz59ykNrc7/tS9YHL58i9hHiyi7KoXplqEL/l5NIoDnr+Okglbzow
w/2gOsSPuuuBuZOLKnCDhB3w2VO/NpXUqcD6a2cK4HlB1F8WLSuAUfCDqlwO
ur18883N+WyIv9Y52TboP0gh9OAK4NSa3BIqgRYUdT91e6oM7Ywst9UEWtYW
eU0QDMxPVN13ikAzM4cXNVgDO7em3HhEIN22bYbtS4Brak00JeE81epTpy0E
DjS7XmNConqXjda79ICLzwXm+5LozppgV7ktwNGpnZbZJHJWMVQ3DxO2n33i
+4REwyNONyMFwL3fu7IgXnF6Qp0B4ytuUGqBeKropFl7GrNxe/WGyp57x9j4
ffueExc/XGPj/rfRcm8mVbPx9/14j8cm29l4fB3WGY8WNrHx+NUaZrUsvcnG
83tm7bnF+AQbz5/ykKNzQYeN1+dD6qBP7BNlvH7ehjnWfDtlvL4WF9LvLnqi
hNc/9aNYjtlyJRwf8XKTe2nxijh+thH+rx1GFXB8P3g4joVvVcDxH5omlbD9
MQvvj4e3skJOG7Hw/qHwtjmoVsnj/RWT1NQS7iyP95/e+IFa01nyeH92uNqX
3uhi4v27bnWGrPwDJt7fyXPUfXP+w8T7/yhbpjH4EROfj+UndxZUvGbi83M5
X39OhrD/qfMlNqpgfddKHp8/XvijKNY5eXw+rep5kwk18vj8Ft9upMuLsfD5
DuTJcpN1Wfj8K957NVhiz8L5IXqdbkrGDhbOH32Hhw/t3crC+WWiMp5BN2bh
/ENxG1v1gMb6f346OX9hwX15nL+uW4YVGfPkcX7bc9xOq6WXifOfhKxOfQmP
ifPjtq+HBlmVs3H+tD3c0XVJYzbOr7yKyG+WYbNw/t3LVBpzHpLD+TkvoEv1
00Y5nL9/+3jYFtUzcH5fdVajoNmBgfO/RWNU2o4XdFwfdAepTglcOq4fqcxb
S8gWWVxfirQozKJYWVx/Kn3LT+QGyeL6FL/l7B8OybK4ft20GVsw3C2L61v5
46v94gZ0XP/0jjeVCnLpuD5+OLhmvg6Tgevn2Obs6of2DFxfK+n0Y4fCGbj+
skLr7S1LGbg+v3syt7v9BQPXb1mDsGOmwwxc39tGnUaSBxi4/jOqp4sP1DKw
Pshxvdy98hID64f+jE2caksG1hf60u15jQ10rD+W+e9gfeiRxfok4aPh6rPN
Mli/fJUsDWjIlsb6Jm1G8wTLfSbWP+meWoOBS6SwPpJbbZPm9p2G9VOJU2qO
ZN10rK+ePWXI19ylYv11m52xiF4lifVZv2v6lZtjEli/HTLelV3gKIH13eiy
o6E/3olj/YfapXaY5Ipjfbh7e0bBzMviWD8+dRzyzLgljvXlY2W/1Y5fxLH+
LPRdbVZlLYH1KavnUQurXALrV2VDn7hQQ0msb/ONrHbW3ZPE+nfYeM/KcB0q
1sejMrvy3kRQsX62yhme09VCxfr671GvWY8+U7H+Ps9ZW5Q+QMX6XEXS3d67
gIr1e4ZSgve2tVSs74uqb+vcKZDE+p85MVmhOCSB/YGxzca2ZZPi2D8s0aU6
J3wUw/5i3vsIW9fqadh/KLP1VvyOpGB/krDguceL1EmuyL9kfhG8XaY9wRX5
G70953uc2sa4Iv/j1/KiYmfeD67IH62/mz+PVjXCFfmnyksV7Nna37gU3r/+
KmkV2ZMy9IUr8l/rw65MZM4AnvJnPuXvGXdCP3NF/k36m9SCgZ1C/tffqbuv
vf3tAvCU/6PdWuycSIf3p/whbZjTwKwGnvKPerN3Nnfxv3JF/rLQP3uGaxqM
Z8p/3r5fJqmVBOOd8qcWnjl0j+DvXJF/dU6cMNhnDvOb8remRt0cWjPwlP+V
iBhzHJIb5Yr8cZJzpacYBXjKP/M76QzNWHh+yl9TuEa8U5XQ/5T/LnUPmpkX
D9+f8ueaKuMmdxkwvin/7kNJYwzowXxE/l7zdruZ6ieuyP+PnlcbZiQNcUX3
A4yHfc6J9/u5ovuDzsF0PW/BP1zR/UKgq0DGJv85V3T/4FwWov5+XTNXdD+B
iolCelwZV3R/8e+9hrGR6H7jv+vKt10=
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], {6.75, 9.0548}, {0, 1}], 
       LineBox[CompressedData["
1:eJwd2Hs8lFkYB/BXIbnlMjIuaVTkboRCZSa6UMTmElKmoiSiZTcVGqFUqqko
SZmElCmEKKqpKDZbyH1dy7VUo6xUyv7O+mc+X++Zc57nec8755nR3ha6IWAa
RVGHxCiKvFITU/gzYlPf8XJoEZsqPvKsaBROVGFrb4LjZeJ/tcBSvbq7l8BW
ftEGRbCexcdfKjB/5/zxOHie5XD/VzM25evonLQOlrYpkOyCc+9LRMrAf3qX
atTAdYq7k6sM2dQdzTt592D/R2u/HYRjRMriBTBTwr6fCYuaBywFsFGKS86A
AZuSD1ZTuU2uL7sbmwGnHVpnUwJPGrukb4b9QyRnPIZ78hh98+CeGZaCOpj9
esmkSJ9NBe66sOgtWa+PZ1gDH7Zvj/8/XufHLgKYrT90QBb5cBM+vk6D1x//
1c+AG7tCBclwmLbUZXO475nDxovwn/XlifYk/+1/9l6Hz28Ty3eBhWZtoofw
R0ud5RtJvZa6NXTAIwfCeN6wJv/oiSlYaXntMk84cv3hTwsQr8MsA0Vnsl5Q
WMlaEr9XvJot7OsQxdsD3+FsvaIPS3W/XnMKvm/Qpa0Apzd2/X0d/vjdz+cz
yT+l0OMeLN0w37AeFnfqDHgMC6O+pd2CI7+0DD4k670/XpMIu/pvMi+ELUoz
3m6HI1atVEmF2zkts9kw53NufTgcE+6ToAV7cZS0V8Ec/ek2FKwwfUxPDtZ1
3z9ngIn5QgtD/0Z+v3YUjdTBy2bm1x6FuZ9ZZo9hoyCahy1M2eYuLSV+MHP1
Fz029bJcl1EET6S5fciFHe69Likm1z+sOLMVHnnvmlpOrrt98JoLS/m+MXwO
R64ot+xbyKayamuuNcO+x5RfFcJJmpnSwzClp7H3GJy2ZLvTT5i5W29qN3yl
J3uFEuLnlUa/84Y5yYXlurD70TxjN9jzXDPPGq7Or3HaCLfLn8t1hEeOJPgE
wCN54jM84UCtOrEouG/IpGUzHHX++bmLcLxpXjiH7Nc9a9UqYPbozhByXWFf
9M5eWCqEyXMn4133LJ6BfAa6/u5bRdZnDlgZwl7deQVmcN/qCIt18Kmb08Pp
cLKgmB4AV9bldX9HPvzsHto+eDzwSUsbXPnPs5uH4OMOMZy7cKNBwMNoMl72
aOoZWFDLvRoG7zCxFwTDsolP1b1Ifa3P1zjAYZuVAy3gA8zTygvhMnXZZZJw
5vOj56XIeNOSuy8Rf/qmrQc6TPH69ZH3adg39/vJQrgspmbCEXZqzuGegbM2
rcyhYG56xrcomPtbw+USXdzHzHsLI8j7aSKj3fDKNQcf/QkHKg+mzYfZh81+
xcHFOZRirw7qdeNNYRrMX/ElLhsWNL9YdQ+O8Poj43eY8hho6ISlFr4odoSr
6X1q08l+2ShxyxCeppIoR4dXfj80RYf7HO+lGMFWteK3FOGyr5aJLDgr8SlL
hcx3ad0LF3gkmFE3D/6z232rL1zxQlfeGjbYoxTuDzPUlrt4wnaXf/faCfcc
OpERCUvvCs4g1wOj/Zovk/gtchTI+2kvSgVP4cqa0kJn2MFRrmnw//hEldaw
MJOjLIX8i/v5zxhwYvgZ93mw/5hsIMnHSFOm0gJ2muajUIV8qTt9XcvJ+Pcm
HjGwlaIgbhmpb3dDmwVc3bL4l6kueS5Z4+9M8Dxe/ClPJ/U+f0fyGjxiV/xh
DOu73pZ084Mr94iveQ5z6rvGtWGub6wlD15Wzn8xYozP/eVzF/9G8gmc5/EY
Hvsjhy4Lh3GbCvnEcVUjTxZgH+vPPn0C9o0+OrIP1oxTnXcY9gpUCDCGhd2l
OvFwcdrZK/3zkedmt04enOsXWZkJB27cp3kdpvrvv9wBayroulXBmjJuIebE
qw2uDBPfTBufCdcNv2pXRLxjczy938/DcyY0f7AUdsj/qtQK191jD/nDmr8d
NqiDBR4cyROw+Bc28zVcbNjRmwe7O3jY9cDCWZ8PVsFU8EeVcdi9/4Z2M2xk
/1xcGevpVZyL7oCT2vy0LOEx1ZLsFlhW0XaZD9yhTdN5Turpvo3OhUXm0RSZ
n/1dIiALtvjqejcOFv2e11dJ4lfebL0BFoonxHbDlMG/A6pwxInl2z/D4q5F
kc3IN/g8a9okHHkn4vNp2Gpd4ZIfMN9u/cnVpF6t0Y6fYH+aB38S5y4j8uNo
C+xVZ5RYDDsciNtWQuqdsOlUGMz0/7QiEZbl+9cvglvtHLN/I+OfZJn8xDnc
4fDg/3wrfjSZ1MMVkouMXqIeBRpS4/lwYsdhvQS49u/iJWlw8DflRTZwsFmw
KQ/O/ZiR8kkb++z0jitn4GJ3s/TrsHgq7eVlWDbFPtyfXF957kIRPGIlPlsP
7gktCSXriVtnWo0x8LlH19n3L1xgF7f4L9hX8OXkHMQbdpIungfTymt3rYHZ
UwMLLsCTs97eIvn1xRrknIL1jK9MvwBnbXbSOgPn+kual8HcuYsKL8N9J0XW
DbCrnJVaEex/8Cvn7f/12l/8Cm51DXR+R9YL60gZhbkPd8wagEWdJhdnI96x
SyWGzbBTWNz+ZXBZ6wP+fTj5Qd8QB17pnDFwDvby3JkbCwfeXftuGyzYlpGR
DjcOtEzXhzuK4z/nw7RPUUODyJd9pId2H05ML0u9CteW7G+/B/M3Ba3zglO9
PeNuw5P5hZ7y5H74nn16AQ4rOqL6DOcyXXH/sz9gzWjptlh4ctFjI0c4y+tM
hT3pMx7/lFAm8dhsvUbOcb5dYlUj8qtWl9PoxTk9tNnLnAenZts4P4KXBe70
XkPy/3bwSy7MmajsmJiLfZ5U4XIFZvYpR2+HxyJ4+hnk/WN+C19rob6mh+tu
Eodn2jjBuX+tni+EI5cfLmqYg30sdvJSJ1xwumBaENxX+X6zGOKJPD85RIOT
Ehyd9eHEA8k+TZqor+cow43kV5gRJIAn1UOjosh4nRnsNLjP31rqGhw2o0f5
Cpy+e+HxSpi6eMz6LiyVVzTZBecu0mf2wFFb6Vki2Ir2soJO4snYxZiAvdyN
ZH3hMhnRwTEyXvV0ezbck21i2Q8zXLbyR+G6LwYr/4IV7KIe2yC/iKNC9Sx4
Qmn9gyiYETiZQfoozp7ezUWwZlWBrg0sUvznbTucanzN7xvyn9hx1VgEc0L7
1xTBrbW0VuL0NYq0IDh31eGN/8Dx6Sw1BumrQl/MyIdry/OKW3BOhyWrmwfD
HdJi5udg3tEOeRo8YeJR5g5TVXPzc0m85TX6WnBuX4fICA5b9UhtFOd07kEZ
3yzUw6k3sJSc8+zAil9KcGDP7ielcF1EuV20BsZZy8UJiP3CHw2q4zn5w/Y5
MeUzPnMjnP45t4+MF9kyEl6pYd+oZT6qhcPSnpl7wP4Fj5qHyfzNjafe07Hf
Tc9tkEM8kS9nbk2BRZGDdEtYRKu/4Q6P1Je+2QK7du9MNIAL9nx3SyTxT+ky
VWFNydW0fJjRvntADWaIXAfrYO5XS2kzuFZibeV7WOGmvo4PWe+06vufpM9a
tVriLOx05Mq4BOrpVWbf1Qj3cN3eT4MZUUv3aiHe6rXRK8YwXqg6ZRUE85gP
37WR+Y45XyyCKyxubigm1198lx+HR6T9feLhsmwlP2PUg316jwvp4yhn6ace
pF7hSl3SsNVMc4VgeOVU/1Ql6lHgWd8aAjvpGg8ehMsCYxK84UTD4UGzhWQf
/RVgAotcj/oNkz6Jtbd0BOtNJBilZ8HCLc3XUmCuMb8yAKbf7jU3JPHfqn9s
okvyqrApQH6uVW8NxGC9n05WejB94ymLLpzjXgVZFhdU8Tl9ID7rGTnX63pS
xGDNzG0193XIuWPxefds1JO9fx8x8/2v7nYV7MeoFOkq0jcMd1ZtgIVLSoLb
4EB+maCFhvvkyNEeJ3a8pBICa+oyPdRIPJKMJhVynftWxIb5Zr3/vlbG/tiz
OD+I9C0x+tdy4aRbaRbJJF8NoWYyzLFoXVgOO/zjUpwCj1Ulr+2EvbzjG/Ng
h6AnvAk4THhWsRHmm1KLZVC/1sJYOxms56slX6cM653Xy3SGU9vPbVYk1xec
Gj8PS9VnuE4nfesumQdvYPHwvcmk3lLFO7yNkF8FfcOpSpj39PuqUDjydrha
Cmzl9cXuOuxgQcX4wgUlhYfriO1Lt2uSeusfqx+EmcxsYTPqwZhtUfoONtLI
rTwJC3nXeC2wbE7qE3uYF6Rx9RYc9kyc/gN9k17soFoI3KhzgHYXbuV601Vh
weJtvX/CovH5abdIvGuCd7Pgnt1Jgebwglt71ysSa63/QeqT7JFT+YH0WZ82
u2vAE/FVF5tgerh0c4IS7v+/wnk18JCOiYpIEa8ujjbVpI9J2nBjC5xs5W7X
QHyybLJJAf3RdJ7BAMxTWqrlA49Exh6chvXCaP8Yd85Cfba3BOjACl5bjxvN
IvO4NTnBdWujo3Pkcf9C446Q+JmMl384wxGJAVp8mMsol5kHs43E7Z/DvGTb
H8SRfeLFw7DrYy0zMr62znCbBOql0CD9/hJMZXbGkz6fn+w0LIX1pMoeCbTh
ulypgiS4TqG4YS7p8+3uBM1CvGX3k7cpkesxhUabYG6r7YpvmF/KcVQsG+Yb
3v67EWbPjdg2RMyb05kNTzzMmqmNeiyocb8TQuK3G5m3DhYtjRGRPtchoHTv
djh1XO74EOrDTHQI3wlXOAcLMmBhzlikB+zgbHXDg9S7oOyeEazpO6tLFmYs
DPX5gPX6prdceo6+StTnEpwKu4qfkE+EGbdqek1h/1NJuq4wc9xtLBj5Fbf5
xWvD/NZXjn6oR6Iob+dPnPMFM6LLbeUQ9yGTzD6YeVxDkiZL9qXR6RaY077b
dUgaz/Pbu7OaYe7IuReVMzGf3+iJbpiape52Rwr3x9Tu22dY+JijcG8G+r0a
y355st7tXTo9ksjn+OV4M9KHR3lvM4Y5cc7PvEhffa1KKlsC4zRKAg8T263K
cIRpD8IUBTBPjtaiAUfYdwWQvlw02RavDgfvKJpP+nCF628EdrBoc4qV0nzy
e8fKzNMwN7K8RYf0wUlFS37Arh33k0xJfYMoKoas71m61oTsz5HsS7MQL63K
Z582qe9Sa4XrsF4ZY1QKdu0x1l2K/CrSihX6STwR6jVP4LA57tl3SX3v83ZY
oh5hiZtGYkgffOTmmhNwpKp7PIt8z0i41vsAZm6U8f2O+ogsLNWr4dZ3268U
wq7y76JyYM6mO5d2knrXW/tthMVZZwu1YHbT2Gg71gvWYC5qQ5/V82INyxyu
1pN2uggzAoJV/BFvlI/OFw7M4fV3/Y78Gkezas1g15WDu3Yg/7BpaXPk4LC/
rK+uFsfn69bog4PoyxgcrrXmdDznIy5zamG200pPkRj+L5386TlMBRw0qKUw
fnT0ZRvcc7+buXeKRUkdu1s4BXMz3904+JNF9WWd3qJB4rMOnP/sB4uSXXih
cDmJz07Z3/c7i/KyHXzqT+JLU9dY841F+Zf2epA+nDLdl3BigkU5zW6QK4PZ
jbZLDOH0wQO8btJXnjeWWQBrHrtzcRqpzy4F6zC4bqs8bS75XvBL96wk5uNE
ZpuYkz74hGRvO7HTjLDlZH/6qOzqwvpRalerSB/O3hTCpSZZlOuw6BST7Nf1
PctNEb9TpmIWncxfLWHh9YtFjVRv2vgvie/iHbNdyLfn08zfn8OiX1OH9FAP
39fTjUgfzKxWkOHCEQKdub/BQt+2y8WwVWDiYlmY7x4y8zEc6fjZ4ijqJZT8
7clVmC/1xvwL+rA6/yMSHjCDNrpgK8x+9ampBOvRU/puN6EPY8uI1QQhnkit
K+YesHDKwq0O8Zdlb8h8q0n6dSXtUeSXWLtnfTxMFRjcakd9wjyba61h4UXb
ovRxFr7HvWuVgLlHOk44jLEo4d1Qu2ENUs/5+0SjLMpKVqX/LUzJm1U4f0J9
Cj7cGIOFA4IFP95hPVbTWTW8n53buVB6EPHk2L1yIfP7G/914S32w5bCtnNk
/i0O/eU9sFpIei+JR8Fgi0In7pcSK90C8XNXXBKb1c6iuE22CxNhSvbIiwOt
mG9ZZ0ILsU31yDqY4aVvpKVFrtOmBbexKFGB0/BGmGv44Ofdf1iUnrmLciy5
rrqIP9nFooam+dw6T+oX2b8kthf3X/Ldkf9tVyT3FPEFlgo2HCJ+uF+VMYD1
ntCLXYkFTTHhQ9if6Rb2MmR+95r6VOQrzNp+pIDE2xZyKGSERfG3H3hjR+Jb
J7ei4QPy6XwUW0Xybx/kCD6yKIesnkXLSH3mONUPwMydRivySD1/pEmFw/z3
FWtUiZWtLzri/dVJPmIJ6Nu4zxcfCnqPfLJpqt/Ql1FfuYxOxCM1cebTPmKd
C1P5/bgf3SqxErDwwcf5E8gvt09dL5tOfp8OiuKjHvRr5vHeMLWhZV5+A9Zn
XfVdQLxfrPDJExbFtnl4UpKY/GU9oFrJ7/yq7P8ATRue0w==
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], \
{7.6572564142076684`, 11.680814559519106`}, {-1, 1}], LineBox[CompressedData["

1:eJwd13k8VOsfB/CTJculKLJn7BQitCon+7VcdGWLTElI9rJE19yUuJFRkaSa
W7a0WFIUZYpCUVRSSQalVNeWSJZ+n+fnn/N6z3PO83y/n2fOOUNlR9hmfz6K
oiTmURQ5UqO/8LeMpnjk+BtNmQWM3mmCKX2N5SrwyJ9efikwp+5Gb6AoTYXM
rXlKw7TrW/0eEZoK9jBfNa5DUywv/e+p8CPvm8IFxOfeFO+B3cIjOrbA9OZS
zRT4t6jjy0Vgrty7S29guR9KCfe0MV4yyfPF/LK00CwLZo1oqEhifcnWiWO/
w4zzljc+wE/qBYsUYY65ntVzMcyjFr1hWgvnt+xxfiJOUxsPGd//QOxbcfPR
App6vfGyzFuYOppvU7uQpvy+qJ3shtk+ty7ZS9BUlUuhyCDMVajOLYZfyE8+
n4ENTmkGjcDakhJfl5D1r4keVJakKRnB5ZQJzFbbH2ME3/I3z3CFndcFKS2H
hWvuzY+C22LZp+bD29zm96bDvP8a3Bsxn8yodf0F2CDvpVg4fOFj4ulS0u8i
7kEBOF5VrrSCrBdEf1mEeoX8VOpLSD7FWteF0c/2x/oyp0j/zpLGE+hfstso
NgamHkgUfUQ+90p7aAdyfXnskkHk+alqzxZSP+uD6FNBmBmwUK4T/TE6h17b
IH+n8r992KR/uYLDVcI0ZXo41NGS5FWQwL8VTne+s/m7JsYPKyxdBYdUDU0V
wLR6kpgdPO/su+ceMGdloV8WrFm+2V0CZsWv15LC/P4idfVPNOAewak6OP71
mfnZME0zd7JRj1h1Sn4AcWaaeTzqpzMciiyJo5WN9qG/rXFHMvVghvs31Ujs
75h0sYcqzLuyvcsfeSSzgv2JGWHKJyyR1/Sh3lxdWMKc/8485OkV9a+fGcy2
v5TnAN+/ebzBA3ZONDBMhOv9d++NJo4P6s+GyzwbJ7LIfC/nvI7DH/Iv36ok
14sHHouA5a0mjNrI/EFe9SbwSdm9/AMwx9T/132s/3RATWQcZopKdY6gvkWJ
2w7+IP23XLefQ/0KedVKY+T8bB8Fsn9DdYWiPJhb81ngPfqP0NPhv0/6Gy4y
fYF8nLvEnHLIeGpW1zPkJ2KVy/Uj+RwZdPpC9oPvdYkGOT82rkMLjnPsau9R
J/ez6wxbiKaCzjzechJmsgwt9OCdrZWnrWBWmfcjClZlGmhNqKHfmiZVcXhg
wI5dTKwTs94Ffhgs4OILc2jl0Ga48OvLckUyXhtXEob1egY4V/pUMV/firvr
Ud9DP5OOClVyP8neVEP9onFF1sdgRtcGV0X0t6VfP3sfzJE3zZJD/3Qr3RII
0xK1Gxcinx5N/Z0BxBcOhI/CQqftN4fDzG2GhjeQ57liT4mDZP6KsyPOyNuw
4HRpLll/l/AUub//eVs9XAVTsxcffYPdQw56dhLHPPAeg7khCt4T5Pyb3Zuq
YWnlsOBF6IdyTrtiA+9/tmOpDvGtjC0FWE/kRrD9GtJ/ZaPFK9RjUG+kuhFm
HeqNHSTfz3alTWtJHkGpyf3o77T3pQfaZDxgseQz9G8f+c1NDGauDLK6h3xq
Cjp13pP+7S7Y3kF+l84nzpWRfngTRe3Il7p3QGYv6XfF7afCsDvf22UrSL2T
NzKC5+P7pt7m+F4F9rlQQcFuE4Jvs4g7jl9tEaSpm4IFW61h5hmp4Hb49S8f
3x8MfB/YkcYLcH7+7v6AazAnVvd2IvzWac3D3TBr6Yb1DKynvNuEtYKMr/Jp
/giv+SIdMaOM/bgoW9SCep8kVa0qg7m7PGvq0Y96yTVOPBmfEZO+h37vmgx/
2EbGfzTHViOPV8x4VU/ihA+jZ5HX7tQf2wPJ+afMmLuQZ3gz72YqzBI1mRFC
3uMNG3xuwRy53Ef7YfPTzh/HYF6a73Q1rPFQ9JYs6WcVS78OTsjPHV5NbDg/
Lw3uzH+T4krqL3ZUUoMpFwfpPTAjUUbmCNbL2eeyPYG4JsyqDvXIhNlmJJHz
5dqDX6BembtX9Vgw03LNf23o568/TG0jYG7ohDMX/QoLbYpyY5D3yeSta8ij
rTe3jeTF0mt3K0ZeYjHuiv/PS8mqvRr57mo+VXOI9BMyWP8Z+9Ekb/ZkZimu
D/c1tYGz674EBC4lz98hpw4BmlpmY2LQokT63d94Gq7siVyuB1NrGway4XMX
jRPZilgvNdmlBV7VsdJkWgH16tYtXI35PKxSfkUokPfjQBnZ/1cFs9SUPObz
j047iXrUqekzJ+TJfjxUjEa9DWv87SxhemIuLBj9xLpZsMRg1ov/LgWi36Z5
R3K/yiGvwUr2duTBO1T/ph9mmbYq2SGvg+qC4SMwlVwkJoM8KWnftIVk/t//
YN6F9z5ekbyBzK//+vVq5G83xOaPlifvIROvA7Bo97BeJcywqV12FP4cH/xl
jJzfuF6HCVdUOSnooR+WS0DHLOZ749n3zAfmZUqaBcKBk2WnWKRfiu9lAfm+
KV49mQkzhjlKdaiXkvq3MR2mL/HZ3kU/I6J96lEkr01ztWT/9l89VUqT+RwH
j+chjyvBsYcnsD7lafrrBPJytQztziJ5iDQ84CDPz3pGUwziLKmrrcjfWixD
9Az65yyqmlODb2vsFRcmefjPyl7mp6ncyJqcPbIY98mRCYTT2suLWmUwfmU2
2wf+K39mmwHMVQzJOgq/e3Pi6ekl8C+BqGFY1Ljw9oIl5P5+L3EI82vHGHqe
kMZ4yVdxc9TDNfiqsxxmCdguZaDeEv3nja+k0M/aG3GL0c8OYevHZ2GO356t
Eui3xJ9RtR9mKlSniyIPUdfSsVDiZ40/v8POds1tscTdgqaNyC+Xd/1iFrGH
o8pe5Psm/fPbezB1vVZnHHa1d1w9BTNy0z7R5H02dX9wFephSNEubvCuvyd7
9hEPFX5cCbf9nTVRBtMFce2duL6WXrmmX5rcv3ebbGFTTXlZYfRLzWUPH8X6
0WpWxQowr+bIkUuor8HvW6M8zBA5lnEZ/RjvbLblh2mLbMez6Nf1ZYXwC7Je
TXPTP8jjR6zHrzSy3taP61jIq9guZeMKsh7TPDEVeS74458PtaQ/QeXkcuT9
889JobVS5P06+mweLHB3fWrRYpxvnPTbQT70Mx09JEb8as3Z1fDQsi7t0EU4
P6o0QQPuKxHZ2obffZySy3wO8GZBjbw1xA4zH4vh0N7gmsv43cB7zGKuxvxz
BsuE9GHW8CLXETjvlb1RMnlPyZRVPEJ9rKpH3l0LyPNhuqcG9ScMH+f3hXmV
8obk+ZI270fsIvKc+7405jr6Z7fZdo7jvqHjkzL+RT48wb/E+BeQ573ieDTy
swy9MreaXL+73kIH+b7lpjaR5yYlHnanFFZ0NfltCmYa8RfzYz+afu53iUI9
HG3RCww4v2YycRRmcAs7BGD50ZhCY9TPPOu+oBzXfz6o4RMI032ppdqwbpqw
dQbpTzA4LQLrj9lMeBWQ/mc7LpxAfbbdTj5FZNzjWG0O6r8fz5ohv7tYwbrT
R9Gf9fd9o7tg7il51zj0X2bdKq4GU8VcvhDkM2I8E89GPfgBOBmJ/LS1OmbK
UD/LsP73bOSdwC4+clWcPM8X3+DNQz3WuWXp+B7yzGfVvWDvO0e8vdAHqy7c
XRgu1kpyV0LdXDN2zhCFPpOzeDzUydh2/Iw4xmdcdA1KyXvaNirSj5yf93Iu
E3XSm17nf4Frr41KHkednL2K/uexfpv7uec3USeDPcPbR+rzav8pSKxgXbIT
x5biTJskfM5ipa9k4rqT08luBvzk94qFqzfmHWcMpIvBjM1NfQ5Y96vnGXVp
mFZuX6dJ9nd4q4UVOV8otKUbHreQ3phNzrd3zNmNvMVSFvb/gnmfQnIfwDv/
lnsbS9bXc1H6DEs93KA0CXNc2kc74JMTvVvDUQedKJRK/p9TH2pJeQOz/BYM
C8Ep6aE2uqiL9VdPoRvWC/zZ7+1DHDQZeAD1OYeflAwgPt/YeBjHFvFeliWO
3L6Vd/eT+49r8nyMPLcebtELxLrhSs2+EcQKF528UKewfFzlPVLfuzdaPsiP
6+yf9JH013BiLB755vgox3zC51TQKIeL/dF9ETP8GJ9TWZU7jODYMIGSXByp
4HX/VP4yo9gSXZW1c2YUK2/DywiYtzA/1HzGjOJui2ngwLIFhnxdUxhfKbRE
GdelGJyTyJ00w/O6v48DS7SGRWZ+hxMUbJywjsfkgF/bN8zzQKpMBXWU3XZo
2zEGN1I8cdQpIX2+wXkU5x/1ChBGH2XNGhLnRswoxpU0XUHy/l/iIWMH87qi
pyfJ+9pLs8sJpix1l3Qgp5w/HY0Lieet4mYiz/BDI2Y05qNCBu6oI2+PyxE/
xLEeq7LzXjKcUh7+bQamupPqK+BXYtqmU6iPosbXFcI5GaL00Dj6TazfuB3+
pFZ2vxH9MC8uThrA/Cl8Ta2RExiXS1i7Xoj8X/g98x3MdN77fBfqCX9ooD8L
U4cXlkSS74FSoGsDzPtXJSMI/Xmce1yvBzMGhhzc0b9zlOiJ1ZifTnKXtyX7
Fyhl857Us2JKxBb5GVy3v7GO1PtwZv8O5MtWOVxhhX655v7qFtgPJmOZhtZX
jGsmJCmQfaOrZnZ/xHGmsdlr1oySOLjd+UAf5s+xGBSGGYlJHPEuuEemXBvm
mugt296OI8PmShVM9Rb3pXBxfeazjdfmSC74K76D9yv5M/sfUsUIXg==
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], {6.921168865416012, 1.814280211255891}, \
{0, 1}], LineBox[CompressedData["
1:eJwl1Qs8lPkaB/Ap5VIWqyxSLusuNHQbXTS51IRqlHByrdDkOEgXIjXl1g1T
xGSWhkqE2FZLMTWFhrLtaIkIk1KjJksrtxPO79+Zz2c+z+c7/8v7PM//fd8x
2BuxI3g2hUIpxZfE/3+W0ikqJBrRKYof0ul/WdApbrLS904w173m5W9w8d0O
94twTHZN5jW4vKJ9fx/McC2PJ553jaq60hjzBfVVZP6NDZNayXCHE/Uc2U+0
2z/sBWxmOG//LFwv9ujfVE0T7KeSSlkLOwSnfnWH+Y2XWPEw8+/6FjYcaM2n
NcAhi/tOFsAcKz+hiiWd8nCQGf47LA2ZWu0Ju8YHiGphxgXpP9nwao3x7+OU
AkmWGJ6yPzR6nVxPdWLDFMxvN0s5B7PvfPxVx4pOeV3aX38ApktLDlrA4qRX
xc5kfsutTjN4+e6PfgYwt/CyqSZMU+HOp8BCG7uIUeynpyGofIf6OEb8y40w
8+dYJVIvJ8DelgOXnY53fErqbzkTxoRL9/MU/oQpwd1iZfjHQ57b38DidAX9
JtQbX3XeZxb2ZwrHdM7C11rHK6xJP0JDPZjwxohmXRY8FLpu1ABW0Jc+L4El
avJ8cp4ue0b9x2BFzW32g+g/12iawjBFf3Tshz/BmdO/5+fAatb0qQmY03dR
XQYr9nqJNLH+8+HVK+3MsN9dVrcjHNNtZnISjukZVzoOP3y2NqiG+NGeKAHM
Ybd9+QTTilsEc1CPnUDtiKo5vEjJcRvsl+dDN4a9s/euyYKNfdKDrWCx/LHh
DjjLVb7CDFYbvTWljv6ujxfkaMExJY2hG2Gqoea6GezPj4p4uwd+rLzTvJfk
p/BJHAV7ODvuJPmovRyIPAQXL9TryYKld7p698G3B7mjh2Hv0//RdIZ7550q
9CbzD656owWP7ncqcYLFfLcHb5BPZd4J5lqYflOloQDOi8xl2sMdc78eDYCL
WA6CbWR9eQlHB74ReWMojNQvndXeiX5MpgvPcMn6laFv+XDz2ZQwMTy0+OmX
SFjS865THfUJDdfc20r6rV1x2g8OHFVfb0eex8OeBWXEszbWrCD990qyouCc
vKXeWXQ468Vfo+5wh4OHuy8caWzTdRWOybTPSib3h/kT2Xu4yDyaQc5npnU6
xwixQzctfwpxRIvb5olIbbXxckL+1TdfmJFzFduaNKbC6W5bWjJgRaVeq5fw
ImXfJ7kwK1lTrE3u/60F93NgRteN1btgUY2/+gW4OqfVLwnONIgRH4K9jWva
bsJnXv831gMWxgV+vg+rfMofp8IUhXf1AjhOaH5AGT5jGLm7Aq7VL5scIPlv
33kuA76TsOxBM1ydZy93AP6j6X58FUz/sGXZcnJ9iVNWKbmPD46pf0W+dyJC
2stgYcqE4R049xAvtBYe/yLTDoflNQLrOsj+Wmk1lnANXe7KbFxfWqZbMoy4
3yDxI428h6iCFUJE7ehNyrGkfwMeBjzE85vePqhD1OekcRIR9fg9WxdgH6Gs
qYu8v+bPv1oZDEtiyxJS4JWOZaIqmGXCMM+Hg5YoBsojb7qmYQZ53mMb1yZv
g4cspgXT8IWmwZxUK/J87hhfj3WUt/diH8HsXH2FRFhWHMiTwtWXtHf8AXfv
7dKfbY16XGoX/oTfnWXqAz/AtOYXF3eT/n+5naoMj5ue3ZQNDyb3+MwgcreH
LGpC3Gt+wYHsJ3XMPvsZsUZvuIr8zpJzFZF9Y9OHswthpprLSwW4TvWHqVOw
sPlY1jfENJ0JjQBEjmXGkzeIMm2zSTpi5I6vE9WIpmvTTpL3Ko2il5CI2HXk
3QJdxI67Izs3k/MPjOUtQZSUJrbNQXzyzcfL4vtzH35PiPpyRJatTqQ/YSzR
CXjJ/YK+MNI/P16xAxxeopiTDxf1n7uvCj+5VBhE8mCFO7RLST/7QzQskDf7
iC1NDM9tvTj3GKyW3r5DBNf5KNo9g+lNTQ3PyXMxqZqyZBnyM3Fmvifnq3aq
IQweGs9rI+9rU2ulkbuw5HFMGB1es8cmeBQWCyUxJD+NrLhhDSruj9rJP+vg
882nQixgVtqWt8rIK7HsoCYNrkjYMoznh23qeua9PcxwrqPx4AkvlYUbYM5n
bctXcHzbhzV2MNu9PZ+c47PPWxnWsJZP74ytNZ2d7m8UoQfTj33zd4G9Hmdr
qsDVNb3X3TH/6oqm7DHkx821yWDAI+t5m1rhoub+p8vgaaVH3qSeirjrdYow
JXVfeS4cGf2gqg35djP2NabDzJuCpCvwHP7WX1JJP5JsznrBxpvDE7iwYv/z
sAWwb2eY4a+wPnfXOPn/1bWMCmmH6QnS1xnwSLSp/VzSn8Erp8n7NIX1NMqI
1FvW/WqVJZ195PxcJwYZv+S3fDHM/+e34AhSj+8u/R/hjLG9/lxS/4CJ30+w
dCCG9wiWJLiKlsI9+pXJAzB/ZGkA+b9Npr3mqdigrqmGXadhQe3x+GVw49Ug
44eYfz0nVcEVNtPSrpRD/nl68wIC4QrtJSfc0P/i4PypcDhS0tlwGaYmS6qP
wrTEeaIuuEd2uD4arpa3+LgI/WvazCqPgpnvOV+3w1cYx31ZsH4r2y4G53Pr
m8rov8j6B68qL2I84d9WPQzYeyaOysO4OvU2bxXZr6VveybGDQ09G4zIuOfC
rHhY9NxQthAeenTN3xvzHfsGkhRJPYuMn5lgXMD3fUWBO6pVCz8hv5mUAtk0
6cf83HW34KI1ntFypF6PUpsQOKiruoP0h3l4gZsh7D+Wo25A8rss59iPftG6
NzbZwZIWh/Pl6JeZjSvDGy7qHjJNwnjnTrcLcSQ/D99TLNgl4hazAFa7pOPk
A7eaDOo/g8fllrr4Y73/z4VhI6SfvVvSD8K65xp/WWyL90nICptMzL83Em7u
AHOyq+Pqyfygutv74O8f5CeHwLal/w/+1fAt
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], \
{13.065416563299543`, 14.431103933729466`}, {1, 0}], LineBox[CompressedData["
1:eJw9lgk4VGsYxydblPUMzQyFseWco4ZL0epVmuiSeOo2llJaqNDkEkouxpaK
Itkq1XMzltK0WLKk9ZYW3DaUolLUVSapuJ6a+53uvd95nnnm+T3fOe/53u99
3///8IO2+mxQYrFYEvRj/v+9aJAPKtBlDiwneaVUQIPajVPf+X8gNl3lkrGC
hnrnC13NyYjzd4ypimmY1Zyz4s95iHtkT7/sosF7U5LDsk9maN1OcC2ehsLb
3fNTpIh1SbugCBrS/ReLGwMQi6K2BPii+GuqC2YbIJbXPLzhQINL6fedhg/4
iCsH7NRoONG5Seycj9hNy+9EKwWhg3bH52xELJM2i3MokE5l1zjPR3zLRHnG
cgoCs+R1WnzExxTLSvUpmFuk1iDXRiwqj05rJ0HuGXHo4njE/QGpkcUk5B+Z
++3yBGZ9YmtnOAmfizXOfpiE+LLFotbFJPhYZefcoBC3NYYo25DgEpdERLoi
HolrKJ1MAn/eKYf+tQzvzQ4xJEG9SRL6JgGx07ir/pYkCMlkB7PiH/s5qDGP
hPL2zRtX1iGOiR4LXUPC4vuuM9e1MfebNyv2kXBhxO6SfzeTz2jSnWskLH2W
yjn5GjEMKv2mIGFHSTNX+SWzvwPK6fMpuGf7driEOS/ZSKwgnoKBliWWTkx8
W0lKTT0FAVVT5nbkMvFFFbHDFDzJ3BLJD2biCXVVrGhIUFqvYypAnF8W7rCU
hs2Z524KB01Rvu+Pem2hQUtL9cnqMsQilTP6cTRcldT6RAYiXmZWffs3GqZr
fo1tYiNOsLnrtp2GPPMXldwDJmi99+7XQBryp2nXLmAhhqAH9+bR0O4XmO0R
awwsVl3xQj0aci28HnNZiI+1+Lt2UaAXd100lDcFPR8VwT2O6vdo4bPghYid
1gV5BFGwbUH1K4EK4v3SEwfNKFCs237L4OlkFP9Sy5leEty7p6p9vIn4smCd
WwUJMQY6oyXNiGVbRe0xJDTNr9RxfI64Y3xPuhcJZbNzXrQpoXj96WILOxLM
G1ycPtkz7GQ9akxCR2/n+ewwxMeKV7fySAhTRK0VViCWf1Du4ZPgfEpLFNPP
sM+0+zNJ6OKGueabonxq6beXVqL7x2Q1nl6Ie5Ts5khI2L1lkXapGLHp6T3B
NSQUvH/Y7Z6IWOZ7XmWIhIZuCS8znmGNgL22FMx4H0qe3IhYvkHDU0xBob94
tNSJYf6VtEoKdrpKukqG0ftH0nwy+ymoeeTOKi5CbL3kdY8Rqu/OtSGxAmb/
hbvdhTQkjzMdkJ9D+bPiC4Y30FBi9XlKFIl4xO95ciwN7G71EJU8I3R/9GGz
BBqi3jF6YIjXq6Vf8sZCDPHzrpUTXmY85uH4wpRuto4nD79/k+/RvNQ2Lt4f
cbZKsWY9F+8/fH+cue9ELs7Pls5SW3mTg/Ov6st+7FfAweejLd35ZlsiB5/f
sj7KtDqeg893gVHdx5VZHHz+uzqXup2TcXB9PoRl1wd3c3D9KqyHpGkcLq7v
qrTdRy8u5+L6E3JLj7BsLu6P0tuNNzXvcnH/QGGoseAbF/eXppu3/Bafh/tv
W5NczXcmD/dnorR9VNuJh/v3L/Fux3cWPNzfvq7uk9vGuLj/KxX1ZvkNXDwf
HaI5Uq0QLp6fFTIZ2afg4PkidhwLO5/KwfPnLf24uFExCc+nz1lj777wSXh+
Mxv0NBM7DPB8b7yX6cdxMcDz31r3+ecFp/WxPhjUFooj+PpYP/pbHV80HWdj
fXGoseY02rGx/vy0+Xqa10MC6xPhuLkqaw+B9cvr12mTzokIrG9f0kJbRucQ
WP88DIfaqhwIrI+SV0USNxcC62eA7facWYEE1tdcS8rem4n/n/6uTvp6qP4K
gfX5yS8jVvbfCazfpX7SQ4K5bKzvwV1/P+FEs7H+C9OfdkSWs7E/sHIHjpjd
Z2P/qCtIVY1/x8b+MmGW0YO9cjb2n4ijQ2nGL9nYn2yqjTN6G9nYvw6ndB5I
kLCxvxFfihrT7dnY/37n25gkthLYH4OTldTv+BLYP5/p59zNeKSH/bVzyjaT
FKEe9t8qZ0j6LNPF/ixUGjsUyNPF/i1PlpXVqetgf39TPn1fx4AW9v/6XA/V
mD5N+P/7gPihBxPhH7H3Mz4=
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], {14.4452, 6.75}, {-1, 0}], 
       {PointSize[0.04], PointBox[{14.5, 18.5}], PointBox[{13.5, 3.5}], 
        PointBox[{13.5, 10.}]}, InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox[
            RowBox[{"C1", " ", "N20", " ", "T20"}],
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->6.137505285412264],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          6.137505285412264]& ], {10., -0.5}, {0, -1}]},
      AspectRatio->1,
      PlotRange->{{-1, 21}, {-1, 21}}], {66, 66}, {0, 0}, {22, 22}], 
    InsetBox[
     GraphicsBox[
      {Thickness[0.005], LineBox[CompressedData["
1:eJwd13lcTN8bB/CrPUWjUhNpX6a0TCJJmWkjKQ0tSotEC6KIDJWGSoNQhBAK
pbJ856ukkm9DRQhFKoqSKKlMKUL0+5xf/5zXe8495zzPc8+996QdErUyVIyi
KP9JFEVaSjSBPwabYhDQ2ZSLhe3+EpiT9XzpVFio+N5vI0wLeBw2F+ZYJL/R
hYVnOhjbYLcji9gfDNkUt/PDugew180XSUUwb+3sX2ZqbCrAIG5pHBx8wuVb
ATzi5fzch1xv/+sscwabkhGUdtjB9OCh6/fgssZlj5gw++f9hFUz8buSqb85
LKpQNR2ARyjbHmtYpujPuwR1NlWQvG6pG1yQatQvMYtNNf1s+xYOR2/8rrwH
LtHsmDhA1kuZ/M9HuMyQ7iCAGfK366012FSa+MjaVtJ/LjJgB5zp1DI8Qear
Gl50Bu49ZnxED/nmGG/3vAJ3v9UfcIStq95xz8EN9s6TAmD+fn7yHlh+6trJ
m+A6kz1m7rDT47jCKFLfpctH5OHKyPivEbBM68Fv9xBPzR2rcB+Ycjx+Nxpu
N/OZYU3qm7LXQAMW7f2ePhXu5Syd9hz58hcNPnmD+DhBVgv5MC9UxuY87KL+
V2Y57HQ/p2A1qf8s/io9OPjvEqYiqZfMhpVT4V5rlsZDA7S5z1b8312VbXEw
rXjZPX2YmSLRNAfWmnKc5g27NYavHtTHdaYPbpyFGVtdMgQwfcZB2hjs4mvo
GUf6abnCcMTLWV2mwYHLEnx298BZIQ1STDjiVY5bDKnn/Lb8mXCrX2KNlCbq
9dNLXQkW/H6ifg6m9h2WVIFH9leV0bXYlMmv+ym6cNpTjd1rYC/38OU2cIHw
79EcuPWWyXVf+JrD45HXcKa6w/l42C06c1RWG/Go/H5/CW7Y7etkDtOP/VKu
h8dZfySXwiOh7Y+G4TG3/W0+cPbw0kvTkT+nUuGTLzwmWLuZ1KPBcWOtB8x4
FzxvCZwTFpZhC0cuyghaCfPqVJ5pwfL+Z4qJ2dmp/n8Rj1N4fAy5/trn02tb
YPXkQj8m7PT6jfUNuCb2U84UmLrosSIFvtz9kupEPJ0VTnSSb8kWm/wCuPvK
gnd2cLZdpMEGWOLCpP90YYGn4xZSH2qD3n5Fsp56zPXXeuiv3ZYnB4/Pk2Md
gTtZF2bS4N5iw3RH2NZp7xYtWFj1TnJcF3lMir1sC/s2JH0oh73KZjqthxuM
vOckkv6gjX4n4Trb01fd4bkPhxMbYb63ar4BbD2teUgJ+dv+uCktB6e5Np3x
h1traxb+1mFT8fZ5Zvlw8usssx9wr8ZV+yG4/avD8r9wp8VoiA3agoSqdAWM
H3GLs0qEhSc1E43grIadR+7C9LVLnF1heVrDvm9wQO6J2ii4vvRoiib5vT/n
n1NoJfzOxrDRZo5MP12F1k2yJ8ebxJl/VfUjyaf9ekcQ2gJjlTZJ1EPZI3Bf
AKyl11WrCTfEafp6wN02phIWcNNLo8vWZP6ZLprWcBnHlDaDzG8RNWUu3Fu1
68wo4omIHbLVgxmNx3lP4fQs9zMy8FyhruFlOLpPPOM9xo39WkTFw5fNlaUF
pJ59WltXwf1Zqzx3wJWzN5dZw5lBGuaWcE2PQrM2TDlfvfQFbVZO1Q5ltPX3
PEdy0DKLpN9OQ7v9pPl+b7Tt/Oy3M9COiAU+kEPb6n+43hwtX2FQ4QHqrmzy
7x4OLDI9dWw/7JYb60riSYsyX0j2Of2qmMJNmKs4cV4bZievYItgE+k7fWRf
R6e1/JiLuPhp3a96YLbcV5k9MFeofLYdHlGaT38Ed0qnjhL3GveWKKEO47fH
dXvh7cunxvjDvq/eiMbJvo0/Inke5scbV6lhPd7MTh+yj31/fz1LnrPKe9EX
5LDPTcQ0PNeRffX1HtcSZh9zTD0El1yM6feAZRS+P74J1/ue2RNM3hNunyqa
SfxlQ3NCYW4YX3UUHtcsSQsiz1GLzVtSn/4P9APu+uS9+9lPDdZbUZJJ5o9M
d2Kpwy4Js+MVif0fCpRggXSnbz/io4X+dJsg7w2bdburyXN3OMWiA6ayL7qf
Ifuq4/fPYhJfQqtDDEzXX1a+h9R3p28xB3YxsR5kw50eK+rIPhrZsjyG1ENw
8/g6bVg+8vvGYrh+/So5OqlPWCojAi7LbX2tBsffc1WdBVOihK2GMPP+L3Yh
3qN0WanvbLJPG+p1dGCGq7RcGEzdt5QsxHvYpLeh5QQsvN21zx4ONkumPYdz
avx2DeK9zX8vLkFDvumuan3/wlST7g0fUm97xY9p8PY/Xk9z4JzQhQmJ8NhQ
968v5D2q9uAhH1b/9qRmHt5rLut/f8wn3zWjkYfkO1NW5qPWAl/L7Xh0BxZM
k3o/Hetr7Trd8A1Of5yhuQb2Mhuar4PvVpmK6pIbMH+WerUzXBex4OBf8p0W
p4oCYWZupcIy5Kf17VTuBvLdTjxncBROu6vWQdwg5HIfwBGzKqavgXOu6VoP
wNl5hlGuMDXK1qdQPwmjKYmmZLx3V/gf9Lfnas+ZTM4h7+LnfoC5q+PKuxAf
99Rkj3/hTFuJmHLynQxo84qA++XlG9LJe5xm1yYLu1yWXbgJZmrGBWUhXmvV
vD+usEy8iaEq7FKnzSDfFd6WQYODpH63mHE6cGe+1LNRfFflD6t5z4L5gcVt
QbDEHMlLumS+80azH+Mc5DtNpoXUl1YWmmgLC3as+uBJvksVfz0qcI6yTnpr
k0BsoXt6Ccy5od8igOv41YIenMOsh9c6DsBjPaU652C9uYrXyLmL4RdwYgPs
siZvmEvyv/vutju8frJ9TTU5p619Y7MU5mRX3CTnEqFV8cvVsG3YreWrYHrR
TlceTBuqtz9LzknbKzJK4RLvm+GtcPqlkJ6f8LW3Zh/ljXB/Smh/nBFfWpuy
7XxiizCDkzCt1MXfB+YaLzr0ES5RtyraAIvuVPibI9+sJCuFrTBj7Zh4FKzn
dlkUCUfXLAzMgRnaR5lBcOu0g2+q4Mg8lu5iuE7z6Q1Sv7ksEc8Apmv39f1H
6jfPy3MSLBTnHzsL8/2LO0i8rYfy84PJ/PYpR/4h58AdmfoKMPUqozGV5Nvt
RBWSentel11PznXrYyUtYH6p0ebFDPJePFRdROoXQBMxYS0L75AZsDpP11wf
7izeFpuMc3Nd8IEgcs5sUFNpGFDF83mszdacnLsNly/xh0XV+nJkvrK8H6mN
KpjXyvggOUc2jPA7vOBsjuyfE7Cv9cupn6cjnmZzi6dwxIUi7Qy4PsTqEKl3
7yPD5R7w9iJD+kpSn8Kudj1YmB1z8SypxyWDmYpwpeyNR5/gHO+SVSpwTaia
uoUx5mu27DOH06d8YXJhxjRp5wA47bbZ/XJjsl8raVlwydc5td9gXsNPjw64
34PL05uN+/Yo6KAp4k3/Pf+8KxzBOzKeANdkVNiEwiKFNU+ewF7VHwdi4LoB
KWtF5D+mfuZ5LNzrRH/pBtfb3YzdAnPvGFzbCfe73Bj2h+ma9PijMC/FQ8iG
W1/61WXAzI3nyzVgvuXeP/FwWpKU2BjiK2As4HFg/o3Ar8+IvR8Wy8Ncu6ei
POKyrtGbiOdydNH2RLjVTSbdGc6yWPUsEK7r7Dv/EPlp1TrOcoSD0yWHbOEC
LQ0rUi/G/ttvC5Vx7lmkd9QIZg5cUFGC6/Q3M01hlx6zHQlKuF8PGgtsYS7n
wIMBRTz/CgPSvnCZ19dTEcQfYt7ugdNPNUgOT8P9kuq3E8CiqdlHD8Ns76P1
fbDWF4NhO7iyWfTIhNR3BmuyJDxX54HBdlI/Wr7wAw3x9Ew+8x/MtltGvYF7
49LLZU2wfxaZ3/4EjyweUvKEe40+vZfG+ADlRtcsmNZpm2sDM8w5Ji0w34fu
Fwdf67rweIop8j/u0FILp5vdSbch/pTEm4740+xDPQNgrWDdfaFw8vrbgdtg
bmiF5L8w+8ZtbjwsiDML/Ub69a8M7Cb9UpcCGKgPlTe4bwuZr9jV2g2O5D+J
8YVbhSbj/rBb/PR1ZD26l2WyN5weeHWpCpnvg/HZ+UrknOS4dhDxFgzekRaD
Lx9Ilq+FqdKXR25hvWhGyN1sWPR37RdPEk/b6zc7Yc7KmjsdyEd5ivYVX1ir
Ly80AOb5rzG0h7kTe4eeol5lc8amWJL6SHI6rOH2NPcCc3L9F+9+RwX8rihs
mA8Lm0e11aci3mVJH5eR9cwzmsSnYF8UFtRsIuPrm1+Iy2M/i6c9PQkLNm74
pCuH+rsf63kCszOMeRsnY1z30GFZ5Mf0+7utXRb3o0ay0x3utByqiocvv467
dRJmZw7scIM7Y1JuvSf16A3Id4WbltOiTcxgGbOo7bDTlJ87t8M5fU1qtbDt
/lkJt2Fh8ai7FdZrqrYK/Ub6C057C2FaXVSIgTn8QyF6NeLTO/ZAygNmvvtr
/hu+vCHcM5K4+N/OLORDCQKrE+CGiZBBI+QrOG64Igmm7HTc8+Dxd6JY0k+p
SLwRQ324u7cZbYajGw/cXAgzrl1/6kn6K0/scYWznYaMLGHO+IvC2bB67KOV
U2BhE+PgW8zX/jk/sxvx0v7J3hoM80ZM/O/Awb1dRaWIhy/PVM2EmR/vB3cj
3ojWOL2tsGi2z9avk8n3bbfAi/QHi5l3oB6iuGcX2TC1+MW0ShnUg9nKtyLz
fdoVcFQaz2+sdMp8mHO3uSxECvOXFTg4kfoW0xtYkrifPsWDAaR+VV+7zCVw
/4c/zttL+h1mhC0UJ//3O7sIyPije69sEMP707PlfS/MdihNFE7CeePFIl8j
ku8CNSUnuMEz91oUsbd33ncK8+fPyC2HBRqye1vhsMiNEWJMxKeUP9ID6xi+
X28Ip4tdWa+N8Sp52467wjwjv22JsOt8yVcbiYNOzvsNP+sVGaXC1Gex1DTE
M3WwvPI8LJwjWGWMePueSX4RwILHOxSfwM9MNrndhbUM+8RCkV+70svSatJ/
uuDuIBzWacuugWk+ySlrUA9aY6NdFdz5dkPhP/Biy5XsW7BIcqK5FaaniE29
Qsa3Hgxqhl3L/M6cIOvnuYXmwbHtj37vJePVDCSc4ZAmWvBmku88jxWlWM8g
9ciELxz96qrXOOIbS2XQFpP1c1k9M+ESOZeyeTDHYVbiTOSXM5ogZkSu50x8
FkP+vNcrXmiRepj2DN+aYFHdHiVvZhEbLnBZ/YdFCdbHnST9WjaSbKnfLKp3
YoEjGc/T3DZSP8aidF4WvpsPsy22BQu/syiVwmoDN3J9eNJ50QiL6ldNyQ4l
1xtnLdz0jUVtqXE+kATnqEfl2QyzqI0vQ6TySH70XRWhQyzKeNKg1CPSXynO
+ypiUbZmYyGDJN+W+5Na4Iv9fz4oWcCV0wNUcX3fNtEKa7gz/LToChz2ajlv
NZwj3ng/HvNX1txfvQsWmk+M7cf6EavKRcfJ+KW1cbdIfH5xiYWkP/nl9dFR
FtX5xHd3ORmfMmw59weLMuk6ml5N5nemagORr7q9QPAQ5h3S/7nmJ4uS1/CR
fUD61x1TMP7Fooq486SriM/HXrwOj0Qe5BST6/cW2XfAyhma/12C2ZJpA6Vw
v9W8lRnkepu+SCZcZ37VNIH49frdyzD/xZD3SREw9dT3oRzWzw5oPOxF4m1b
0MRFvbPDvsQ7WJDzlljOOeSzx8FpiyW5Pkl1Dh/5/wo8F8Qg1z/PEl+K+nUy
6jR1yPoXnmR3f0F9bzV7aJP+uVnHzHpY1L7N3JUGxIE6xSe7WNRU78duFiT+
+QqTU9pZVHPvQ12yHhXuFVXYhPm3bE7wJW46Un7jCYtavT+xJobYJLWHJ0T9
3Z6bkXpTUnab9ASo3/XbtbeIhQ6hUZnYLwnc6DfE5C/nLiVD2jns/wFzNaz4

        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 7.6718816067653295`]& 
         ], {7.203396613426856, 13.018321472319641`}, {-1, -1}], 
       LineBox[CompressedData["
1:eJwl1ns81Nn/B/BPEkIZiwlfmzuzuUdWUjO5hNIaEaKEamNZhDSVakq1bgmp
RH2TKOHr1tAo2okuk6ghrKQvW6rp6p6xyPd1fj//zOP5OGfOeb/PeZ/30A2N
3rRLiqIo6XkURT6p0Tn8MVjUDD6OWLGoX5LSAzth1hSzJwQ+tjsp7jLcGtip
7QrnGrYdDIW1ZCofW8KZt5uml8I7DXfma8OD/IC73cYsiqdqZqgKh2nk/ZkG
b41WaVgMC1QWqrNgtoCboARTH6n3E0YsirPH14QO28XedKiEc4LPx+nBzlIi
6SjiwawKa3jxQOGoNWygs13OHTaYTYyWgiN944+ReJ2nNNJ7DRHP8S+zB+HO
oPyJBjim3Mj1PPFfqV9vwOw7Jno1JP7fTTyuwIOuh/2ewL6uKziFsOpMueBv
Ev+fHxLKiYPsfcbJeDNrpBHu6fWzlFrOomr0Hzp2wXZ0mSJ5uC7hfOow3Krn
YLsIln7TcXcR4uOXPyldCCsuqLi3DBakPJOmYMeJgH0usFx62slhrE9b9uJl
ICx6f7fiJdxSKFoSCXv0HbdugntvXD4TD3eek/xTBH+f7pIlluwWK5+Ab5fF
pobDw3slBTvgooOBuT5wjGvxwFp4lFOmuQJONy9U1IUtz17ZrQDPsOh+UuR+
AwyZPYjfdGhV3ztLFnUtY0HzRThy85tzz+Dcj6yIAPj+ml98G2Epq45vP5D5
fU9rq+Am+qUtQgMWNTB9hF4KR7r/XJIIe7T75d+Ax+W3Sy2HbWYajSvh7znf
Ez/qw/tvBt+G/eUKFEvg5GPcqhb4N3WrPZGwtGuTRz+8SfxefyWs2nRhzSS8
PFbaTQlWn7gWqYz4ZxQVLw/psSiGfvg1U/hhnoTbCye6ZFSR+vWfKOt5Bju7
1niRevGRaTUgltaU386B2eHfE/+C2en7hGmkHp025r+HJUPJV/PgZUo+H2bh
wbZRG3L+iRrlmerYP7JMV3IdDvj766kVsPPls0XFMO9TyoNNMM1HZHmJ1GdL
ukYU3GN1qyMDPjd1+sgJuLV+1+wBsr5Zh9p5uDz/5NZQcl/Xqm2vwOKLO9pc
4HdL+SmF8Myi8c1G8Oebycp5cKbrOs0FcE2Wtu0fsEdlNfsNzqdlVNISDsds
27CiCVZN7qc5wgwT7dlCOM/T8yYNVgypfnwS7i394143yc9n/aUo+B075+pZ
eFj/BDsQ7jxzV8GTnEfpqZSN8Mzd2UFpmLsnrNYFTj+ixazXxX3qpc53hu01
Q1ZGwelrPu9wgz2yz342hOOHa/7YRLzbe/NrHcx32zYYAhdWxDGLYVZ/UP1e
+GI8xzoG3tkvXnIKrqup/NUZHm7J+nyN1OeHmxV6cKcsR57kx9nzhKMAZw5E
/PwKHpg/lzqrjfeneNWO1ItOrqWXBB52j+0n/Whc6nCbFOZzfFPU9Ml7Cmo/
ogyb3lkuXg7HpL6+ZQT3yOlnryb3m3GilAWHqccmOcLrswsCt8FFfRG7yfsa
N+HVHIB9rs8Y25N+mpaSeY6sf/TsV1KPB+KN3lbAM8FH9DRhuprBg3swlVGx
k7w/1UXph9r+b3xtCnl/5npRxSI4Pu9LxiPYKJdj2gInT/FySP65Q9O76mHB
yQ1Pj8MHnr5X+jc8kHF93w74YQJnMwdumFoldILpQk6bG8w3CHlnBDMuLYun
weLMqJeLYJ8OhuMVnI+AMe+HMQvUv+WqUTWY4VrD7IJF8ip3ji3F/v7xVs3w
eINU9acf0b/UZLc3woorvihthmOCMu6R8Yv1e5SatViUm+6L5+T7rRecb62E
RV+bz4/CifP31zb8i0U5PGSyFbG/ZW+EnSfckFRC0yf1UfOibUyTRR130uA6
kHpbF+9WDg9OPt7rR/IPlvvPflhV0aw+Fg6++c14KyxcnL2Y1IulXKSCN+xQ
KHYqJuP5v3WT8dYr2qtJv1GNDnTeR8YTC+ZIv+GzT+68TL7/Pbqhm5xH3SF+
O9m/I62nj8wfdfKXR3yJ5uZjxEVaPE0XOGe67gOZLzQ4JTgEC+eUX5D17uuH
6lTB/Pw0rXrYue2GVw/sbK2znry/Kp5F1yisuDvS9A9iBZf6GXjrk8TbYaRe
be35YzDrUfsi8n6Cj7317Cbr9X33JfenSHdqvwqbygW2S8O8O2m7t8LBukmR
j3G+lmUc+jzYbdvT4Ay4pO5B5RnkI1h76nIAzFgWJKCTfHc5zVrABgsn957S
QD1qKQ8rwZQs4/C0OuJ4kc2dNse7Wuw/sBOmaObMMXNSf7KdbUuwT5D9mkmY
F2Jy1h5mpzkpy+L7tFs+dpV09F3lyHZd+DhzP9cCtrvfZLQOnrk9n39XDeMf
l/nGwrm1jzK2w8P167yLYC3K9rsKzK8o7XoBi7kjNq9UWVQBnWknh3xztM6n
3oE54S1denB5jm1iBczzOpyxCjZwK6jmwVyPGZYX6Q9pbIVWMp69/FMobOoe
xh+B2d4tvGi4L+uZtx72c5N7N5lA+ke7j2wAnHOoy5VD7rNs280cWLz6wN44
sh7ztMZT2GbOPIvc11ZarZwU8hOFLv1I6jP5tk6yKWzzt5KCI9wq1USthxnf
nvCMSbyWv4T6kfmpXt0L4Uzdb46byPiWAJnn5P2VhkrsiN+XiU7D0ivGS+Rh
doYM14O8t+xsn0ck3qrRFAXYx6i6MxqmxV3e8Az3EdN18vkCmJsRMXIBblja
eTuNnN/4r8G/w1oXPuRJw6yVdXob4HivEfl4FZy/qNDPBhZeaJ7/3x/Q7+xn
r/9E7jdUWLcOlvvNnWliTn5HT4fWKOP3wGbmsR2cSBswMoRjZl9yvGCfbvne
QhrWKQ5ZGA/b9Fr9bQ5nSjV3/BvusWdr5iqhvvjaf5F4+e4F/0gWI98rS3uk
kQ9nyFMlCXZzNIpaBQ/QW8J/hoP7mbp7YMHeoF/UYCrz6rGrcHJWyA5NWPRl
0EUEs1TLax3J/Fd3/Cdgt8SDb5NhG97KRFI/jBHFoHdw+iHaaxp5/6ybF7wR
D6MrbpcKPGxWEi2Ej8v0tiiRfhJrb7MU8UvLytBl4J6L91O94eF/BCpfSHy2
DjZcmD9zcgPpfw1/LksqgBlvb7Ay4YIYsXs17Panu2AzzP50dLoS9n90a1CN
vD9lnYd5sOgob64D5+G/aaA4hsyfiD52Go7s2RJtBVMuzoMbYe7a+4V3EN+w
nmUKjdy340z+V+TDX65x44UZ6mdL1mYKZid025XBovT/1nxTxGf8cNdJWFKx
p6ZHAXk8E9f+DjP+c9WwQh7/T8XVXQiG3YxLtx9ZiHqXkTzYDgv7w/p95HD/
h82oCDL/R+6krSzO5bha1lEy39yYYyaDe/GmexTCJSaeQcwFGLfalf8EtjTz
TouVxvdKozKn4UxpveQn83H/JV2TFqS/xPn6boRZa+1jfoUlq/S8pqTI73rf
sYuweraH9jNYVPOvRlIvwYXP61phceqTx7MwVSEf+xVmj/qmGJDzPrBlhQXW
4/bxjR1h4RZ6UTIsLPzVgpw/Q94/dAyW1IXlboXVtZeE7EZ8lqkLnvuRfrMo
3aoP5oZmtpF+pRMYudUd+Yg1dCZ+Iv3K82j9NTg5wshKivTb/MX3P8PBu9R6
RYiHplcgVsV58Gvjys7DAqHGYw3Y7t5QtT8cdtYtfpKs17fMlk7mO9VmlMGS
qSXFHeR8mmgRK2CaxeuETHi4wkH5HOKpaglS2wSzXhRbixA/I0ilWQMO+ylI
RYz8dZw7kj6YIk8Tus+beYjnYb9sM6wjarwnpFBXXfvyrsOs716qrDkmNewX
rpoLF7Trvnw9w6QKRF7Pc2DqgXdH6j9MKsy8s/YSzP124q6bhElx5Ua1amCB
/zTX9BuTojz3j4pgkePaOOdxrPfKiSeBYzKqOi6OMqmBqM4kY8RHm2pZyxzB
etaVKwNhwYesncuHmZRbY/HBLJJPM//nsa9MSt3XousRGVcZuP8TLKlvF5F6
0XmZnDcP5tqdUSb9p0DYve13WCiOivAm7+HLtvotQ9hvpG0qFh4W5P7gh/VF
sT9aJ5P5q/1HjbC/kFsnyTIn670/r4j4gh/EFZL3VcAbXj0Jc2cTFxwlll//
qWuMScVoSyWQehR4n9HLRX52rp3NLPLe7rSnm08wqZL8OStlsn+WaW4a3EM1
hpP3JzoUJF0EC885hueT+2Ob+UXDbJ5B9BY45q2VjRjria9ovVEzI3UTkqMI
l7gYrn5OzlNqyctXiIfhMPTpDMweuvcoGPELanirAsh9OOak2CNfy4w9axjE
yRtNHD7hPuQT6uZMkJ/O56cD75gUrdpK+jVc8N0ia91rJn63xpaIYG6Js7XW
Syalo2gV1gILTqlk1bQzqarrdz+TcWrhSLDxPSaV66ur/YaY/CU3/v+nKet/
qDPoeg==
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], {5.643332667580065, 17.311869044356907`}, \
{0, -1}], LineBox[CompressedData["
1:eJwl1g00lGkbB/DHR2gpU8JU1NDQJNnRarKFeVJq2rylVEhqROVrtyGJVozI
ShGtVyyWsNu0tRmitJRhbbGiyUeHOEXLGh9Z+dpJ6P3f53WOM+d3nvu57uu6
7o8Zk2On9h1XpSjqD/yTT+rVJ/yZ0pSSfHJoauT93rYWWGFw93At7Bgdc+ZH
mCprq78K12gErPSGM65FWfrCcdubfY1hQbCfzlY4fVBvWZsJ3uctj1sH83wX
bE2EhR5+G9jws1/Zcw6wPLDNcTVc3rHhm0kWTbkH2+zmwdmRroVFcHdueKQL
PNVFJ56CWZLcqFB42Zr4Jh7M/Wlfbh6cZjnSrAFn3JG2NsOyyB121Stpyi/z
UpvWGsSb1sq/BCu611rTsPvFz+mTMPdso18Yec7ozPeAqRXfzb8FM7dOnT8K
M1Nb/miDGf0PfwuDu1mXkqZhhefXSdlwCnd/gb4FTYmvxFxrhBnMlrtm8KHa
IaUq8hmlrv+5Bg6a8P6dBdMG4UkmMDPs+jwHWKratXABPHxKK98dbhfU9A0j
/sTyx+nfwArvPNMaeEXGhsVRcMqF/2xLhg1mdsdfhOsEwRxXmB0XXR4Ly7Ya
KhfDNkt+bDpL5hNZL5KjH5LkWjdvmFk0/u4K7LdlwIUm/S3W0naGe20oM31Y
8OZOoy5ZnwinvaR/yueVAa9WI8/iVlMBLFhb8fxXeEJS3Fy9Av2iHyVfhtMy
b8xawwmxuk2hsI3X5YJsY5oKD7GzC4Cp9KbZebA8e0wriLx/cptriBH6NaD3
VwTscqa0oW85TeXtUp25BtueSt7mC4u+12Tch8MtbnPeL8PzEvHpHljhVe58
FWZt38rWQ74u3tUvaDhDL+G1ABa5a+pqwglXxTZiUs/Mwri3SzG+8sbN+7Ay
NbSlGZaMZtcMwBP7K568hMsNlesN0b8Z7uihYThveFOPHVz5d1Ybg8T7vkzD
AxZGWvSQ+YRjs/wAsj988orCYUmgT9YpWH7YxrQUZtysyfeDQ93WT4zAfl+4
Cg/AAhf/fjbq4y6yP8KDn9keHN0LC89P5+nAWkG0MARmimTZHchPej5VOxZu
n/U0z4UT2B0BMXCCrqnwKKxuZ1YWSFz3oMCI1LMma4wm8Rt+8O9Av+ReKRoq
sEDF7/MMOG9zufQO6ad02MsTZqYcuugEl7/R5ZqR54K/uhpJ/fszs/41x/7y
DKsQwN16dXatsBYdX/yQifi6SU6VMMu19D4bZj5lBkvhLosoKtkQ+zHHfoa4
ruzEyw8GWCf+VP4jOHKz7/EgA9K/NQVt8EyrT9qAPtZlJrWWzGd05WZnKCx5
+fVxU7JfnH9mLYLrZDGXXWFRZd912RL04+5dZQLZb9Gad+NgrSFnRxnxSaXS
C+ZYHhycgkPNO62dYRcVjwgLcl989W7jbjjl4OoMd9ioc4fRMXi0xIYTDTOG
Kd5FWJ74s0c2zAzpsi+FaR3rx3dhZ6sg0RBczp5xKyPr8+fmMnPkp/VisqCI
7K+nwfXesNjLPDeHzKdpEZQB+1k9f0Li9xZVJj4hbt2n5wYP97ADFXBe0PIR
cj8KPzU2T8OcwwrTIXIernzB+QjLdxk13ib1uU4m9cOy3sYt/rAkxGnqMUwn
Rf9L1k8W1LcuBm7vPBfUi37a8fivrcj7Ra90bsIJHbHx9chftmnfUhHs3m8Q
5Aozbz24ugVm3ldceK6HOmq2GxjDtr+W7d6iR87v6UE12I8V+PjOYtTtRrVO
mdFU7a7P1Qzg7qQuI2Ju/gPfmEU49+arklUwvvt26ZJxBtZt5EAIE95vzlY7
BQsfV2V/CUssbwS818W5tpSe8YFlVfsczWHp0UXaaTDjfY9RzELMa3ybXU/G
Z6rNqcNSddqTIvW30Q73FmA9l6ZZbyT3w8aPkZcXkPvX3SqQ7OcvvQuJpXOD
k5lwXQXnUxHMvdJ/rJr0N8fy6DjsPnsu+w3p31pP1z2ILyzJXTNO7q+VtQGV
ZP76YOojrHVP58J65NfeNpdC9ld3EJt5C5ZZsBr6YMagb4s26mO8Nl1ZD3Nc
CmY3wcoyXsQNeL9Vr9MRmIpt2SiCCx+PHAuBpS/CjUn+8o6QW6Fw+frDDkrS
D+eXq31gwb3awTJSf+CZ3+xIPx9MpIfAllGxhiowsze7mkvGBxgXeiOfbt23
HWNYD2aEruQH5F9eom5eAQvZ+rnFqNflSfHty7DWUTWXOzrYF8/Gl52AxZqr
JKna6Mux3MpdcN557dP+n2Fc/JivPczoEs23m496VMYCNsN1kTbTi7TQn9nX
hU4wZeJYPK6B9wsH/D2J53euHJiH+Bt0M7+FFcPd/h/Uca8PdBYWwhmiqCwL
2N08vaAV9ptZHxCjhry/s/CZT+rtk6upEK+YL6bhDIvAd7+oIq+qeVFnYXrq
0ngUsa3t29tw+Iqdlt/Cdf82OXeS+yp2p3Y23L77aaoa+T4ZKozvgrkfLz0n
94vIy2cXD/HrCsUXSP+5k3s+3YDDU9rTaJgVJk4yRH6s1CZ/e1jwx+lzybDi
4cLedXDCL4ft5mBBYt+JxSReqWrakXnkvuc1D2H+9o7stzdhremjERXkPERy
IlpgUUCwfiy5PwdVX3fCsne297bBeTtH5z2CUzze5aiS/IPso0Jh9wTnHVXo
j/TBtngVEj+WY3UednfcZXgc89OmQbUOMK3p84rkn5H/0wENWHDrN51K1Jvh
xvqnjY15xOdcH6qgTu/4r4pgSdy0OI/COJ2Biu9hyjIwa2yOT7nrD62KY5Pv
3Ue6GTN8KoHK+VsMy42rIhyn+VT5s4D+SzDjr3iZqpJPsc46Jf4IC+39+hWT
fKqbN/PwESwetD6pNsHH75vY8T7YpSr6+pExjH9ackAf+bEmHazU3yN+WEfp
TrLfyjeXTf7Dp5jpbsVi4hLVT5dH+BTFPSh/QKwoYDW841Ph4Zn/HSb76wNz
1R2Ys9c7x4j009nonAnGc2K/KnMi5yF9S6oh4nFL140fh8UaioZNo8iHsbD+
W7J/tiVu0cX88h0C/XiyPl8cXPEBFp7zsIoj7qLD+5GvpPD3gTOwVC2UVz/O
p8TNT3M8iRdu/z0J9bHW9RrzYG5Cd7kZ6hf6bCrRIO//mRITC6f0bPzsOfId
ZTn0ZZHnks/WpsKiqq1RJ2DOjsxDe+Du6GHGa8STNbZr6pDz5vKpmoL9ZsKK
69G/lBETCznyGT3R3ZBI1rPayWkv8pXNSG/uJev17Np5JuoVmWR6sMh6KFts
mUN8ShpQUqhcBS8dT6/8G+tTY6bohOkvF1iw3/KpPIu3jAZYfPiH6Tev0K85
5dUnMH7wRMS94FOMzeoHm4gbLziNy/gUXfWkpYeY/Eke/f+TTf8PifF7vw==

        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], {4.177390076620801, 12.821117708840955`}, \
{0, -1}], LineBox[CompressedData["
1:eJw9lws41Nkbx+V+KQbN/GbmR67l+pel5D6vKFIrSyG3RKitNP4IkdS6ViS0
oZvSRq2kOyJDuWyx/IVSFJUuomgNNrf/+e3OnHmeeeb5POf3O/Oe95zzvt+v
RuBet2BRERGRafSlfsMn59FHF0T++TAhv+PLfOQjxNxua/9CAr6t0csOOoQ4
MfXG7k2ITd80XTVHzNPM3KdGQIG12cEdwzqI77Y2iRHACTjaP3AOsTHvVo4o
AatT6Do/uyGmhUZ/IAnIsH/R4iRDPX+n/IoLAc8ddlsUNixD/6+feTmPgDfX
Xiz0SEccMORcMoHGLfzk5zYjVn/YVbCdCUYfW0uaDRG331Sp7GPC3qjge1Hy
FFdL1PuyIKNHdeWG6aXo/fhmk14WlEfW6BN/IW73Uk/yYIORuMOsDh/xaMX1
0EY2tOy+I+ovgt43PjckqkOCPK1e2lQZcWLBd+1IEo70zNi1GFDzi6yNukqC
QeOZPnknxOVTJ/OaSBjNtgi+F0zF58hZ/xhxwYa+/x5GzD1usPcmCZ5VLSem
TiMu9NRZdIiE6c0tXK1yxP2bQ9aZk/Df+a89MjWIR3fVrH+J4rM7+0KpDjHQ
ClTC2NDAMv8sdZ/il1YxfBZIeu3ZoXmVmp/QKNjHgtioByaLM6n89YyITjIh
5o7NYrlQKr40N6t4Johmb20sW0nF75D3qxwTege511hUfvoPH5i8QkCFhHJB
SwViXsdf+T4EvK6NZZ7jUpzOeqdFQHvbbcnL2ohpz2JBggCf/Y2blj3TRvmt
NxNbQMBS5YnR8COI1T0dfQgCVGQMJzsAceL8HldHdF62ha4On9FCXDHbmkmA
SYNinGUt4vLgicohAraV+Ze2HEGctTua8GRCSOLvLtsDEAfwZEzbmBA0sj7z
T0AMdl3dP7Kg3/l7SIAhYuOAA0mtLFgs4z/xTZN6/ifNm05s0K1SNRrUQlzo
NCBVxYbCkjUdmkaIua90T6uQYCQzH2VMzcf77rJ0NwmSSY5jVl6I+0NlTX8j
wW/T4zzjSOr5FXXODST4G0R4/nkCcXuPqPQTEn5xiLhSX4ZYxGVW/y4J4p2l
QfXN1HzJdqdTSdhxsUSvqI9a780KPzsSGEaV0RGfqfmKLBLes4GfUmyWNUrF
N3N3ZD8b1r6N+nSXGuclHPAQY8OxZJ/flXup/HwN/ZjEAleN8EDnOooPOapJ
sKD6whne/tNUPiREUtKZ4Jv0cdB2FzU+Oh1DMEG/aOGtSz9Q47eLhm4RMH2d
T9cc1UTj+XsMgwgg1Bd0JJUgbj/08YEuAXfDhqNf+SLO8unWlyIgzHZu1x4F
xLwcycF5BlzVbvj7l3oNlN+NerbKBIRkpBwJi0HMW7VxKxCgcJGl6m2KOKvO
2j2ZAJoFnbTmqyN20lN5TYCS8dSp6lrE/RumOtcxwclKalgrl+K8uF4eiv+d
ZvSGCMRwvk+aw4Kj8hl6+X6IuZ1T/Q9YMDPDtRpzQ8yTV+uxZMNpU5/VdRS3
f7iWdY0NqxLN8hb4Inb1fbRIiQSzP7e02O2hxpsOjweRIAVbz1ckIS4X4d47
T8LEmMFzz0JqvoNDD+pJCNWRYLytoeIZ+ZqM9pcleeii9Etq/Mn01UoS9u6X
M46j1tMuu3o8A9WDY2mhcnJovYVlDEdnEr51lunxWFR+/jeQPcaGnFR69LAa
lZ+09PJUNlhe6pNbrYKYa3l/lSIbzN19+l8vQizi9WV9Dgs8y46N+IxT6w32
CFJmwbWgC81NbRSft5E9xYQJpsyb6//Ee2znb1pMSMkW5dJ3UHxupdkDAhyg
3zFIh8q32qzmLgLWzuvbV/PUUD6+2kgaEZDjHvRRQx8xzGWnyBAQqNh5ZPfx
Jaje2NpboP193FHXbstXRetxLM1SIKC/uOrAygDEiQobnlkQ8CUoxux2pwoa
Hy1cFU/AOvXPtbc9KA5Oa39KgL5d4LOCTyRiFcsuayaU9GZlymch7h+Pu3eT
CV4Hg1tfrUdcPmLhbcwC+rcZGFFFDMMbnctZ4MH/cFJbkno/UX7akA3Ltpze
GSuGWCTthdgFNlh53/vAV6beD7bylSJhyvqXE20rKCZqcnxIWBPBsUkJpObr
sxArIOH91Z5x2Xzq/Ygd/FoS5uWPio88RUwbGH6E9tf8Qciao/IofhGnc1+q
SThYa3rI0QFxOd+MyCWBLnPlTiUXcUDxcnF3EvSn8+b6j1PPW9LTZtiwuemA
tOs5xP3fTIJy2aBdY7PEPR9xluwIS40NIj3FBvIHqfFT+fUXWFDmphV6wgUx
L0q8VYMF73UvVL+VouZTVWy8xAQtL+9k0VJq/SVMtjETMqfvZ3ZbIw7YWf68
mYBu2tlPS2rQvP1DUfERBDSLpux2M0bMrXOtNCUgtyzUKraAhephu5v7QgIi
h6h+zkTxoJ85BmxelvcoJZiJxzU6YnOutRH4feVHgYyB1QSe36fHPlzvIQP/
f2P8b/tn3Rk4Pq3v/vYqU3Qcv+Xh3rywG3S8vk/Tnp1jiXS8/kaifqA0hI7z
k7vo8OT1bXScP15PyAI1Lh3nt/OJh/Pa43Sc/130loSK+3S8PzcY+VWRY3S8
f58bIqeVDBl4f8X0l8nxQxh4/y9t49XHnmXg80F7Hx9m/ISBz09rsxNTdpiB
z9fDuO2/psww8PnLeU38/PJvBj6fnW9Ea5XeMPD5PbG5wETjNgOfb7upsPCx
vQx8/mtzzuoGMxj4fhTeXgzrr9Dx/Znmpv6x3oCO75f0f9Ycfnx+Mb5/aqK2
y+tkF+P7mfrQICqHq4zv7762M8SrLiV8v4u6OqvtOUr4/m/bxOFa3FDE9aHv
+ne1ruWKuH7MXRyxKnxAw/Xl+KKaMG4ADdcfy5j32k4EDdcnvm92QmKzAq5f
n5np7ZOZCri+pRy9ouWSqIDr3yIPhy3zeQq4PpZG923reKqA66e+0afzMnQa
rq/djLmqL+touP6SKfynFkk0XJ9nR4s3utbScP3u3WRXlzlBw/U9wXxDaPxS
RVz/4zqz22YcFXF/uLVnXdwBb0XcP8ZeqKarUizoL0/vDZa2Oiji/mOysEox
lKWI+5OX/5hOxTMa7l+NkQrtKYk03N+Gyrv+SKXWI+h/v2rkHz1looD7o3nk
YNeaJfK4f+oSn5mj/IW4v7LLJV2d6+Vw/5368qN6yjFZ3J+j9abvDfvJ4P49
+Em3JJojjfu7rmqr6R4LKdz/A/L8doi7S2J98FYzY3ZxtgTWDye1rfZ1fxfH
+mJgebbbjePiWH9MVeh6a/8kjvXJXMa2pbU24li/7B9ja5i4iWN9s0Ldb0tE
ujjWP/VbNoRP9IpjfdR0ysSb7yCB9ZP3jMnFxgoJrK+2enWfsVkuifXX/fwB
S9p5SazPmMliurbzkli/uUt9uhvpKIX1nUldmuMurhTWf/UaactWREphfbg5
gbE9wUUK60en8bbGhhlJrC9tSn5qCEuQxPrzx9Ekl9ZOCaxP5U5WKDPEJLB+
ldMMnLCUF8f6NjB5o9btGVGsf239dKzNuxdgfbydN1gaUiSC9bN2l9fjthdz
HKG+Lt30g7VC3AxHqL8D/HcsP23xnSPU583aMbkmOlMcoX7PfSjamu42wcH6
vljRv7hpnCPU/73Fcj/7H/+LI/QHkTm51cNl3zhC/xCfbHuZp4NY4C+snekG
OyfHOEL/wfQ6aHyDQOMCf9JedCb2XQJigX8ZTcwPt1JH8wv8jXZ8AX3nMGKB
/ykZN+126EDxCPzRI2+2cnotnyP0T5tSmaNnL1Dx/+uvzJ9+qQwNmeQI/ZfT
iPuQwixigT8zN3lN53mg9Qv8m3aZ8tW1oYgF/s48leZ5biligf8zLHnq4HYM
vS/wh+ZKWZVV+dT//esfh5PoGQquKB6Bv8x9p5e/8Q6KX+A/3xmeXTHXgfIh
8Kcxr31NInZ95Qj9q7H95Uy/niGO0N96FTlNDii+5wj9b2FfwcIYiwGO0B9D
+12x4qHnHKF/TlS/EkUWt3GE/jpx5Kh0YkMNR+i//7Hlf+fXCP35/wE+PSN/

        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 7.6718816067653295`]& 
         ], {6.25, 7.6452}, {0, -1}], LineBox[CompressedData["
1:eJwV2Hs8lGkUB/BXumCpIbogxqWMSEMpRDOrkhWhVJIyZIVuk0pTKlOJEWp0
naI1odJSzYZIYiq3TdrJJirLyKWpqHEritrf45/5fHve5zznHPOc9yOTkJ2r
fh9DUZShCkWRT0rxEz+mbKqDfDLYFHfHcp/vsLXHgvkFsMDhdcIHuKm1MiQC
1rSzulkHV9zs+mIC+0SO97gKB75tWSC3YFPO/MLfo2BmgKvVNTh90rP9C+Ac
veeCvbCujXlIvwni1HZe9oYlr0+558K81sVL7WHNsuAUDux3vbRxFizLTLip
Bzs/3m9nDvOsD1jU0ZHnlPBb1vCeHfqcRJiZy7FmkfPTrgk8YYeY9fQA2HNC
W/w0OHRkUWYM7H7klfQ/YzYVPpB99AqsUOP7XYHzzuaG/A0PVUiHD8KB3/Lq
lDDnmuwNFx7ZoOqnh3pzzB2NyLque/zV+bDcfUFXOjy/Ov9PT7h4ydsdMpjW
wU3bAA/cuXFGHecr10XqcGBe1p1tTJgtczVcD5u/eLw1gOQnf/+rG6x7WTb1
OMxYmptiAQce36G8CW/bXn5iFPkIH2sm1sPFqiEskm/BNr8sJSyPumWSDFcs
Pb18PPpVEX1/gjusDKG/1oanLc6c/HMWm6J2d1nrwAetPdLz4e4O22TyPCdm
cHI4rNQKqPqEeJyErB4jmPu+eU4tTA+JPPp6JvKJ+O9cOkyVv/+aDtfEWf4W
CpdG9TDC4exnliNmpN4xi1NdYG729T330Y8hmxgXI5h/rT7DAi4IkJRrwJyr
PcGpRtjnZmypCktclzwYncGmzt6KU58AO8yWXdgF+xW07NaDqeqh472G+D4O
8tXmwKKOItERWBimNtYTzunZbDsTDhxMWsUl58V8bG4xwPndDtcuwOE50xwk
sHVjqLCc7N+i1nIR7lAdm94JK53PBqfBzpWh4RNQv3/toG8+zMzTfGwKM6S7
PFrJ/jN/lNsTtwZpGuK80pLKp4vhmqC9mb/DsjzXSme4eFZ9UhFcnM0ZsSH9
Vx/t1kQ9PDPPZXqwTFRSwYGZ778NfMb5xX2xprfgwJPCFpKfv5ttoBLe9jzM
Ix6We7SzzdAvWo++Yimx/j63JbDu9oWlo+a4r0+MJV5wc9GvGvkwe7JNHhue
3zTdeQssCflviwEc511cbQgruR7TWhD/6fktui/N0C+R7VAi3HE3nXMOFu9O
cTKBuQVJNwJh6aHrfddIfY+PnJsDqwky+oxgydTeYHVYkfHySgr6E9fW26DE
vffZMqbuqz7u6Zlaxw5Y8aBvVwjsf+rt6naYH+CaWD8d/cyz2toDDwX/KvOE
D1ZqeKuQfPzDzjVMQz4H3EJnwEKz6EQu3P352F0WyceLc4EOV6gla4XBQ+XH
Kt5NRR8ORI07CbMzCvSr4ezSC4xCuKm/N70M9muK1HgF+19btrwOZqjXBH8l
63qy6b3w2egGk4noD80lwcYC8UsrvYUGMN3sQdNWWHO+n78R7KM3ta4EbtZp
FunBxZwlPpOQP8/T8xMFS9t2RYbCIxP/ipYjvkNd0IxCWHZyn6wADu/+89II
LM/OnxwL8xbN4C1Af5xdnarYJJ+HRa2bYHGXdi2Zy8qEXfei4GlD3V53YGq4
/elOOFklJTeMuHbvKz9YnjLJ34D0/8dIlglMn+lcUY97LvBdMvwS52UrBl1P
wT5i36vRsLm89/MqmDEiD1KFc9ZWioxh0fmqW3zUx7N1u/EF99q/LL28D/0x
V59s+AqW/eHhtAkuPfVxZzWZw8PrJ9ZMwfdxtVfmQ9jnmKuLPewcd2ouWZce
6s/6Uw918w9OayRzZUp3pTWsHLHq+UzmxljT9HJd9OnY9eZJOD/c/mlEGDxW
eqtmPrHeO5EZ3LS6IjAQzlEbyBiajH83F1jEkfxNtPs6YV3XFYU3YPc6vW8f
4DzH0j+fwA7739PHY79QmtjSAcsc/2mZT+JrdXK/kP6c/vByNxy6vqN1FBYG
1X8vI+tTFFO/wXR+9n1t5OuX4xP7AeY637fdAnNjxo0+g5laig0l8Nlt8cPX
SfxPSp/xqL+0IyYgmuRz/OdeNzi5ZJC3COafKZVEw6H3H+kMo/5wzy9nzpDn
NfkL/yL9cPwYd2kKee/Z2IXBol1ZjYmwuQuLqw8rZpu1ceChqg3PxJir9JWS
H8awQIvXr2tMvt9vUmuQD99z+P453Hv6K15vIFzcEq9hAau1MnzkpJ/e1MSn
uOfi0OSLa2HO0SajBFjkcnF5Bfqndunk1fUzyPxst7WBRdUBvyyF1eQ9/hd1
8HuWFxYug6XJ929rwDLPbs2N8FDIcGe8Nu6RYE8KieefPcZeB2ZreLY/JPHa
PtlKaKhvE3OiGvJxiEy7thmmFVmmrIG5T9bttoH9nySfukryLz98QBvmHN5k
2Q9TVq/Oa8Jy71aBI+rlb5x32QgOpw3N3kPeO2GTI5bBip9emhkwZ+X4gUNw
U7XixV24ST0huoLE1xWOFMPTiqan6iI//vU1XVmwIrI5JgKWF9H7omHRGYFT
GSzoiTlmR3z4dr0W6lX2bBhtRD4CeseR1TDDVjM/AlY8ies9AfPyOp99QL00
497fJbD4bdvcIFgwd/Y7Kcz35rNqMUdzlpkGl8DyB9UP58H+LoElaXB46PYr
lzFXw5vaW0NJvwvWlGgZkPevYdUUmK1WmC3APef/tXFTPvITVUw6pgMLG+uO
uJD+hzg13MK9HroYUl+MeoWnl6ziEBevO2NJ+hH57gkDpulcGGRMInOmTk8d
9vltYGREC+thEeNVYKl+0qJXmvg9OMl3kDnHXJG3tvoX5B3Ram0HcyzcbGUa
yPNKIzuMeLNT0nd1xLPM+HQdVv6cfNMbVryf2tVHzPzL7Lka4iwxinJFvpLC
6pNHYfY/D3NTydxT2RgXShx36fYbYsWWE3thIe1LvQHq93kun3UH5lmlvfSC
uVWp4/QQXzb2u+4OmC36xe4C7N/w+sZ+WLzJYzMT+SnTqlLJOn3vv2saYYdN
X8tXkP3H9zOPoh5Zf5mlNsx3iv08C/Xy7Eerykl/jyU9vw9Lwy4mrIfZZs8e
LkR/hGOiFrehHvG25yWn4ZzU60cDSP0rKmdUwbzxQsHfmKOcj8nfnsJU37d+
O1g4eGhZNszJL7qahjkqyUgY8oClZ4/Gq8FSQ3+jRziP6X7J9zDuNbNsfLUm
7G6xJFgFltqXdc1Fvuym8NhzeuQ9XG9sh3rcF4eUusByWtIBA9TP6BF5jeBe
U9tLtQYnoM6dsXvrYbHmm7Sa8Xie1bxXCks6nzDE49DXez+SK2G51rvk42Ox
33dktBWmG3SpH1XF94SWbqZF4istui6PQVwN05TfYE5zvo5cBZ8KqVkqLOXc
a/WC6eLp61phmbL60QcKv/+CjpVzkb+MZWtbDEt5OcYHSX0nbYSFsFr5Yuoh
rPyyZ5EcZnS0HxqG6fq9V+Yhnrv1xTwT0q/+XftuEKc/9V0AcxdZDDsiH15N
9AR7mDbrF9dmmK1ru9YQZttl5sYjf58+RuVHxKNCBhfMRX1DT11bs2BJlO9w
LczMnj+HzGmOo7VgNfrBXdxk3kDeUzMvBT2A3T9FTPSDmReGFo9B/7iRL+VV
pF/f3uwzhAWJaVPsYNrbTis1mCegHbqEuenj0Bb9GPv55y2ocbD4/PpjK2H/
IfmeaDIXdOoEuThfwb8b2o97K52RnN+CfHMaFjXHwmKrlV97UA/DQotlTOaU
ZuQz0m/pjm7TF2QOFu9WlKNfNLWMeWIaeX7bBcufLGoas4weR+bmSsM39SMs
/B3EPh9LbExPPvWNRQkua7FTYcrPtDpqiEU1texpuguzD4SNO/mFRfHc3rN7
SHzx3U3KARbF+TGQxcT59ItOnVf7sR7T98dBMteLmaZFfSxK9qRi11OSn5X+
PQZcE5NgZ4D6qB8e9t97sS5RVSVzjDNXZawV1h2eZS/LJK52TZOQ/UN5/zwn
zwc01/IRn5OVMOUzmXMO4xal4Hxmjtfar2RuFsb+qBhEvrubbivI/tGzfnpf
kc/BGS6PyPN9htxI1MN4OaAfR+K9eectGWZR4UL5lrmk38s2i/5F/YyvbQur
SP5sp7BH30l+8kMrYOr8CG07+qU24eLHR6ifXn28oQoW3Nn+N5P0r7SdQyyM
yzo1D3NT2vCvfRgstjohGjcR++fEKbIRj8kz5LXh3nJOaNkcx3niyg8pMtxb
zuBImRbyEa4WhL/BvRWXz5n4G/LnRG4NV4fpA7TGpahPuSJ7Jwf3mGPuKNBG
P8QpDVc6MPekL+KFD5V4PtFioQimDpvOed7NonwyTUJjYL7h9WX2CtiXuy6Z
rAdsS3rZjue/3PaqJusqrRr5rchvTWjJLMSnPqhaPGhCPlqb4rJg/hovQ5V/
cX7l91X2yIcaDDmxso5FsSNHFfXESYf+S61mURKeZmIU6qHuDZ9oqcDzhvlB
GqiXWrC5fWYlzp/36ych8Y2EZw418B3dqFHi3Ju1fyOeUPR2iTuZi80so+J6
9L9+YPZWmJ8btXVtI4vinn0hDibr9eXx+5px3pijYyzJnGyg6rrkyCfc9KaU
xGNaLY9DfVzHnrGzYX5H0b3uTjhIMyyc5Ffg2PPtHYuS5kymjpD81w3Eprxn
UXxl2uUDqJe9yNRX8AHx/MICNpL3To9ufgNMG7RcYYe5SflartsCSz8+0VfF
vaZM4t4vwH7aaesrr3Bv+fMH17ghvjxsKq8c95bq0c7P6EA9M6WnH+De8lsj
Xvi1of6Y4OY3uLf8YlXt0dfo13Stt3SY8r+ltw/1cycEJaXiHlO0zIbSR6j3
o0Enk5j8iB5QYvL/NT9Z/wOxdoTU
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], {3.686344496971515, 8.154754978930534}, \
{1, -1}], LineBox[CompressedData["
1:eJxFl3k8lWkbx4+KmJRtDI5zOIeH5xxbTENmMrqPzkRS1iJkaVKSqLG8SrbS
G5GoIcso0uhojJSlhJAKWaJojFKWCENOI7t4r+fz9rn9gc/38zzu57qv9Xex
9/nbea2g0Wjv4Yf6SxOnfnFRiXBpaSnCANFmzKre63KRW/gtS+2fgUM0HvfZ
cVFizDDZbQbc+Tr/+BEuQrzdXe9UgatrEq+c5CIFvd3FOvP6iFZIq7obwUVO
vpFNhR3AnF3Pfw/moqyu6M+BhcBHu4SPPOF8uvLlE/HU8+3EMI+LyLhGTqkP
8NAL4S5FLqrf5tQiagXs8THi9iAHWU97eHAMqOcVvRMFHDQT/qivhA4sXbfO
PoCDEgzSw5QkgI1TgnSMOMhIrjWUPrse0bwfT4/OkmjH/u8vrh8BdkqxnKkm
UbX6KkPFAeDEj8WJ50n0aGBn+jfDwIUy7GpPEqn7fqiSngTuSfTZsplEquey
mptXwvm0v+6HkCQKPxVWFS1Ffa8711aZRJHley9WMoCrmRnbgJWD63Yf1wLu
eTnlAe9/+MF+tGgjcCpfnAnnoXaBrd8WYPGp4Xj43mBmYvU96r6cISl7sId/
6vL6Cjvq/Wj1IrA31bK786EDdf/R7By4j8amWP/N1POjL2L7DDlIiiy5/9yS
8tdac0nwx+1/X7pam1L28CaKwF+9FvrZ5TrAFmcnQ8GfMg/aTWy/AfaeENMD
f5ss8NZMTcF9I40EbRAPzRRv3+wy4BAtohritXjn2gt2MLC4tEMJxLPzgjt9
gx7lX/XQ1xBvC/48+0G/HqLF9Jd2Qj44W6zyf5wKPLO9oB7ypcLpTZWNNbBF
ovNP9lx0ppbv5yQB3Fk06aLHRco5247crteF+wusTkM+OtZuvDWXAJwa2Bvf
yEFrKlwK4/cCxwQGXkziIOPD/c2HDYFtfizsceCgjL7giR8VgMXbWt8qcFA9
d4M4fyWwh9GG+dck4g7H7nWc1YF4pD+OySWRn03j9//MABs72t4OJtGVVD8/
WRF4Xxh2wdmaRFscmDUx0sDV+wflviURc1VrXZUGdX7SJTEWiXwM9pR8MKW4
sG9YiUTTnauDCWdgfc3heVUSTZUK9rsEAXv/I7VkQKJQrnTreeo+xvnRJnB+
WhQj6mkOcKvP8Tj4fupvKscsioCH6MOuYJ+P7qOhkHLq/b8PNYL9IZwiawWK
E019C+B+aVHukka3gY9GE4Vwf1/XXR/NM4Gd1Dd7gX8OnVbo1IgAjrQ+6gX+
c5o8rC/tCKwoMvAz5V+ZqYB86j4zLplbwf8zrvcuL/4D/hDuqN0E8Tn1tKXS
7Q9gWi7RBPHzde67cNgLOEb49QjEl3+9o2lWmXrer7oA8R9yLS0UadNGNFau
aj/kh8zN0Ylz/wUWqh2fh/y5cGtGJ9UUmPbomJIZF/064X5Adl4L7B2pjYT8
86izvldSCSz+e91fkJ98OvHH0llgmsadb25xUKxsgzzLBViokhIA+f3a4YrM
2EbgTiTcDvV+oFEqvEsFmFOTIzkH8VTqPjQpBRzZ46xUQ6LuDo/E/q+AWc4/
FUN9aWg9GB9cB2wxp/Ue6o9k8O0H6JQ9EuV+UJ9G+8zOBOhS3z85IoD65TJi
S/v5wB6NcmehvhkRjrG73YGNjbyiga3eNMi2nKDsC13Mgvdtznwla5YMHJM+
7gnnrT5mlVicDyzIUHwJ3zOVClTcWgWcKFJ2FezJIQPLLBope7t2rAB7M9uS
ZG2fAeu3GHyCer8pmV7Bf0rxLqsNcN+r86VhXuWU/UaLLuAPBc01L52uAYfk
7hMBf+nLG6dqR2hR/efDY/Bn8g7xQ7Z2wNWfggLA34EpEtpZDMrflZkyEI94
tn20+VsuvH/x7SzEa4+mU/ujDGCPd5ZDVL1nD8u1Q17QjNPcxCO5SK5l3thN
Arh1Pvgz5MO9ZsU2rwccRKsPOjEI+ZL2Ke/yv4HAM0+uusL/iWpf/mtBD9hD
x/kI5Nulwe5Dez6QcN73eRcgHwv4Jxg3ioGFC8bJkK8X7XJMTU8Ds1KGL0M+
P/H5ZVbNBTj15fF3kO/n0xKW5kwoFuj2Qz3INxxaEOMCC3bvXYJ6Cb4ZJsqC
OqTR3gwkQD2dLt5IlqkAJ2YH3Id6y+qL+/xOE3hIJfUg1KOAx1J1N6LskYjV
gHpfK/LTfOp24Cx1KybUe9SIuKBhP/U9f6EonUTaLdS8XH4+0DnlaJSx/P97
Ht5fdbB4+fzKqLc9WQ3L33/cE7BC+e9l+/rW1Xdu7V22f1zx1NzbnuX72cwl
r5x9uXz/Tu4xmmjtsn+uOp0X676+7L8XR11rak4u+/du+Jl+J+o+X/zf9pqd
kitD4vh4pHpzVrZp4vg1tezyXhunieP75+SgXjpPE8ffdnJlXfaUBs6Pk3Py
o9r5Gjh/1mTe0N60XwPn19/Z+aH3WBo4/4Q6U+3u/QTOz9ag6ZSCPwmcv4YF
dQfbIwmc3zszP3Fv7CVw/j+psziVzidwfVSUem0pNyRw/dR/PDJWoE/g+qrN
iNt69zsC1x9ZHPe+DBG4Pt3sivy32xO4fuVNJ8cqfajz/1/fSgOGYwZnCFz/
2/iC4LwsAvcHkxvB2xjlBO4f+p6VJ+KfE7i/mN4oz6cPELj/8NJ40kofCdyf
Ysau+DMmCdy/6vLUUr4SEri/LU6PR2n0Erj/xfh5fpCtJ3B/fF1oNPL2OoH7
JyvvlQMthMD9VXThlrmlGYH7b+uzq2ljqwjcnzvkVr84WKOO+7e9kpxk0HF1
3N9PHthmvainjvs/S1Vrg9g7NTwfZr2ZR39NV8Pzo39G3yzbQQ3PF98D5t4i
X6vh+bPujkS8fRcbz6e1LZeejQvYeH4tbB4iuyLZeL7NHLi57t4+Np5/Tbys
iYadbDwfx9KtCof4bDw/55M3KZyl+Mt8bdHsTbhrxcbzt4nXH27oysbzeSRt
fP0vx9h4fvtLOmZcP8fG891/ZDr21e9sPP8XknItZWrYWB9YVK03RtR9vugH
Nf8+0/+Ms7G+qNdKShpbZGP9MfPLd0++Xq2G9YlJV9A1gZga1i+ZaU3T5Qts
rG+e9sRIPhxiY/2j68T49tenbKyPnFdftw64xsb6aR2t3kaUus8XfWXJKr24
cyMb66+epftJN6ZYWJ8JfNjoViEL67c1ofOJPxxkYX3HiFj1hsdgYf1HP4ga
03JUsT5sYd13qpBTxfoxzFmPrIxXwfrSJiF0WE5WBevP6IR8yfJcJtan5j+b
hsrsYGL9uroiJ/6hGBPr2wsjWvIl7Qysfw3Tu3gr7jKwPvZ1Pffbp3wG1s9l
Ydk8qRIG1teGUpWfGc0MrL+bDV3Ltv7LwPpcNuPOTn02E+t3z4Le6/TdTKzv
61NjSiXOM7H+7zgpsWKshon3g51uYQ31QibeH84UqEW+kVfB+wWv3LPxua4K
3j8sN08nPzNUwfuJwYP4V1naKnh/cfNwF29cq4L3m0vVKRLpr5h4/xk9NxbI
SWbi/Sg+LzTcbRMT70957leeDD1j4P1K17nNldzFwPuXDfNSjnyLMt7PzBmj
Ejqmynh/8+n43GySR8f73ZGWXL0dcnS8/z2Nyk3xjVTC+2H8/j0ecZ8U8f5o
c57XYRcA/GW/nKyFebmkgP4H+jWwvQ==
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], {13.4452, 11.75}, {-1, 0}], 
       LineBox[CompressedData["
1:eJwt1QtUjGkYB/BvM4jJilbSRrlEdDESUmhM5DbTjRiVitEx22YbJaIySW0j
l4YusrvssFGbZLZaJW2ldjWRDNt0UWm6sNV2N8yki/2/uzvnzPnO78x7eZ7/
9873zT8Q5O6vRVFUKL7k+t9nIZPSIdelTGqAK2weWsCkqBC7HFdYcGqPxXtY
qT5ffhOmuCYBkzGe1jj56RAc9VC9ZilceqI7fP0yXBtu+u6F2XHOfwphirWr
I5m4XbExH9bWtZrXBEuT5jxvhcPMJ7SYLWJSMnWfzTgsPeN5PQzO4E4ZpJsz
KVGTe2YFbNE+gU0sPVzmOdOUSW3ND/YYw3hud7WjBxw1zVrRDvO/ZPlfgJW8
EutHsOiizq4COCJ2aGcqHBVb4FUDsyPajwbCfs3jyUo4K9NshEmsZ6tugmm+
9U5z4FThmPMTMr+67owG/XZ+PrQuE47pH41shTWHOYZCuCZo/8lauL7Xt2EH
bGs+NruBWE/epAdTI2vXdsMZTn/IXqEfcdV99RSsL1gd55oGy33ab66BDeq3
TzgK520WVR4h+QQOGnJg9lA+5z7s6slzsYZpKbOitZCHyZRBqSncc6rZeSc8
UFV2juSp/fk971uwJLHdwx6mwmSs97DSpCVjHyyIsLnvYIH5m9hbLsI6zd75
p2GNwwfLp7Cub/zDAliZnH9vBuov2q8nb4NFbjHf+cA2V9x+HYcznt3kZcN8
/65+uiV+v5HNHYO5RSHPp8JSdsnLLYsxnmcVMIrxkvo+fjyc19V3gaxnFh9r
XAbrWC5NL4G1/TZc6oFFxbwfU2Bxx1e62kuQe293XgA84GNarAcXCAY4pH7Z
Vf+U6bD4ekzlbFi30Uowivm/X3vnqib90tSDjXCgNT1LCcu8Xp6Ukv3CbxnW
wgL3259FwrTRc6saSF7ZS3o2wVVv/eq74dTOVy10uGmwZBYd6zPvSBIU6E81
3X71WlLPbpHoFjwQuLEshNSbl0WR8xDjzE8h+cknlWceJOexd4yaiDw6FeVi
LuxdzfnLA5an5ai9iIMTB9Jhs0i6cxDccXBbnprkWVlpehneVbiza6MV9l/n
ZVcOF2jCEs/ABu4W0RTqYyTmWhTCjM2N20ne9XHGsnZYUxHvkwTXLJdYfCLz
r7gwOuC0uc/e0Jfj//rAbdpK5Mcust8+FZb6DbtEwjpd1cdGMF7G5l0ugRl9
HIdWuP7FgeYPxFUGs4phSWjcCxMznK/z3DdJMDWnv8IeLqJHDfBJfTONu5xg
g3eca+th8ekMWxbcs694mz5Zf7I6yQoWU8eNPqBfTST7zjSYn7aioQWW5Sco
W7GfiiMsVMDcR1aMbHL//VTuDSQfp9dax/6t/9Dxv+HUAMGndXBG3JGVOqSe
1S71k2DdTpnMDpaGeRjUoX/Js7MPQuGtmspBch4M9iiaSH7ykIUzr8BZptKI
ycjD79NwxDk4aUZ0OBfmqxcLEmCLtwxhJnF+svtP5LwOnTb+CNsuzc1+TO7H
ZsnUBQyc582Vthq41qU6lwUzeH3KVajHLub2k32wpCWhPwI+X3HNKxg2u61j
/gRuszn8TAjLFbtphsiDtdirKxZOjbaW8eGkxuWvY8j4d4de5sCe6qz1kbCr
alGpCs6cf0cVBJvwa66b47lT6rhjgw+s5HZ84QHL+3oub4OZ/U7RQeQ5plEk
roTFs3r1T8K7x9JUc4nNaa+Pwm1PH/OmwgYnvH7zgxm5/Lcq9BuVO8x3gJUH
Qye2wCKjizv04LQFQ3sVMLNYy78F9eQJ1wgaYGX5mEk6nBbB0e+BxQkJS76B
jewPZkzC+lt7vl9mC1f3O1rOgzsXF+Zow3aed+vsYe63Ln1tyKfjTLiY9CMZ
E8VWwrQ7lz6SPMS/JIcWwz+EF8TeJfndMH5fBtfoO8TUkvvxQsirg72LbFjj
JM8bKY4j8Nb0YaOFK+AXCSxL7PfqpfKqI1zqZrP9a1jH4ueTPrB8XtU1krfu
2ZzqYJj6/71JXqZRK5j/ADR7uD4=
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], \
{12.324559082853224`, 14.447184550288068`}, {-1, 1}], 
       {PointSize[0.04], PointBox[{12.5, 6.}], PointBox[{12.5, 17.5}], 
        PointBox[{9.5, 12.5}]}, InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox[
            RowBox[{"C1", " ", "N21", " ", "T21"}],
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->6.137505285412264],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          6.137505285412264]& ], {10., -0.5}, {0, -1}]},
      AspectRatio->1,
      PlotRange->{{-1, 21}, {-1, 21}}], {0, 44}, {0, 0}, {22, 22}], InsetBox[
     GraphicsBox[
      {Thickness[0.005], LineBox[CompressedData["
1:eJwt1ws01GkfB/D/uI5iDRshMW410WomanOdfygq20osKs5U1G6sJGut8Epk
XJrjVkYlkjasos1qrEuuHdJlpDR1tE2W0r7Eklsp7/fZfeccZ87nPP/n+V2e
3//AZN9h7xAFiqK68EO+//2w6X+/OTTlcctLtMeYpvQstTfMr6Qptk1pRJ0R
TY086YlSxXrnDhv75bAsu7zfBGa3lZuIltMUx0h0ZyssXXTnqhYsHirtS4S9
DniEVhrSVJ4Z+00LvIHdXLUXZp3a+c3iVTQVYTYTZgPr+QoVdhEXdeqawm7x
VRkVcEzbksLVsG1Xa/Qc3JytEutFzgs/GuRqifWksd40OGpPDTsF7rzyd3Uv
7HOikdkASzitdhzkY67kOzkEc0SKzONwonFMKMMK+/cYxj2BJQqDjRpwZ9oi
XQvUJ3wRo7AYpt9k3t0Ph12eM3iP/eIftINEsMTU7ko/zF1hk18Md454j9XA
iYcVMvJh/9rPO0g+XJUtvx+BfYYsg7yJj4hXroHnJ4xXGcH+VlZ+PYjPPOZZ
NIL6JPE59rvhdjU33RZSb8lGtR7SjyKD3AswbabC3ABnKQ1cTIVlgn0uZ5bR
VHVNvE0CPCyNs5swoCklnvjECVhcOpDpDX+bvJQphr1mqi426tNUg93YoXq4
+lqHpx2s11si+if+zczkO3o4f61j4SpSr/Veox/g/o8j7AjiWrNzDmR9Ncui
Ea6+cUnZGDbPlgaS/sn9Lg8awVFaAp9AmOpx3mgHC2zCT5fDw7nrWw7BmVXh
L97C42rUo2uwXoLrdsvV8Mzc2AK8msVICoCLWZJ+P+QncOhoioWF4ZEq1TDt
P614CvbPd+hjoD5H/g39LDjLNGiROxzh1JybDDPPbFwUCxs+7+oKhdmhkbwz
sOeqkA53+NuVcg0xfDe+acUyuPmNpigelnUEM94gP0G+zHAzzO1j3qiBsyZt
yycQXyoJqD1O5uNoa0EKXK22O2onLCzLrVSAZWuu6H4BJ0qUOsJRj0xPMVCL
nBfGq3iwFN+P4mIUiLti66zgxLVKb8k8is9ZZqfpYj5cmUksmC2+enNMB3HP
WFlbw6xVi92C4dL4ApNdZF5v8jJHlqC+DzPdOcRxgueZcLLL/onHJN91ES4e
sEw14B4b9YnHGLvZcPE9hnUELF24uUkHHjz7Z1kzHOFbeMECppVb2j77AvPC
lmZvhzn6TuZ+8IaoKAY5X3j+YcMZeLZ1vEEG+0vbpu7AnSzRbWvkJ13yx4O/
yX7Nx5dSYUkVf0HNGuvXj9T0w9WmdfPacOITzYyVqHc84KW6Biy5m+a6D94z
Hu84R/ZLhnpSYar6sPdTWPJ4YVMeHPPgxc0qeNzEj0qB7yqO+v0H5nrbPfaH
875Li9kG6z2NNmTB3IunRUuJ+XcrKxF/MD5F8zWpt82pjQfTTz+4NMKy8mtP
LqGeEVm3biGsx5sTMEl/GNdmhDD3UHlGyOeImyWpTiLz2s593aKN+3r19c4M
2OPgsIY57PHlQ84lMo9nEzxztPA+zzdd64I3zB/9ShuueXWq8CNMLejeK2Ph
+f1P5xyRn+z0+4AAuHLdtHUKLNztZLECpqdyeL1wmbHpkCacmS0qM0O/PNKS
u3Xgsqsv9Y/CzXnlWetgMYfWb4Kz9J9lh8LmPoxoxhrMU5OVwg14ftvrEHu4
+PawpQryUVITVhyAJV3rJEEk37f7qpJhj9RxjVqY+0yzKBemdvkWK6O+R4ph
4cSSK7e3ucNZBmuek+eZg8uv/ACzpPLQ7+AI/peemTDb9zd3VxLPZ0RbCFfH
Bn2hA0ufHnQ4CN/d6+82gHyFe86lrILzIgrfXYWpk+dtpYgfEzorOQb7+zV8
DISLjQPGt8OyTfaDfahn9mRhtSV5vidGkYbVNa0LtWCuRPW0syacIm5TJv3g
zPtPa6CuV0qJTNjLhM6rUcf7ND91yIDMY1IJ7+Ri5DWydYcDLDdR1ftxEeaR
Pbr+EByRVZeerYZ7z1EJvkz276oves7EfGhqxv1Fzjd37xXAwy2xhetJv8/a
NS2Hw64IhCfXkPl0nPwctlXTvtMHN99JUaJhl+nKKS0u7nmF/Po5mKsa9/U6
4n0ZjkaIp8t8N70TZh/M7W+AhSXZVWGw9OGRHaHIL3F1cGYCTLWHnDRcTN7j
6Hkh7CUa3NgG28eHPMwg+wsm+rxRry2rdXMqLFBb9uAWnGCoP3WMxHvGTqbQ
H/v793sPweMpQRc1YOu361f6kvNjNU8O4Hkje3GEI8zqDzoRDxtwPgWYkniK
8xMvEK/5xOsiJhzxvbLFZ3A7+/3kS1KvlcMKTeS7ZJTF/J30Qxa/dwT1eiq0
eJ2HWdPpJtdVcc8/yfQzYPl/s+e+U8H7cutHVSHsdV9kaK6M+6pQp/JggTNd
OaKI3695zuwqMk8/LTClCnjPbn9fJyPzer/W6imDpuJsv7+qSuqV/KKtBQ8o
x0VySD0Fjz0SKLw/elPeX5F6z+iIzOE9ZY+bouDm1L9KlWDPyHnFQri6y9XD
ED4/MhzcTuofe7/lAMyM0ua+gbkFAbJncO3+C31qPMzDPaXXhxHPNs+NYQFz
33f/po/8PPlbS+xgr2Nbwrvhhn0liu5w8Rot6Y+oxy0sWuoJszMPDmgp0VR6
Sr7+Nlhwbm3JKbhUpdDHhUfmXe2SHD4gr/e1gZupmbMK6E9nTLmbMTwuFPeM
Yn221+iUKtnv8iisCN6V2N09Su7n4tL8pUrk756bkl44S8s8PgDx+3nrWfVw
4qcTZqHIT+H4hWOXST+WvdTxRT3it4xjeaR/24++M0G9E5bqO9LI/KSrd9d/
5FOL1hpMJJN+/6wzZPWBT8lvhM6QeWOHxPx6bZZPfeozyM8hz+sq1wRO86nN
TpsvlsJyn3Z9r3d8yuVgblIjOb/+RUbBBJ/ybH+9rZ/ks+OV6Za/+dSzG+NN
C2R/q0vht+N8KtjqYdAK1JdIqdbNjPGpgU/LkrcT3/r6OoV165dzkdGkX0Wt
s+EwFRgVeZ6smxer2eG8t73pfzaR9e6fQz0Rz7Zx/Jt+WK4R9CBnkk+trt9a
PEkcvdduEvklN70ZUlyLem5H79iJ/Ok4XqU6nJj9ok08w6fyMrX6NWBBXnBJ
BeqNS7VvV4WLmy78GjnHp8pmPy35QOKpLeT/AXsELX0yTDwz3yWHH/3RHviQ
xDuevuUIfD5UfV0dTA9sVxfhvOSgWfUi8jxjsZ4D4pXkTJekkPvtq/VMmuJT
OYKkinBig5XySOSvFLWzdjfxBYscNuo1LHA1I/1p5ni6bxrlU84SFRUyf4n+
g04Ww3wqMbLCkJh23Kig+yefylpe3E6epzpMduf3I/5Y31Qgsbtz7Ggvn+rj
cFyjiGM3GKt08an0XE15FrHXJm7E79h/fP8vvxK31xfRl/hUgnecs4z3//87
xE7U+wV8ePT/AI7mbhE=
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], \
{3.6748000000000003`, 14.364799999999999`}, {1, 1}], LineBox[CompressedData["
1:eJwd13s8VOkfB/ATykhqUuRSmnKbdJssRdRMGkUolSRLubPKNUWiphtTLutW
KLlEKEIoqm2byKbITmKN2zaIKGVKxYr6fZ7f/HNeb8/t+/2ec57nWOIWsMtT
iqKo+dMoilypLz/x0+RQKgSKHCrwyKa8cph/NbFzFiy4W1LpBQ9m8i1+gRd6
GTdrwLzoSPnDpP/S5QHdSzkUnaFV95y0M7+W58HZfHUpo3kcKuGDs+tRmCm9
Ym8VbD19+V+74bQbxXzufPTvXpO/AaZd3vagA5bJPb7WAGZI/SwKUeJQscd7
VdfBhfUlw7OUOVR95GZPczK/3L2lmbBodP5NZ5h3MZeruQDz5Q7MOAGLVBe3
pBLfUthA4lGhns4dhyMUTj9/AQuDLJmbVDgUJ6x2xjiJX17WJgiOuBi2iYH8
LOgVLdHw8Cvvns0wQ1HW5Bws1vU87ULqlbhm0UFYot9FDyH1qGPrmsLU4L2e
CGJPh6/fsd6T+Gt1x8j4/cvelcBazFRlX5j+0GtyHyxZ6/fIBq5+nxUpBYd8
rzHVJuNXT3XdQn78uZ6pnxBfmSDfxxWufObpUAknBOTTl8LCRQGhAbDRPJlV
X1AvYaIaV5vU62yxbSfMKtptJVrCocbbPZQ74Iw9Y8YxcGBA7qzPsOC41J8c
0n73ZqYm5svoKPf+zkC8vpV0f3jyn6mYh/D4Tw/+37BAdHvZedhlSnupOeIV
0MKaD8Ci5kDFBnj45qM0M7je8MJLJ9SjuMBdWh82ir6z4yvMrE2TXQULtkat
/l0V9zHcV24tnLapVFpbDfMKBb0WxArRcbfh4f6rEg/i6qD/VqtzqENxE9p8
uPBVqHIG7MTy0SyDhbSYqM/q5Pnw3tUBZ7+w7mctRNx3jKRlkF+ZfnrfHnhY
tilGD2YsTbd3hQ1ij3tZEYtLjO3g+vPSOzzg+kadXDLep6zM6TDMTF5V/B/m
tx3ZqRIKc8x0bSpg5jT1OH+Y9mh4tRtZP7pg9z44IYURLg/LTL92aR0sWtmb
WIl8KI12+kxYpSvztRu8UL1dppnEX1P3uzpM0/NdlQj7bF+5tw/1qWReLrGE
VdTbTf+EC3UDBr4vRrzhiQdLYdqJUkNXuL7VXeEeLG60u1Wvgfd17m39LtLf
aPjSOtiieahOBfM7tJoPlC9C/+1RsX4wK9yDYsNhBasMRXChWgf/NfIuDAkM
3oP4B8tE61JhYcgLRg/JL7jzvjfssOfQ0aO4ckQ7c3biKo4yX0/HPGley+1J
HV36d1A34OrkeB1/uDp+zNsEcfAX+O3JIP015jjWwONJ80w64TBR0GZj5KGy
3SJAh8STVWGZQfLUnTcZBvM9eaGDcLZ2/6UXMJdrP6KAulQPx3ZrkHz117Wp
weIG4xRv2KDFRUMdDrSo7bkGh2zgnpoD2645Gd0I07mpFz5jPotiTcUeWDLh
Z1cJl708Pe1fmNU1UuQDM5/Y9z8m9RsYDJ0P2/5o9ouFRb9dnvaQ/H2lacBG
XBNcRVVk3Xp1Z1E74qNFh0hUYabJlgxXmPn26U0RrtSFvQntyFe0eLF9ISxx
VudsgROGszNjYfrHD9XFqLN4w6QZH/ahN+5QhFkz//qSAWevf+segfsk7hnl
NpD5ttUwJLjP9fl2VxVJfbdmmwXDVPeurUEkrs7R1zNgTmX5yTekTkXc9bfx
HgbO9rlE8lP5diPtMJywWUn1P9jFNGblDtjJWOsMeQ8lz1tpXLjRKOXMRVJv
pS0LdsK2+hH/iMl7P9W4KgSuP/1Pmy6e6+r6U7o34bStrko+5D1poqgROMSx
wTcLpgyS5Tcinjdj+9UayXvhJM9Mguevn90zDA+qDY33w7xnEzLTsI9Rqgu1
DZBvS/lLZxosUL6aEkrem51X7KWJK1SKiuBD0e8GP2O8URQtshHuqrqWSPY9
3om2yX9gbnYr+y7swp2p8Qyu1D+xMR52WNg2nAP/kaOi5g6zhhalu8IG4VvP
kPfWZ3JTiBwsut22ejaJj/2j5wriYwXwHwwhf75Ur+lCeIXej/ONZF8sLS+N
R75nA02KqmFeuv90cu40FnbVlsIOs1SDneGzH5kT5cQLGuyfYF9VOdY8WEP2
yR0PpPVhn7Cfqa/J83xqxvEi7NPi1vcRNKwvfj+x1hCO0GPyTMk+s+3kt2Zy
jvatnBkOh3UPJkbDtGNVSo/IvsfW77CDuQy5rXKoF8dW4awJLHBcJGtPzo2E
x4uJq1Uicq6RczTPQGMXzPPwcB8m5+y93t5I2PRUz30WziUH9ljPfTg2wNPO
Dw7M1nsmg3jsvicbZsNiXtxte5gukWt5ChfaSDuQ+EPc1XT7yDm3sGffFNw1
927FJ3Iu+n4L3op8maOjiaOwYLPh/bPwl9DvB4fIOZjE7iiDJeNOR1tgqmz7
5no45SDL7S45p5XW2f3ftMuWiTBnT1lYKSz+mZLqTc5Z2XMmkTCvVm3YhHzH
OLVbkfoKXd9O0Ul88VZHhIhHZWrt8SHkyzpiEeNIzkXXN++eknP331MWLcg3
7LT17yUw/9Gkphls5LbFOou0m11fdAPfNT4pvyZegV2iqs/OhsNiTC3Jd4et
/JX7ofgusshd/fc98rw6dX0Zmov8xV/edZLvEEP9ab6w01ubV3IkP/nFsyfp
qMv3WevMyHeYYU14LtyYamZ9htQ3fqrUDbbmdbx5DoeVlMmYwGdP3Y9W1sL4
RdtKVsB/sDbFucODQS5/roV5al0bSmH+gP/KvXBEm92nb3CZjfHnC3SSz6GV
Rtqon+szrSYyfpVHTSBMzw9avhDxRfBWvMmEhXeaRgJgoZEy+zHs0Oyu+gS2
mKMm2waPW662mod8ZaKmTxPDNNsgVwe4UUvrXBecIOkujoe/BG45/gJmPUxg
lsOz3OxsK2HKdU/hI5i7ra8/iYzPYk1Vwk4ysREH4cCj52YnwoyciXQOaV96
Z2A3bKDQ+34+LM4pLP+BeBhyS5e9R35pEovKZJhbcvpzHczZdYqpTPIp8Kss
gJknvi0h+VdSUjFJsO3bjZWDczBvwJNlfDiBXfW1YjbqFihTfx6WOH6q4ylg
vwoSKabB2e03hPtmIY87u7QrSDujycBSHs+DrGV0B+xy6PUch5n47rN5qK+A
+CQjQ/Pj5bBuQWGWJcxza/jlEw37h2JOaxyph3u93TnY4WvcaVJP29Fzy63h
wHueSlo6iN/dX9MctpMXdAbC4qvuXn6wS+9bxgO4zCBo6hEcayxrQ+li/hiZ
mWuxHuu36dIbiUuUlZ7CdJbAJBjOPn038DfEp6Lk5XwFtvWPL1BE/NUB/TbV
MDVx4GsVzJiXcbIeLmPI1W5Hvg5P7ow1wIGjJxgv4EBriU0tmc9w0zo91Ic/
9PR6KelftaRsP5xR7JiTBAtcGmU9YWZ6+nZ/WBy+ucmY9O/NmmNOPHSkqRPz
tURyTqrC9E7dhdbwZN/03R+RH5UVJxuPeIrdpkz+goXdOmP5pL777jzN1SH/
vyQsy0R+tLRXZufh7JEFbhGox6D4UmYYbMsSnrGSRVw/QhwPw4wHZYuVZ6Be
OW3B4bAk/9+JARncj5WP9sTDdO30pHppPL8FTd0lZPyeA7lPpLCe9MTuTpgX
Lqjum4b78lttqCLi5ax583wFrHWuMG4Xqcf+9R/zKNTfUfVwOqm/9SeVHbDB
fsWqN6T/xlZqBcxbsPHuGibyn6E5bz2c0bvvXiQsuFkUdQRuPH9y/l9wgnto
tAhmrHxvTluG+75McuxXrHdWoVPRDBaXxO76Cj9pMM0JglnRtB9XEK9TJhV3
Eaa3hrZykY9Ib9F4MWm/PanSD3t0xKRUkfaStIPByP9Qz/OCOzAvn7+tDx6s
/EO2kMwvbgxfPR31HaXNTYCFyp+8beHxAL/UAJjz8WXAJlgorBBakPnY4wso
mF+zwUQDzrbX0ovFfAk3rU99ZpLzUnD3LdbXctnhWA9nZy6eUoYLHVMPXoPL
hCnrGYg/5XH3sjOkvTDDTR755SWP/XEIZpxJjar9yaZ4ij8HXMh8ChYGv06x
KeseuoQ4W7jJdHSCTQ0mRaX6kfo2J9Jyxtl4jvfJR8PUtzzasW9sKq1m9kAx
GZ/2qi7uC/prWP/yLxmf/0xh5DObYq5oCVdF/NQBX9Mbn9hUQm/oSydiZ49b
TyRsitqvP3Kd5P9B/Ks5nOcVbPkZFqRdr9SDbU3dWGw9tBdVZwTAGXO7PpyH
xbtNimdivryw/Dd/w4yUl5c/wofeJpTMXg5nV4pmjrKp7GQlIy5MJZ23sUZ8
kmQzkT9pP+VukPkV1mlzjyN+RpN/j3xY5vfWZ8GcA3fPL0K+eQLmjjzY5YxJ
2pL/2JSWobPOVdK/ytuwHxbXRjdfgLNd3LfsQ70YSZEDZH6BeQ43GI4YSXO3
Iu3tqTVMePgiPheIE60eH8P4lvI6ozHEz6M3N3thPYdHHe0NxDc5tG+IJy/Z
1DiX2KK1aA3idVl++91Jkr9OxHNd5KdyoorrQRwrkzSE+qzISDXfBQtkk5WV
PrApeo5vhBWpn4NXMHuQTdE8NcdsSXuTs01kH+6Pifdad5jKlL3/qZtNTUrV
6p4mfhbFqGhlU6KjJ3VuEf+tpyX3AvkYyEv3ERfsXcZ+jPV/5NFJPlTUV88H
ZbifiYVGPsQJH+bUpaC/X5ZiBTH58R5SNHJdwfkfr/wixg==
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], {4.537238334032226, 8.73105087792866}, \
{1, 1}], LineBox[CompressedData["
1:eJwl2Hk8lVvbB/DbkHaITcmQeYgMtUlSaO8QilMydJAkybiVJumEKERUKNN5
6klIUuGUSoq2KeMxFRlLUklkSKYM7289r3/25/tZ617run73uvdAwe2ozWFu
iqJUuCiKvP7/nyqLWlhcXDy3gUXpO8vH/1jDoiTYjqP7YIkjG1a1wIIabJPN
MOtww0gObHPmnLAk3Hvy7+9n4JXmiXvmdFhUqKCsIQv+cmz3p0+wV2wIe1GF
RVlHbz3eBKeVPrN+DjuJ/Awsg6WLB8ePEm+W2FIET9teCFGBryjXFj+Du3OW
qXcrs6i2JSbNZDz76Xn5JJjXpY9WDrP4zH3t4ZLEMxWNZH1nnZ7V8I/hfzb2
wu6lFPVdiUWpm+/0+glP/JnMWwG/9Gy3pKF+f8+Op3fh/PF7JTJw1KOIU0mw
TZ19qg6sST+6Lg72+e/Fou3w9HO9A9dhXp7LonthqiFUKh3eqbku1w2ub/YT
KSTXux3i+MDOwdNpb8m4bHiOH8zZl9f3C54zuMHtC6tFy3EkUW/fjaxkcv1J
W3XaVthK9PwJO9ir1zfCFe69HtvJggf4Glaeg6/XDViowS8fur5IhpueRfsJ
wOx9KUXZZFxsk9J39Nv0RSk9H9Z/0uxZTfKoS3fJhdVnGTaZMOPcHdPb8MIC
tTQUjpO8KB4Nn1y94qEzTIl0CnjA4fopBw1gCaXdlfqw3R/FmjKw8r8a1tyw
a7DsFDfsvOHaKpKv1+ug0GFtFhWkJNxyDvbfJebQAw9tGz6zCeZ/OtDWAvd/
Ul4/rMiiihY0pRtg6z3X1mTAur5Cgo2wlbhfwj74rWS9dStMydfFSJD5v5Rd
emEv4c3zXQo4B4NjASOwLp/81btw9vzjAi7UE9TQmhQE2yxU01fB4Z7zNGd4
IW7giAZsN1x+1AwusQvJZsEc9v7PBmR8qV+KHTxXPSNqCIccK1vjAauxDHXJ
/JUB/bYn4XYpUTlHuJZRaRxC+v8rZfcJeLD9ybYL5HloSp5KgBkuIc3nyf2Y
naQ/hRP2HssJgnuzvI93wvWeFq/8yfi7yM/zsNDsfaMDsOn4YSNZ9DtQ5Rpr
Afcbd7E3w9Yftcy1yP184v+fP2C735n6QnCmmam+I+weJmgzhDwy1wjwk/zy
fxbfroY1MxINbGDeYSeLTDg839Z9K9xON/cLhd+WnY+Vg1np3TousL5kp+Yk
6rG2f5uzFRYsKlxbDgcM7q1ThOW9+WovkvwPqR0WgKPGlHO2w1u996yeYZC8
T99fkMf5N7jhPAS7L6p+LICtalUPfIaHmGN/+cDde7bK9pP5aeW5CjDjcoTT
AKx/zMH0uRyLUkyNvDEG+ytVZW+BRZNPbF6ELUpqVtTJsiiXjbOOdOxP03t5
0g/uNOvhVibnY9CNR5nYY152M1xtaLx2VAb98vhc2kXGp7RPtMA+6ctkD8ED
Ua9iauGhtW4vTsFpeilb38Erm2kOEeT6ze3hk8SNprR4uH15aaoK1i/UDqSl
kLyCecQPwtPlPypSYYusIPE7sMeu8g+JZD83ngPD8GveW7qxZP3cvIiN6Ofl
B83OIDhudZ/yGThKVEfBi+RryuQtgHnb7OJJvRaJb0z74DjfR58YZL+1tqYU
8lJMOftbmDwfEdf4+eBdPJ+6Sd7dCZdOc8GaK4vSq+Hs9+U/PuH6dYfWnMiE
ORODdblwkeynE2FwKHeMvDscwI4scYUD06rclsAVj4ztTUjespOt11F/QH2S
hDpsXXjmhBi8N2tviRgsL+tUfwn57FzqVcsHpyXW9U9LsyjDf36L/l6Perll
BdzhwiJh6QnYa+mz+02rkbfnkMs03JTZoWQC96q3x/CQ/UuWJb6SwrloqIwR
hquT3hTtgPPl2V5ypP60rIp+SRa1ih6yQQduMtyx8RrcNlDYa0bqu6Vdsxfu
7f7b2pmcp9QadwZcQn+/7xg8vdJGQB7Wqzb+EA4X0svfK8N2DEZVIkxp3lMz
gtMmC6QyYJZmlq8HXL/j9JIHcFTpx6CbMK1mXW8eqa/bI/M9rNi+Z1Mu2V9f
qVwF9X5Z/6gxi+SvtST4COye2pGdStYviz5cAEs/FZqPJNe/+6n5E15I52Ie
hVP+cqlfgzza1umL2cLt5V9zLWEPRy/bDWS93bvbXGCpcd5xOqk/IX5mP1yh
f4fWiTwlOGY3zGEHWqtTPFzd0yqzGq4X0Fu7Ey406H3Vjv3UFLY85oOjDmZk
hMHXU7VEa9YhL1F2iThcIFymdA2ejoqrJP1Om80GeMBRHSWi4vB1yy2GpvDo
cFHYRQm8D47IbtZaR963Bi1+iqM/8VSOAplfZdrgArvfuZlHzEp3+KthFdb7
HnNEE6YNbY0xg/PNDadYcOCEwbdaMdz/3sAP+8l8yeYFF9hi7ynPMJge8jZx
CTyx/Z+Ye3BT+M8izkq876VdkXxL9q8ty46HRw1rKhdghrb2i0C46f03E1X0
y2rs8T0F689X7LeEKf6APyPhCQ0xfm849F2/5T3YzmhnWAg8YFfm0gVrJhfu
vgTHZcoKSGL//uVH3WNgi5nT9qQ++tvV0mFw+zP2RBb80jLe3Jfsp34p6Aep
f322Fsk/zjXwMgP9Grb5RsnC00VPFrxgmvfD4G8k72EJ/uvwy6od1x6Qft55
HM+Fg5pSb3mTfHyOZT6BLT7ef6oIU/ns5ruw6S4+sU4t3G8mmyscDuTU0RLg
0HxLmZ3wnJBGpxWs5nZjZBb1VPsIFAiS8dEr0imwg/uny280cX4n1EWUSb0n
bopnwKMNoYO30b/h8z+zg2C61xt7Mfh6TB7jICxfvOhzfgXW5VfR3gNTyzPO
D4vie8mamQIruLD7/rJ9cFpG0R5buNpZ2q5RBOciK1LDnaxfV++/C35g1jwf
DKcsG1/souP7iLaz2i1YYgVd6Cwsfb/tVSXMqG2Z0IIDq4Nuj8BNXKsih4RR
r8JwlBT6YZ2MdrwHd2fbq5rCrrnatARY/zm/gQ8Zj+MLyBQmnxvJWZdg+n/t
u7thXQWnyAzYQU9zWgrrC3a9NXlMPJ0Rawc3fe2/UwgzDvQ5JsO6ySY9j7TI
+/b4+g/wwFRd7G2yXrbbfVX0M5Cl82842c9I0Y0Nj15Yprmf5P/zP/R7cMFe
ySwNOG3LrsoOmL7U8uYY+lGzX73sNxy3/2JtPpyd94ybH/l5nZXR9IXbo+qu
8cITLw6NKZJ8024e+SZC7u8h904N5LXgpVQIu4/6t1yDm0RblY/BbPm7J/fA
+TvcysXglY/WOorBankzctmon9OttOujOj5v169dpQHrX7RpfArT7dqMTJHP
tF/HZBLM+G7hpCiE/RUWjp0n869G8c8I4vk3MvzrzP/mmyk1C+D+ZM60nCXj
RSU+j/mxr+14XRTMSaIxs5fBg8YWt8h63FdZz2i4vrOmppjYTJ7361L4iU9o
nzp5Hh82GsJevsnOAqg39LOv+0s+PH/lB5X1YH/DgHZPuD3R6JIrLJ8SFsaE
b/DGmEbB9BPHx7bBUXLTyvfJ9S9+87LhlKnadVUw42cez3N49AzjPsmPwTJq
UsR+tBzOln4yX2RgTToc5B7xqQ+2Tnz9dR3qzT47IdVG9tOr8ubA0o6n64rh
UWedN3+gvwf55vZ/w2kRcicb4IGAlEtsuNdxm9wW5BFnrHN3I6l/Q3BwNBz0
pN1kCv1ar59yeArrXp3Z/hhOm03ofgFbzVrW+5L8nA5UJhFPq0gqqZP7OX5h
O2zNPHy2ay32f3XAqhr76Qa/00uG45xVVyrAylor/BzgtFdaIbao9wHn4VIF
mOF85Yk7+nOYe5g5roZx4zL9fcijKYU7soG4Xj956xJ8vrhnhT+B/UeWKYvz
4v0w+tfSbJiy6Egb5kbed2K5ssj8Juv+Wi6cH1r3cC5s/fn1uWcUrpf07iiF
e6v2NgYsMqlqtSifHnL91CnTF/NMypRbY2QR5uw8smg+x6SCqE1HVFGf6/nF
YpXfTOqB2j8v9hDzd3A5zTKpiqmxK0Fw6OF97V9mmFRaw3zqHdKf/Z3KWrjf
esXtWriXU/qGwnz36ZD4bzCn1KkyFO69W5tEIT9q9Ls3E+tXd/hrCRGzJejr
sX91kJ2OCMn/XKIIC/WFJhz4QYPlH4idOLjApFjTzTK/yPqub+LD0A+79Nd4
K8yK/Oprjn55I2VWPiBOq9r0EnZdzZUYSO7PN6lAceST7f/yuyGpxzgi2Abu
7+j9OEvyahfv84QFDbTPF8Dyk+EcW9jqajkPGw4Vne5aAef/cn6sRPL7NPP0
LtafSxrp6sHvek7BqRQ6LJijnncDdj3nMJ+Oev03C653g6lEHa736M9OzEmS
Acsf5t/6Hnk0jb9pXUrGQ7cLPZpG/sNvPQfxu56jsi/Be5JJtQdNHWqHXQNG
BVZNYP6AymAzTFn5atWMMSkOZZfZtoZ8XxKpVRthUrEyIzWfiS+52tO/M/G9
6KPqArGGRZ7HVybFEGjVlMV+oWNhMtv7mZREjtGMCdm/sjTg1UcmpRYRfNyP
jCcJ5L/+wKSGerwcUsg4W2jD0R6cl1xz5zJiTo5IYDeTci311f9GXFHZ2gLb
DXhX8ZN8PLpjDr1nUvULNCkV4kCb0dBenI8Cvhg9mLXjiotRH86P0UCjERl3
2aG2A/Vo6mnwbSGuGd184Qvmy1m/VCf5Fz/Pqh7AeVR2mxQm5/X41eWTgxj/
+q/WIMnfIJf72xA5z9FWRaSenqCjYT+Y1I2UFxlhMIuZ3JmOfJrsLN9vUyXP
w+lKqVEmdVK6eWSO5OOtXbwCrgi6Sz2BQ3OXC/lhvuDZnj/Z5H6Ycl3mwnrT
wiMmKsQ7k62/Il93XW2ePhVcL3rqgeo3JqUb0/cgE+bc1b7a8plJhWvXrSb/
dwk9eOTDPPLVPWjWZQxTczWboruYFG34tLgCsemrKzEtTGpOZ3c8P/HHuNzY
MiZlwWxJWsTv/v/9xRlRvORVhfV/L9+gbA==
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], {6.100477805570072, 14.384167248438242`}, \
{-1, 1}], LineBox[CompressedData["
1:eJwl1ws8VGkfB/BjQkiMWy65jEsuRWYjKW1OItluQxKyrQ3LqrZBhVx22iTR
ZVbrmjKVolZhbRgVil3E6528WbdcU8mohoSE3t/zvj6fPufz/TznPP/Lc87z
TIb7D3sEMSiKasI/cqX6v+DPmKaYBKo09aKlxb0S9rfMO1eoQlMrIqXrDsGi
y2bGEbCg/IWqHszJ3qm8B/7YqP9VkxG8V9PAF95lp2IYA4tCpRJjYQPpFf+y
hiVR4d0P4MKQ9AGxIeY/ZG+lhXhSH5i3SmBeg5tpMuz68e93v8A1e6pdF6vR
VEjnw1f+ZDxc56tL8LHIBfrbiFtZE5bqNPVySXiEM/HI/OH7cFVhsLYbsRWj
yFGDpoxUfQTeMOeNjlMprPrzPfkwmG4KT2MuoSnK13DwAszaU7N2F1y6puj7
P2DRXxf1o+A878P8NnL/jtzKOFjW6eihSZJ/7huDQDIu9liiivpoq4EZS7hA
ccHbZaT+H/1iuxFvZyGnktRP/ZNvfQRO0ph+YgWzRxuqZpFv8kGGrAHcXytb
EAN7PF/9mQFzpVKGp1Bvgvnz4U6Sj2WcIApO0b5YkUd8jnNPGi6d2PkhEO7P
U4+8hv51Tay6o0vqkQ3bvge+fsImtIWFfMv5XDPY3llxLhamd+aVaMDZ2jr7
V8AStbbdxrDurCVbaID4hXwZDhzYFjhmCnNs5Z9mwX88YJve0KcpftBdtzlY
OiBR3R5mneYUHUU+xTmNY4N6uKpcWjkHH5nOqciH2YPFVudQn/PbPqXTZFx1
5po++lHTZv01D+aV3Am7DY8v97X/FZYc8qq3QD+1Qp0elMHUnwlH0+H9+R3H
RmGurdomMdz6YYS2QnxR21O2iSZNDS179X0Eye8v5t0N8PB3i7orYO5un8q1
cKjrhrIpuD87a1wD/mPM33M5qa9W40wb5rudZV++Fe4fTDKPhTk1zNo9sCRa
UqsEl52vOkLGReMxuy8iX9nkDfLLSL8YUxeYcN6+F+pDmN+/sDyR1CvHHEo6
Q+Klp3FUYGmrLzc1Yd5Qye1r6E/2189ekHqZsZ25rnDdp0jhrC7Gg5TXysDP
qjMOfguzcjwd+tBvucmv6oVLUV+R+mQ7XFcc3qwJ16TXmkhgQcmVH+N0cP+F
9S9N8bx+n565RBsu86+NJutRlT90BBZ859c5ROKXcC4ow/3+I4wA5NdR9Gjq
sRbquTPOegc/ObmpgA8LEhRCf0Z9ivonn0YRW5bWKqMfzQu0thyHae4jg0y4
d+noxVRYVGDYqYL+5gxUMKvgmkbbRZGwUepbvWmYWv5N32P4StPpvQ6IT79x
aB6DFXyrJCeIzUbqpHAf/2RPx18wc9+qXeMYnzENWCWF+tjZ1JU62KNt69mV
MNW83DcGbmjLsnKDBao9N3Xgu8LQXdth2iO0PZ98r0MH9tvrkPXbYkXer9uN
xvLypF/1/zl1A/Wx07a5VyNesaIcZQKrj/nm+sFc5osrv6Mfks7Vghek3msr
3zrBfoeVTL1Jv+ai8t+jn8+nTCarEJfXcZ1bBk90KyXrwUxb8W/ZcNK+svpo
xOU5JvZehhsC60s7EUeirhdfQ+4PSjTaBHM03eSkML9Jk/EBsq8xH9NJfrj+
6RJn6IormyW82YLr5Os3nW/wnMBibtAdz3FXWszcgFkVW7v74G0DfVmx5Lt8
VysIQ1wTHn3kEEzr8lUp5GVXni0+BvvrChwS4LO/X9VPh5kdRnen4HgpjlI9
LDqg2OGJOvW9jrVKIy6t6rEtg6xzIt3lRhyvPXcfPh79/Wo+zLPsC3gEbxs1
HnwKU9YJafmw3PQ+XXlS7yeHjVzYKXbjLTZM2YRk65P5zVR0nUn9HqdWliN+
0hovJg2zGjm3HMl6p0Z6GWmQ9XFIrkI9UfGxzBHMz//6U8s62NYy+mEGieeR
lXEf9/2Qr2RjRfpHP21wJXbxOHWH1GflU/KSrJ+Sd68uzBZPl2XD0+YRrjx8
R8yZFOUDsH3h5x96cG7RCtfO+JB+91B261TI9/1bcDBseUVYksNEvnNTO36D
W9c/PKsA823p7b3w8IBxg4oy5u/ZN7YR8bUi2qfWKKE/52SjK+HMdkPl84vJ
+71R2Qn5Z64+N68Ji1KMtFvh/mfdiu2KeN7p2tkA1C/J2fp3I1yjbLX9PfzM
+oHyKNwvWnbmJ/QvpKvCbw2eZxWdVeuGY4Muy1yH/evY96zxHoeoBQtNEJ/2
3hgWAkdle8uUwKJqofAX+KDGcbED8uWYTvHjyL5x14EnhFlS1ek+sF9I6iZl
1CeSX0Rpw8dsNp1kwwKu7PFqsp5eO4LWw/Qu4Sd3eFiqdNgaLg7oOf4PWc/H
rdvkYfZC25JdxNel3PmYX1IRXCxCvQ/u9/Z2IR++7JfznrDfN4FNk8iff8Fc
/hXpn8/4AjHqpR9bmKeQ9/2WGq9mEfJ1nxvfAnvqZDadUEC9j1ZbGhNrvYxZ
J4/8GMksXfK8V07G5ELk35WeZEveM+mfph/J4n0xCPj5AFwnti/Kl8F6JBqf
r4JnX8eGl0ijfrPrzWS/oOVy9F8vwP0qN9ULYPvbMTt2wBzhVRcb8p2vaVMZ
YWCczUkj+9NQxHxdJcxeOjNMvp/RQHvFKpjWGVjVA9uWVo+/g1l28y1eZB8O
WmC5GfMxDdy77sOecjcjKmHJTWfeQuxTsb4+CzciHyrcep0dnDDvbtsC8+Pu
zrnAs2rMsd3IXxIbtYeMZ1ZmxjTD/Fy3MDnYNpcxYUrqHc5ikH1Osi5EvBdm
dr6y3AcPHR3pC4D7fw1yESM/VtQPuWtlye+zV+cPwnnvmlO6MB936NTrYXK+
KmY83AwXa3/7UzDsaZ7KOEHyOTuw7D05PxnKwvPIX/C4LCMRzjHyOhOJeotv
3Iu3IevNm6dcpDCukBozQ9ann6PBoLA+ZvPtveT3Uo2X6dE5R6zXwb2DZJ+o
yF74ccaREjT+biOD56eNFutdmnak+JvPjLvAHX3dVbGTcE+e4CrMbZe2K5xw
pPw7w4fUyPt2vLtpzQdHqp8Oc8iA+fdWKlmM4/6oy07LyL5ud889YcyRYq0I
Uygn9Xezo7fA1C2NcBdybkaxpQ/DfE/9U42wuXdB4Cix8NM/63XI9zmZXoz5
alyD27PgCnfeRD7iMfMuLX1Ozqk0NbsHyIcd6ZFJ4dzm5Tdmtn1EftWtjTLE
x/yXPEf+xeL2ejE5p9RkrlZMoX4zX+c/4aRv/Ty8UC+33uXofph/a0P8dVgQ
s3lkhpxTE4svpcI1j0Sck3BNp/CDDunPd3EWDLLe7Vt11mI+7tOU8HhyLqto
arxHfI7X+61fSH9+tHV2Rn5UZG5Wiub/9h3KhdTz+XOBBTnXHGY/SUlwv+Zo
Ty/5HnLWlumLkZ/W5wNFpN9L208sfOVISbw1Da7A/jbvDd/1o5+/PLErhAVP
cmelO/C8/b93d5Lf38m+aQ3/Qr2GzxONMT/VXnXD+j7pf5DXaWLyd+fh//9/
okX/F0GPduM=
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], {4.770072297958121, 4.321948653054139}, \
{0, 1}], LineBox[CompressedData["
1:eJwd13s8VOkfB/DjUhSFUBQaSaYLIdVoyXFJKtWkXAqZIpFIima3NkeEWosk
2VKNrioxMTFbqimUcpsuCtltWsWwYWKVQv0+z69/er09z3O+l+N8nzLdustr
mzJFUUpKFEX+phQ/8Gc6TQ2Rvy1oijtqUUvstunVgAjmWYz92gkbVY032gFL
00o8xLDCefipKUxFGMbthmm5O+fvWfj5NDtbfTjNmxueD9PRxjqXTWiqSvXl
tEiYl3o/ygLOPRJb6kI86rDqjDFNbQhVm2sGR99JZ2nC0uOzx2vBsv4ppXwj
mnrfVBg0lqw/mvW2cxpN2Xl9lqiT81X8bZthzSfha/RJ/EPvxbKpNJV36HrF
HNggyLExBv4o8N26HBaOCfkyBVb3OLMiHJYnOZU9N6SpzHblZekws12n8CLM
2bxvrIjE61mamA5rf7izuJnE81/WlQHnCsyOD8Hqr8yyrsAHeBeGJ6Ef1gWT
3V/AopO2x81JP0WTvmoh3sx/MhusYI8y9X83wiGKs4ctST91TjcWwtEDZ36w
YMGE88MqqCfg24tv6nDq47ycTTA3yK34A+JJU1QarsOcqKC6ctj6i7/6ADxy
+sFuBuab9evPQ79kXWvMnIlVbAPXw57m7D+HzVGnby0VClddMfMsgen9Gt+3
wAELc6dvJ14018UdThq37YgR2X+k6NYkeKfcruXlTPRTEuhYg3gHVinTWTB7
W70wDKbYMrEPzMpsefQZ9dTtHR0wg6OPtg/FwvNGHrgNm2G9RXlzN/pTY/vw
+F9wgbIw3g9W1Z3uXQvL+aLZ1QY05TBBnFgFM5MCFy+E2f1b8mtgRcA43o0p
qJfPqngF15zhjLGFjV7P4ffAmTxz1ceT0TfNdSYaiO93qjVtF8wxn11kCUu5
eygr2KDAdcALFj7peq0Ct0Ul5/Hh3EtM9id9mhLHlG3II/UId9z+DA9dm/fm
DlzQ3tWkg/0VscJpTbB1ePFRGvYz3O/WASuGWgrjYb1f9rf0wDLXo1trYSPn
iVXdZL/VNc/pyLfOKmlzG9kfvvhWHBwtHPnlIcxNs3hQBxfO99x2Bg6LbLpg
hPrdulveRpJ8lrx+tgUe8s+ZthBmrs2wyYWjjYOu/4f6hXMT3CpgWbz3niJY
timFWwtzjJuzQ0j/n6bwK+GdjgO+hjCXWvP8AuzZsUi3cQby2SzdtRO2Tuif
lAqzlWM2m8BpB9sYd3goru30HeTHjGGv1oRlyZ3Uclh4cdjwjSm+h+YosypS
v3TGHBHM8/a2XgxfvHNzfS5MWa24fxH95LjP/pICD/GMz+vADu384UOw396K
m4f08H7q1RtTYfmiZ6dGdGlq78YHkeQ87bOsMBHmhDRGCGGmPf/qNPjlwVLV
Rrjgqt2Fx5Pw/k1GLPth7si5piPwR+v3hVOQr5/xvKxg+IBCYekIC8++tPaG
7R5kB/JIvUsuaW6GuQufU/GkPibt6AFyPqxV8ySxfcCcIji7trDiMjn/h2t+
H+yR8eJCISzxuD7igHxCjsXdvQKzflauOwarrjXfR84bSB6u7YKlkg9l+8m6
8Z/Xl6Je7dHlbRvgmmfxU3+HZ87aU2FG8v1LjSWFK1Z4/9FF6imf+qcK+uW2
er1eAcyvbTs8E7YTjDHeAqeOS++ZD7OXi9smk/5vn7CErO+0STlXy8Lvddzw
VQoWsMdVJMDa5+7wq/F8sc5vv/wEs8f/eLMHpj5Wfh3EHBe4D3yeQNYdC9Ym
wdon8ipzkL8sW8fEHJYbeg7owMKkyzWtmOuSXczjRPRDPlH/FZn73LjG9wod
vLdLnW+PwB4byk03w4olc9MSYbk8aL1UG+t5s49lkf05EVM9YfFq7UoRTHV0
B1/XwnPb++d0woo9KYffTcTPT9nNmoX4sqU6P9OwR4fG75Ek376cyLoJ+I7z
U/4m9xSlnnwrBU46aypWIvVaTC6KgRVe8rUz4ej7UXd+g/eu6FBygTOHijc2
wiHvVtb7wTz+HBcOnj8UHvAt9P92uHAfdvt6ZV4ErFh2OCwQ+SVJd+wOgYdE
9h6qyJ95l7fCi6zrPK/2hzUX2hbbwVSkzjohbHfcX1+T7OfMsxyFC+iUxyWk
nxxRryP6w9k+2PIT7LF0x7UoWMrukZShftm7hyZpcOqqvbvJPSpWCX11nOxP
qPTMwr3px/nJJQmWf2z/NIy5nfu090kAzM+s0AyHwzTo58ZwMytn5t9kbo80
iWsQX5pnujMIFiQ9qg6CeZzv2QrMbWH0i1l1qE9gn1OQDUtNBlrvoX5hy6fO
1eTeSr+1ToB+FcQ2lRrDrIsx//6sifflyz6oCivS7vp7ayDOi6XVSjDjcN7F
YTzqOGxvqAdLpogeLR6HOlPpufawYLu5HVcdfbk39CESlsV1XUxTw/l789OL
SLw5ibf6x2L/6eBucs9Iz59ekQxrn07c5YL8o62atq6A/UK0dqfBzMDvGg6w
nDrpJYVldTE+ATA/JUM8Dv1Q1HXEXCb7T+8rs4Ol8dub9BCP92vw0GqYanSJ
ERDb23d4wdZxNurOyE+8kH3fGRa+kezrgbkF9oWGML2yzywP9SjiFz5pRTz6
67CvK+qVZvxqlgxb/2NX1AJbv+0uMib3OpOwxwf98bg6w+Yi6d+931RK4Ogw
x5mkn9I1ZYYdsMDl87E03JNM72HdXpjLkcs/Yy4z7ndNH8NhwjP1PAPy/c0I
jSbmBXc1kDltVjLSjXi5+zvFy2BF/9999jB7nzDgCeayYvpGg63IN5UbHBkI
S+pFXeGohxktaFKFhe5aVhtRv9RyeekDzA3rBamlHPQrbIaIPgFLG7726oxB
PsG6NfEw633dyV4V9M3NXMCQ/eMmOjcrI37SigU5sCRg7H+vlXBPMCu178Ha
h45IBym87+SlqoOwTNZTxqHI+97pQO4Nie7+76t+OFGSkfooBqa6XRMOfXei
KOcDanUw0/XAxwCOXjx/oz7qo//42qMJi9dUNfjCvIywp/5w7l/V0zKI9ZNL
R2BBTV94OSyprtd4j+fLxkkT6mFtyV+XEhDfb0PTx//379uz+pnIl7oQrHWb
WEPN9TnMkbbap5N+Tj4ZyKA+gdab4lXE18qizFF/9PJfLg0gP7rV1UIMF+Sk
2KbCLN+t3+aroi/xwQ6aZP2GFv8wzLT4+CaSuRzTd7oETr1dKPiEuSv8ojGh
FOYtZx33h2mnzlVJquTeiXhdjbkrSB6oM4fler2TFpK5HLvpey7iyX/sLbuB
OUznNHHeIT/u0PzGBTBzm5OnAntQVW+e6pB/381qGYt62FvdrsSSOf0p8OUH
9ENgeGruIpjVm34wf9SJokuPH5hArLTk3vphJyr16v6KYcwJytNXVfsrbFk0
lcI6k3PMt+uzE+Vn5dhmAAsiq49++s+JUr/nHuVKnv8rzXAG4Ck/JRwgz7PM
SKj9hPfTqpgrgWU2dSUihRPF36OrP57kX5y0ZrAP7z/MLp/c00z3ucU0XPDz
SbOzMDX4unQ5zL8h0noLS5oPVlE4X2AbMlsP/WBWqU0sgv2cy27awxLHhhPn
EE9yJC/dE+aZccMe9TtRwsIHESvJ/m2/B+ogX9mmBS9syDpV3hA5iH7Ytzoo
w6zbIv8a1Me0TtOrQDzB8EbxhCHEU4so5cEy7zr+XPQj12DQu5/Ut+vyS+1v
TpQ8Q4XaC1PJlX7FMOeMRlAXmbOvfZhhmHK/e96H3IM5X6x6YOsdAfkM5i6r
KWssA0vfdLN9MHeZq6UnSvF8qV2o0WLMXZnTooDfEF9bw9R1HuYur3vB5Ylf
cJ6OT3fEHGBtvbnUA/lrWzRU78Z3z6x1HV2G/rOsY5Y24LunjUIXGKAfiv7g
Cz4wk8T5kd/jRGX2rG/QhKn3X6aqdaFfKjoiBeYCvcrxRPJ7J4oXp7SNwrpk
ssjGXYb86wtMOeT8xymGz5sR/zzvUBY5v2D9aqPn2H/0rFAd8am4yFiHJ3j+
hu3FWcQOGTtHJDjv1VdsQe6J5NhQbjnyO9YRdY94UZZhfgny25+dsxr1Uc15
i+pLkU9rqWkdMVf3G/82zhcO3bZBP6gQa1u1SrzPD576+4hdxpS/e4p+XTex
zyGuFOWykQ9jl155FGbWtClve418rd7qeZH1T9kNrW3Iz9dl57/k+ZdmsU3e
wbOf9fkS79uz8Wy7E8VtDhWcQn6SkqqsJx/Q35uv7MWkv4m/9h3sxO/PsUaq
nPS33CPivBy/PzYHmbNkrib1jjdBP7VVC5fsI/eau0P1P1gXDl5ZvRJzlcn0
ndGF80xRia7pGHJf/nPUpgPxLHvuq+I7p2OvuFYhviykfWQU37HE+Yf+TdL/
1juZejBzSXedcSvy/bNl/Fol8j1uMRl4Rt7npoMlZK5Wxe/2fIj+Rqz3dCEm
fy7epWjy//8fTv8Dk87T8g==
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], {4.605546654636697, 6.636522676290642}, \
{-1, 1}], LineBox[CompressedData["
1:eJwd1g80lFkfB/Cnf9vQYsqSskWoUYwdGxp/spNKYpItFUtWiZQRtaop0pTR
jib/reRFwxumJJRaRYxC429KbbNJJo3YLZGdLaJ6v/edc+Y853PufX7P736f
e+fMop0Rm4KnUhRVhC+5UmNf8FnCoSZxOb6cQ3kdvn17NoNDzXcYNfWHQz8G
MQ1gL0k8tQI2T+AUzYGj3HsvzYZTYrUmKdjuMMth6HsO1fmlVvAS9QSRATUt
cPmPVlOq4dERTYsSeFDeVCOCnzlG7EiG5TPEPp6wi/gXXT4skIy3a8GaWT83
BcN037itzYs5FM83stUHlohDvePg095ipx9J/by39s5wyD3rCU/Yy2M4YtKM
Q9XG11aQ8U5ui5MMHhO8+IPcP6K+fVkMZ+bZXAuCA4/lxATCvCtloftJf1uq
Z3LgU72lEwJYZqSwt4BzOpdsT4UNnsXHm8AqVfnBfDIui+9dDDeEPWWVk/o0
pzobWFESJKqBfTSczDzhyeX9SY2w+XCFJJL08/iXIySf0OnOodnwZebzYmI5
o3hnM3mekVUJmS+xKVg1AX/8fZl7Nbl/RlsWE+vdd6YkjuQZ+PDZ++2wLLgw
KZPUG9D+kgDT04efxMDSw+UnyuCjasWnAJg9oUxrg2NFt5pXwqLIxLxeuInV
wpgP8wXd/AHYPefkgn+tORT1H5+9L+Ez2tPr7sMCm30rumD20WemJTBf1G7y
O5wtLfETwZyrN/9OJr44LyiUjG/j1gfADQfT5nFhN94MzmJ4YZk12waWpDG2
9WN9Dpor3RfBBhuS7PPhR1eji3Vhec/9tX5kPLEwchYsu5s1pAcLQnSSaHDk
slU5XaYcyrg9v1wTVuReyM2E7SLoW2bDnYmrvtoB54Swmg3hqo6sXBtY2GG7
fCnp52Fp6xx40jYxmw3T2nefnjThUMou9Ts30r80zG8UHo3gmfjC5kyFixqW
up/WJ+sTzDW8NwX357nUNUbByifKf+fBHZZ6P8SSPGpfhzvC3q0frsbB7ABe
+C6Y11AQLST5LnNVpcGh2j2mAtIP/2RCA3xZWR12CB7R0v3nPVx00dFjN8mH
NXSFQdY/kT66CS635ft7w/ojLnJ70q/+usajsAFbtetbko/MUJ1F9vvo5zMT
LORXvWZ9KXzonOZSBSxdckJ8A5arPjlegyW21epr8LKmZkUibHD9G4dC2ErJ
nLsHZte/SzoNF1X8RHOFfTT7CnbBLfVPShbDWWGx2WT/O+xc1E+DRYvip02S
9W98pFJ+h/MZXt5QA6tvyppvwhLVsMYRmPU42TYXHnR5yFwOG1hxD4thaZ1m
/hDyduvZEC6EOan0B5dgM9W5U7/CLKFSOxxW/HZPng4LDAcO2cGqKKunxXBV
hlY3DfbeMapzB+5UtZf1L4Jr/Y6TfgRucz61w1vjXooo9JuScGzzHXjfcqt2
Oslno7iJ+EzL1vdGMP944+sO+GhY8bglPNav30vq0RxlfXbwIFeb+xWeZ/cg
rscJVrZURFvBl7ZUOjsTV2wK8Sf76/7AaQfyPl5J5YnwhQhxtDUsd/vJUQY/
L6ufYkrmnxv3eAe7R39y1YHpU49kLkQ+3D+Ltw6h/xTRzOdr4aivLeOukXwe
bzULhiuTr6cdgNm622qPwoNj+zwtYfrS1OB4cr/+2xt9VtjPhXvXCsn7EO0Y
PguzXZunHYbX9G5heFqR91DTsJ28n/3jcTNheuH0pfYwldeq0cTE+isT12nC
j+rP/yqGQ4v1Cx6i34aIjjhfuHPPKb0MWNDmY2kNV80UN3nBcpv/uuvCxgOe
s2bBlq9cHSlYVGexuRF5+tdu/PuDJe7X99E6CY9oaD0ah8fOZyavhhvKeZoz
MF9R+vbTLDiwSepsAPsY7rXpMca5SO7rIM8z/lB3rQq2dF7wZCOT/F5Wpp6H
bXIH1kSS/qiu8DSYZjT4JoX0/2F4byos4ITll8GD+neYOXBgl8b6Fph/9jdl
BZmvjFY/J/UMPzo+gNlR10dfw/Jm7YwxmBsb0zdM+nnU99di9CfXr5f9Rer3
2lLb4MHvTf9RwPRLsgMJZD+GsD1vw5J3uvdvwZI9XnPPEk9qXhmEjf8snLIb
HmE0t9GR19cMA4YVyTPW2cwaNp93a3II+bCkzp/XwTJxyWopye+K50xvmCPv
fh8AR26I9CfO+rjf7htYwPDLcDMhvzcV1i0WqP/q7l0WPFjqQo+Dy28IY7Tg
qtyGbg6cpSq714t+WJl5e2fA8l0t8y+S85Gs5D5chjx25rmFwaLHU2qkMK13
9T5z+E2IWVICrGgx6+lDPmO0ncyDsMD3xdRckpfoWHoYGQ/U8fIleSrM3Hkw
fVf3wvkwj1kfcQhOYS6xvWuE/XmnQCaCy5nfbQqC32SbX8gn80+svjIXzljh
t7IOlqzzSOlbiPO1eUNsL5k/NubdCHP0jqyk0L+xkyRQBr8ROnKN4MhGE8Mu
2FsiTHSwIP83FryfgNVenbO8SB7O+sfYqE/TFmoFEH+mIuJh40s9S4JIfvZ6
yucwW/umGxkfMVpvbYz+q6LSWz1h89Hg7E1kP5X6HrKB6R5e9kKYlXtLoAMr
t1hcuApLLvanKNGvbHx3Wjc84tFWSfKUFQnVkzC/wHLbHmKdGA29/5+HP1hm
8FjdtP0mxCsa7bqXor70mb0Z7GPdEJ8CU9mS1/Pgzhg+1xXmFxeJp8Fct9LK
z+bo72BrzgvUP8PraquG5a1G86/DBl9yDhw3J++vknecnK+n6T94wLSJYX8X
eM3ag3xjeIT8n8T61eTK4PwPtznWIQ==
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], {10.549783866992662`, 15.69932752873676}, \
{-1, 1}], LineBox[CompressedData["
1:eJwd13dAje0bB/BTaEdUR0N7D4lIiw5aSFJJS5JQio5ovM2DIquhXXpLvXSK
0iBNDtE2CkVWQzqldCgaqN/3/vXP4+O67+e+r+t61lHw9Lc7yE2hUHS4KBRy
pEzP40+VxuDBvxl6NAqLd3eHphqN9XzVEs19MP0hr+c2NRrlz8oNQ0ZwVUew
wl7EZ8s/OYjBTGsdqqcajRa5Pv7m6BoahbPZbdhJjcYIjnug+wSmMHtGNsE5
iSy1HJjhHi4sC7fPdD8KgxM+fHj3TZXGemqnLO4GW0XrH6rEfqzvjC/aBMca
cmsGw0YDvBZasHdc3qQeXJ+QYSkN0yZ2PRpXoTHYFd8MlsIGA98yi+GyVzu4
hcl4843H6PCQmqjlYrj0n23fjeCn1r98xGAR++DIJSo0mubibcmyMMuyYWZc
mUZbe6r3AVnP41V4zQf4XaNsgxHMZgWEvYWP8pe7byPzU53tBpRplFRdM2tn
ODe/rWQW/i1yZschWP3AuIcszt8n2WJEh3X7AgusVWgsq081IkFk/k5rszOw
pKzhH+LpL0JpD1RoFONgKa8AmC9mqnYO84fXGHEOk/mDC0s2qNIoZvdiL++B
bZtPH/kH9ZBOGzv2/3qJp4jdRj01kzkCqvCbNTPU94g3jZlReUg+lhGb5xB/
Kxsc1r8a9R9rGBJF//YJytnWwSwr5a/S6O/e3+LNyTDja22HOOJvLCzVjsJO
2ySauNA/ZeWGcgvYdnhtVi/pR1fDNUXYanqwqgLn36viuISbxE/Li0cg7nvC
ZmxQF/uLGVxuiv03BCrPPINpbr1Rf5Bv+axBRT3s4ca7uQr5/i4YdSon8Yy6
Q4HoV6D5075bMENS4Is+6iXGnJ0njjXLiZ5HP8rd7iuR8U422hUdyjRWULDW
6VqY6Xv1+G3Y3zhEthmuGjm1PlOZxig1yn/dRc4v0Np/BfGb2T2+X2CDfdHF
GYi/SuPN+glzDPS1SnD+/IpOhQXIR/f82x3P0V8pKXqnMKlPsHXAb4yvjIvJ
FSP1k8k5oYv9ZvqdLaaS+s66PvaF5xZN2onC08rXLhVh/4Yx/JoCcFVEQdsw
8uVqDhH5jfXoGdphqqo0Wr0GRZPs50WbTMVe1K/CrvFjG4kzP7VdQv04GvFd
JH+P1OyIMowXN+D+fp7kx6f7uwX1P3h0r7EXzPrmyvsa879VC382gXVT6As6
ERdseqAtTvINTPvFwvk8sqXuvV+FfPKjLufB5fKje5LgkFbvZSGYb1V9k2EL
9+Z83bsF8bx2Hg0qbBuo95AHXpPj+3lQBx4oHHmMfL0aTjxnwbTFexoZ6K/r
gpbTBfCbHF/XDbCqlJxQJqw+cYH5F/VcUpY8lgbLp4UyHsN1UaeVcmHK+W7v
ZNTXJe6EbhnsdNU53B/xH8LVOi1w7OUFdntg+ubWL2T9UmWvEWt4c5z38ELs
j739Sb4tPBtrf0sJtrJ/tc4Tjp4wYprCHvG/7jBw/ndvLwc5wiKSStlFsOGr
prGDZP7bhwO4/ymDS8eN/GCOQ/0SCeQX10WdOkziMTcdHZEPTw97vRM8rV5Z
nwJXHgvINCHnD71v8hLuuX/XUpzUT0K2XxD1TO1p/tGP/Rp47PtpgvoJmaa/
uAHz3bJf7oX418Ti855wOkfIPQrx9l/XVCVIvhfpvpcRb/NWnG5ZifoNOkUQ
m8/lhoXC9LBzQWR8r8PPDdowpeHvpwOIK0xZ1PdpI//ZW/3GiBv//W97Nhwb
3GTID/Po3JjwIPFfDrLPsF+fNw4eOnA6e1b7MtyXerqFB9bV1bHcCofP+w6O
aKHflYbHF6Eehv67e3tgEWZRCfrH2BB9xqULdhp78vE86idac8PvPRw7VphJ
+hWTEFP+FWZ+uUnVhT/yH3blxvmnx5z5xDE/ND/MVBZmjthf4UV80RqrGROY
xj2sz4d49oIhLje4eeXyTiqstq/zWQjsUaqXtQbjjcLfjieQ/IbVdVxgWY1P
Wnnwi+vvsy7CZ5OWZBXBthV/yfXGcPB3qmfCTjzaitzIj3Zd6lIWGX9l1aVN
yO/SS7Ozp+EE6UeVUfDHfy0r95J46y5mNfxBP7tsJRzSQ80YhQ/IDSdOID/1
kx9Fqahv/wcKuxQuHeIVXQtHLw0qPAxzVNwlzOGhf8IkpeA3/Hc2WsF/9q8r
adVEvVNPmJHnfYJT6UQYLB+TH6cML6a8PqoLl542VZ7HetxNtaEjGtgPn1Qe
+scQ+nFf/xZcNdylRq5H60fJB4JheaFPG3fDdplp9jvgN5yTdUvhwmjdHh0y
X2B77lPUY6hZevMKuHmp6ndSr+6Zma3iMOOYdsZO8ryL360mCfemn9siDTuP
TcerwuqZoybflWiUETPVFmOYnRnp9FKJxnBK/lvrCNsKbu95BG/kk18cSDzm
5s3C+NXbjm1IhtOlly9oh22eZ9aXwZSiVYsGMV7ttR61DebLsNYSwHoqVg3z
H2CR1ew8Q3hnYnEkmzjxqdxx2PHJlVlivk26U8XYf2OZ7K6PJL8IOdMxeOFn
n4EmePpMP0cL+euX7ci+DofUM4UOw4J0h1+kXqW/2HVZqOfCvUajprCT17Pg
JtL/cNOpOXX0T0lDhk2ul/cvpythDw5jCd5njCUmR1SOwAlqipbcuP/sbgaN
SMEsCzP3WYzfNdDW0YbvKqvAmpTPGL/maOGBKJj9+FfHQ8QVVd/zGcBM/zMJ
SYjPj+36NoW+xzoe63Il9580/St5bhtsCZKQgeMLXf2S4WYxUdke5K/jrLf/
BMy+UdKbgnybI7n03GF15URve8RnE4buO5B4hGwhud/4eOr2OMLpNQLun1Dv
Vg7Ps/3kutsj97UcDqqeiwiEKdeFaVfQn4X5nzzj4RD9zIeR8KN31TrFxP46
hv/A7fuyD7bDEq2JbacwXyx8IHQEtlI2mEpDfO0Pk/GFJH9hw8waeMFjxWOS
MK29cH4I47nGbYZV4NKXdRMypJ9nZkrVYVZ09Qdn5OMQXHdOHk4wzvyYjrh8
qV6ZECzCGvrRjfjI1Vuzo1jP+8dmqhjqZ5oRWf8QZuXNHNoGn/0z3nMRpo9w
W4XAkY+6y6zJe1CyMwr9pmQVBi4m7zW+mGS7cnh+bqN4DY5Ocf+l1uK4SSBT
A+91im407VEl5l/TKO+Q/r8HvufDLupl6c+wDwn6zy/4vqM0HqznxMDqYX1z
exDvUZKjmsG9Z/4oKiJ+vb5vEtc1xclypuwzjrpi6sveoy7e0ZMH8pBf5j3T
0CrYashT051c7/IWd3LhKilXYXL/SR//XpsMS/i95sU8xpqCJ1zEzH/Pfs6H
Ja0rjmfDb2wmVwTiuEK2I+o2jvJTFnW7cPxsmmnUjGNI1GpLYxwfxL/dj/uO
QtkuULQG8+Xf6Z1aSPKpZK80wP97KEsIK8Hy5paB2xF/LfCQsRE2WG3H8EW8
Y2IwzAFmZNyuSkU8wOr+R/LejT2vv7ANfvdSaOAwuS7tqj4swvHiKqHVJB4i
XxVA6jKdbD5O3tshjPLHZ5CfhWJaux6pT5xfOwuOFJlYIEjWO1SUPY0jt8FN
526sO11ccF4d9Q2w8V6WCfMl1W60QX3vTup/diD5jJYP4P5m8Ce69PPDttXZ
K08iHv3gpVetIs5fsdg/AFYRqh31hUvHJHI9YeeNlTyycPPGYndz+PzCQe1X
CuiHgv0Q+s44ososTIBzf1/hYWN//ruuhu+GDabqF9zC/swv8G5RhhlvhM8e
QVzB77nynDz2+9c5UBXxItabxgGYU9PZ3Y99uY3St7yGDSz3lOShXrQdUhqd
MOujQIc36d/mlqi3MPNW69P1sGi6/athuLR/SetS+KfUxa1cWM/pV67PNPY9
t8uwREaBPA9NakcVcX2smEk1geVfy2mPwykB9aGucMgJrjPz8LkNd18Ew8zR
sv4VWN9wtbZOPKz73vqVOc6v+ozvQA7Mqgt3CkH8+1Ra0g1YfYh3vgxeaRhk
k0/q8zNhAQfOoidnJ5PzF60/tgr5BsjELw0l56vP0D9KvrcsOhvt4fTW1MM3
EKdOWnspKpDn1+rNb+CGZQ2iQ/Lk/TKxl4J623UtP5lP7Gf/ZAX64T21+qwz
zKZ2CGnDVt9cUgRhus/dAyvJ91nZPoMQOXj0drY8vL+60eadLJ4X5/rW8pD7
Ntne3xy2emZs9gnr9W08aFUrg+vleHAoeX9Y20vM0WCRAmOeE3CQ77GZtytQ
vz6PcPK9cZNGZcXCuaGR1d9Qnxt9JV02cCxTk1UEC7l9LtGG1ZtDU3zgf9UM
8hRg75pDMjrwtvGyGS2Yb13F9Cz6FcEvw70VpnyaPNgJM1YMaAUSB0uqVcJc
TMF1t2D2lxK/Ajhqhu46TBzwvukGnJPfk6xG9r+9QukOzH/cu3U/bGuu0vgM
nv+WKJYEx/qkOv2ET/2dmqyEX+z9b0oF+xnw23exBbZq99nqDm9K92pogqe9
12dkEds+DbkNV30Im+qB/9a0J0SR9RiebpKox4rKxbwG5Hx5CW325PtNgTNG
6iUi6BZ8jvxeDu/dfxiW0HnXVwYfbmHQB6RxPaltnX1B7gfj/yZ3SZPvB891
5Pe13bse73tSqNd0Vs4QnCTzb7kEPG3owibf5/lP4tihkohnFx5sJL8nRo5S
ByTgyxYieH5SmiZSuBxh3QtqIQHw6PlyTvdy3F/uS8rx/UCpmdv5jx/MVOEy
nUU+OwtSdlNheve9b5VwYKuMWTcVfWiJuB8AtygfmrgNh7h8vasLj/W3zuTA
VVe0GyZQT6uHPj3X4VyBE+n34Q015dQHMD1U61ISLGXYtZ0Nc4qPRpyEbZbd
dZHBerHlX+s9YbE/oenOcLOZF/c+eDDgxqJ0+AVrp4sPXJz0M/YlTLupseoU
XNV6SosX+aWb7Nt+HY4LtrDXgeUtE9kv4SnT/TNmMCvi1GMB7Hcrz+W3lqQ+
MXeMLeHuuYL0tXAVJ877LBx9NbKXH044FGn+hLxXVJP8m7BewtqrLyioF0VT
bcUxsr6Yyip9+KiIZ+s88iltV3pOnuMpM7yOUVTyvfowJhr2+dpI54ijn5Jd
zAxy/2gXBO2Bmx9fULwG57nnGlWLoR+uapH4fU5Jp5Q/lYI5vCfGyHuzjE9u
yylR9I/fx8ILXmUfd/L7Moy/4DZD1o/idDb7w///gwXJcRntfwehEOY=
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], \
{11.687507644825484`, 11.845769235517452`}, {-1, 0}], 
       {PointSize[0.04], PointBox[{8., 12.}], PointBox[{10., 4.5}], 
        PointBox[{11.5, 19.5}]}, InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox[
            RowBox[{"C1", " ", "N22", " ", "T22"}],
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->6.137505285412264],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          6.137505285412264]& ], {10., -0.5}, {0, -1}]},
      AspectRatio->1,
      PlotRange->{{-1, 21}, {-1, 21}}], {22, 44}, {0, 0}, {22, 22}], 
    InsetBox[
     GraphicsBox[
      {Thickness[0.005], LineBox[CompressedData["
1:eJwd2HtYjN3XB/BbKpMOhk4jpUEnJJPQRMxIOkmiVIhSUVFEoYiKkMopIUlN
kaeEZ1AKqZFOD0XkECVDVKRfUUhK73e9889cn2vfe++11n3a+57gs2X5ehmG
Yc4PYxj6Z/qG8JssZLgERshE7gw8fAuWsp+1LYDLJ729twX2rhL5XYdzDuS8
nwY7/46TWzJMyNjlL5brMRIybN/J8aNlhEyYz6MuCSyZVC3bD9sJ5JXOwt3j
NVQYWSHj1/50ZSQcrRTC0pYTMuFdu303wc6Gb7YskhcyvKU6/A10fHawWegI
IZP/48/GIBpfL1EtjSVkqt8znD3U/273iEIFIVP8XrXzNMx4XUi+OxL/h/rN
i2Dpuc/GWYqII8yorxk+vv/YHj8lIeNRXdHDQvwiXXvxIDyQp/LEDA5JDEvf
qIz2wxr6ayi/VqPvuXDK8y+ifXD0O/OZxbDzCWWNLLgu81jlBfj4TZszt6n/
VP4jPzjtT1N8FSzJ+N4nS8fzfe4+pPq5L/BKwHyOj338ymj8kCXaDNy+P3TO
NTr+8Y0RQYi3fKL95qPwcRXxigbkExl1+7IvnZ9fh2Y7wcW1d5Snw2zrkTte
Iv/8jMva35EfL4ivGwGrhbjnX4O9neoM58HRqmE/qJ5SvZmGRnCiupWJDtVL
WzxuPsxyWVNWb4jjjQ8JY2DjF5dGH4HFl6N/foOVrN28FsOifZ2lRzG/pNz8
DhsOWbXU2RXxejSPams2gJcMXpuHfHJ2s5wKYan+qk3WyJ9j96UjFe7W2yn1
VsH5K71nGw+LbDwPxI9Cvn+EwQfoeLkVkzzZuB52BX1NgL19e7Z1w+yvis1p
sHCM7dU9o4WM9j9zOm/BkorQlCHYcshrfQO1N3lt3TZGyMiGcKyHYL6dqWo9
HOK21Gky4k0JdOToqqKee/IMXWGP77t6XGFRsMemPXCOvRkTBofMNqrIMqT7
we1wJBwklRtZBrOkWpVbYNZgodNruGiYU+1S2PGE7EAr1avCJ4rGd5zg++4z
HS+yCviA+XMeHzF/DzNz1VLTYM/q4OIamGcRs285rPdnVNYVmH1pTjELFjP7
T8fQ/NcuND9AftwL+XccqX/1+SVxcHfh2dOjKP5lIYqr4Jwd2go1VK/Cf49a
wsaVETNj4bqI5vMzYLXNjf5zyGtsZsyHmwy0RnzTx33pZ+nrDYd8z956GU65
k7vqLMyZlvY5AO7zXe7STh5kR5rAHt86RIsRH2/BgY4BPZzH1f/el8DJHpvO
v4DjPK6GWyN/5xF7Em7DRh51Xc/I2ZEWubBdloHUXw3325Lafy/CLMXakr9w
XKvW7jw63iTra5I68jmhfr0Y5o+sbdXVQF2qVPpf6tH9M3ZHJtz0bUxGH3kj
v1FVE3btOKdL8S3S+BkKizoc8u3hOOdLG0rh8Ae2CWFw0Ycn2b2adH6nFJ+n
/MK2q6tyhEzNviM9ZXCA+H/y4+CZv/8b8QGWXLpeqAyXH8sZ9RsW+TpZd6I/
5+bWHfKoJ9t/UVIxXNQfq6RA119QpmkUbFfxSJWBnc1OmlvQfPNibTtoPrcz
ql2I33mM6ruHMJPU5p0Nqy0vSciAec91b3nDsVMDt26EpUfGbNeHre+kaU2D
oz9UpP1CfbwdVgd8Rv4BvZEZb+Ar//jvzaT6WRyc/xSWXfrkijvMdlwc/BY2
0rvgrgJHpzyzZDBeePjbt1WTcF0diq+zgPW+RkYfhFnmzz0Pw3Vprx0c4e7F
a6Z3wgN20wa14IYJ3yQ+yKdhGK+/ZyLy1Jeva4WFBfH8BrjIsHvfdtTr+dEi
fjXZyPn4yLG4307fH3oAC2M4QZlw2g85zUdwwwrHnbO0EBdL+0QTLMmN5ZXB
RvJHVX9R/6h5vgvH4X56xP7EwfzVEf0uBXC+a/qQADaqDG1T08Y45wv0N06i
+4D3wAuOTZH+TobFe/gbkmHvSYc1S+j4E438G3CNJce4hcaraku6DQeUuI+S
QX26h1SK8mB2pcYbDsxhZT6Mh41tJvXr0/VaoV+wEi5eUGVlRPWeUaaoDX99
rP17PFzEyW19MY7u+8JGBTjEeUJhAmxU6qL/GfPxZn7kWMGxHsHx9yi+bfcy
B5FvQNUb0ziqb6P/dcq/b9OtHAc4PEa08BTM69d4Jk/57V5eGQ7zvwvrS1Af
o/qkH1vgpkHuYBjMntZWEkn9d/25OXUizS83TQTH+ji7fZqAeS5JPd/ADZP/
TLoIi+QiIqcgHlnpSYONcEPszvqjcMq/CtoWsPDT/BeyVI8Md78xMOfO9bmH
YUmTas9PLur1OHkyRwfjbNi6qA3uW6LnchWumaCzpgXmsUynWo9HHl7Gki8w
+37HmAa4fZ/O3gGYtSog3k8X59fgloUmxq/2avT6BAf9dDOn+Y0UngZPxXF6
IpMt3rDllgs9q7j0HkrMioetE3o1ouF2zdDQArids0orFbbevm1PMxw+wawg
BxZ/rtg8HPWoic/UuALnqF/lToTbW1NbLsJ1g8w1PnxFqsdLhlPMOIcW0fU5
RzZsN+URPnmfLaymuGK3JyxRimmbR75x1cUClr3OijCi63VV0mw1ONGzPmwE
zOud9bGZ8hk4kdRI9U+IyUyFr7xRHMiG49SyZLzhvuTPwgBYXDqcMYPTTi+3
0YP5LTOGa8I1UpZZE8ZlHsg9UIGLS+s9kuAGRy1DbThglYG2PeydWW8mpPbc
YY0yFPdA7tAuWMQxy9mPf+eT8248wn/40P7xbIrL5JwNh86DO//4NZwXbqV9
lAtc/U9l4Tq4d/KLt6fIrBk7ppKVmra+pXH1nUqV4IuuTmpGdJ5CSo7J0Xnm
svaGwmzx2E41OM34ntc9Oi9evG4+3L3QYhedB3atwuvNsN2oXwULYWlhxdSb
cECmukUknFMz48UwxMdfUbkrDw5Ye3aFG+Vp4e9SB/Pv9HXlwd5zM1lf6Dw2
VTYOwnHjFFf0wXqjk+9OQpyW/GGb/tB5bauaawUfj0z+Ts+tuJT1CR50HZld
kmmBPQKW6qyHryhEqD+EUyblPdxA1xF3+u/LcN+FvmY673bVr4oPwXWzwnVt
4eT4+lQf2Nv+ZK0+l+bf+p6ui3AXT7sexGN0tOjNOLoOUgYzDtF5f+iT/xf1
6P67tVIRVkv+HdBO96HvxPj9yL/Pk533Bu5bc2BuD+6jhnkh9S/hnJsvorx0
aF3+/dlbWCpdwq3FfchyTDfq/v/rqv2VEO423dakTM/lzQUTSnEfqzmNippN
9fOtUXCEhVUOJoGwc3ONTAc9ZwfC0i/CnKic++mwncYPwza423PWhEB4oD23
wYSeS+03VBbTcypgZVwEzJmrEm0Ni1rdu8rpPaLrGOYK98pGlNB7hr1T7S89
pyyfORW6winy3e7/wjPDih4kw+Jy32G98BX2f4q1cN/lwhZ6LhYbTFCgdQVn
a2vkGZi/qes0l9YpCj0qnXDT+m+DFrA4+8bT+chXOPrnH1tq38Xox8GejScr
HeA6geP9cqrP7R+shTD754GP3bBs0MsmU3oPXz4WoYB6hqf3lHBgftoZvhL8
sXNr1G/ML40cUfoLxz9PfGFC646GLuX0RzT+kBvrOr13n072ovm6p+9clQhz
RYf2Toc/HqvevBGWjAxa/QDxFq3u2LqE8u9y0rWFv+re9jSHc0ry0kqQf/7C
Y+8m0zpmRouBCWw8M8nZgOo3sd4vFe9J4T8Xzk/To3UBw2XBsWkZVkKqn7vb
mEi8Z2MbbKzX0jrp9L78fryHIzcq8Q7BIme5UXGwkn819w55+fNjhnDdvvHV
P6h/v1trI97rKcWzIvnIn3tjRtslWoe849lHU73q2RG0DjCeJpZ7BAv1jBL2
w545sYEatM7361RPhi3XXdL3pnX7uRb923DvmG0D2bTODNLqpnVO3c7prz/B
dm/3dc2kddP6z590sG7lz2pViIX9Im6k07qW499/p4HaHRLfh9A63e3JQhPk
F+bp0H8YtnuS1RQF263rzT1D7hnVVg2n+a+anAo3rEwYL4f6FGlKDJLgvnHT
K3iweHdhSTSts6XMIzu42mFHiD9ZSeN/DnD5SK6KHc2vtujZLFqnlOTm6tE6
O37TKAU4JFo3ivYRcVY3Z1VgPk779LdvYKOK3KpNMNemR+k27WNa/acMUfxt
Xy1on1J3dkviPjjWymr1Qdr3BNiW/0Y9qtdr6kbA4iJTo0Ba1+743LAd7nO5
5P0C6zSPJ6LQPVTf1k3mC2GesNP/OHw8Y/n6QqyTE18tK7xG49VkeM+Gk7er
fX1F8+ubmZRjnZ34cfR4RcpfYbm5HxxbsXDAhvZtds/1x8J9s5LfUD15f6ZU
f8S6feBp8IOntO855f+3Cr4SvDRRG/tC/oWR18vgOvOEr/60L3/a/5T2UY5z
rE5dp33j2FT/33Cvlcj+F+3Tg2MzeRifubXy5+zJ9JzR+bkdDheHVW2mfeuD
ItsKuLw1fO55cuCTUVqIv3v4PLP7tA9/e+joFti6LW/wNe2j204MSOCgzfJe
bTTe5WX3FFCP8voVJz/D1Yz9sUWwn+aPxe+p/64HRSFwuPvinCewkU+3SRws
9hk+hb5jSO7WFRym9lGW2afp+G2Xf4XCkdru00Jp/OaRJ23gr8+nDy2h/sUV
42Vg157zgZNpny2unJSDeEKmzC0YQd8BFH8qzYUbTgYqdVB9Ml4rlyA/dtFp
vxe07z72h5kFFw/lBlbTd4ugnYKLqBf7+o6gCtju2YpQNtwu+8W1lvoHn9qw
F/usOvHBFCmcY9NS9x373jR20qwhWGw/xmAbbFmmf9OI4rdY5c/AKar6Bp5w
98Wk7wuwj7ac9mFOCsU7fhFzFftsv7PKCxthxmZ+3CJ45oU1tpOmIL784HnK
sHevmfbmKfS9JaBlONzgHxB+G2avbXE2hEPi7ZWHT0X9fAMOhsLPM1+m28Gi
T8sbPsCS2pnj4mBp3NopmzG/LCtQXDqVvhtMPi+P+FhKoe86p9J62Gv3atj6
IZM42hh5v9HoEsPlz9RZU+CGvbtMZWgfmmE8zhyulkj+cYAlWodkLWAPnRjV
g3DcnNPhPNjum6BUDLN+nTw7nvpP8cyugu0sz3fIwnUNlceq4ZRT1dafMH+f
HH/6DThtg/T2fTjgbKdRLI33ID4uDc4Z56cloP5M+dDOqbTu+JD0EfGF5Wf5
u8HRa8cN3wnXHPT9bAE7O+nb9iBfY4uicD2YW5GWLVWh55ddqSZcl7T9dYky
+h2do6hO9XGoszhD35k8ohbowN07R6wOVUR/v03PeTS+h/Zlz5G4X9fJly6l
+u4uUfBUwHii+QciaLy7g2ERLNyf5UP8qzC7dVfe3RE4b9xf+z/T+C8PfTGE
WQPpBcbIn6vJvXVfHtex2eDzMNh538DNeLg4YVVBKZlnk7oP1lYaq6w4DY5K
n/EPLFpy+4grLLb13NoLt4eMGTgLh5QoiPwwfp13ie1rWGTgd7Ybdo4tF7FN
cH1FbVA7jvhi4zPi58PCAIc/Fgq0P3nZsQ4+zul8+JG+O3UdGruL2pdf+3kQ
+YZ5+TcfhCW3xY6aqEfA3K7IOGqf7+V2BM6Rz74SBUfXWl1/T9/FXE8mBcPi
8FhPFdSzeLpNgYsJvT+7fpFD+NVfzSieuKZvUhwfvcZuKcXHk07J2g9zVc3G
dSD+7iMTl/Vhfr3iixmVMM972BSrkfQeMdbLJp++PXYD4m1631QXR/kXCc9t
RH4Xd+ecCaX8pySGuiN/2V09uv4wkybrPQv1YuXPKvCj/per7ijL4fpq8LYI
pvlsdnG+DMf76VHquBiy+42WehmMf+Gqi4jqnafZXz8M1+eqNT4P4brbDku/
M3i+lme4/aXjXX3PzoI9ZKJfzaH8aj6r2QwJmMiti2bshbn8frPIvwImep19
UCUsSvghYcNFg6Xuo6ejPs7uysPhur6zlz1h7k+rJCdYO+aoxiVqP83mdsDc
Xud1HbB0kd3MWozPjOyfp85DfE0LLEIxf7HIqoYHS7MzdFQRb87+vem2sCh1
5rR7sI2x1+SVdLyPVYs/8uMpDBu7Hu7ut85XQP43jq523QRzXQy3nYVl0mz/
ko//EF1RkRUyqftGh/lT/+P/KfjA3MJs+7XUX7jg5BH42eLohctg4c7y3kRY
+DDdaQGPvgudy10DK72v3jEdZoQszSGM31p+qlEbZruLkrbByYGZF0fS+AcX
u95FfN5H33zpQb6S2L2uzYjfo/xV2SuqTxOb84HyNQ28XwZH77jwKg31qJNc
SbhF7S3L9D0GBYzsg4CN+VS/rHn1rD8CRi/xqOU98kNdxbI+1N9VbfNTWLTd
6PzpnwIm4OrBnm4a733YnJReASOjI8xWpvq12d59+V3AhG+JKTWEJZKL4V7f
BMwurXtaNpTPI67EslvAXJGLaqL6SF6vfvLlfwLG+WCGfCK170xXHAvPjhfH
XOfRc2dFlgwcNCzM6BXVqyl1WTrcP7ql/g+1zz15uLFLwNQU2fqPN8V4CaZH
nmL82KrPjfNgrukb1a+YP+vf54tXwtL61jzjHsyvvujPFmp3+siJQfwOjqu9
Y0zpu7G108sfAmbMyDKjI2R3T/OxvwSMtYHKvJM0/srCKHPUI1kx/z5ZKN7r
wv0tYITv49SP0fhTtdkV8OMJ72oPUPulF2/H9gsYqwB/cTjM6HCMNeAvF9Tz
Aqh9zGrFAhw/cNnroRu13+30/oHxm3fMNbGm8fqPfn+N+eeHO/81hUXr3OwD
UX/mw6s1EyiezvHBVxF/tH6elyq1L7TafRP1t5H728+i9qc92gmoR2/2nGHD
afylJRUJXwXMWuON6jLUzksY29kmYPiWsdnyFE+uy2HvFgEzJ7/jE5uOFwS7
aTYLmD5Duydc8pa4s5NeChjH+8/GzyZbjx/m8FjA3ApSXelMjmi1ziwTMH4J
3x5vJlc+2jTvpoAp+/rh4nGyNPXV/XMCZuLhzsZ8stCLFbxOwLQ76ni+IdMv
5R4jS/8zhP8HxEQlrg==
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], {7.641456500261598, 10.81403340646255}, \
{-1, -1}], LineBox[CompressedData["
1:eJwt1gs41NkbB/DfaopEJqTJJaO0RoOQSupvJqXcynSh6+6OohS5hVSSoowQ
khoppkxRtGvDYxbVhJiVxKaolEtyyaVJWqRlv2ef/zyPZ56PM+c97/uec37P
z2CP/2YvBYqiivBHvin5JD5MLvXfx4JLvdwxTb0Jjld5b/7OnEvVSc/fvQEb
DvUul8KasyscPeHoWf+4Z8Pn+exXenChvUnyRdi8wWlvlj6X8v1gkSGAJcUL
Wmmwpuvl9ii48cCyXK95GN/f43UWrm92cHuix6U63SxaEuHOdKXFK2FBbW1m
JsxjH1Ap0eVSbS1bHhTCF59qKLnAfPcNU+rg0e5q3rAOlxrmqyh+hPOKdRSK
YEbJNK4i6vF8GKmcCEvja2cbwqNeT/RPw4bVxcO2cCW3pjweFivyPdxh+tDD
TXlwo9F75QPwdu4b1lt4bS/zTQjMb9V9po31O68Z0MJhzahTpnyYl66gfBx2
OSl7mg2vNRmUBcHDZxv0+uGy0Behe+FGvy2FRqjPe3aTaAN8VfFaihvcHxBk
aAlLelj7A+FV2W8M1WHmCZU/jsBWCV++D6K+4MRfdffBzEdJZjVweEKRC+lX
c0e3603Y17jUZgTrudiMjpyCmckK9HRYd+3gHQ9YnmKkbwwHGPlV25PxhtBq
MeorHM8LWQyLfHjO6jAVZZymT/Zb63J6qDbqyy58rAULnxVqN83lUmGmm6xn
w5FlP+5cAa+9ZdeoTfZL5fGLGwzUPeJvaATzC+fkM2DNg0oeK2CTgPGgzDnI
J2LhUR4sfi5usoFZ14f0fWDvtwXCAS2ci7WSlhi4rDWB9wds4kTTI/UpdaR7
ZcCCK2oOj8j6RvypV+Ht8YF/vSb1x2aY5cPNCmab5KSeork1TbDYdkkcOd/W
7wrqZ2I9WZ6/QBnuLNE9wYMrSx5fU4VFGTlnL8M9PzmFTIdzso/veQe3FXmr
TyBePqMrRh/19NcWN/TBSQezC93gwtPRns/hltQ603A4WLROVkR+v3/Ot/Ow
jH/QhtwP2tVh9TiY9jfNOIDcF5XeWD84+qq5gTPZD8s9ImvYs6y39EfSvxv9
9b1YP19vxzkazOpy/TMKFuV+p9UuxnjeK7fpsJy2+bUQ7jnUZBuBevlZtnmB
sOBOz9zu2ahjhs/ENjh/6cFZjrBU0nfXBbZOLRLf1kT/ooVdrnD4XAfPmXDz
zk9MDxK/as7dcA2su+cq6yS8lb5v35g6PODOzoFdHFY/FsCi33Y9e0XWU8hk
mMGFG5fnKJH9tkoU9c1CHMPJ+oVwTmJEUDkcdtOjxg6udXzrcw8ezZ06+RO5
331Pl5TAF897fQoh9adXOTfB8iNOa2Nhynqb2TTEZ1q5t16CC9OEx+zg2thn
PddghxTTRTEwX1HxNXHSilXP6mAxuzGK/D68b2+TBurJ+fqaTp5PDmOh9Tx4
uP3ElMPkvA3m5EbCstzUxdvJ80rn63gG3MJdlW9N9i+l1CQHpktYr8n59+YP
3U0jv28XuHeg/sYRmUYQnH8uJoDsBy94GcsCbj7pZLmJ9GtSONCEfAKeqOWq
wTI9+wvesHzXpayXZlin8ppbF+plmFUcz4F9tX7gu8H5NVtUY2D+2bDEEjri
dSmmHoYFnFsrdWCJ1e4sPzipJ7d7bCY8NWV2GCzb+jC4RhXzG/lzEmHrKdtP
3VPBehos03sw75bdxtIZqKPVfl0rTDUwBf3KmJea8FID+Qk3Pupxhr1vS76S
80JvOSNvmY7/R6+LioGTtq0sFcGs7FkbpKSeW6FDqXBY/f1lw3DYLd13Elhz
l4o5ndzfyvUXpiCeldzR0IA8jwRbrf3gFsasETbMsEjy/wTL108MkecR80W7
NBz5iZfMLDYh92WiRX8G8ufxnFbOJ/c/UPFwIkwNLWog8ekvynUn4bayrZwh
rO8QYRfBQ/313kHLJOQ8b7b1Ow5biwe/hMABH29fOwoz66Idzcj9WHnxwzo4
rEHs3Il+jM47dKwd8aRZwex00p+JpQpOsKTfT80djqyNjY9CfvnXo/vnwFKd
t74pyF9qcd3jvSnyXV49Gon6k5K2XC6BGatOmropoX989sJMMj7+kautiP00
1phIhmULrix4MxX32PGKZwrskF8+doOG/rs87L4Bc/3Lk8On4L7t2uP9kIxn
V78LVMB4rK5RN8xqmxkR9wOs0PCK5NOzU+RST6HuFwPVG2H6mlx1e5gVMNkn
IPl7zU9unuRgvVFGBRyQOSiPg6lUvsE34mLx8UyY53VuYhE5D2c/d9DIfHHX
183kvgu003+mSD2/lvjD0vED7o2wtd/qc+R5wW0/xN6NfKSXWlafIvuh4bWp
D478M903GI70X30zFPkL7+g47iDxXk5d8gXOMQqpMoebld6XuaNeykES9h35
iM4lrxDCDJvgMw9Iv9sa1uTDORdWxR4l9dXdC0mDZUZBR8zJffm6NJcHexe0
hHShP8JEbeMXiC9gvCzKgKVnBm6yyPq2XS674WbTAStX5MeIKJo5H1bqqtBw
Jf1bwT44ZILvNuVS/gSHElnsd34G0/2cN4yNcyjhFiVaCWz+81HVE2Po5+gH
mwLify6zFUY4lOQOrZOMJ83NrcoY5uD9xnh1PZmvVvZm/xCHkmkp9n2GRTHt
dgFyDuWdHd+hh/WZf8clJA6g/9K425tg6rS0Yvgjh2KMH/U4B0f6nHDT7+VQ
1nqvBivJ7/+Z6Nfs4VDyY+f1J0zJ+0qXT0M3h2L9zvvLkpzfLPa89RiPtLbX
48PM1OV7f8H8yCOfA6NgbpXq43HEb9OqLLtCnKYQMNKP/Kp+jxCT+ZPyUdYn
xHt0uzWT9Puzotk95CtLm5DEw+ZjPQkPPmO+3prLPsT0Jksx6ktyjy74H9mP
hZbJrl84lHSxVSeN+P7C/t9gUV7E2QqSr/NSQwmcpGbgEQ63zV++4xeY6bvo
tCUcYNC/7TrihfU4z+1Fv6Qp3U8jsF5OYCwvC247eeb0N5Jf7eKFnsTCCeEG
5E+/99nODOb231+jgfrbOF86psBUmZfE7z32J3Znfhcb8bLdL9Hfot/6koIm
ODLe8pvWc+xvo/26/3wqJT6lHP3mp6l+YP//vVl8nxol79Fs7r8o4y++
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], {3.50115473509594, 17.016928250561502`}, \
{0, -1}], LineBox[CompressedData["
1:eJwl2Hk8ldkfB/CHZEn2JWuuJdQkFCVLrhJ3UjHEUJJCSZTIklTX2EldiZA1
SzdLVBhLiZpCIabCrwWVhCmuMrYsv89p/PO83q/vec75nu85z3meS/nQCVsP
boqilnJRFLky2xfxt5pO/fxToVNSi5uCH8IcjU9+Xcp0SjZiPPccrKNn6VcF
f3px2HQj3EO/7ZQLOzbGmf2jSafoYyWSqcp05l8iMhXZsI6QtdQ1xPfvSWDb
w/ytedZFiHMFfqWJwMzLqw0fw/vMlX60aeD+0/YvRtBe36rhXRLcXD1ULIt8
bnDpaByCbTpL/rWG+a+F9W2Gh2YWkuNV6MyozoFSeRK38DZ6Ch+2+dbJB3eE
MAMEVOnMu3tpygvqdKph7u82C1U6dTL6ND+xb4rN+/NweEn4ZV60d3SrD74D
75WWOykNy5iEZL/F/f7sV8vWwmzapT/nYK2Vp+O3EwdYx4mp0amvTdWTrrDm
66d75GAtgUzjUNjgavZzaVjjzK3dyXBPdLcunxqdGXFBXL+I5Cd6d90X9Der
1KBSQ9waPPoE42d/mYtugHNKkrjT4PlRD5UHpP+A0/bu8OH9vQIVJN+OBelf
cP8ivb8mi9Tj5YeCMcxfaqRd+jypR0RwUAW8wl7yhD2ss9Jz4Qzq97Z5PkgF
9o2MT2QgviwlyOIz6mEw8tlOAfG+vd+2FcDsyLqVM1ifuvyPSi5w8ADzeD/W
Z7Y+sF4CtuktsnsBN4QrrWpehfYKVUf+RvuAF10eZ+HyBKrpHeKfdbti9WGO
UKHIv4gHGZeGfkNddGZ9PFZg/PvLY6YrYU1Gbsg2ON755KkwmGZ9PDMIftFo
IeUA0/NsWm4jv9dXZnL14Grlp3VkvkJCyWcU4WazVEFt1OeI9b40UdjRJMjM
B/VRlVaOFSL91Z4av4H4xomP/hLw0Oe2F2R9a14dU1eGmY1ObwWwPnI9WYr6
cI/EJWstePIhf8ouuCN898vt8O7syUxPeJqnNswW5rrovToCZtXED8HUfrnV
Glm4so9cWGGJq8PZ3uQKXKnaH+naaD+h3Zz6GGa4cAKRF1OppCXuOSxTOazw
Afk5bLEV6YRtViw4lyG/wkRHWgvJt8HELgjxRpdemT9Jf0cEbI0Rl13Dqksn
+XcYPqUQn2431j8Fu+pJrm9CvXbQBeXNSfze1D+JsPxFprsgybdrRMsNXrI7
6eAz3Ff9tn/EGP5ddn1pJNzsVlVPQ31VPJsUMA4l+rHonQjsJuteykE7gxhu
fkF4Utv2RAHMtrf+QxxX+5b3vs645rwsF1fHdcxyx02sM+V5XX3JdlyPDgQP
9GBf0CffaR7H/UesMsrJOUIT1uZkI142vWa3P9lX5s+9e+CeIP683TDbJdFH
CvONCtulqwenyg5f3gPrBouJq8Ed5TuOJCHP0USvCUV4euZY8HP4QcEtmjKc
88DNlxf1Lhr5+/xaWNSjQGsj7MPOKtwC82d96HFGXWrumAzYk3jet6lgxH+f
yrDzhcvfz4XGIt7V1zsaT+KxVp0JsO6oUn4hbPDJ4U0kbBFV5VUP20Q9WzwJ
d1KSjp0w5xZT0Q79Vb73vUueC82AmIg1iAt7h/B9IPPfXjk0g/kc19mp+zMu
rmTzCA7vlvduJ/2l7FuIgf0MlZwqYcbwlv27yPkWsm/JZXhIUmJAHPM9Xaff
5w6zFLYvvEH9UvNaHq8j9YqN/1aEer/Zov+FQyP7NfJZGOLFRzZ0l8AG8n9t
PYR4dn+4lTvMfiZatgvuMWk0koVd829NmqP9rrB6z2tKOD+kFKIYxElbEvjg
6YZqK0dYOLVwMGQl8k0OqfaHuxlJa2cU0V6p+HEa3PzFqzASFpXwW2yGb90s
E1CFh8oakhZh7jgtlxcKqFcxj4cR5jM2rDx8FS4P/aAUAserrKedhGkPV9jV
wOeGq/JdYINgVswkOR+VL1geIO1tS13wvFGRbiZSpH1M7Z85B+GQUjGvRDjV
NWZ/PDl3RjWE7pP+PgX9KILduhJ+48COY62MBzDvqnkjDeTHlluMboJTNO8V
7yf5j9gEPYJLZBYiLsE6j/zs7sJzNaJvqmGZjxKvrsKKlYUyXfC0WchqP9j6
aK7aAIm7+Qxug+c7+8P6YUqAMyMMV3D+9myBg9tPpLzCfLJ07v0vE2Yt6iuk
w+V35grJ+PzmXFwH4NmIoUAB0j7zYZU6LGmtdP86mb9K2OXvqCdH7UbxL2T+
rocryHlQweumcEMe+8dneDwfZsq3+svAOovTDy/ACxvlzoXLYb0kB9cz4TWJ
Zowvsnh+dItenYfbch0mHeAOv6lGvH8pnsklaU0yWNdAa1YefO5Y05KtsMzZ
NQeewN478wtaVuD55+V5+w0+697rcRDO4YzZaCDfKpZmlCBxwNqqg/Bv8qfj
W6Rx/5m5J9lwXf7JdRkwY/y7TB9c7zFrFw4zPz/RI+d+qraz8DnYMzKj7He4
27itMA6efv1+2wXYfYNwWSGJ38wcqibv45mDcs9h3zL7wTfkea3qc6Ywvgx3
2dB3mH/nu0sbYVGW5HIK7y2LyLk0H9ixvntwEfE9YnSnXHgo0CeBtFe9HdzW
Rua3NiOR9Bd99nezMXK/Ud4cGW9OkOnLjXq45lw1J+dF7rjETR6YpuVmshc+
a3/g83e0Z6yieFXgfO+4kXaYPXj72yDmqy13xiwZ1lGRCyiGk2cOWlvCTF3a
Ej+YmfDIchDz6TcsmSfndEPBKpVTcPDNzanC8MzSvsjvUsh30OjhEOrvtqHn
1hFYJ81Eog0eWGq/86Uk7mdH1d6DH6ko7DOBZWTH/arhm+Zhc4USqMtfR880
wAV+U1ZScIOA15WX8LxXn94Fcexf9wjuCXjZOvMdIjCHPZysiPEHSlSv54qh
HqVpVdbwHa77ldvh8pnGUzjPKMH+1Yx5Uaz/3usZj2GnKcs9LbDv6zVtPKiH
/cNi7iIS7/Bikedl2Zkl7CzYhq/r1Hn4qvbsswKY8ndWryLvvSI7g/twao9t
1CfYKLhA5APMGNvYKIj1dPV5NCKK8RkpJw5qwCm7bv8g+bDLGC6bYOmvd/TO
wpw+lroRrDQ2fPIOrGnuXbge1rXqyntPfIDGWAkXVC6d4cV8bUQ7xxbIfvS2
WKoEs6z2fnsFn3N8NqAOO/rm8xXAa8Z6nBTgnshFg+NwgPrTj/Por/moYesG
WHaM2f4UZrJ2rp1GPTab5W0Oh10/hXXch3MGnVZowjZ1GqrR5LzfkqlSR+rR
X+/pAIeK+bdtgXvSb7O14PWVhdbeIqj3q9Cf+0Fa5RjzV2HkmaYSN0vWv1V8
QUEI678p3YU8n/di1eZHBXFeRLeETsKTIRGNTcuwv+fc2nhJf8fify0TwP7l
fV2nAh8aGfpRwo96ylob/wqHRGXsa+LD8yfr1BUMp9dJPF4Ci5bJVZSR5/2H
/KbDvJiPuWLlP7C4cO/q8aWoP8/qn+/D0OLogALYwNmw7Ci8N7bw1z9g6nNW
QyF8PP6CfiTs2LvJsY98N9V4mBXBmoW928SwHgub5qW/kPuFxpMN4d6PCQbm
GI+/XbHGCTZWPratGNZRKmT6wOmxr4xkkV9PmI9eAHxv03hvJEwXdE71Jf7n
ytQQPHS4afQAvJFx4Y4h5mvzsuXfbbAKz9dRfzjY63qfIiysZRl9EXbt9rYY
Q37p6Y2sSJiec0u+Fs6oSU+whw1KDl1hws4jvIlz6J/9yVp8O/mu8/5hGwIH
X04SXAaL58hu6EC+zX/sHe9EvZYHXlvDBZffaJUm5+Me945SMVK/m2vT/GFP
hts5Ph7k10Tb8Ru8jn+L7zA3+pPnydxMft/0HlV9wIVxLKhUsj/Es+5VsijM
Ly2mhZghyOltXTCl+r9c32pI9tMzz7esOVOqo8kgxRZmLXDnhc6aUr4/gt4F
wKck1v0vc9qU4k+VarxO8vvqT1FTppSolGR0N8wvtnux+F9TqlnqvJo45hOz
7tHjGxOmFPPiYVsb8l09GCg6+d2UMqg0K7hEvnP5MnamwD3nWgraYAOdz5kR
sOYhqxE+8jvCbytvLezo4KttDKt9vFG6Fv1psk+f8ISveJhadsAyikun4mDW
b+WXUsj4ZuGB1+GGo8l9JyZNqenbJSK3YPp2vVYr5Ms083YphWWE+DpkMR/q
4ofQHLL++o4TLXDOUyfumFXkd5lawK4Z9P+H3rw78dO7jldh9kWpIQOyv+Y6
JzJgRkx5+lK4usTB2QGmne3dSObDGWGV16M/hkKN+GXyXe5gb/cS4+sIZ+aQ
3znVjTenUpGf5xMBB/J+Y3JcWWLIn/bc9fIQ6vk2z0HRAvNnDEdH1cI6W+2c
zMaRj7XnymRYZnnjVdqoKRVjtf7radjVZCIqfNiUKp/QVvQi+yOPE/JsAGa0
uR2G6bXZ4bL9cJnN7HHSfn5+QKEb611x8Vo4ceyXVeptGD+pPCoPpuLutm+u
M6Xoy8ej2lT/+78Bs+z+f/8/UKP/H9M5A9Q=
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], {6.672567122490658, 11.138572592378559`}, \
{0, -1}], LineBox[CompressedData["
1:eJwl2HlczPkfB/BvtArT5VhR6VCZEpIuac2gdGs2RWj9JtIdoc3UtjXUki5F
qXQYlGJrTYQ2yqDSRVNKd0YHSWUqEqLf6/P7+UOP5+Nzvd7v+UwPH+r7Dzsd
nEVR1BIJiiI/KXnylzqTkiY/1zGpfo9+Twm4usrhTLs+k/r4+JrppBqTKnc/
rHIbzmRtc+iBo1qkZiXAyrnutFLY6eVQgB9M17/mHQNv7/P7wx5uPqzawoJH
Y0eVDOCg5B5DOdj+FwsZFdh1vWfsWVUm9fyqY6MMLJiulvm6HOsl7fMl4ejs
RWYH4NrlX+IlyHxbrrdQhUkJI+o2kHH66vkV2+AF81Q1aMScjfJ1ykzKO9Hq
pCKc+MX/mDusNmF2gA5zV9CsZeDkd0evmcHiNfWTQiUmtScndsF2WPrpic5C
+MqQvLs7zH/8wigHNljUY3+MnL/ukPZtOLrrEO8kWW/YWtIGVz+N2Er6oTYZ
/EUB+w9d9rBKIb7d8fNeWLA6ZuwCyXP8QdxNOLys4Mk5mDMxtHMe8g9v9DoR
DYu0mnU8YTO5LgMO7N1k9E8ZrPlyt+Z+Up/SjrL56EfYxEzvNngwUDrDDv6R
GW28Ep7qWLMqBB7cFq5I+iN0/KiaBAv/DXcqW4vcCsv/5+EPqdsCYVZIYtdx
2NS4/eIKWO2SmG4J1y/NbGtfg32ySie+4PwCXR/vFNi7vZiZBpeIGoJdYfpu
E4UVsOve3k5NOPqJ1ZZs1Mcu9ZkzvRrjf0m7y8J6z8re98DsPs/jHPTLLXJy
+hnM+cnuxetlOF92TL0Glm+trXWEpV+ySxtgb6VZ3KdLmZT+ElGOCJ6qMcpz
gPXM+HZf4cH7z399o4h72px+dxnJ84YrSIajORqXGbCr39VNe2HzKyrJnnCJ
7k7pjbC3F0ciHrauTDU3JOPBc9z5sP7fg52W8KK2+Q7PyX7BMS8CYI+xzVn9
MH+ya9F12Dl0ZcQYLPrQeG8Cli86EzNB9sub0LYhedP+0/iO9C9edkcOcZnF
0AuSZ7np8AwcxFX5VETyhPCzdqJe+ml+ehQs7v5mcxUWT1hQDrCaZ4IF6U/J
7rQKGulvTsQpGvo3LPuwr5L069REpzos6irNDSX+biKtCgsOVESuhpkVMz2z
YP5bb9prPax3yfr1Gfarb7xblQq7Xs0/HAFzxssWO8MipvReJThsfq6KIpwv
MbCW5Ofvifp7YBXuS0rqaxVYdHexejksLa0sG4/6i+NUD16B+e8laieX4PdI
pm37OTj/iqYXG7YwaXE5CwteFZk2/Ix6f3NelQpPXdPYZQ27dh3SvQ5HB9Z5
ChczqcCPZkVPYPHFmAN+MCcir6wfpkf3HlMmFqhJzkM+8TCncmARvh+WR+au
g3lzYoOqYfPPpZt2wYEffCMqYPaU/fJQmN15rqoNrt+pYE3ql2c5LJ2N/bpc
nDIL4CnRge1MuLr5+o4S2Dul3CsOFrvKLPwXtn67/2EvPCW9+Fsh8Z3WjZuQ
n3apsegCnEbjnUmHg04/9jwGC9dY7voAe4Q8FFrAiSvtkszQD9rAsBYN5n70
ywiGE7MXy9aRflWej7oEC1mzEyPhttod62/BzjfyvpoQj7REF8CuoUvqhnSZ
lGJPFSceVhaFJWbD8r70xS5kfr15gwvsffFUvCRMGaX0L4AFIWnq2cjjvPbj
+1Yd3K+IPiktmPfMMO8aXDIUYZOF+kynnvlyYc6y1OT5sPl0k6wnLPTNkvod
/dNbenhgFyxemPG5ZyHuyxGrey7Ec+WKt8NRysOV++Dqawp2NQuwPtu8+Qjx
6G7WjgXke8o2jNch38O862IF9GG8pOMfcl5ay/4cWOQ4EtQMB1adjg2ErenK
Ud9g0Z4PqjvhwZxvHHXU07bn1ndnOPlYsXArzK85NOBH5lutXceG6e9qotPg
nL8uRAbBg/MCclph10uv50fA7IA6TS3koUm6h4XDamoLncNg06uHJI/C+plb
5dpgyfSs3btJv5UWUetRX3KCxH1Dsp+VSvtpWFzpPSoJp5nwkhrh/Ld5JnXI
y82xzp6PfhW477Y9A+tv8tU0gN0K+cabiYeDtbbA044bnD7R0d/QJ7wNcGDw
aZV8WD5E5cYS2J43i+5GbLY+qAv7TztLTyyEqaOu28/AbP+ClsaVqDdFkKIG
12e79KbCruUtF3NJ/1exG7zg/GXtfyjDD5yf922BhcVHJ8+gH11FokEduKTc
3GBCHvd11FRdBeYczj31G1zwbchSGaZ+BPyZKYf8t7POaMPiI+2lybLo+/HU
y2Yw086vtkAG9yOc1byTzE/bYjtMQ97Vb2ghsNr7AaXdcPTY+fFsWD7nu/rn
+fh3wlX67Cqyvj92UTWxzvab78n+7xMC6uAgX4/jMqhX9OTtoR+wJveGlA6p
P2/LZjfsJxjiOJnDXItc3R6Yd+hgniWs/495xx/IQ1O0r9oKC2IWV61C3nwV
rxEjMq5x6UIfbD/28rUSHMjclJGG+uQ9zMY/4XyBqZe6GurXTNgwUUHy57jb
eMMsc13jGJi9ocWOB/cvMgm1ggeraAcrYMM/+G0/tPF5BNUWNcIWFR6Ft+C0
422OVTBn5bywg7BaqNWxy7DizMCLpWT8ke/hA7BgUGzQpIV7fEXvtgw5j1n2
LhHmbao5Yol8/TNuEq6wyKeu2Q75RekBmjow+xT1yRj1Sr6zj/sJZm109pNH
P8Rsu4kRTdQ3pyq1dx4+D9vjcb3E44f1SuYyqbi83yT6YH2n8eIMaawbaf99
FObKJaumSuH3RXhN0mzsx7Xc4XB7Du6/hlGiGsz89UXh559wb7ZZ7tgKy/uf
fe8DD5eohvmQ+TslCmRgbsrlv0h+VmOMZ78k+vn1qegOsZl4xwgs+uW0Qiux
0fLjWpjff6+udgzmh7eWn4bjcr2lJdEfUXPDJhmcT61t1KLB4qVFfxbCwnsZ
Ymk4cHNm8z7kDVKYufMF6wPPj3f+jHo0bxXZ9sBUQ5aoFq7Y2ES7R1xY6BaI
+jXLnryKIv1b+S3gO2ytpKdhQ8YrUi190C9K869s0k/+O9XYAvjj0EjwA/Qn
kXv25iNYcFVVJhAWfhpblQuHVSW/1YBZIp3rLnCxlEJK6wpYSk6uGfvnLKk7
mwiL5pqGroC7fP9UZ8H8jl5FG+TrMkm3UYQTt0WL7VAP/1X5tSENnDP3nwRD
1FshH+pRDbO2/J5PQ39yOuTW3CKO0yrsmc2k/DMntPNh7t3TrDuzcK8GTd5d
h6nOTQsyJPA5vaTF3IWZywOfplP4Pncr5tTDamXdu4JmGFTzdhMvch63ImNm
zg8GFXVmqEAGeZg7nf0mpxnUsHaGvOEKUneCrw3Mjzw3by/MFrF9Z8FhXlwa
l7hp2R5VONnONptH6uXEPU6H9XivQkpXkPN6Zb2+Y/3l9pw6Mn90YHYIzuta
X3WqiTh/L7sceYS1Gt+ewTyDhw1JyCuYMt9XBgfuCR+yQT2iy17JZH/mhHf9
NDx1af18DplvbDd9CfUPj2cVW5D9xl8U6aA/9Rd9pqVIf5tEW5Pg/hblkieo
V/+udkwDPN3vsiAU5msNrn4F02nso6tJ/yp13zyATZuU3EV4J6nJVmR6wTkv
/fxTYKr7YqgI55kf9J7nCPN3ne/QhTOzsv+Ug7l1JSvska/EOfl+G95BzBus
ODvUw3Hm7yyA2UO0pAOo320f1z8WVlOKZymgX/ayWunBZPyj8a93vjAoVuoR
cQBZz+n86vGZQUX30b4Hkvk3760z+sSgihuyKsNh7qlPvhsmGJS8+GlrCsyL
3tt4coxBtd0Ocy0m63WaIlXFmJ85qEjyUHKRw+tHGZSmg/zNH2S9MOGzeJhB
0R5JJWmR+rTf/AiB/Z8krrOFBUpO3TVwG61H2ZfUl7G1oGmEQTnPGC+KJD4e
wg7/gHx/W6w8T9b/ZPy6FefRLN/XpMG8yupO9XEGZSFZOnCO9HNmxvMM8las
Wf2GCzMjT4Z9+cigBjeaPtwPs5OT7rhNYv/9z0dMyX5ZdubZqH844MBRSZLH
8PzdG1MMin3+SmUVqS9us9oR9Ctfr+PpCVhQPCe2D257+/JvEzJ+8eT9z3DJ
uOmDFrxDRU7XM/Ng5kutFxth3vu9UWNkv7GSO9fwLlL7sWZbG87jO6+xUoJ5
r2IWHkAe18bM71l4B/HWxOtmIa/g47WbBjAVx9iVgvrE19f5dJF3qLDU/jfU
n6871yYL5ppq3ldA/6IXT3kHw0zhVdM9b/F5cfc1epF342RbZ3kv8n1t5gTC
1L+r9jd1IZ/TK8cE4i+nDs40M6jEUl3XcmK/8n2J9Rjns6qmibe4uD19hPyW
l/UsSR7z0rS3txmUdJ9C4TlivcgghVzUo6GiLyJm+eZqZKPfM/RsOuqjpqyt
/DHu6jus6EWs77v1ItbrJzsYpBKvetRdLsD5cxyX3yH+T0RQSQ2Dou9q7y6D
uRs/pS5uYlCKwgj2TeKkkZ77rQwqretJRjSZP28gPbQbee0bL9jATP0S1fDX
uN9L1vpOIA93ica3yT6sH/JaHw0LtK9kSbzB/lJG38m7mapfxgtDv6xjTbIi
SP+6T43aD2K/6kfRQ3j3cEddvuyD2VtSr7BgpsKcc3mYr+jePvse3jkCC6aP
JvZrS4p/rEGs/pbehfN4wxYlaXjnCNzG6D0i9J/pb0fePZSPICqyg0FNZRb+
Uox3D/X9zVlb1Mf2PX+CTdzaLbj1GOO2dks1ickf7i////8VReZ/AXt8bTI=

        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], {3.074408746867624, 12.270956877420474`}, \
{1, -1}], LineBox[CompressedData["
1:eJwt2HtcjOn7B/Cng2KFqUgRBh1FphzKT2lyiJJMtCmSKUpFmZSExTiUSpgU
lbCjkhQapC06jHKonKaEdnOYNodKNCg7pcP3c71eP//cr7f7ea77uq77esa+
drL/tlUBqgzDmKkwDK1M3yD+mHMZJa2TuUxXcqh9M8yJOZtRBBs9sh1aBEv1
HAe2036gVeh+mGc30GgDK3r1hjjAgn2dkZpw3D/98p9mXMZM1yK1hc1lgkZ8
FVyGWXYaW57AvMVdAd4we3tJxH3YUDo6aRgcJB8d+wh+vbFIWmqKeKkna9/C
/OeW53fAYs2rD/vh1jK9Y3Ph4pu9ESY478qG/46pwEHHOSs9YbuvxcaNJlym
Ov+VMAHWNxp0uQN79dr9qoDlNl5r82Fe8xfxD5j/7Kl2LiwM7w6ZMoXLqLeP
TpHAigr1485wbhY7ogoWBZWfDYSXxRfffQvz9wsv7oR9FutbMDhfmeTgsgdO
uXd0lDHcOs+tTgBHzsvMdoFtExZZesGNY8PGhsHyhcmq1rDUxLIgEVbEyE5R
/229ir5mwbnfeu5Xwg3rB25ch7kXTyj2wtLrvisKyWaJL2bBkRfmpeXR+dbZ
Oz6hPymOOkNSYJnPli8ZsFnjxiwBzPs+eaUHrL7iwyRHyqeS2atL/QxwLNWg
8y9mDS+ehPtdd9mB6uWJtYfzYUP3QXk0zNa8rTcFZgazLabBEmunEQzs9dFO
/rcx8pmSHdU7EfMy8m19AiztF+5lYX9Tnne1A8wKO9zjAD9ebu/xywj91n4W
HwPzeqxLKmD+5qjy17D+qkVPjsPKmUJTNvJr+LGiJZgcL57xO5y49PFtd1jU
XO6dQPMRdzHKCR56fObJUlhqdDhjKSw2P9LcCnekSsd40H7A5zNa6BfnS5pT
CNx6qHW3MfWvUkc/DhaU21ZZwVo9yXr5cHGTGY8DF7spj8vg6tvJOWy4ccTN
gm6Y61/To0r3cSYwfyzqYxwNzBtxnizduWkWXPx4wq0LNM+ZN98thYPuuF71
g6PbHMvc4bSWq6fHwdw3M7pXwvK8N+nnqb/JeamOMO/92fIhsMfQzStNqL8V
E14K0N/Xf1wKGKD6t+xo/zCBy7yfXlVeS/3zMz4aAhs6WT1LhNl2L+PUYNtD
+fHUH06W7e1CQ/Sjw3Fp71TEz/z3sRB+/DwmL49csdUoGOaFWO5fC4s1NtaE
wrZF91K1YK6sKegYLMrty6vC3LJWl2y6D//xa5P1QZiZ//SHNs7j12u4utD+
3LW8MDixLlg8ARZZZn1vgD2WznfrR9+4nKYGB9TDvZX0ug1mvrDKcuGO55Gz
W2DBq/Pxw6j+ET0XWmFJdNgfPvDWRPlrJcxeHnngLHxWvkZfB/Fl7mqh92l+
Z4wwoO+K3/3LsoHmiZXM84Q5Qn/lA1i+q6KPvlPxVpH7OZpvZYyzGJbsVkzy
gqPtr0VIKX/e4Jke5COcWtb+N+3vHGsVAxcqtwnaYfZSz/WDqId9dOlsBZ3X
eU4QCkcelLW1wcJxa3gv0J/ZrNTGl1S/n46lPdz6p8qHIpgXe2B+/nh8L5su
JiVQPvGhvsZwpI56zyo6b+rKVsk4LlMqHKzQpvoeqf6+Cu44clmlBvXzom7r
joCvLA2as4f6mVDn02JAvxNXWBY0l/x4vZcwx6MgoAlzxonur3kPH+Y8YU7A
DOdVLr3P2z89dhntD+zOWgG//sVz/41+p0+cPy6Gh7p5S66gL6I3uzxVkF/1
MbYJ3YN4xkT7ELhRe8kLI+qrZjf7BZzrscNbE5a4Dqmej3qrlSu01WA+2396
Gs2XlYGJHiwMM3jwHh6q6ZdpT/Gles8M0T+zQIfTOybRd1Sy1w5WZl5bWgJL
q3mzHOHDOkuKVCjfKu5Zc7hVr3SOKSxsc5F2I55POI/nQvuzLFUv0Xx3RrgH
0f4/F0dyYbtDFlX7YEns6Tv3kO/oS0sSj1I/Avsa58Fatyb+dgyW+zZ1Z6N+
2e4io4OwonCIoRbMH8r2CYFFwwdidqCf6styni6h5xceXPVJH/nEetuMoe86
J3jeZlj/X8vam/Q7pxAs6R2LPIb/52EBc/xWnc6GZVd7j5+i72DnFMtgWOr1
Z8Z/qEuesuGxMxzknqu6Bpak7m50oud3uG0tMaR5l/tsoOetH60zgjlfpTpJ
cNzD/M9nUYdiv/q+Rtp/anHCFBaYjtG3Qj7LnqQ2PRxH/RIcOQWLM373EVKd
IV7Ng3Ba+NUImjN2dsT3YNQneljnvABmNisSnsDRm7trF8KccZG1RliDjsYW
rscqOWoXFII12r1DcpT8tPdHOtZc6+3CaoqX4apF8yy7tWXGqPH0XdnG5ZH/
T9t5Lcx6cDUpjuLdtrDMJl+rLXCBGwfXO30aT787vtLvOF+WWOI2EfXyz6k3
H6J5T/49bTHM3f1xmSqcq/vM0RMW+6qMiUA97KLOQB71J3jTsNfohzLNarEV
LH2zxWURzJq4xVVJ8d/5aBfoIa+bqTNzKL8fAxuM4ehTwfV2lI/Vm6L8Mfj3
LmO4TQXlfaO4zgkWCjheVrBcOyS0dzTm12iOMhV5SDX7DGpgprggUIk8pItn
jS+EOXq2Dl6w0F3D+w7sNZBoVEb3GnWP/wbmdfrvmQ4zcW+ixiJ+WoelWT7l
NVJQHACbvTNYbQ+zglSWV1E+3v2zP2JVhI5Jm4a/l09v6rwEs7bXJJ2CRSaF
kYdgUYNpfz/MNxjYGU3PR2eVr8c5Q/uX7IihOqawjAtg3rC6u/Q+98r+mV+o
Xz1rrjbBvK95tbrI21ZjeYEh4ogNu1XZsDIl4nwA5bM224wFx113Vkgoj7Dk
9y14X/C8q08Jc5gNdmfhZUOLFtvSdzC+KWY+na8adJPmXvg2xOU+npOdbHwb
R/UnpY9fAEt6++1Ownz+sHXUf7NPoSsPUZ4rNyt1YM7NwbtrYVHscbM91O86
9h59mns1b4N2XbyvqXOuDHEUf927GACzsvt3usI8X9bIHzqIa5kUWo047PaF
f52GpVE7H86huCfmdK+GxUuuH0xHXNGOv5qnw7n/rdbpQRze6rsLp8DsrvOG
a2HZqJ/CWbCQf35OJVau/YdrvliHLik4M5dsUyQWY60eZ/n9jjbi/dLX7YaD
bAJ0PGH5tPPvPBFHpLOzXhNWdH+fL6W4ophP9Sys45SMBdWnfffZXzD3gctP
ERy0bsPjW7BA/ufEDlhSVdVeC8t3LlOxobpubzbson1z7y9b4WIvX58ZiC+4
bjcrAZY158jDySc73RNhZcI3j1KYmX17zHaaL2MNQ03kKZEpcubDy+7npbhS
nUHqce04b1lgme8R6tvuvoMH4OI7nHM3aD/T7og69W16pVUtuWLermjUwz5x
tJMsexH281+saYZqlfQ8e/h2lgv190P8AyHFm7tTtRB5SFlua+ZQ/8bVvzeB
ueG9GvVYeRZT/XNRl+TL5mPesOTG/XB72Exsn/MMq3hv/pyGUairzKDFlmwS
FeMPy/lfPs7GKiy30jXHKpnXV/NjBOV3basZzJJLyku0MBdFuwJ9yc17y5KG
473c/XMfkFe7NMf8hnjlYWumU5+7gj6fH4b7eqS2PBZmJRs3tgylf+80Ez/T
uSEj471h1rGHxnTPvDrdeFVYOL+nuQJmm6/78lYT+yuUKTRPgkFHjw5YMelI
cDR53llVEzzPSQs0K4WZf+9PiKH43d7RbTBrqnSQwfl85WHdflhutOrCCXL7
qc4umt/7+mNMkK9k9DNPGSwSiUeUwPIHpYoT1OdTE4LsUR/PfMZt6jPvyvhb
ubB0/eOOe9TXqvTib7Cw68QrR5jjs6WJhf6wmFeXr6M+jtO2OAYWcB7OGsei
3/nJ4WXDKb+P9mrUr0X2RU4wm79tyWv0WeAW/f0c9e9i/bZHWvTfuS9MHiJf
cavWn014TlCwL74a9Yk7nkzSozyW75mXh34ILznbHMR7QpXef3Zo4O87vtUY
wZzrbey5Q/D8Jv9JDO0vTnf+qYbV0++BLu3756XcVUW9MSvO+FAfkv4rzlRB
H3cVtTXA0oERflkMXL+4NBLnMXd0glMHHRh2bOpsa+Qn/K7aumjAgeHzNg5T
Rf7yC7leHv0ODGOlzmqEmW+KYY/74E//1F0aibonb1tzGZZPdzUOoDkzFJV9
gKWVMX6q6A9z46R5FN4XlSwOWkDeH3ZgOeILfMOv+MPSIpP1q3E+q2Lhmq2w
cKNHpB1Dv6/bGr1pnrpufKuH2Rrre6bBfM1bjX6oh39hb8Vd6vfJUNu3sFSk
MvgL+YgWuagtQP3iyz49w2H5p30J0TDfKa6/F/XJnmW2xpLVpnY+p3s29vfc
RP3yfiTNRH8E6VYBI2l/367mCJrzBqsJMYgv/PouazXNYX9dXy31TzH10grc
E980uLAG+XP5M5dtxT1xOzJW3kS9QpPIKcW4J+ajxYJNv9DPYLscG/LdmjyF
El5wpuarOs71WSgM+4nnz1S+egtL1Tf4dP1wYMTHzf008Dx/yNzdad+wP3fq
Cj9Yar9v4buvuK9yjlYbxZsd66r/GecvONGagvOFEypH936CA6aFr0V+3PXN
MWc+wMWynhn0HWYbBWq8R7xNB6epoT6ubtFtbgu8r/f0E5gpK8xcCMt/s1xz
AP1gjtzM/wWzfwjSdWk+N2RkrEI8eZqD6R6Y67ooxwTnycfwXkpov75tkNeG
eAeE8gKar37nkhzkJzTaOjGKnvff/7T3C+Yj9O/J6rRfXG7KUiD+k1LL9TiP
3yJb9BPmmpjoHqHvxKLn8FnUz7dWl8dT/++E3/sOMzamsdtQnzjmwPUO6s8n
rs8i1M8/XR50EJZXliRroz9yN2WDhOLP1sz6SN/JKG7eD/SPYRVceYp75j4v
cqlGfmwft/YGumdnif5P6t+l6ilq5O0FFzKoP0V21n64d2Gqn/LOG7zfoLq6
DffOZEUyT5+jnvZ03QNkySS9Y1V4f9g5hwTy//+R0v9vGnT4H96opt0=
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], {6.038075398171211, 6.876259974824895}, \
{1, -1}], LineBox[CompressedData["
1:eJwd2HtcTFsbB/DpPioaJN2bxDTpoqKMHBk1UXJIdTRdZJCETiWVojS6SSfJ
rZIkXZwhZYRkFBMpTtFQkkShSHcKlfD+1tsfns+3vfdaz3rW2muv6G8Jdt0m
TaFQbKQoFBIpVPKPPpvy6zd+zNkU9uGuf2zhLRYta3rh4Y2x4+FwQYHDpUZY
THVlFcI/5aZUCuHWCsWcOlhPXuSeBksmHgy+gYdYLwJ3wDR3zoFPMG2dibo9
PLY/3uAjHOVM26cN0y0COK2wI3d098ACNkUY5d9YBed7f3xfBAfc9LA4DfdE
feD6LSD5DTgEwmp+9rnzYZ7TLvsl8J2ryiYTZmgnKT5fGv7wnDqrGRYP8mTq
6WxKwgHpHxVwspTU9FOwb1m3wkWYp6bhtxXOCBnrK4ApTvf9WXBp94q3Aphv
xbRRgwdfTFwrJ/cHHbb9qcemdGkXN9bDwtpjdd3wpPI2lw9wXmz1vx/hXIOt
s2WRn3rewatSeP6hqeG7ObCkP9tCG46eo7eVDXP7HWPt4OOM+15eML3kA2cP
fElOSxgEM61zRJfhRY3nDu2H0z3/u9UPpyvwPWJh80h+sznGu892x1gk3BMx
GRwBd5bolW2HW0dnvhURm3vZO5P2+lwO/4C/RaV2GcBiw4QRqzl4/h7f4Qvy
H353anA7vOhNW+JNMt6G4KKjcPLyFmY4qUfcj7Ji+NKFGllTOJ3hbXEbfiKU
WvDWFPPbfON+Fbnf3rr7BNw6bpJ9Da6x6gpbBZuzG4PPwv2eDnN+meB69Lm4
aFjkk64igvn58kmuMCX66rwYOLmak64PJ+mG/3aE028Uy/Qj/9F4hVZdmKKR
E3YdXr0yOea3MZsSEsg7EgP3S+wd+2D6KY3PTrDI9IvaO7hieFxXG654YODy
Hu58QvX4hnrmrGjoGSDPe2QebIPnUgqDKWifHR6q+R/cNvJeWwOmpl2n18Kh
W4TdViT/TR+VGuHAz77H3Yn/7q/tgts9ilpCYeGe90J59NfKvrgzDaYryRUu
hGVXdxoUweaPGdI74QuTQuUb5HoSr/ZfOEm9KaqS9G8440wvGe9IojapT/I2
r5EFZL5mtdBKYJp/DyMcZitt+HgS7tEaT7sJh87uvLib9D+PUzAKO+4xeWUP
q2fmzJpvwKa4+rJ3K5PnF6r3/QWnxX35rwHjzzp06VgE3PrjW14S7Kjk+DkF
7l+qNrKU1FOjZe9xOGnU+8vgfKynHdv0jsCjXiafzsO8H6FB++E8JYc5HrCL
wCTUF045JWqkwfSB72WL4cBamRGJEeq5tMJgCqxpqb7qNMza8Y/yc+RL/zfd
dBccsrvrM1kv/LWZ51bBbBvVKH/YLs7ZYAFMswx0toDX3lOu1YeHhVbjFFj6
Sq+WHpzXLnr9gqyP9uUcBulP5bhcBWyt6DBiZUT2M456ATxjySL+Grgnk70y
G44L2fx9Oxy58cPSXJgrlbAgibQnZ6x5BS7kOr4thHlfFoY3wEG5RuJqku/Z
Qe5XeGJTwok2uPV0hBsT+Ujknq4dIP13vEjYCrOGfhqOkeezD14rJOub9/XS
OEwpSPH7BPOY+x4Nw4Lfd76ZoT6yZSUf2mGX+HV3Q+GEvdWvq2B6US+jDK4M
S5E5CWcZSdX2wuJZ3XN4ZHxG0rGac/HePKCFGZD+GSGnlsNvnDYf7WBiX2I2
ibnwBf0X3hnwmOYtm21zyfz6TDjBPZuN6/xgzovU0klDzPfGZTc94NVGPx4I
4aymzG5bmPJZNTYAZssZlmjBaiaFw/NgMWN92xDyEfrIjfQyMD+VGzKrYIaU
gvIteEzjmvshuDl4re8xmNl5oHQdbC33PScMFip+X6cBp3p/kdkKsyw2tXxA
ffx8ov/ygUOuRF8XwYq5d9o3kfbuvZ2dCX+TTgoPhGkvjZ/GwBkby7P4xNNY
7BCYyxkNzIbF5+c5BMPKYY1tN0n/VY+s98Oy1OMFLXBr+uSbE7CXYmXUKExX
7YmugMvy6JoqGF+AzfLHH+Ffxif85sLC6bLqdORbvnH2HkuYcnml/SaYx8ss
XWxIvg+03ny4YZptJ7ne6RcX0UPmt+KmrQHMCqbamqJ+PakPI6jk+ZkhuUGw
XUlb6TuS7/oCzUvw6DWfxDIy/vDG8NfwEwdpxSjYRbmxXn4em7JytnnZYlhw
oaFoLux6bbrTMCJryjJFa0T2ffn2QsQKr7hDNoih55YVepDrWjUsS8Rpz4IH
FRFDJmprdBAvZz+SqkY/WcynG34hhqZOU4hGpN/pOfYc8Xip4udliJL47weK
yPqwWb+disjXzYwIQeysN7/eTuogE6mwBBaXny+/DUee29cmBWeX1LUWkX1n
YfGpx2S/+Pq30hlE5m+fu7mILkpXarMRqd3n8veS+jqJVQrJPtP/h7UXoh8z
P/4Gud91tYIjIj+Q7U/aoZeymXaIos0bb3xC7DzuNM8JUXUkypbkJ5my6pcP
uW+8vpxB1vFEMyMGVry6rNmO5O/HSRWQ9Te5zd8Lfrhi3fnX8FqHHUG7yPjD
5YLJ+xV04c6iMHK/l80lH8SQl33ee0j73ocbziOW+u4a2o4oqO9c8BExZbpm
0HrEPKG/8XzU13eqqHEBqa9PtHkArB6wNlGGvLdOhR9y4fIU5zAyHl6jhkMD
PBgk6U8zIO3LXByE529wO0PGxWtf81EW827n7hvxG+tS6L/dcxrM0Te4WAZT
32/pUoTbrCT7t8ECpurEBJ5vu3vRRhN+OGZzsoOsg9Bv2k3k3NDYbiSC42Se
mRyHsx45nkuFdVcOmHvC5vp7LDzJOskyO20Eu1w5vHEOHNklFywLq4/VP+jF
OPK7dVf3knOQWaPqDTLuK/1Or+AA0fbOeJiW6K76AuYeCz/iCftbJb1shyXS
dVYsOKDphU8fLLxidkwfNlHgSEuRfZlf+04Nzn32vUMLFjcb96nDv/aaN5Fz
Yevg6k5DmGqUlMmFmZMzdtnD08RFHeRcmyw2Lt5J5oMeGHSUnEODE9g5cE7B
+gXkuzCc6ObVQuaRq/Un2ffVzbr+U8P4OjPbHMpg3hpPPW9YdJb34xLMt9wq
yoMnY0PvZsGUiprhLjJ/Mizv/fBDYQhjHuof2X1iuhs5hxhK9/nCfgLnHDq5
/zZXNR1uuaYztxvjHS6xbimHL49oLcqHxR1vnj+FJ0abBZ6kfnvbWZ2w/EaZ
nKmkPm2upW9hWVv7M3ycQ3tYIaFkH6NWVKj16JLxtzvfhbUdO8w2wHwdTvxZ
ON1Ght6og/6fujwPhZudVIQb4Id80aYVcMMsP7lhbZhqlqIEFxbHJJyFuXa0
/iaMbzji9Q0esTPL/CwsOeZuZQNTaS3fd5D1oOBXbASrZ9yr+oOsr5wJiSnc
OhR6ezZZ73f8Yzgw78V1ySTq7W7aVbUTZu5bFjxA3ostNV9zSHtOn1LIepJl
NMm9IO3t4R4dJe+b5uooVeRLtfX0VkJ7CYk7yl3gvPmudmawoKvQ/BBMi8iZ
6UP6y2BnX4MlkgOGJ2DtWvuZz+CAZpvdT2HHK3fcOmD1sIBTqhhv18fMxlbY
5WqxjBf8x0PPZ5VwFufyjHPk/VKQHEuBK2x1dUj9U+9dtLYj9RvJzdXBPq49
vbqtC/kGOBmvc4Ul6zVjwmCXWzJ/xMDRj3T6R7Twe4/B9hy4Ycr4BX+YXTc4
l3xnR3kRNyWamKfkqiPlsOzMvkRrWLzroA65frlO52KOBuqQkep/lnxn8iyv
K8CdX/UOxpLvyshd2Wh13G8Z9dsDnisyOfFzNsaZWdLOhPtzeXVHYYrW1O3k
Ozd3Rq6bFcz7Z5xRBfts1po9rIb+wzn3E+GTP7OnVKuR8+eKLhfynXnVaS6A
2YyHavqkPqy9eYWwuc1W4RjqaSKoib8O58m03XgJc2XlLJ/DkQyTBw9g8Xxn
Zxn0J1k0KHMHdl+z7rUNzH9TN+M++V6VRKbthbkDZ+Sfk/tH/nx8HWaeLdw+
Ai9avEp6EBaPH7HWIet/8l21Lsabl7/hO8mvck37pB3M9eNXp8I5TmEmHrDQ
stP9CcxW6Y/kwvQL8y1nkvoNpbRyiL0tyrlwu+ybeVrkeROBNZmfZtEyk1fo
jxrL0nsFD/9SuZQIB4QWTZ1JzlWPSxy1YWHH474V8MkZnJTzGC/FJUTeHw7j
hpeqw628Cr0DsPrEh7TEWehPtj76MCzu+SO8XxX9XagaOEQsta5/PUxZfL4x
Cm7QyUwTzcT8VqZQebC229em+bD4Xs3PpeTcJjXUeWEG6is8maACs95Fe1rC
w942T9qRb+rCv5ZIpqN9S1mXCzBPceu1OLhHN0YQBPeYPtZwhtP7WuNYMNf/
WKMRLPzSEiUPRya7cHThyBrujzbULyAocoIBZxW8M62ATfSSM1fAgseMl+T9
UA6t/LkTpq0843qCnOPmTA06B7PuDwQRR7YrXG0j/duPRuaR9aXfwFFHvnzZ
GDMRnKewMM2N5H+Yfr8Dvu6ipJQMs6S+95BzmDBwZfxVuEfh2RtHkr/bL+sG
mP5sU3wyydfJV+E5TJ21PbCBnNtowqxHMCVIV2oGmY9ijUABXEHjZ2yAla2+
DIXADyV+qZmknkMTiQYzSJ2Mdj6DfX4ujq1GvhXv8sdlca6+zD819U84IN9+
kym8Juar8SMaxl/tY7YadhcUxyyBzbnFkV6whHfyT44K2jPjt24kfzdYvVum
Mg3j5c8KdyfX72pJvVZG/We9pyyHk8uWl5Qr4XzbJV2ma0TOIWtaChWxf3iO
L/qKfNh2AvMrU9B/wu7smv/P/+xl7VQ8f/U6+yiT7Bv1UhZw5IamWx6wgJXX
JFRAvyGnr9DJ/cvrLDYS8/i1/ahPctqBG1bETq/4d2Dazb1qLJjpF2mQBVMP
3rPnweY1b3P2k3peNEoXwGObnEN2kvVUrjM8Bf3Rp6gWbSPtvUxZGQ0LdI7c
/pv4rHvVN5i5MP7fOGK/a/NCkL/jqvuSApj+1tOnA354P0NDQtrfoFeyFOOl
CIZ65ZCvi/uwRQwZv4nYwZ68H1cnmGdhyUtxayK5nhFgmwFHVt7UqIcp6Ym1
fvCYmulmGvm7yf5ZtzzMj9qk4Eb+btJyKYpGf+KgpQfTYa4x40sd8mNVaEbX
GpF5Pp/cj/HRXLW/fyHXe/bWD8mjvRyKpyr+rqX8JXW4VQ55Us8cNIJby78J
S2VhsWaLBZw+2vRznwzmybpwlSnMMss8tVIav98x4qYNSyz6ijSl2JT//8DD
5P/jfi//H45/8rs=
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], {11.629830742092786`, 9.945389222627837}, \
{-1, 0}], LineBox[CompressedData["
1:eJxFlgtUjGkYx0dhLqm+mXaGQqYLfd/nUhullDyVZZcZXVxLpTTaIo2VEjo1
VDaX1CBNIqLIraYLIiGXtstErTZKLSJNttSZXXawat85a1/fOXPm/M5zvvd7
n+d9nv//tVgr9V2nx2Aw0tBP9//fQ0PqwDB6LIChnWtX40AD0Zf91Pw24sHD
YyKDaLDcFjlQG4s4ONP57FYaZnVaf2ibgrji0V0DGQ0XG5v/2P9ICIy4oNNC
FM81NlsqliHWCg+EBdIgmBirTbFDvKnkivcsGsI+35vy7MEkYMDi57ZDFMS7
ns2+54VYbfCeuElB8kP5ej+1OTCcfmHKt1Lw7lrpp1c5iOPu25ybQYFbQlgh
FYk4vMU0poeEm4G8yMV+iBVlRtoCEo7u6nzZGKKLP73TtZEEadqYmnO7ELMi
PIM8SMiuzsqKu6pbv3rV75NJaG9xIMs/ItbyySFTEiR7y2H0ArQfVgE7YhIJ
xjGlo/MPIg5PfdHkQILIp2qwuA1xk9NuzWoS+hrqQpdwUH63l787m07CAsqa
W2OO2GmJN/MBCVa71SnNNrq4Z9d+Ewr2RL4aXWilq49/sziAAlOzoRXzuIgZ
B07a5VOgMmRvvfxcVx/+UrKHAgVrTtuEJMSylR1RFjTYq6ISosYgvj1XXulF
wz/yu8ONMrT/J257NktpsLgVap/WPREYQk/P+gQazprNC38GiCv6o7rjaVAY
T9ImZk9A+Xxe9yyCBlHUSFOf9+NRPmfy6hfQML22d582ELGQ9sjj05A+baAo
sdUM1XdUKtlGgdeykNB/JIiD89prD1MgUM9SLjREXJh8PEBEQZQo1rOm2RQY
ZGW2Vp+CCuZezXdliIOPTCy5RcKtLAmlUSJWzrZek0RCR0dZ/5paxN5Fv4X7
kuDPrqtRvkM8Tl+WYYvOc5ujvH4mWl/NU6kmkLB+cOK4vHjEyqcbpo0ngUsr
lqTVISY2tNfQJAj72XDJBO3f25lduYgEfr6Rz8JliE+OMHLdht4vEbpMTUHM
WG12oYwEjrJcbJCHOEO1oOo9CS3Xwt/WnkY8mEFccKPAehTBVu5FrF7WGfYz
BR/1cvi5uvVW/br5sYqCseKDiTw9xMQngYkBDXWOBTKbTLQfp8v6Cjd0Hi5b
HkVzEaemDydIaJgfa61p3YHyi5vqXrCdBmlIZL19+zhUr2JoSET1V0OnYCZi
9ZLrZ6Jp2M0LORSSNhYY37/sfL2CBpcdAvPOAQHqTzMpPZWGb8+MiO8MRhze
KlFrKNjf5UJ1d/PR+j/4iUooWNcuzVuehJigVKz1FEQrptnauSJ+srDBwoKC
O/POZb3hItYG6Je1k3CP08TzH4m4sCe+/CgJx5Psqi7r4t7GAdUSEl4YHgtS
OiIenN750oUEX06vcWEU4qYR8RGWJKjWSo17yxALC6qq0TzFvNHpy9f4sFXG
oEAkwO8r6gWDK+UCvH5vXGieV50Af1/s89Bj0VsB3h8z3ra/4JMA798mc0U4
Xxf/kt9W10dND+8KcP4pH9ODzsd/rU+g5m6rmdnX+l2bMZRkeYKP61vk1/vC
kuDj+kvu5Ebmbv4Gn8+NvpuWvSoTfH7+kw85NE42wedbEPTUkErm4fMvXLxv
2v63XNwfwlz/xCfrubh/Sp03yvo/E7i/Bpolb0IuELj/zuwceO8VQ+D+5I/P
4s4OIHD/VrcuKv0riMD9LbN6dq9lO4H7/0rXYFGFbr0v81Hf8+6Wbx+B56ft
/I8lmx25eL5kr170BCVx8fx5r66LclBx8XxmNDg6e3F4eH6NtIt5J2fz8HxP
nZvTaujFw/Nv3xhjeF3Ew/oQMGfPDecZPKwfLX31XhUaLtaXHfa5x/RzuFh/
/AsJHxnFxfp07CZ/C/MUgfXreNin10VsAuvb2re3jRmNRlj/UrbstHVPMMT6
6J0+O6d71hisn20pcQzJEAfr64wYC32rHjbW39OKfeKaDyyszy4H+rmZbiys
31J3Zr5eJRPre/HfG1+t+YmJ9X+hPFB9LZiJ/aFqpLSyJ5mJ/WPy9iebalqZ
2F9cmCnmJ0Us7D9xVkc1V9tZ2J84mUcS/oxmY//qCj1UnMXhYH87NaWpyUjO
wf53RdMdffEjB/vjifz5ThJXA+yf43zbbSLEBthfV16yL75oY4D993x2Nsux
loP9uYHTQYttOdi/jx1WqmKD2djfmcUxpe5rWdj/4xxszNVzmfh+ELAhq6x+
aBS+P1hHV3irSkbi+4WeQ+R4hUQf3z9E98UeHdZ6+H6S+SFLnjzMgP/vL+GP
dfoyPO9fjGhiiw==
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], {13.9452, 5.5}, {-1, 0}], 
       {PointSize[0.04], PointBox[{13., 2.}], PointBox[{8.5, 17.}], 
        PointBox[{13., 9.}]}, InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox[
            RowBox[{"C1", " ", "N23", " ", "T23"}],
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->6.137505285412264],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          6.137505285412264]& ], {10., -0.5}, {0, -1}]},
      AspectRatio->1,
      PlotRange->{{-1, 21}, {-1, 21}}], {44, 44}, {0, 0}, {22, 22}], 
    InsetBox[
     GraphicsBox[
      {Thickness[0.005], LineBox[CompressedData["
1:eJwd1glYjGsbB/CH0qZljCVLm6S0MdoQ9b4qx+Sopogsh05Hn1CKSnRCiFTU
pLJlmTqVIk4qRGJKEpUWWyVEvgwlI9NGy/d/vrmurvf6Xff73M/9f973mmm6
T6CH72hCSBH+6JU0juAzhSUcCiOWnNY6ELMJ9rI7/0aRera0pnoyS/qNgqRa
MGf3WE97mF1+ZTQDH12jMv+eJks6C9wdA+D5V4s/CmD2ZK9bFixRTpcMTGKJ
ksJvSyTU2kcqiuH+H8IXvFksmbU6vPEUHDXoumkvnO1xk4mHcxe5zKyC+3+p
tJ2HO09MtNc0Zknk9VER5XCEy8inDTC7Wjl/GNaK9ki8CNfZ+Tvwsb9WXvev
l3C/8lzLc7Bsq76XnAlLKvceUe+BxQnT186A51vLZrggT2f2P842sKRmSfWF
yTTHf1QWwbNujrn6Efa7fkjbGvYL9OmfgvOp/rklVR/mTYnKsoX9HKoNFeAg
YVamIxwlr9X0ns6Tc2fYgjrub+MiWO9VU6ciLNjuXhsHSy6EtJeh/1HflrSN
MMf96Slfur/9sl02MC9WsbYb83oltw9x4bwFmWu3w+vVezL7cD6RcjNaWpB/
t9qt8Hb4dNw1oSM9P40+9ffw7icXuNkTWSLStN8igedHJU7iwE71SX2D1LYu
RgcmoE7Wx+rQ8xxJ/ovAdUXxq5bDJFN+8YnxuK+dNxJF539fu8oW7uxNzayA
RR2tFr+4LDGQbxhRR36pzeqFL+Hy48+C18Fe0obzVbDZuDybHDivY6VLM73f
+W1AD7VttTpBP9FjF3c7U/Q3LE5aAGuZpS7fB59+XJh2EJbtb9a+CftNe+30
kjrrqPQDPOv1qLFzMC/fwydYzgz9WgqcouFzy7Qkk2CxKde5CebcWGymDfPr
fG7rIr938dM7tF6palzqCQsTQrLk4aKYJ25hsJl11TEJ+ovkuc4HYE6x8qFy
mGfocnkHvOi+ydBZU/pe/56+FI46k5m3HQ5aqp0qR8/bbUqIA0wCjKwvYX+D
0du0p8B5GrcsrWHZjM6NNL+Xpur668ijdFortwmeXLmGr0fzV8ZwK2ElpSZe
NM7L/66haRmc/TX8asc4loR8dRz9mL6vn/WDV8Csr4rqG1qPO6xRzsF+fRq6
w3Dd5qYsB9g7bMkuU+wv2PPR/5IG6t+N7vwFR35Yeq9HHX2GKziZNF9US3Ao
LM1rtfwKszZdO4xhUaHKsQU4n7qOY2ZcuHBqhls0taVBujlMBrQznsGcVzuD
w2CBh5p4mjnWn36g+RleHxqo+gfM29hrEo79Z5UlOabAZGWzHwfzRSnaHiuD
8+4mam6Bhdz0hDZYtGZZcCmt7zoc0wdP9k2pH4+8gxZ27sN0/ZvjtWvhvGVZ
6/qphfonEuGihms32uH5TcqkECb7qvuewEE/r3TfgxundVtcgove3V2XB3NU
Pr3aC3M4D/+IhiecNDzrDgucQlc5weWX0t1mwvxA52YJ5ml0/vL0F/KKFP5N
C4MLh5bWvIKF43XqJchntdL/XjHM6u099Aj5M2SGt3JgvSkN4hQ1um/cyn9g
7/Dhgg2qeJ5jrmXTeuthnUfmY/HcL74wL4EFvQ7T1FXQz7lK/AYO8kuQU1Fm
SYtlRLoKzVsrjTFRQr25LdKBzm9gLhemiPe+pO7IIZr371W3ZAqYM+3Rjiqa
Z2JRehZceGEkV3M29t83x+M47H/EKsgXrqtPbaF1lv+u9TosEFwf6IKVDi+1
+knv79W13oj+QYde1S2cg3kNcxZ+g8tvGQSEwN4XYu1TMI8g3dY0HRavPuv3
G+Y1OPrh2gNqo3Mb++DBwLfmjXT99sqqc8jnNeS55x3M9s19Z4r81Z3ypBkO
Wlb88ixswB/3uJLWTc5sfw+Luio2X6X1KpnTAJyb/0QSAwuaJhq+hYl55m1v
up/zUft4OORtZZwVLNSW8FRgPZMAKyVYquim7on9+0+VxL5FPvHzkrkhmI9t
ly65Q8+Db00CkefjjZaW83BkW5jQFXknqMX4xcF6W4X22jgfg4Uz4qLo+noT
Xrs8rsf/Xh8Lsw8O1hbK4ftket96up73a5pj8mg8//7EwBLa/8FFSfwovN86
C15/hqUtE5uuEpbIF/qvmI759Ir290tHGCJ7WKboAxPjFd6SYYZwQhNv59Dz
3qrL5cMkrORlD/UH6zXjaN3Bpno6D+fLuCaz8KSdk7h8mL3/0bsGbh8jt9qf
WufPkcvoT8q/Lj8Oc5RyQzdhf9fXzjU5sNTOt04Z83W5P2oXw0Lfk2V34BOl
JyT1sGDwsmwb8mQ4J21tgcUdhqpc5LU54OTRCvOem1mmwxHp3c/e0Lpdwxku
zsfBcVnQC+pO2461sEmhV9cj6mcK10PgwVgnj5t0f+MdonWwbZ9ZfRrszY+p
UYNbd4nL4ui8qfplcejfXWGTGErnGdkS1oh5QiwCsr1p/n/9LQZG0d+Rrk2u
tP/MeUt6kK9cvUCOhfX43duvIP+grWeSDRx5NPKG8xBDDO+GfLLg0e/vcxde
/2RIdc2LeGu6Xlc4HNZP7y+qtqfz3HxnZt3LEK/+gpT/9+dFDxjJGCIwXizc
RPs9DC306WbwHP47OZLW5Vo9ZFKGZLg+cxbROtduT+03huj8mTGmnNbD3icd
6WLItfxL8l+o+4O+ceDedNOPnLmY50XQlc2wTKw0bx4sbhNsDMf6CNeck+vg
1jSrb6fQ/9yH0oIIWpe65xd8Z4hH8g/fM7Ru0qY+hHkajM7fzoMjd8SFb8C8
jaE2v0phvXUtv5f2MCTq8rX71fR+/dZK9T6GWGVs+VxHPc7HZi7y+yik5TyF
vV+4vZ4wwJAvqZP3VcBsrHZnNnw6YLHpbVr3s17RCp8IHldwia5fou2SD29S
G+In0Tx7VeunwgcvpjnuhUWrxpdORf94h2rVzXT9/pR3t3C+sRqpHA+6fl5y
7CDmbfU8mMvQ9dt+Mn3IE+RPdOfS+0/mSm8jP+d+2W4jOk/ls5X5nQwpS/6a
MIO64pvTy08MaU7R6Z1J89tprFFrQ//otO+zab8ScbbSG4YcOzgr3J66rGH4
8XPk7Zi9YCX1D//ngiqG7Dw5Oj6QmpvleeA+Q7hvHVISqBvxj3IuQ/LHRlgW
UItkIbsSGGK/1Fu/iZp+RCVEgV4t2P8BNpE/3g==
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], {4.236190257669732, 15.736190257669733`}, \
{-1, -1}], LineBox[CompressedData["
1:eJwl1ws0lFsbB/C3mpAQ5R4ZIeSSCpWDmRyVlIw4NYlSkul2TJoQTsklJJeE
ppJbbqeQS6JymSSXkvioJEknhUhIGtLx/ff3Wcua9Vuz593P89+PPYv6fq/t
HrMpihrEL3mlembwo8WkhOR1JZN6wtr2+SXcEWsQ8RaO6Q2mMmBqmeGPKvi8
xa7H+2HOnhvJWTA3x8ZyMcyav+xcPJw79en1M00m1SQ5fPwc3NAi7/AX3PHO
8/FZWFE9IlQfPmC+IiIU3vEPk92twaQC+QXuMbC88XRMItxlxslJIesDjHKc
YP3kYoc7MCvf94Eq7Lf5lEozLDs84Dm2lEklX3SL/gwrFz8obYPz9p4RE1uF
vpTVpWpgid6HvZqwspSKSSVceGcsiAEb2/hsrYVre/ayd8AdDg+7X8Dl/vLy
HNi/uWX0KyyQeph1AmZqP1aTxv5Nfo7r/WCVW4dKV8O9C1/5n4RtRz3ad8Lm
Vm/WH4GDhy5ePgXrXNrQu4vsPyd9TRLpV81X3Ap+KeVkeAsWiAoLSH3TSbwd
d+HCIwsXzoHFxGmixELB5N/d6M/FeqPO3yQP1U3S92Bqe/L6WHi6486XS7Cb
05kzHJi7SvkjF7ZdZ19kAqdpFp12IE6TZgjRT79MvuwaeHnBNYVi+I6VYs1S
eOqKKt8D5nJbneTg4gsaf8rB0zPOvy+AA1/cPFmrjrx1f2VLw2uFvQkn4QsB
YWZKZD70Ai7rwRLXS1x1YD9ZjfkDdCal+Ulb1QLm3dqgVghnrvGy3EHOW2R7
ZDB8wfGSvTdstEPZax/M3Hf4Xizsc38r2w5OO1vZlgdfdarW3ggfldk0VQ/3
/vqgsgUeTz6d/g7e+Jj11hnOVdA7PEb6MesNOwEfOPtoFZnvbZy8mnjYZfKh
1lzke3B831ApTBtdXUvyjvCZvbwTbmqbNTSF9Xu6ehKmYV5RymsyX0kJ7q7K
6M/oirhWOxwakDpsBPuF2N0vg+uKJBZYwrXjjc+S4CVzy6YZcLvGzybSHys4
NMSE5PNw71Y72CbKV2IJzLXz+aZNzvP88qxJ7Nf/Z4MnDT79SWumAY64LbW2
1wjnt0rRMxreOsJraIAtL+y9YwPrp08yS+B2/iH3KTXMzer605kwLZtJ7YZV
zq2fdx0urHQYLF+CvPW2zyem6dSNKcHJp20cyHq3pY6VIaqoP5qzpRhumkgN
/qnCpPgeYnJ1sHWCQWMYTA9/f6Ybpk/QDJbBcTRRjSmyfmrWqneLcV7xNUcV
UH9F5bRGMSxU8rlrDNfmuYukwtPPw3axSL+9sgmZMPfF+loOuU9afO0FcLJ3
XXQgWX9JPGOYfN7sVfh5+ACvbZ4e9ksWbXt2ERZo+G7nwpyQOS3EOonqr8rh
QO17zmR9efRM47+wTulrfgDcc1Pwlzn6O9ApkDm4ktwbZ/KPwrnvojNs4fH+
s9XnYTZ99YnlZL/I4Jl42E/Q2icCX5jJeBYMd4wpx75Hvw1PCqvZcE93olQF
3HJXoUQW5g0/kuTDW58mN5dh/45CPXVfOG7syQlrFTJfjnedYT9OI70K/dl8
uDXLmpzHv0rWuiQPus3X1TDHlkuLUsb5/1qpoAd30Q/P9Cvhedz3pbqwk4fH
7M0wL9Hy7xXw+NSkoFAR6y87eJvD0roVF7QUyVxF/WYPG214I5OngDnxYX84
CGduGltsA5un8MSDST25Pzym5ZHXcnutVFgzPM/3CVw+fD2W9Of2lhFfDHfI
LU/vgI92K+WXwCPLmmtGYX2lH8FP4bUB14JJXvSKvIIJeHxSO5vcJ0Feui+N
sJ+xq4rZEjL/7vHveXCggmWKGsw0ffRbJWwU5BJN7pPAKkqJhvoLf1XQJeA0
SzfB7/DRD53NP7Cfi4ZVuw/xm/Meb0n/FbZJfNh8ftNMJUzRAjWyYFZ7/Y+r
sGKWT9YVuPZA0YuTsFj8cR8enNDnas4i82yrZmoCc0Wj2knehTTf5i7U42TR
uUYcnhbX5ByDKWf5e69XYD50DOw/oz/6+8G5N+H2Q4aNO0l+hm5bwmHaY9N3
9+UwJ2W2nd6wiqVQVQl2EwRvOwabS/Ds/WSRu51OuA9s8yJlZfci5BBmnRsN
d7mnGrBgse48rSKYs8JqUdtC5CuT+rKbPG+LSNdheDwhRozUJ4ys91OGC91f
fVwG84uD8z7IoJ7WL/vIfJXvFZ+oI37+oM2N5FPzOPIRnBnpnOpP5sOnfvcr
uF+HZxsHB449WDcDr5WcjkmDefUHv5ni+X6BrCM34TS1gthTcFrMpGE+uX9+
S4x6CFPiB0Jy4X6TefR5qD/ivi43GTafkIiyhVUUi5wjSf68bHYQbE3TncWF
2apjOVlwqCr9uAM5j4ujnLuwUYXhlCH5+zooEncbTt7vokr61ZG5YB4L21zT
Gm9AHrLt2S1OcFqJ2okzcMd3xUmKWL70mxks7LuXmYj6gi5Gef9riM/VTw3K
wcKnYuFNsIt8wUAY+uVkBFrlwA2tc8I/S+M8xIbl4mC383YWm+GRWy+rw+G0
74x0+wV4X7LUKgaO0A+VVJTC/OQO9WbA1BnpigkJvLZ9X1cL0xf4xH6fj/vi
Ocd4BO5/NfEfFVjMboahifrKaQGt3uJYF2W135Wc987esJ/zML9vNrnxYaOB
Ak45bKN2va8VXjvq7JoL6+xY4TKH3C9DEYJ6sr7QqE/JiNyni5Kk8byWRyW/
k3lWTO1p94fZ+yz3m5K83W80TcNCp0PBZnBP2cW0KNQTJ+9hvobknzDWshj1
sw+rnNMn8yRd3ZQOG/8sKVEm8+KlHrpQEt9nWW4nZpP7wSBh3B3mr4+PbER9
9KLinGg4brOgIwyOu85bEgn3KxbUmcMjcqEa22HB8f7IUeQhrLpC9eH5LT3e
PJK/9Lq1CTZwz4eyxn3kPE4VbfRHfYWMlYkacG7CTPdZ1J/Gbg/5aoA82uPX
eaL/Fp5eTT1MNd/pXS2G9fmNPflww2WvnDER1NXlI8iA2X9MCgvmYv+fUuHZ
cNotjhePhvpXZFwvh+OmevW3zUGf676UvSLP67m8feNs1JP3tHcWOb/K3UEe
s1DnzrZsY1gnKsizmML+TT2LjsFixyR9VsIC3blTpB/BLleLxhkGFfSWEvsH
jhvQDkqC6edsfyiQfBwGdtXCNq7RpRthP2nHdg18vj/9YtQRmPKdCY+AhVsy
GKGwomn3W5FZ5HuvYmUs7MZX106A2XxNbhQcYXDphybqHbnm/MiPzI+oxd18
uL/qdeFO4ritRhqkP/ZfPF2Y/2lwWQDckdYz8pXUe1WyNQ+mHzt9OR9uYVXZ
FsGUevVmD0Myf35DIfBIQqCxMsyV1T23FBZ73pjz3IDM3xf/aOzH6v45FEHy
HjCrqEd9aW6iqpvhiEMJmS/Rj99qq8mFsOC0r2cI+qdu+Df06yNnvuNezV8M
yi9liVkTnMaX25M1hXzu9rCqYBZXdZmqkEFF3Bv4o5q4kzOc8Z1BcTzXvWgm
n/c8ZG73jUHpGB24MQiPBOTVGY3ifUuPoUXYL6hpsKtqmEGt7Wyw3UBsEn+/
eRDP85z3KZDMwxbtG5kDDEpMJCWpDGaK39xo28+gFKtGJcfIPPiUSFb3Maj+
UhtKl9wPXGV1IUzxg7btIn//wy7ferBe2vaaQRCx8r/WLp8ZFNtEzfYauT8e
TyRtGGJQaYzoj7lwUGuf0Bv1tMT5DpF5cVu1OGb3CIMaua5O45P8bw80HEf9
Dcq/Yk6R+ZHQjfIYY1As6ac5duS8aCl96uiXX5uySB5mKt8oSIA5gSf0XqBe
+udEp9swq55bFQ0bfTS46Qnb5P8xbEXmPeGKazmex17xTFSIvIKkpizSsZ/w
cAa7kORn+t5CG/UUCj7O9SL5pu85lIv6mRZyvaaw4Gbzo6OkX4P1juL65Pvc
9nj1B3ze+Rt9UA/vs66OXHqLvBJ3HO+Eg+ru/OPdhnpMBIUdxCbihqM1OC8Z
x5iP8P9+siv///+pHvO/2Zdm6g==
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], \
{4.7310781080549145`, 17.509735202848983`}, {0, -1}], LineBox[CompressedData["

1:eJwl1wlYjGsbB/C3hOFUpiKlbaLoHNugUqdlJhWptKiUfU5FZWtOyykJE8ko
OYMPZR0VIhQ6TEnG1r6qiCxja7EOlfoSvv99vq6L9/pd77zPc9/3e8/zPGMa
HLlwlSrDMB/xj64Mm/4z5zPKn/jT4jPyxteGl834jA9nsp8C1pM0jQiG+Tft
37XBJf7vj2vDDaXlo3rg1k/W58sm8Blh6I0zFtp8pjDz1QMRzHHM/j0eFqw4
Gu8Myx+WqipgVvimbWxYumnRqGU6eN5bY1XXeD7DXbkytgPmTBT/qIMZb97u
xNF8JnekjuQWzG+6PGvMGD6TfCOrWE7ujjPJg2Ny9m6vhpX1uuY2unxGYl4s
UNDzIcPFV+GGgM0e3+m+nZhvOpbPFGypemSC+RWt121jYJHy81JXWDlOM/k8
PLj3/vc1lI9mzMYKWLGyoisdbnhW1lgOl5w9vzYPFjx0PJ0H24+30b5F+Sa+
CvkLFvf8VlsDi3oPXZgMj/5YNqyW7ltaTW9APP4b/7gmhwuutIVEwDH9BlFn
qD77XBZ+Rz7268zXJFF8qwPm7IND57sIvWn+U+mR0+DClLJObZr/zC8lD1Ef
Qa5fcS3yk89XhO2HzeJirLfBAqdZDavI9Z8HZ8INVYttF8JTHq1te2kKOyec
XgIPdhSd+w8sKcqXb4Uty0one9D9Z4o6OaxuFfqGBUvn5ZcaYP4ex+ChDRzk
t5TtmA43b/R3zYJ9Ivxes5GPmsWaFhFcsD0z/CR8VyZbsA7mlhm9skE9PDXa
T4fCUoNJuo1wzrfk3yNgzhTj6yF6GM/RpDqePG9Uw1s4XH/X/r00nknbC4E+
5nkgX3aJ5t+6zfsWfFTskdkCN4R4bWeNg8tKkr/BCkcdE0tYUPvKlYP4uYvW
6zvD/pr9Wk6UryS9ygr2GarjvZRc19+hAVsOLChcBystN0TWYfzd6X2romHR
0f6kTTDHaIf6Bphf/IU7Dm5mzN/Q88ofUbwCxBtqaF5tD7NjJrQ5wy6Himy1
YKa/27sN+eYma8x9jPgE6gHFidQ/Qe17Mym/huvXp8IuZ7bM9oUlzTpW3aif
OF2SP4QsSBjZSH56YlWYCfJzntJdSS4/zK0wpr7uD3wOc4fcDp0OCy8/cNLC
ePzRxwKzjBBPTvziFbCwP7vWHFboP+m7Q/09EHjzhiHqZ8ie54h4JbcsLdbD
bO+MPytgPdfWF1awT5jZs2XIl239a7oerMgoiumFuWoHU0fDysl9XWmoX39L
tYoFLBQ0q48zwPOhO/q94YKwsTqH4davi+LENP6KFsUwXKVjCoprcOUUiOct
w5V1r3D9WMQnDb9ie4ieGzr2fTCsDJAo/4HdrO7sPAtLtFVVZbDcckj9G7gh
8NKq4zC39mq9NvJn/2UQsRa2MQn1n0L1mWa2fzwc3zlNj+rDPbIrvgLxiM5b
fdKDOb5+24NhRUXwi06qV/HX/K/UH36rrU/A8voIZ8qPu8slyoHmf1+4eSJs
cyRrThnFobzpSf3Cb7i23AGWrBs9REz18UjwP4NxJY+MdINg0Sb7JSNo3ozR
HU5wkFa0WgSNe8E+cx45qWRoDa6SlMS+CFxl9ls6ZpMj9q3Jpf4/uvneJbwX
bvofjAqek829rUnvzWf34HYhnCGt81LgvTLNzqe+wMqmJpUjtM6NmTZtG+Wn
/BEbSevgz0nO+vQeTy65vpz6ICUy7xLl4aSeHQqzz703cqW6mvTWJsHK8Pt7
amHWCtWqS3TfZX6CK+omc5fbK+n+tl0WubBP3Hh9G+qjK4adn+F+ScfT7bDo
QJwdB31rYXzwUS3F+7CobwZsc7hKyEZegkV6fpPo/vjokLlUp1H8lypweGqW
xlpY+K4x+S7NZ90mTaA+HNfpFA1n6I/yi6LPH1yiq0PveaxWkg99T1dbXKM+
6Sytuz0aVhz77k7vjRMXpLyJ+QUG9sbN1LfRG8f6w9IBbkAM9YvhyuBmql/G
bOkEWNa1U+lC+UZF97bTe5zTln0O3zN52A6/29TPc1a8HgmzVWdKZLCgdP3y
tVgXCz4vsaqG46ddvdZI6/SLwfUDsPinu58zLM0xVHPF+BXxDkPvYd/zWXkj
MhfOSOpsWwIr0iZ+5SDegrym98Nhvl7fQ8pHNCdzWh32UeZldZoD9XncacFF
uEGUo/oArpiiopoLK0yKvqxD/YK+JgcWwZIaM/NBE/pezE96TvtywsIXjlhX
2FUWx3UxPtfu6YK/4Fa3i98Ww9JPQZa0rjNZhj45sCTI8accruCXfvsEs2o6
ihthvtlir9nIh5Pka9oMs2TramNg7tiEYxWw+OWDuGyYfd52bgGt2/eODbkJ
i43rG3bTujbmtfZdmLW0cpOA1v32hOUFsKzFp3sqHM9m126j5928BErEL/I8
lmpH9WR1nkqG+RV/DrbRueHe/G/GsPDeh8LVFH9l3OJ7qEfQ33cXUr7Cp61m
m+HcKg9/d1jalfnWndZJ85/Pz+McI9gTbTETlox9k6wOSyrFplawWKO9dwMb
8w5G3/aHBXE1KVdGYV5l2wEJLN/Mnpqjiff0w6iqndaVF80vZRr4vHv5PH/E
w6h2fOxXx3NDyh82U7wRpaIIWJovz5uB/JS+G4QasPCayWAi7Qu9KQZvfkEf
Poh1rqR94echwUc4PmLhMh3aV1JSi8zweXHy7/ZBcMGMtOgkmNtorX+A7n+t
VxmE9ca57C6nfY9jG5aKeFrXfL/4ARYeuXLJFPEyN7VmDcO5gN0VlnQV5taH
RLHp3ODHPeCA/IS6GnHqdI46Kgk4D+favhgYwPOCtMTA/8L9VXErnsJuuj7h
mqgP/+NvGf/AFuXlm1iw4NgTgxSaL83O4z4+3xp/ocSX4ntsW7oStnk+LtUA
5pRX3inWpPcz81w79dPNbocOxCvLK5h5lfb1ruML3iEfztCXqul0zoh7O6we
9WidMEW6nvpldKTG0ZGo5+N23SW079+yNlo+Av1UqfnCj+77WqQYsTB+yvDm
pTR+j4e0cxje20Jv3ShYeOAMr3Io8snJNjpI4/vHTatUQ/1SL/xTRv0ptilU
DsF951eaqrTPT105fS7MMuxodqVzwJPTZbWq1G9eHn9TvSfVWO2CZdmRkW20
79dNksXR/bfpRpNQT86CWdoHYXxgdiTVt2Rr0TOYdVJRXQCLVk3Xd8f44vPD
bOlczAnP+lQHc4tfeenSOTW5Xh6sRvvAoghrOhfevxM4ACu27Et2g5nUEb6p
yIebc3q+JyyZMf/McOQre52vPYfOmeeW24XDepai9t/onBvo6ZtNvvl5LYvO
qV0Gg5eG0bqR1PKEztkPA6P/hhW63LJzFK/Q1MsWZnV/4MbCwsReaT7my6i3
tORR/1heHexBPPEft3b/Aks01Lw1YWmCWPiM+mHnmlOqyMfisunqIqrPCK8H
j1XQDw6iiSdgn+AanZMM1u2N6Vv2Un9cz2mT/+AxAvuzJ8j8wc/73AZ5DKP+
gS2FFXXJuZ/+y2OUemdyS2C5l1pPVR/ui5fvaafxU20q3vfyGL1fnVwNEY/i
7ml2aA+PCVqyp3Qp5dNil2nXzWOk9f1RWZQv97144xceI/vQkfSB8uEXjzGB
uSdUWmzpXN9UE2sBi9Z6zk2mc3iph2Y6LCnSKq8ku5Y85WE81kjpjuH4nSS9
eM2Qi/ksBsax7eh3lNpsDXfEww3Ni6LfVdLLwo9xX3lMhf4R70S6n7ttRDbi
Z1XMVO6ERdVfKgv7eYxb364FO8gJW5sPId/w9U/YsTDndr2m7QCPyW0UpAWZ
0b7hlSaGOdZDT88gP25akAArjR9XqpIts54Pg7m9Xrfr6HeY08G8yRhPPDn/
cAbFPzjG+B3ml7JT40P+/R03a6cn4lNsaomZSf2zIlK+FPlwA/JiqV8UNn8d
/rceuQkjO6meO6/O2v0J8Zav9mwiZyTp7X+L/KOX3qXfaXzbeNX9bxDfLt2g
+3Q/yzusSIHnz2rxOsgBK++EtPKYgt7mnyOo3p39U9waeIy8vymW6s/UGk4p
v416zdj9PJoc9N3eP5/HdB6z7rlKpj+Rw/+vZvz/AQikT1A=
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], {5.6892157380087545`, 8.638320954380351}, \
{-1, -1}], LineBox[CompressedData["
1:eJwt1wk8lFsfB/DHki0xjV2lsVTK0pDbbeW5ZCnFZInIDeVToZo2RGmUtCiG
qxqKhORGGjeFCpOydInpJlGWsSS3BXEr3OT9nfd9fT48n6/znHP+//95nnNm
9AP3ugVJUxT1Er/kSjHJn3k09d8fJk2FRPp0PzSiKeFqavPtmTQlkPFyPwBT
OaZqYXDUNknBPJhDr1nkBdd1NR1qMaQpOthkqwf8s8MfTqdhcc24wR64U+7W
ndUwO+lOUjb8Yf03nXED9Lf6dGQEtjD3uPSQeKLtpBfm15vq6T8D81wS7Bvh
wx37XQJhkW9KzEY1mroTykl0IL7+a/AbmDXHrmMpzOUWSoLUacrFfl67JRnv
g7DiPZziuSRnOUxJdulv16ApH5POhrWw0GaqsAEOfZlxNABmeWW0zNVEPFHS
sdFkfoqS94Hf/ujfnQFLlkq1RcD6GrdzK2BGhbtpFBy6eebFdjLemWGrAFi3
nVn5BWaH5EeYwmp3H3TIk/r0y5Z3YT4nd0PpmTBfQa0/GtaSJN1QJdZQrlOB
2QVZNdIwLyj9UwqJXzmx+28y3u8VnlqwX4aKUjWJ77SW6RXkb+8XJ0kh+SW6
HFsIxzclnvMhjiwae4L63ZO2uK1F4mNcEhyAz57e5dqoT1P+27Mil8MTkd8f
8WDavShHB2ZfF5y3gPn3RT0a8CAvf30vC/0HDxWZw//UOSYIYLGUy7Jt8OmY
30rcSbtbqXsR/EnJ5J0mzPktu1AD8WxvyiipnYv7nzm/j4eby2dXhsPsa7v/
UkE+deP3uTYwq33PZQEs7VW5ei7MrbywwBD1SI6PC9eEaWV1Th7caXvbyxAW
hR01N0B9dyZu1LCDKadV2+LhNaFr5PaT8VQeeHbByzi9f+bDmUfsQ3S1aKqw
0un4BxJPwkzLFfBHY0dpEi/Xf2/0avhtjBnDCpaEP44wgm/Uc0M3wNS9nMvD
GG+q6a54K8z2tsrKgV8nvFy7i7TnH9+xBp7tOc91J+l/4GRpM+Jd7lTX7AvT
e6p1fcnzl7rY247US2rv2Q7kq9q1pF+P9HdoswyEhTe/W3WS/B60Gg2hXoL5
SexgWJK2QeUs/DotabxPD+NpuH79Gf4har3kBovG5khNov4Ks88LS+bQ1LBT
gXU7bJ123UUH5qkqxr2Cw9YW5B6Zjef3QtDWIXK/c2Jr/yyMX3p/0gDjFSft
+GMLzPbwceLCthkzw3t04ZUToy9g43SH/ChYHDnj5lrEaxB68cMimB95YVUD
ef+Slj37rANXTPV6Il9jF+N6MSxhmMVKYKP6ULqWtO/b9SUI9Qp8KN77Auat
/bRBAj/kFAhGYO6iSON1qH/cyjotfYwv1Krry4BlQ8XJPvCwe1Xna7hltatp
GsyNotL+hb2PPyl/DWfOO9Q1BesuNNTQQj6i7qH6d7CCYqvlOpi/p7qxGDaW
DTu5FxYaFwp2wcWdNqwTMK14419FOMVq2vsYUh+uR3ka4qtyMqzaBXOV5X/V
hy2rh1KXE/cpvcpGfgdD/WI+k3o94bgbwy2fbXOTSfyi6rfFqI95vrPDXNJ+
qo52hdd/X5aShnyFE3r7v5P11ryTpACzFFNzRbBbHLdrtzbGn2E5lgEL+4ZO
NiEuXrns2lTYmuVdZglz9zWYCmEPpsvlK4hLlEP19MBxtbmTM+FhxQ6fxZjP
48IL40uIi2a/90yGJ2JK8xbDkt3dsfK4tqZxDDrxf5bFLNEZeHCDrlUOzGbo
r1Ej42Q9CTwOS/pOfE2HOUdl1CJgKqOy0BBxyN17wT8Bc9g1x8h6Kdm+Mswi
jnz8QwF5WG94uVgM03bPTvwKnz3WtlVRg5wHUQGX4UaNoTYnmMVpYpTDgYYq
h0kcrK+BrlXwSNkppRoSvx/XPB8OtlU/Nw7ztKcxD8Mt767uIPs422xHpjl8
/NP0m0tgXtP+LFI3j2ovS2KWeXCLP/xEd6plFmk/5VbyDtfMxMZjHzHe8OHj
K4PhMesJy+tkX3665/wgieOfVnVHXIX35KsiybwcB59m5OPP0eSrk/09eoM5
B2Z4T05/hOtO3U3nKrAOmQYzQmLhLScuMoxgimvzPADW9pN5dBLvIfXvHRNf
+OMKl+cDOBcleoU6++Cwe6LtbsSC+W9JHW0133BqGVhfs3Xxg+R9O5XS6wwL
0481czD/R5murbWqcNHLyGpYfUZyjQEskVPxcyTn1ZlH626pYL7feh6I4Qje
YsWdMF/0e7Qv6mF65FrnRpjDmnekG2YdjDm0A85U13iyBfWMGC3bnQ1LJAb9
tXBdytCVHzAj8i9LPTy3Roe0tnMxH+/dwVFfeMvTEM0hWHz02MVomJMVsXQZ
4h1+tbQxFnbwvkAdgukrNpl74O9x1/ryGGT9fYNWwwOFI45NDFJfj7JRzJcT
qGnRB7Pvt/pegB++dggn9n9VIrMAZpbNG3hGxl8kmF+I+JftnAi4CmcOVJew
YYHdim5vWMw06i5G/vxNXKlviI+bxy+jYdn04VYmLBpd9L0N9cuTO5M4HfmJ
CySPT8KxD0JU/1ZGviUHXMhzOrux71TxdLK+z58akecjJHcqXAnt3Zrmc+CB
BNmO1YqIb5bKfEvynI+W7GIooH4blshvI/tF+RevcTnkE5jfdgu+0prqIgUP
X67Zq0qeU61nMYunoZ/dWPwJsn43JrackUX/n46qTSP7YZ+2LRMWyXs4J8AN
n9cG1MsgL/PC2Tqoh9PCuzfvwHRynt9VWJlHv6mFRcP9urNQX+pHYrY0+jPm
ZHfGweuzwt9tIeNXdH3ugIfjB5iNxO7FKbOxbyknBPLWIx5xMtOEJueAxODj
M9h/cNDXES72LRp0RPyiUG99S7jdVfOwEObVV9ZJkfaMofU/5Eg8wb2lGH97
a0PwQnnkf7F+AXleBtQL95nA/tnm9p/Ivtdu8WEK9/s71uUfhL2P9vFySL08
q52/IV9/eom2Dpy5KcAlCl61rvjFVsTDTXZrkIO13xSNH0H8Yt+J2Kvk88DX
+Y/CkD/HvzJ1HXnvv5yT95Qm+ddwlGFt5tAISwp5l/V2v8N68MPWKT6dsqGE
wWYc8vmNcfeqncekDSWpHdo4SvZNBzfzsQkbih9g5mRI1uvPzyvrxtBuoeSw
G+ZmNze9/GpDsdn1CxrJ55XmgD2Lv9hQHKZX6S+Ir3RFgapk1IbKHA7vrYIz
+8KuDI7AZidHnJEvxaq47AcPl2eKW+DSqsvqJsQCb3c/1Ot03vvrHJjf5BTb
Bmsbxf/1mPSXcR2wJ+fM87vRYRh/2GxSlA4LmDECr3+QT5S1fQdc5/eg153E
s/JsoxTOMWMlQdcmxMuPPDOmCHuXHn7g/M2GYpXdLfqC+0uZ+131SH6bF62q
Ieeaba/yQ5ivcFUvGvZfNqNdfRzz0dZy5Nwek7VqnwULX1Sm3UF8YxHBk7W4
P9PihcNKWBDSHKpO3MP9RvZ7f3u3RgrzcWy1Xv4C8zR66CTEx91mM9GA+oj0
o80akQ9na8SiIHLuJVT2PP6M9qrE86owlSeRkR2C+ZP7yP7GNfrz9E/vEc+t
Azr5sNgk127NWxuKd+hb0jXy/gddfLxZgvt3bkon+4Eka+S89SvEu2lWXi85
Rz2rVgw1IH8GV2xKzl27bQHJ99F/fer3c1r//97kX/6/qzb9HyODvRg=
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], {5.568198051533947, 6.872586360737625}, \
{0, -1}], LineBox[CompressedData["
1:eJwV1wk4VOsfB/CTCNlGaYgpU1y0E7fk0pzSoqJEEpWGJFokFQo5okVJVFpu
yYR70y5axj8xiETdpnQtrVMhlLWFbuH//Xmennk+z3vO+1vm7fcyxm+L2zol
hmE+4h99Mp0D+BnJMr30acYynX5J6UMNWYa5OC7iNmwZ336pH+ur0nxmboJz
grMOvoQF1TejTGDF1rCj58kl3ovf/Ibn5xv2L4WXjba5dA5m0q41tBuwjKy4
aXEALBdzJpHwlSNjb0yDO899Yf/TZ5n7oXWfeTB35Y5TCPy8/Hv+N1PEC8jN
eMdnGfbqqHWNsKLLsckN3rQx9dFbsufFyxUjWObsmb98G8g+nqvnwxEhosnd
sJxvrlGtxzKn3IvfqGJ/8S/DWVvgwKiQJyawsMfnw2i4Ocx41Bw4ZHEnr2E4
7L1CSvlyhvraMth0YP6uBJjdeGh6HrysJNXuEq2HVPQXwI9+X9hYDkve5Xa8
hE9FNB15TfWu9CrSwv48r5rEzxTfcsbaJXCdbkRUNz1/28gyDdbr1VzZDudM
dB/ohp3KVQ69pf5EvF7hjHp6+bNfllE812JJFrwqc3DCeXp/Y/3cHtg+KNZh
Gz1fNLVThP7IJlir2sO8ZrOru+DAcSOX9KEfknuh+llw/NlNlVLqzz83dubD
y4YtDAqBZfaKFimsF6DiaEbra6pWnYejfrZzr0zw/SZezgmFswt9nVJhuUXk
tUm0Xtmb5QaHhPcNeo58eEaV2/iwRFhuEQjL1u10fT8WnzrtK9pQnyD6Q/wd
mJWFidfDE+ep/ToBCyMu7H6B/jELpLaxMKfWZrsIFpzydw2DLW26JxYOQ3/v
zm3dAStaS95Nh22F72fHwIxpzekCXZYp4MutUyieXG7uCkv9/EWX4JCT0gff
eCzjzNWkV9B+Xcb912Emh/VqpXj7Tu3m4AMv7rtoIX9eY7BhIHwqX919Cswc
8ZEGwJ8Npzktpn5EH/WIhJOtDk0IhDtbP+pkwf7VJZMjYbG/xow3sDJ/7cO9
1J/l17aaIZ9lkS4V+6h/dsVVEXBOxyevaDjH2bNbDkeZcfwgiidI9xiP+niq
s5QXkt9beXEwt0ZwUkj77/+w5x9YamN8pY3q59tm89Avg9F5XC71tynHwJHO
6xr1v0OoH2WOpX6wv7111zhaXxPjsRmeU3kgUDEG9XgI3X3p/DYZTjlBXmL+
20w44iuzxQXmpdYYK8P2130c1WCxk3fMTcQ3dR2UWSFEfTMdVi6l/Hw2OyfD
lgPjUl6jHskH85tiWNj+5MIq+LOg45sdrAjXu/wM/bFojnhoLKTz/0tpDpzt
MS5SR0j9fnF4gw7iBmm0qJONTUcv10af74yP14bZl4GH3LVwPnTY5QKY8677
ukET9bqEa0yl9c2Pt2ZqYN78bB1wofdfPH+oBPvvdXYNhmVuKnaHh7JMYqFO
G+Ur9v25YC7c8GP59Tzaz2dS7gRY9kdV8HPKP/vMMhH8uXqPfhcssTJ3iobZ
SQZFquiHcKfRdwUc2G4o5cNcqMzJH/GUF/EzBTA7W9AyQG6JiTKg9WOhCZeR
r7Kh0gV1cvvhGT6o575GflcHxe+LLNZGvXrnTf6sIn8xGciDbSfcXJBG+agM
cpyL/tgeGakTQPn4uWf/D856HO9uTs83Z+YOQT+dzK6fKjNmGdfCL6oCOt8t
p6ttjOncJ2wwgm2DTu2TjMZ+4689GQyHbPFW1oIV1RMnXsJ+rqGJJ3ePQn/Y
zdpCuE7k6PlDgHoq9p/bhHyEt0L7OAF9n8F1x5F/9sURxQawrOGXRTrqkxfu
/73UCPnpSCceQ/2c6mrLPTB3Nc5vJ/plsLn49nKYdfH511sd58Bs1BeWfDFZ
xqohX7/11mTFX1+tbFQRr296pxvtt0vjmsMQnJ+xrq/CjCje/np/FeR3+efP
bJjJyJ+Qo4zzG7i6tJHMb7tiCounhtqNo3wlK0rLBqP+rlW/baF6gtJ4qXCI
jd+UPJhxn+F7dDC995bfBUsaUq7dhYWi6DpT9EOxNs5aC/slV7fVLoSF9zOP
xirTeUlSFsNM7C3NYcjHdV5cry8s8xhbdhsOdNTRXULrKx/orkf+zKqJMWa0
36iWZyNRn5q0ZEkzxZtZ/aSMPNR8Yyrlw4Xr+aEfIb5Nh6bA3F0P5ybYyc1+
Uj71Y7eu/iL0r06lcevv5O9e7gdhmftC5Wzc68L+8avT4cCkxV16sIxrt99P
6zsmx3C4t8Vq6WUsbJBmpNRB97ZOvuQR9rf9Mj/HH2ayYudPgtU+CcMbcU9z
15paApBfnWJT9XZYIe51jEE9inGKqyNgmdGVtdGoN+dNikMl7gnuH1vfIPTH
Ij+q6xgsbGrQdEY/Zbc6fbfxaZ4fSJ2shPw8ExYG0j1W6T7BcBDmUUlj4lZa
j4/L0GfgyiH2h/k0Dw5a+/SLGIvRb6/TvSXrS1ny5JeI4UUtlnTS7w2DM8yS
foqYkPgd86wo3/vGVpn/iRjOXycujNy3Kmo47Fq+SK0AZp66hSt+iBiJBre3
j9YH8RtUsW7g8/XZNNTPpZ5sj4NXTOcJqB/spKr1i7D/AYndkD20HvFyrBvi
G/z88Oww9evV3ZCEPuzvII7cS8/PmHpLgXy5P8LL1tPzF6SqJqgnedeLJTaw
8Hjl/mo4ZLjSiU+IL+z8KI1A/bxFCz4lUT4ebZ/U0R/xhKjNQurv4Gz7GJi1
8unI4NOc7Xn3lPqXPPjVSOqHSBr6CzYIN9ZLwD0s/DdX8BOuG3+h/CvuXUl2
cFUVLNzoNc+XrOLqEAxzM+tfP6N7+OXUIQ2I39s3MstlOJ0n/xhL2EJc6/Yv
5ryQl/nXCsr3XJFwM8zIGx6VoT6Fi1yiD7Pv8+5dRT9cS62ya3Tp/jIV7EL/
1Ar//OMyzCbt7rfvRT/if8Sn0vox25dq3/F9rat6ehzmEg8+7vgiYpwcrf+8
AMsWpL1W6hYxEfX7kqto/fkF96WdIka45qa0j/wga4a8De/HHt1nR/fQSPXk
jE8iRhrbNGg3eXKGyLwV+QTmtpdSvo/1qvxbRExvh1WvKurjtLaLvWHLwqev
5pK3Hn83AEsr/U7vJCcET5uH/TrvVaekk+UuTfqIx3OqvnWT+qV7t8urQ8TI
1ZvTb8MyTzb0O/KTyUuuZsKsSvhQT8o/8TkvknynPrYA9WUXxtTY036zpq7X
+yZiAicf/dgyjH4f633mjH5UfNIYiKP8DY1GefQgn9bkU1q0Xm2ybzT6Z/l5
Wm0C9U+t99FZOEfz+rpfmONsivPlcphXoLU0CJal1VifIPt6FF3UofkRra0O
SyK3V+3DHJfdGJ8sxP6W0TemhmKOMwazrr5DPmLLw0+2YY7LTFweLPuK56u1
zxylOe7d6LkX9bjGf1n3fCjNuzFRsVRv2rk0B5hrTarM/Yz395sYP8Vc4T4U
BDo0I78WK8NkmOn2SXrwAc+XaqjsIpdZ93x6I2KSPQbOJ5J7jJi6GhHDFk/k
3ycrpSy1eAJ7XucZUTzN2tm5JXh/0FnmEPlrQ8CyGyL8/XLdUxP5MULtvQ57
Eb9KtfYEWV572vF0ESNR1L8fo0nrwwR9GXB4bX0WWW6hPeJsESMbVrFJn+rn
5vnmrUe+KorureSI7SrBlxCvPerOVTKj0Mm6h3zOWM8sI/OGKxIrsO4Zvesm
+dq35MynOI928t4I8pf+d7a1WM+M7dElW57OLHiF878hLJij+I7aDd0KrK9w
U3lA+T4t2DQd/WG+JfS2UD/rZ63WbER/xqxvb6d+1LUcW96E/Zvy7r3CXGYu
bNjCfES9Ka4WdzGXmeCkS/9hXW6wI/HoEJp3C3rsYcvKgiMbMZeZ0hHu5Q3Y
L9/7wWJlmm9TdNPe43yc6BbPoXvve75N2lv8/wo49MQdc4EJC3v4ug7f/8Lm
mDjMAWaHhtsU1MfMczpZhznA/L17R1ox3g83LVpOph/JPUZCf18OiP4P8zU3
Kw==
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], {1.9978586621878782`, 7.415738810081977}, \
{1, -1}], LineBox[CompressedData["
1:eJwV1gk0lHsfB/AnslS2riuyjn2pUK+YbA1u7iRXSJI2y6WRKROS7XUn2/W2
mQqFhJQmWUZlSbkkVxTFm5jkldBtKtVU9I7l1v3+55w5z/mc//P/Pd/fb/7n
PKMfEuUbJkVRVDG+5EpJvuNjzKBmyXU1g1KZ2qMua8KgNN+lLBiCG4dUjpJ1
trNn0w04INhQaRJ23+B78CQcf8pj8iGc+cw+JBLmMsrmi+GR8zE1m+AsEa0o
Aq409d5qTVyqcNGC3O8wrKsJezPcXV4ZMSiFieHzi2COxr9mCmHHK+F6360Z
lOh5XKwPHM7zuT4Le7MaIuXhzE03tOdhyb62zHuGDErWMmxcCvtLrkU7Z8Aq
UQleSiTPqorWzbCAG3xQBzbjXxg0ggemWWutYJoh76kMPDunGO5K8kU8zvhi
gPq+1/7YCvNGmw0/wPu6hZK9MFW2MmAaDgl/MXQYZhXRneSxf3RF0YZ08vz5
wyxjuKTQweU4LKyVmfOA53PM5LNhUVhdfRzsmfdUmawzmn9TLyd5XYaU0mD5
aVnOALyTb0PFwr23xHIy6NfieKrhHvJ8u2Z7Kzhkwnr2J5hf15zrC3dw77qY
kPyfB76wYfsje99Jw3TH/txkmJW7fekLzKt3o50tF9793vdtI0xNlKkfhuOi
em+fhsWX3RSD4Var8of74c7stmRnuL2c57OJ7H/Ws12F7A8Pi1gJM62YWkLk
ZS7iyv5Afp+JqoqzMN1uqm/GCn3Vh3n5wEEPvC2ew3z6VLYc3BiRXNgJl9TZ
6jVjnpPh1/XbYNbzdzdiYVGUpfV9eLRt/IM1zDLc1zAABxTYOE7p49xlGK/+
CMdf+LOhFb7zpzBAjuSP26t2Dr5oOZyyHOZfzzqRBBtJdfSRvPSXQY8j4Vnb
A0sYcMkLyxkW/M2t5y8fmGYwlhcNd2YEWQbDKobOV36HNaJGutgwr8vpSjl8
YHPxgxjS/7O1ZT2k3grLuENkP3vKcxauVDjqdRDmisbULEg/rk3qe2FBlJRn
IOwVHzfkT/b7JNKz4M/B7eMkD2W+27kWrg7MvmtM5l3nJfkvXBEc5ChLnr/r
8pZ3sLbS3PkO9O+t+vWKBDZKqlidDAsGhrtm4Hmt8EorWLzNRYOcXxqzqGDc
EvMwSkx7CremlKcXwCqbv50QwBpb5Pr8YUF1kTsXZqx3uKoJMwOPOLqT9QDL
l69X4TznJe9fCNu4po61wPHf4qya0a/kftb5MljeTqwWA4++v5pwBta429Vv
BtP7qgKzYabLRf2XNAbVX6t3Lg8OaNHJvQBb2zUt4sMStcMnQuGp5CzVNlik
yVddA/NqTRrHYE5+QPsSWHvOt0YO+XjX1ySN6zGoHO6j3yxJfuNYoy7YZlFE
oR8s3nImsxNmrZ5JOkzWuT9yR2GV15KWHNL/5e1sOdQbVkzdUAFzczesMoNj
rya41sOcMKckbzj99WBAA5ylqDrzb1gUYVpeCQep3Veqhul+x3tyYfnuj7Ij
JH/ay7loWFJwYNUS9H/cofnVT7Bou/qHNeQ8cWNaFMh+xQ+ffGHPeI5VN/or
2VGzLgJuN8hwyIB5/DibWJhSnV1tD4vvc/vI+Ywficx+vxL7L7kc/5Xcvz9/
rBSWlLpFb4S5g6E12+F4xZMGBjDnNtNXHaaF5Xd8RD52S8Gr4RVwkr7MTfic
Md+8EuYvi/zIgbPWj3AyyXpl3xsyD7bDQx4b7j3lpd+M+SWn8IW7Ye60zVpz
uPeFUHEXzBCPxxTqIs+B1APhcEn/9JwGXPmDSVMCqXdLnl2ug/Pn/mR9Lqnn
Glz9MzzB8/9UT9aPHe3+ro19L7MSST5e9ZvuXlh+a8MOaeQXtD4ovA1Tj/4v
Yw5zv7ylWmGxs7nEA7b2+1o6DJ+b9X8eTubz1/BSZdTPSXAqSoTFR30mt8DC
De2/p8OMvQ7zJA/POdQvDVZJCY+URt47BWft4+DerdtmQuHOz+2SnTDnRL/t
PXhng86gHTx6Me2eFjl/3w9ekoOphJGjLLi7XL6qh+T3evT3JTjd9O21Y8RV
u917YEauW4Mb6bfKKWYEZre2mEks0M8fWvkDZJ6ssdRrsLUeR3QTlkSf8QuC
qc6K+gSY3qOtvZzcHxaZaAIzlSYshObod6uoqRn52FW0Y8XwqL7rF1eY6XhL
xIHFCxdFNqHfHzd6pfwC8wpuypjDCqYecrYw95TNkhzMz6//TIOFOXlfKE9S
MN3Abd0KmJZTJ31IC3WUOAJyv7WwY8e0Jjz6qX0TTMl8jc6EmSuKa1lkPXDZ
4pXwwoTggGOkvtWpGdFynMsqemAtWeeYLG2B0/N01pD81NtfpWtgQedpn7/N
yflp29UIJ38qdtJFv70LBCeewZN2HyvocKs367My6seue3TWAw66cGd2G8w3
nwzxtSDvY+4vVTDt3JP/ecEC/4HZxcivfdUrcD3szdS/GQln6epeN4RpKjby
D+D5xmvMeTxfcG9BKQ39z+dekn1A+v9Zj7sPTjau2nwSVhkItSuDbTTLPnvA
nDoTrftkfof01KTIvN+8iHwC5whoWvVmyBux5VAHzK4RH4uArScnSothhYqE
aV1Y/Jx+ZA+sYbL5sdAU/RgO3pWDRXk3dufD1DIN3ULkY1oIz4eQ9cU2Tjpw
unISzRbmvun/z2n0S982tkQNHiX/6zAvMbmaMP4BHGmZsw==
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], {7.504867568801498, 15.425922452368194`}, \
{1, -1}], LineBox[CompressedData["
1:eJwl13k8lOv7B/DRyZZSKVuUIctQ9rJUeNpk66AOxhJTtnFa0DplaSwxlKij
UraJLG0MHacpypzK0qKX9dg6EioiOqEo5fu5f7/553m9X9d93899Xdezjfqe
0B2Bc2g02kIxGo0c//+nRXF1yVGOojFvxPc0alJcS1HYSBRscZtefkuTor2Z
Nlgms4Si8Ri5ay8gzqhWNM6HP8WbnDkN+zbluG9civk7XpmmYXwBoym4F87Y
dXo2D/btv2cWIU/R2O5myo/hUDnH+vkKFI3e1Skzhvl9xW9T02Auq69VU4ui
GbkLC+YoYv1nxjO74YXz9076wQLPq2X52K+j29CeQphD5Y6+Q3yPenp/K4lL
u19haFNcr6yS5GGYe/d2SaA2ReuJOcgjHoza55MJ+4+3q7TDSnF1q+swPrGg
8lgZHPZ384r3sNrYtaxouDEhrHoaNqmdYGwm69fnrfuJ+aXvhepzYXZKaOAE
4sm9FX/VYv92v/VVv0Lc48KhuSQfYZJcqBBWjTJsD4BFzKOGSRhfqJQSbg8r
LdeiXOH+QoHnRthliZjdEnh5w0pDZ9jivpRZM/LNd4k4fRgWbHZYcQ7+5781
Y2XkfFUq8juR/9UX5ZUSZP+ezvNUEJ/QyF4XDvfyVQqHUe+9vjvLR2HGKy/d
OtR76RtOQoQS6rE3e0cp4lE2yv5LlNG/cRf7AsT1Y1lhZTC7YDL1OhytEXXG
ZRlFq8+T+FkJhx74yhuGeVt6/u6GzQ/z2VEqFK2j7OTvktjPr8GmmWKqOH9Z
49QG7EduRa/pYdhFeOTrcfiOh4lSM0y9McmohD00tbSUl6MeuQfbfsK214vs
7OAOr90XKdQv6POes34wO3a0JQqWXK6rxoKFr6eq7qBeZ/jypk4wXeVL+2s4
9YD4V2146lAcnaZDcc/lXguawPlYedFqS3Qo2tfgdtV78KJViTOKsFf3X6on
YJGuIk8W9nEqv7ABtpOqtPqK9Wye5RaIw4Lr261b4KVPc1S6kC+/PWrTNdjN
qND6IUzrskrYh/1tCN17pYK4Uq7EAPETpXPbHsH0oZiij6jPmC+V+p54i0LC
LeRrWb3aVZPsJyTH9wDxkDCOAzP9vTXM4DjvqmN9quR6bo+QgNeryJ0g9WBI
ypS+Qf+0xDrGh2EL/W3RT9GPln2uF+JWYD2eiXw1LC63P0ldDf1ofvbtEXxk
5FSpCGZ1Ksq0wRZO7iP6dIom5d/JmcB6HUMNc47Bvdaq7Wo437f9lq73YHbr
Zj037N/pTEXPZ1hwomoW1yO1yvfHMg11zF+//nQL7MBR+m8rzHLWr1fQpkQl
t2xbd8GM8rpsJuqxIiC1NoSMfyo59yKcllPI/B3OkBnWeYHxD1m6+Sw47efq
lCltimrvjLX8FabHTa1SRj+jjBUV18KL3usmrdahKEXjC4mK8KAcrd4Y8dSS
JJkp7K84J+RPhg4lEteJXNcJG7UerFkMr9kwnf8AHsy6qziK9WuiZwRFsLBY
hVUNv+RqJ16GmR7B7YnYz5wahbF0En9apeYAtzxXscmEudIaWtLw+Tfmjrdh
+o9L3+pQn5k2S+/nsB3DryIJ9at2Y+lMwvWy6nauWpRIKUXQrYv9Fof+5aeO
esWUdaizSb67DDfPoB8djxnGJTDHL1PYj378M93XP03yl2gf69CkKG/jt412
GqhXmM/hV4ifu85hZ8BTe0Tao5qUqDNoTO4dXP9S13oB9vPsO9/ZcCX6ZVPu
aoH9vJhoaQ6HuZI2IfsRPyFlcPUmzLspLX8D8ZL+PTrdsIvhw+RhxK9xJLbP
wkyVllpyPatL5MUo4ryNt88IwpB/d1Po45VwWvOMdQnq9/jC/lxNmPVsa/YA
4mFba/RUYJ77ASfUn3smoHtSCmb7mm40Qf/Ev2RPj2F9/vTBma2Ij5waP9kM
G+1YkO2IuEunv9QdOONj4IdNuD+/lFN66XDxhKQH+k9TaCo/wiH7+7T9uxTG
24aruu0h+6914nXh/Kzr1p92kvzpOab5cPnEcTlnWHjqexZ5P8Ts3iXvRvK3
e1uiifymk+Mbg0h9BM8j+lGPJrdTqfFwfaSXcgH6NV83SLaExO2zI/YhrhZQ
F9kHs2wrXMnz7l7DlUQ68uuVrn2rgH57OU+yg2CjTxliP9EfRRvrH2XwlJ51
52dYelX1K7yHab2yN2cm0f+Q83s4LvBUppgrnqeUerW9RQ4sym1arI31P7U9
v/KexA9s6SLjXm7Yu0MPefATaypOYXzPiNfuAJjdxzJ/BE8kOBinw42nqi/+
gmPVHZ9C8l7iNAQ32eJ4Y0fg6iYchR/vvOThGJ7U9OBfHAcHG+NrUS+l7Pf9
PXDxoMzyH7CNqo+gjYx3qZLXw/20IT5J8BjmnljLIv3S4/R33YCpeK/jfujP
Pd+4YylkvqgkIhDjS9PezT1Axi+X0dsFR/BWLnMm+7nJ+WwLS+VPbzOFjdbK
Dq3E/IGs1d9UiQ1kKydxfvvwy16ysNKTnisPcb1xKneZ4z6kMc2ea8XAv5ja
fiRxdkvdFrw/RP7jpzzosCjntvQs+pHy2/EaK9ji/ZlkEeoXLj32JYjU58eL
qkS41F9TjXwncP9scvVAvfPOu452EBs3XDRGPHTtb1dXYF/8OmtPJaz31POB
wu9wWElw03zEHwRtGxTCXIu7fyyEUzLiEqUYyK/7VRId47tl2T7uMHOoedwa
cUGvy0AuzI5rCwuBP1qJNfaR+Nmuhei7SKzISm25Lp6XFTVBXehnvmKFxXaY
J765VAX5bvlV5Uc4LDQae+8LB0mltSaT+JKNU3xcz1nudyouwR3MxDb0kZJ+
I6d9GW40o4rkUW/HhGHTNJitpjyE+4vLYieHRMOUKy0pAHnUpw/cD4SLzd7M
ctDf7eyNB+zgjPUD/icRHz0qK6ZL1lvHPHQMdgtUnzcPdrF5fGk31vta8mzZ
KPKhiX3ptUY8wk+P307q8cZnahHs/eea2nqY3qy1gNyvlsmiXY9JXJNxPwv7
HXFr+784t73mnTcs17O+t5PUS3LdtWXke22zwo8v8NTbz1KvUL+sBTO9aji/
SO62DL4XafKWTx/tJPkbSLMOop7G+rNu52D65CZ3JzhDwq7rH1Kv+tPVJuh3
mKq/kYYe8t60swP3G62slTseBgsOxljqIh58reeCCLY7tLPJEv2IWLz9pOwq
vN/uGw6Q68U+0WQ1ExYasuVj4b3jlxwzV5HnWcyxv3A+n+L2rjbY4u76/M+Y
bxOSbyWxGvU97NSK655qDN/kuop40f55x2CfPPUTW2DeI3P9e8jXTHrpTVd4
MHylMb5PRLHnPwbuhGlJb9cboN4GjPAKB5g7nVDrjX6NbuqmW8Ki3Rcqo9Bv
Si/nMh2m10qmnUf8hotewC9wR8Ftt8uY72zQMdOP/VEeTrXn0J8icfNvT+Cp
729tIzG+f0xjtBgWfZzT7wkrLF2y7TzcMbCWwvNYVOwgaxpH8v83NHmSfD83
8E9FkfpckfUiz52L3dJ5sST/2O505MdlShf+/geZz9jvaIZ8i1J8zASrSH94
6V9Rv3i7sy86SP32rWM/RL0+pNwNnk/y0fKMTIGZdQUP7WFmmJZmMMZ3u7Qs
SSVujF6zHfEdTBOHLjgjnTZKof5DAQd+MvRxP1nNG92E/m7KPZrPgemCIB18
T3OH477za4lVP/SFwavMDx1cZIB8NGbrrsBWPsY1O2G+xIORl5hvGKSXfhZu
PFE7Mg/53NmpQFWT8RmvxZ2QT7xTc94ATLd8a5GK+Fy+8vKfsCA3cz+eu6Ki
I5+zZQxxPScUX1qI+jHeHclfACvd/dlFnodN1z+sEYfDlkmVHEa9Y+yO/zNO
1jP68vUi/FlpwbFu2O7jS91b6J9e7TrPh/Dg+3mudzB/gElN5cBKye80EBdd
0dz94STMMHk9i/k0P9/Zv/3h+ssmY1hfVCM3MOpE8qMunt+G9R5LaV61gtmR
9+Tw/qbGR2ZKzEm+fSfEW8n/p8a+6A0wJSbu/Af6u9jwyRcyn0NtnsX/G5FW
llN4CMn3rKM+/t+ITOoL752DuR/CmzvRnzrJ/xbUwGni1YXFqKcCbxtjDvJd
dP8gDfePSJ8/tX0bzLirIER/RS7/6gech6ccQuW8Md9Econ0G5i/eEeZjxbF
j7fUYSoZoT6dimfwfqYi5SpZNjBn6dxP+B6jBQiSvQNgI8ls3h3EFz8IXpEA
K71KC8V7ldVzK7MgHxalhmxeif1WeUrSq2CWGW0L3qsiDu/t1Es47aj3oSLk
L3xU2dMNh7mG3RvSpno97mvX9ZHxw8rS+P7kes5zG+uHBVln4/E+5Dp163W+
hhc9yslN0aF67TuMtrbD9Vs1rQWov5/6Jd3nMHefeUMN+V6tultIzj819t2t
AbZ4cXX6Fpn/SSupFuupWP+6PxsWmt9+VKZD0f/gGDimkv0XxYqnke8hZsPz
OLIeLWJsD1zx2lIqEmbYzhbgfuU/KRwa4ZD9O4ZUjWH/CTmlBhFk/7HW8qW4
fj3nOG4i83nJwur9yPcde9z9HInrmbfge5AV6bjytwKyn70uDpOof8C1yq6H
ZLyZxevHWlRvuf0h+39hiwHGcBbidJtdT2bhYucdDugvNbxhtY2WMd4Xkrlb
jyAe3iZMcoJpgZ5xRxGXPrXG9zAcZsSexfcNP7rLLywT5uWfJM93kV/lgigR
/Clui8cL2Ep3nWcfmU9+2P88cjSh/gfw7Wnw
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], {9.80586200766151, 11.307368073790315`}, \
{1, 0}], 
       {PointSize[0.04], PointBox[{6.5, 11.5}], PointBox[{11., 18.}], 
        PointBox[{10.5, 4.5}]}, InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox[
            RowBox[{"C1", " ", "N24", " ", "T24"}],
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->6.137505285412264],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          6.137505285412264]& ], {10., -0.5}, {0, -1}]},
      AspectRatio->1,
      PlotRange->{{-1, 21}, {-1, 21}}], {66, 44}, {0, 0}, {22, 22}], 
    InsetBox[
     GraphicsBox[
      {Thickness[0.005], LineBox[CompressedData["
1:eJwt1gtcTNsXB/CTPKYklaKSzEQqShMVrtw5KknCRDESimISKaaiG3UVSu/y
GELDRUnRJUQPUdGDTEzMVTGKCnOVlCZF97f9/30+Pn2+9j7rrLX22ucTa9PO
lX7DKIoqwj/ym+oewg+Lpn79WNJUeP0bhzuw6MwDw7czaco5orpyB2w6r9yu
Dpbf6u2YDGsIqiOqYFXBSPNnTJpifq33F8PfBy3VDsPc0kdd72FqzK4OGpaN
9PFhIL7rF4s2JZjvphNqS9yal39iMk1lvxFvCoS5iwrdadjUvuhDHtxjEZk5
ZEhTe4qZId2wYpnVrhew9ZbLpwzYyC+YOlsB589MF3HgPa/t26rgMuXHjd6w
WLdC/S0sq4zt2g+L8s72qiD+BXV+lhAu3r/7NgcWr48ayIXNPdc17YNPK6ZN
KyLrJvHx9+Dc8PasB3DZZ4/yIdgr0XF5OTzy04FqA9RTuGbIpgTexlSYWZN+
uNdW58OX9E92OsC86H0lZ2H9IMkGF7I/9fOIWLh0zk8TJ5h98d8nO0i+IWGh
tuT54HK+G+y0xfm7Pkx7vrW3hnOV9r1sJ/mc2lE/AXadWaUZA/MZDcMG0J9i
cZPeGFhmFbb8CVyQoOJ4CPXzqKTX2XB2ssrpr5PQN6MaUTK8nelway2seylE
KRq2i5WGlxjQVEc51UgctLxTPgUOujt1exo8XFbSlToRfZSqe1yFxQY/tdRg
Krgg4wWcsHiV+3F95FWX1Dgc+RVMGz4wG67SSBMbwV3FzB3teqhHKP/mAMcG
Vmtfhzty7n/dAjO7Xq44CvMEitVH4ITtlwISYUnAqyvkfLSHGedlwCJxW9xj
sn/FG99iOKhW92IHTJerqMtJfPa7piFYwrIMm4b3b78/f4mmFeb3WFb3Fvh0
nOoiA1g69XJCNmzKywphwrmtUY5tsPMaed0kmGfh7TQR9Sn2lqdrw4xMoykO
sLU/a9UIuNAwTtkTVqtJfdtF5uvMKYkX7MrLXCGFfRdPD1gC95w81FwMG5R0
nDaEeb/fl2fCXkmvlzXhfSlTNLsOkPm7eCM4GhZ6l3tuJfkzC6jxpJ8V8uTl
MPeyxtvjqO9dqs+zeTCP612pAjtKWbbTSf1b25R266JvfS3pTHI/SuM8X06g
qZhwp8hJpF/H79XOh61DLWkWHGXdzr04HvOSGP10Bmw3kJ+jSzxt30s7cn6J
M0xP6eB9GvG3V8EX/u0WWMDCupT4nSSe3oPABm3sPzHbNpmsq64cfhRWyIt3
/A0zTEZM3gZrFPyokZD57vEWroEFJQf/6SPzO/fp/HUw10Zgqod+vvNMleyC
6WuG6+bAgwzHxRlwh3fdXDe4aWntTTHsdaf5rh98dNOoXHXk4+qariuAzd2W
reLCbDMr8R8wcws3JwVmUuLcCNj5w7fSGuLQB1WhsN3y/e39cNA4v4RtsO6a
dQo91G8eyb/Mg919+AITOMjvsZY97J1rc3MynJvZ/sUEZk/MUVGCC50GhaPh
x4fTqkl87Rvduz+TeVi4YP0+uOPZp7562Nqyeq4+nH+Fn3Yb9u5bX/sX6mkq
qhaKyLwvUN88CY4a8X5uEqxmlD0yfhy+az98A/4k/RObL/6ihTyppI5wWHib
MdoDVrOQT/4DbkoP9CjSRJxPS2aTeZLH+aqZwTJPs15yPoPlrLLzGjRVsfLZ
x7/I91LFNdQclpo1u5Hvl0La+S1tLP6f+d20EabYo8MV6ojzOnn+IDnP0mme
CTB9LsdyMuqlw49uXgEz5aeOkf6YPo9bSMP82ckKX9LPt/GJ6+DHKfzOGHIe
+ZXfMuAmVYbFOVjmEhX5ncTT5iUXwuL0nieBeL8s1de8hrj3aUInnDDzo1cD
zNWNDZiHfMtGt5b/Q/qvY+4RBlufv7PyJbmvNS55ubDB6i9L6sj5zpZRDbAX
a4HtPbhgtsduOSyWG3/MgVPUDT91wqL2OEEaHLMvwaYZ7knfpB0GR2TMYd6A
LxRvmO4Jx358figYdr74zXQBPLX/lbsezPC/Hs2Cy1Kbe3nIN7Z+81kG+V4I
3ueT+gsSdEq+kn7OKLS2H4M+/enf20ruq+Yulo4a8ggda/QKzmf/3d+sinnW
fC99Qb6PFlkFl1TwHfGy8iXr3F3vXPYycE+mu9x7B1dt0HTYOAr9mVhzvBcu
jKt18BmJ86p2d1Uj+Vw+d+3QCMzz8ZIfZF5TLt5Y0TAcfXL8PXkxLEp8puEG
u7suLvQn53XF+MWAMuJneWglwsJw780NymSujMzyyXk4xWxshAXGu+Lr4Sgl
tSAVPM8WlDZ2kv0HnQLWwqdLf75RmYV6Lp/ILIejHCXJhjB/z1ZzDvKJMdjL
tICr+u7yH8Dac9vH2MB7FJKVDsg/5f0Tpi1ZP9mgXAhLlDSD2bBUyDKagHod
h930nQoXfuAv48HuTo5XtMjz0h2RAjhG0mIziHyCkizXb4EHBwLMW0g/KuoE
00eRezFBVglrhPj43UN87Xq6OJusizo+G8OCjUM2CeS+h1394I38gj4vLwom
9TF2GoeQeu3izpN54NtXWvmjHxEvuvSdybrCS2vRMJzfsSHD+SSeskeLphLy
nTLB3xqmXv1suD7EoXT54wOIRbVRfkt/cCg522bJr/1WblpKAxyqKsVHSuKx
D42d0abgUNotViIvcl+y2K9U+zhUU4u7LIQ8/1AvIKKXQ0X9pE+mk/t1NDjf
sQf7l5aeKCDnteFkmv9XDuV+v/IAuR/5aoG18m4OJXDQ+fSd3CcX32e1sK9H
xbpJ6F8Zo7V/CM5+rRewAOaePVi8H8+7+stq1sIyh0rb3xA/xTpiTTAcVBH7
iIX3K6TaxtHkvMt5YqNvyH/Pb0eSSDzZkQQz5GuQHG+SDmtk5/WyUM+escry
FJh+2p6jgJ0NS3RiYWZ1ozijn0NJIs0s9xIL+94MwKLxjxl+JF5m6xq17xyq
IPX5NVeSj2b/igqy3tPtYwV32c1/bQjLl6pGapP3OVtwJyL+dmvHvX2kn2e/
zCpBftySjRWN5PtltHK6GvI3fdhe8YD0Z8lh4TjUK3mlV5ZH9i+7pd/SxaHo
q7ZPzpD940zKNP/lUMWMtirSbzos6aFNB4eKVaKXppD7cGuCIa8V9T38LPq1
Hle0cWEz+rO58BF5Pupl4OoACeoVCgOvEsd8ZbdXcSgq2r+/gszHi3S31bc4
FFvadVhm9f+/y1NK/vd7Fv0fLIJQOQ==
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], {5.102198693518713, 18.313115296667366`}, \
{0, -1}], LineBox[CompressedData["
1:eJwt1QlM01ccB/CH3B5YDrVq2EooV0Gpcgg47J/DieCktIroBCuiMCsbFHE6
BKuYrEOmRBEwmwoDFXFzaAXqQFe5hoJSMmQMdMXKtaCzCpOCCvs+s3/S/PPJ
6+/9jveaOsR/Ido5gxCSiA99E8M0HmuGvH9cGCKJ2WaXApfLQnNeOcOTJSWP
WAxhnz1SrYeZuw28cJjPJJu/gTlRrcKv5jJEpcw9ZI14fZiPMs2KIUKGW+IF
591xWaqYg/fF7WkS6n7LjbdnM8TPtDi3AOaU9m5aDPMrohw6aXySrO2HWcgb
MDp/gStD1IElimg4jDCLYuE+Q+9xX5j1uK6mFOafcLAKgvm1BenDMKdmSboM
TpI1PHd1Q75I56ImmL0raige1l/zGfJCPnZvT3I+zD+uUVbB5UqnwVqYJWo9
HIx6FYvnf9gNp3QNSjpgeUZQ3DCNd3KM2Iz+9Lyzic9g+fp/sztgxdD4oX6Y
s3bv2DLMI2bScXcHjV9+TZ4Gq5+9iLtB42NrRHmwISGYnIDVWnv2UWqLJ2t2
0HqOlXiugzUThTIvuPLCYOMQ9rdQnh02ov18FPjnJpgd7cHtoP16zvI/j/qG
t2wtpPNQl4bH1aMf1ekNJzNg/Qpx0G/ov3hOH+9TamPtwqqZOO9UqXMonGf2
1CbfEvlLREMrYMl47NgeC8z5r5A4anlXRXOYOfxMRELoeqpbGt8M+Z2d6rfA
zC33XR6mDOlO/oydRfert/QNNUHcvMJ3V+h5NZmLs4yx/2j1Wx1c7BjboJ3B
kKLqRsaBzo/h/SOFhYOm5Ql0HiPffsmFmQ05PRWwRLrR0xKWhw3Hv6TzK3pn
w4bV4Z4tPjzY/UX8J7ChePpSOlw8c969UthvubL9Ksy66FZgh/zDO4+LtXAK
K2mqEO6WmpSaumO+fVXpTqi3JdD/DAfuC9KZ3ID5G22/8YSZ6qDLAehPqI0N
XQ5LctXKSpgRVNq7wfqvD3OtMA/hXbMBO1jzJHg6gjqfr32NfIw363QCzL++
R6WBOWV+ajGcN9AgK+PR87RmLYBjBruFe2GNbbXuJ+xf9J3V7WBYHvOLdCHc
0jPtbUPXbeSXtqI+17nRTgOYh2Zt3cqD6Eeus+m5RedTIfs4C/1zorduP0fn
177HfrcR7fPePgUs5D6kvyWyv/qD1Ey6HhihCJoSkJQD9t5Z9DxOGekm3wiI
5vISl2MwY3em/f6EgMjZtsvKqI3fGreOC0hS4oSqhd5307/TjF4LiCH/zo/j
NH50jipzTECGRyNzPVFv3+rZirWjAqKfv+PA57T/zH6x9BX2E6+LuP5+PiZk
8KWAlOfcvGB478ZmFZyUe95aQM+jrZDRwnkWqxZkw5zDp09GIT4vnRdTT90o
vWOC/RWOkeWT1Hqx0wjMPOji8jxwT075T46hnsrXNmGRsGS2o5k16lV5H5tI
gknA1Pol6KfbN/fMPrjvsah7hQH1FNWZ74flKZbbP0T/YT6ysmTq7PSFnbDi
6c11MTBziRseNikgfqkro/zp+qNT/Skwv3dzkg1dl3WNr4bl0w7fD6A+opSY
NCC+O6TZuwpWdx5xH0I+V7ucYtqfuvycXxXqIf6Lt4jpfauryvZCvezLiQ+c
YfnPR69K0U/epHEIoevbRlbtpvOo4d9+QudX375olR713M942QarJX88fDEi
IPvva10aYFI59VA0hPnq7P2a6Pcz18fe1aG/K7qM3+l9O+qb8/wR6imybXtO
fXLzGkMn7ken9IgtrX9pU21vK+ap3CQPoU6ocZ/6FfU5NQccpB7zKC+oQD1r
0u7Vuv//v1J2i1jQtwfzH7gzW4s=
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], {2.7378965951519216`, 14.11205387127346}, \
{-1, -1}], LineBox[CompressedData["
1:eJwt1w1YTGkbB/BDm74zKkypzKSVSCor2cpMeHd7fbzNq9otVNOqVWYxpdSW
1kRR5DXyVdFWqyiRwUaUdlBbQk3aaOSjDzFJTEgTYf+3fV2X67l+c87zPPd9
n/s8B+4PG5aHj2YYpgF/afznjw3/n3ECn8kq80yXcfmMeL7zvvbxfMYjTPy/
YFix8m3MX7BtfaqbEdzxVeyk5/DI7O7jf3D4jGTX7DAbzDfUPGiIh/PXdR6I
hb01N1zdYeEgL64LtvQ9q60HdzS+/jlsIsau32PqJmO+hf7QIByxMjkgCxZO
M0iQsnE9rVGTAst8yifMNOczFecX2mXAauXzmhqYkT/yK4XlnZOqBRZ8Jq1q
+NxDmPGffrcBVgWFlbMovnurb8+chDzse3tdYfVNw6JYOKx64+NgWDzV4FQe
HN8anpBK8e5sbzkBB4wp2nccZq6Pzj0E++WV+V6FBZ4ekyPg+uZ9vBZYEf6H
ajLsEf0kuI3W/8FQcQ37e5R0+itofviZc4GwPGdj3CVYah3koEL83ofdGg/C
smXeczbBhUnqST9S/ZjkJn3Y7HJMkz3stOVJ4UnUQ/1dRDfVS+1bcjoUzjcR
jnek+rg/feYIR7hf+bTLGvuYbWWxYUbyS/tTKz7Dn1OwZjJc36Ma+RYWOG04
9i9YYPDrlrOWyH/JMVU6zK4JH3SAWd6Rlb3wtIY5llXIS9rZ4BmKeOJ9Z+et
huUiX78+WDpX0/MlzGTefZ6M/NRRR99oUZ0TLXysMWocg4I/4HfZQ4NNF2HB
B2YJi+aLmXVLsU9+d8GeefR7rfFJBcWRVtAWA8sC/1zPR5z5NtO7af/8gSvM
Ibi+y/iaAe6Te1iNKOAIXrTzSljmsnfTc5hdYdVRCEtqOix64eJmt1tdtO7J
RTPrYcUp3X1jMQqLDidkYOQkHzw9FaP0pefsrzF6V2yX22KUW4eeu4N5aS46
Mh2qV0u/ewR5nUTRiFGaFZc3iLj4Pdk9CZSHsvBpKqz62tzCmOI5fnGI+oGV
ze3eRfmGWztTP0bU+dzWYBSkFFjvxMg3Mw1cQaPfvelhVL9tayTnUVdO4Jbw
lVS3FFmWKSx/Vbkiivo5535PHJ6LdKTgYxGts8xhaS/eG4Gs/tQQXS9+MWrd
RHoOrIX0nBSvFy7WgeXj1no9/lzXLR6VeA87hmLHxlIe/uzDO2F+YZcX1SV+
+7Iqem9ZFmXqUlj8sSw1EZb9/MBkEfqqI70hIZvmZ6jaFbCsZ87DG7DgLjNh
KfpQfHt+txH2Y91IjZHRe/y6tD8Q5rwMuTcMK17Ov18CZ9X+p96EzgG2xYoh
ON5l/hxzOP6RwsUD+cX/O3ktvbeqI3WF0dTn8d83v8L8iIHcUwdg+R27e/Te
635XtrQAVlTHlgtg7w9OFZlUnzHz5jxFfIKvvbZGwPw+9rNYuM30XqkNvRfL
+Te16PrOW4VXsb/0XPND6q8sh/NuS2DJ1rrbbnBbzcNIOfIT9o4ve456uYkM
POxgp4wTiRVwRHRPVCrOQUlClG4+zN6bxO80Q76/KWVF1Ie320f4sPpJnFcD
9W3c47oTpvBfkc8Nqe8yX3rYwh2jtf1EsNvZZXZnTZDP+0UnOum9NchaEACz
Lvp3r0W8qmELPXNYeD5Hw1B9x73IHByHdUouuOXSudewfkc/nHZynsCSziWP
h9xPsPh+3+dzhXWo29sO88VLgy4Uw8VtFy+EwozjwLxOOpfKHruWwN4mXC86
572/TegcgosFU1kz4LZVkRu/NaX99Y/Po+/Cm9Ije2Fm94smN1h36wR/BSzr
beHaw1mpIoePsJNDg8aAnL47cwLqwZJ0ru7GfvUWJmZk/oVWvbN07oaapL3D
/QqDdu1EOkdTlQ7X4ApFSLUXPE3vzRkxHBD55MLn78gt81naMOtu7s2TVI+k
tbopiFe6cfiDP/XjAdGVAeSfHxF9xIy82/KKL6yOM7XtRz1Zte76MhZ+f3Wr
oov6Y2FMnyHMP3F15C31R63T953GeI6P9ryzx3xWe8pPV41wf3aNbQIssAnJ
qTPE779J1j6mc3hda8qwAeL8aaKTC9VzuCkpGK7gWnsm0DleNdH5nT7iLAuZ
UQfLGw9tvAVLl1unj6fv7qMAtzuwmLO3OZS+s7/WlY7FfM6l3MPFXDp3lBuj
af293LonsMTo0rhBWCWJOmaO77jcqS8kA/G0GfdyebB4tM9UB8QbseNMiz/M
d4usqoPTNgssguD8hxvOLKf8UnW4dL1jW0zUFdhp2sEH82HFwIRHemOR59FE
LUu63+6Gcgos3hPa/wL7yzovl9B11YN7SZcovlL5kgrML24aP5wMC1qXZc+C
+Y5JSm/KJ0i6OBr7V+CgN4H5Nr63UxGvUJ9zqgv14LScG0/5cfoZ7Sr6znK/
1/JCPdxebHAtoO9o8K6xH3XxnuX4Oe+nfp4860i5Du77lORI31HhFJ5fzBj8
vmNNHn23ZUb7t32jjT4+6j+tntZnZ2yc+wXyP8Quekv99Z1lq0AL8Y52dXNG
PCx3U37OaOS94/TqWMpnsUcjG5ZNt5ouh4V9BXcbRyH+latdjVEP2YyolkqY
/eGNzir6d1T3pJD7sDzSn3sMFooDRNMxP0spdu2l5zP+eEYuuWV1gM0U1LHf
QTQD+9fn/WTpA+c/NltaD8e/H1W1DpZ84X9qDeKVBoU7JMGKJdf6RuBp3PjP
FksfPEtEfnxrS+/1MEeUWa6EFe2vFP+FpSnnxxqhHpLt7TftaX5ArtoYFt6Z
2K6h+FMTO+59nr953FVYfa1y9gaYtTq+JY18wYV7C/tVcCyKBDArU++sBvG1
6a4aoX4Q68/O0CAf9sVZpgOoD2M0K6cV+fMHj1Y1UX96l+3PYVDfK0JeJZyf
ul517COPUb8TzS2HOSWrCs1HeIxkcb2kmuz5aeuxYR4j+13f4S5Z+ZVP+BCP
YaX8kvSR5i/6y0M0yGMC3na9daH6ntNquv6ax+hae4miYc7wwZe7X/EYlcvt
SZfoebSmL/xjgMcIbTbdH4P8GcNfakPIl1s9/aneSkmpCE47w1QWwB0LorKV
sEBor1LBwoRwq8NYj9E2ybezhScc3JCL/Sq+VMxcCXO2tIoa3vDw77AqcTJZ
/esFvbc8RnHytCYL7tifoL0A8TO1VuYFcH6DOmyFBm7/4lU2LNnx22535Cve
8c36FJi/NdisGfbe+fPcH2g9R6cE/Xeoj+Zu3hxYXhOkcx/XVbz120aRe0Z+
5NH9N6bYXKfnr230fjbWz2IdeLOH3HTxcTXiqbj8PimQ8tvmJ3+GeBWj0q2o
HyRt29l1yE+SlNs5ityok7VGjXpfdw55QueF0Wi9P/uwHrNrTxv1b34gp/AJ
5ttrnVdSfT3OTznSyWM0zAKfZ+TN6c3VSlyfV6uvT+vltVS6NiNfJ+OmuVR/
+3eX7l/D8xV51keRN1c/2C3DfhWBkvIp//9/SOFlRpdGW/7ftdWTdw==
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], {4.901430589874906, 9.157661179749812}, \
{-1, -1}], LineBox[CompressedData["
1:eJwl1gs0VNsfB/BDEfKOhkJD6eGfUIlaak5C3DxG8qikKaEoRIqKxqsk/kYi
r+sOuilFhLL0MD2kUE1RqaTpTQ2GTJIu/+/+X2tZe33m7LN/jz3n7DHcHrY+
QJaiqDr8k5H7cQJ/hjT1/7/pNHXMd9UyAczsLT1bok1zhxusWqNhzj+Djr7a
NHVy6Uv1hTBb2hNsjusxb3Lzu5g0JWjJdjKEBVsv6KfDbM19jWaYfyoz140m
fvNp+Wa4qOn08cFZmG9qLyiGT0QeKt4L8yutlEl8W924p5Nh9dU6l/fCrhuy
9CoNaEq0MdF7EJbsmggNgwW1O6TRDJoqf3iY5wSrj3oZyerQ1I3mCm0bOHxn
47aj8LCmW6A9TIc9i5yApaZfhdvhqtaGkiBdmjLZPO0ij6wX0KfQAE8/kpvY
QuYbVT4cgqmFkW5TSb7SyA1qM2jK1Kqz2gUWsoy2qMKy3UHL04g3Rk2TYH6P
yPXMLZhj9UX5Cvw1Xt+wF2Yrz7X0h0MjLVPHYdEtlfIx5JO8aiiX2NxNlJIE
71uhrfoFpn8vujQJHrJOeHiFxN8fF3EE9Vr/ln7bA1fNNFo/jn6c9VSuVCHr
bdEsOwoXPuJH5yJ/pnuBpwG8JM2pRgNmvzif1IJ+P+n0LorVx/Vr1n4ZcJve
DoN3eqgzrf91GGyXIT6yGuadDSzZA/svkFiemYl4d76KU2DZ0oocVeKQ06kC
eMCvKS8ZfeBmqfZpIN7n8W/5KsRvZB1j4Kh2oznlqJv7XVtA9q9FW/X2FtJX
u+azUainPSvx4wK4yiZDMA4bL3vWpgqLzjVlkv1rHqxKnQpLLIoq5TGKc65N
MSDzDThKMRj9rLwM12BkGyjYdmLUdHR7vB8jXXmtexbyiPm72LMWZta9SnOG
D1x6HfeD5OOvYO8LO+3y67LCyIm1CHDFqNDhqxiJUZi1uX42RpbM9r4SjKKe
rt3duM92lcnYbZifEjUaD+d23d/5GBaYZQ9pwsF7Av2aYHZt15Mc5M986KVb
SvoRnXV5Glx67ZnMTuJ77vI81PtzzPeyFmy+Mt5eE671t5aQfgnkU/7io1/u
LpezTWGO6EAlDXc0fAzlYx2esN9iBP1vLxEpKcCCe3EdzfAjiz2Ju7COeXrY
eC28PER7VQvu415UrG+Ek5PSz5vBlO7Lwi+w8v2zv4owSqRJIhN8/scWVbEe
LPqTCiDfpzs1ksQKLcx/O+mdFLZ3W//eAxZwBrT2Ic71BwkzNGHOfN7UMbg0
KFm3dxrqbizxJ9/nM3R5fifMrkgtUkQd0eUfTN7CfElEeBK8vaBixS84vOeX
ygBsxji/ci7WY/KrI+3QF53RHc/9YFraV8qFD522Uv4LZqsodvLJ8zctM+Ud
yceqsIT0+VnI004m8q/S15M5Dk+Rjav2hs1tfm5eD1fVJZvFwwK9lVGy8Kuh
TK08mOuT4fAn4r8WbhorIP24ZiScB++vT48/BjOVlV6XoR7djBUBm2Cecmf1
bLjlqu8pLVg4KNNejPq3uDWaXkU+VXwBfz7cGWceaQeHW7po3kT/ejQqKhpR
L++eXXAQ7NT5arIpTPU1SueT959b07pMTcTzYb2Qgy/O9Wwa1EC913+/nUCc
S6XbPnjAdFNsDAPXf4ljJ91Qx/xfsfx18N9hgoWLYeGW0ME8WDCyuzRMDfFD
JU3kfdGmIrekVBX1RYi2kecv1SM7YDLMH7pt+hN2eO8QkKNCzoO7Y1zUR7no
y26CeeeHPcj++dwcK3OBJRd176aS912aScQeOPzqYrMJ2HlB8OYauMr4k842
9PfcfjqFgfV5evN7L8AnL3wt48HhCQNzuuDCjLVBWmrkPJiZNwDHKVlITsNM
Ki/qExzUlGmlQOqLDvG+CXf9Z3vbcpiapbv6MFzxYbeWL6yu9j7eCP7H09kk
hFxn9qXVIR8p5a+9A5aM+N9eAWfwkvvtYNF1I9N61PeMGzOiDNMGptZL4Zvu
6xxjEL9Ki7u1Dv0QHpxscgH5cg00RKthXiZDvg71iRjPg9+inzskfjZFypiX
c6L7JHy9trAxbCqeh4LCqRx4roZG2RIlrM/VSHaClWy/Vw8rIF/XVi4bLqce
374xBf1oyLq/j5x37xZuzJNHPIeG67Vwd6CMeqYc5psb7FRB/DO7Zs+rmEze
3xVnDsLB1+P1hychnlGu6wg5DxOpbcHEWg2JsajHK+UVQxM2b7YUk/dnucY8
+W+yqOPMFYV0eM7Afd4Q8Z38BEX0z9GW/2Y25ouWGh/cDzvXhalFw1XZw48e
wa5pvPzPZH0Heis5Bza92FoZgHw4ScIVi+GLXuzKrzB7yspmazj/cFttMPKn
vWvaDeFHNwp0X8N8hntBP9Z7au8htUC96mukdcVwZVpcQSCpP3rNz1Wwr1uR
XIQ8eZ787VqR773q5wvcyPzQuy7O8GSxwfIxrGd+oHn9fdTLXjZ0KwrmWjY8
tocv63fUCZBP+PiTRa3oj9Gnbe4i5M82lo/xI/2cPr3nFern9uVOlYOZYjqn
XgbfH85nzzvo/1OPka4ECp8zy0sK4XqPnI0p4yyK07d1gOz3OUbvA9XfLIre
U9t+Fg7fsDa/cpSF77flwRfkfb27l3l4hEVx9xeWG2F9SfSHI8elcPfiT0nk
PT3Iafr0He6bSB+F5+/+YFE4xKLYaueNDyF/64joippBFiU4tTZ9EuoV6mRH
LILVdfrd0+D5JyqHFMl13vLf5PeIjfsb6SpY6K7DIedyOIcavkXmt/b39MJJ
CeqliVi/ShzabYX9EKQ11exFfHO7J0UhcHhgVM2BYdz/o7g1AXbMWafARb4S
19HAw7Azv3Zs3w+sV3b1rQ+cu9Pk3mrUR783VZ4Bi03jMtphnsO+aXcQb6Hc
H94zfsJyxxx8YPU6nwZF4o4p38h5Wm8VfyIP85mU5S9f2OZbjvU9rM/stXrR
ifoVlP77g4f4zAfe1EZY+fmlyxPIl37SdfMD+iXezHugR/rF4L6MY5BzLl21
bwD5Jhq7mJF+duj123zD9Xg3tVHsh7m4QNv9M4vi03ZvumH6aJ/ThnfYz1bW
jPdk/xYF2H7sZFGidRtuyuJ+amx7qcdjzJdt82LBgu86XXo30O+5CjrZjH9/
N3Orbvz7+1mH/h9YnhXf
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], {4.624807544150676, 7.3917357947121785`}, \
{0, -1}], LineBox[CompressedData["
1:eJxVlnlcjGsbx++Q0i5OKsloTzoqqU6nzKOkxVapeENGi5M0tJ0sr2UQIlKO
JbKMPUeHRJaSJqHFYFSUfYRExZAUTXl/1/v+9c7n4+Pz7b7u67p+v+d67uce
Fbk0OKYfY6wO/+j///30Oab8iZ8Vx0QzSq9ZEteELL4A5lR2yBzAaQZ+vGiw
eGrS9ZHg/CPyl0PB7Lxy/pfBHEsIzYursuSYfOrYd6fBjZft5q8Di+zf3/cD
e+w2MPYCc/3/Lq/V41h3atI+LbBDyS9RU8Ehs2KimywQz856pepyLMsqZ/lN
MG+TxTN/HY7Vn7eecAEsnjj840htjpkUFK4/C5ZcUxYN0OKY4IPk30VgFmZ6
vb8mx8a8ipHdpvXdwUHWGvi7/enTcsqf9E/vskEca1naVsVQX7xYOEapzrHl
jzyPWRCr99RdBifEBIj8wYKeQt98sCB+WW48cedN60awc0qWTwbpDWlNdEW+
dMsE1WOk7y+HwgpwgfmwS+fBrDIxKAX1lfYV4iLa//R17wT092ZRdfY/VK/k
uI0h+k+Y4/Iuh/ZHLNjZAXYWr8tZRuuFC+Q3offrti6XAPLz3hsnEfyYFFrX
PJjibU8VGcOvRvd5QTLok3MXzDPAzi5FWZvJr1BXtxqw4S6+gTtYIFVRqwPz
Vn3Y9sEc/TktcTsG1tK5dCUXLC5tsfwd7BCkERoIlnTkPzxI9bpSOjQoflHH
Q5k2PZ/oZ3fNEC+c8f0p+h0zZ07HfuLalK4q6DM07DycDBZ8bv92FPoLdldf
mw2WSCJVU+HPgfMa2wPA8t1v06bDz6y0mVf9KD6ev9tNDfNhXzszmPKdjBHx
B3LMoizndQytB5g4ClU5lqObkboOzP05pbh6AJ7fXZ2rRynfvyq+hoPzR87T
r6T9BkZuFuCLA0bcbCUe3etoBW57cEtTB3rkT78/jwDzysdNsgMLWN9Bylfg
/Uh1ojnN49ak+agX26HwngbmBdbPGIZ+CnZlxEyn+AVPMprB0l+aZnuTf5Xm
gnL0r3SNFVM+Llh7RS70uaXdmK1G3CTNiIV+j3OLXRtIj0CrzQT+XEwzWH8A
zLveZ3QWLLjl/JP8Yh1jvIbAz5CKCLkO6UttzvMBR5sfPSUZhfgUNyUHXjVL
qZ4I5nQ3ptP8tzilVJuBJaru0zKRr9Ey6mAjD3lD/1a8QX3ninS13WDO6PBf
2uC5l1e4h4N59qWb9NBvW8GLXluKPzL1bRf0CXyqc1TBzHKc8X34UVU0Le3p
SHBBT8hR8ks+wuEWWJy+uXN1f/y9O9+jktbf/dkp7Ic6d7+kvySuiAtbrYJ6
kuyk/+bLHnWgiHEsL/L6ATOw+FrebFOwVrzWs0nU39gM8YqffGYx5GLGIrCk
V5JkDb5SN+n9dlqPUXedDE5b9ZvLObDIsv8hGTikZM7jGsrn5TEiAvlsPBas
eUFcOIz1grOGeTm1UP1L61aXoB/lr4qVzZS/onx/JvXrMGMR+cW7pR8ZBz1a
FTuPl1L+xF9TvKC3au3yJXtof8LLQxrwY3m/0eIoir+XmHgZrHWy7bAV1Sv6
UjkB/nH1ruIb0M9VHJ6cA54duVJhR37tPVlWClY0bgrONEV+43lrzoAdNPM8
Po1AvgERKQLwFUd91xBitejJL5BfvjIj54YJ6hv6utmCW7SFPnwT8k/3uy/6
a1wyNOXecNSbuC/IG/0rhueuSAYzl6NXLaEvNsTniAOY17Sg8Qf84E3Zo6dG
8dLo9oPwLyF/3tVvxuAGk7q5vXyW3vxHeB+Y+Si7/Hv4zMaqKnM45XO3K1v5
Hev9VFoDiFPzQ1S6+Uzy85RVOrGNt6z1G581eqcHUj8iA+UWb3BVbLWGIfrl
ctfkaYFbbCZI54Ml8RkffWg9RGIuJvbQrWkBM8XCH3Wkd7z+8fddqL858cE3
4vYrQjfUlzt1dw+APxw7EVX+A/GHKq/1YF30XdgnVPKZwx3fjY+p3tTbA6z6
+Ew98fmHg5S/wKeQ5iXn3eNif7BAZ/GXv5GlSr20/QX6lU93PTID8yE+N2GH
ACzR2XlcCg4Uee2rhR+CP2eYGsNPt1fLKn4Di8Pqk5zALfZf/HONwDvDt+uD
c6KT/1EaIt44WbUY+6uuJiREGdL5pjS3U6FzkdXXD0O94uDKONSPdX6zNxQs
MtULZOjPsOGi5L0B+o/qVXkPPQXqPQt3gVmd0YQT0BtrvSZ7Fq236ZRMhf+y
2v0mzrQ+9I1ddyfel/F3ztnSujRmiKQD/kXIy12IdzzfV/KZj3P3ypnZFG+0
o7nvE58Fft5WlQEWFdfd/q2dz7KCZxy9Q+sTtjRMbOWz5Wu/WQ9Bf6zhdLj1
Bzy/bJvWudTvtbmaivd8llcfFHmMuMG9cQ/WbX5VHfOK4pVfeVpteB5nkgIH
Qz97tCTF5SMf70Pj6rHEIyxer1Agnqfr6UbsmL1J+wvmx+HicFvi4T+My9B/
S+GnamZI8xM+OhX6WnyFo8sof/jzHiPMh2LdzZkxVD+sVLITfrjx+Rs60b9E
oXmpBvOSM/CQSjKx8C/7c/CPJ7XoefUL4nkeiY6Y7xbhw6m+xL5mqb5gkcVE
/7yhyP/kUVgb4pc3S5ZpgCU13zN5YJsQ26DkIXSezep8j3pZl+173+GeJFGp
TZmJfvyKDg4Rgrnm1M3x6DdLuDJ6IJjpGa70g56CzG3Vl3BPknjOXdcL/TlN
Bf1FYFbVFuYL//X6rz8RSWxXmnqqBe+HNFIrAixy+/xtyhs+677mGZtA/HuX
XaQces32P9hD8U4HBlg8wfsh+B5/l3jVasfuej4Tf5bu06X6/oqFCQ+gr65q
9Gxip4OLA++jftab40eIXYxkU8Cckdb6ZuJBTs7hFP97aMoo0psX1CVGPsPt
6SenEeeeafN6DD/C278tJF45fHr3C8QPzLSNA4v6FZpeasJ8NGfrhtL64KUL
ec2YT7t7R6xovcWzZAvmJ/BYgPZLqndq4VsJ5qVxx6jza4nfpenuxXyKbtdp
a5K//f3ZZ/iVp3xyMo30R7TplGGebcStDQrcK0VmY3VsMD+iTe2HQ8CSJ1lW
5mDZJkFVnC59lxyK8xEvvr96niPuOaIV9Vm3kS8w6O1DNdxzRPrJaZ8wnzJh
x+RuTfJ/WVkO5p9n1bZFk/hQ/Y3T7/A8azmZH76zIj+TkoDXmL+zfVOKBpF/
ewODn2O/V7ZiJvGInj9a63A+VT+ZbknsfjRt8y3sN5uVaU1cMNro6RHMQ0Hu
hjDiub36oUVljCfivT5DHNhr4F1Zxrjy5u0j6V5r+9kpXlbGEm6Ffj1FLKoK
2lpXxhx69211p/7MT8x7Ww826PWTEu8K8VwFli8f4RSMexvb6hQWVYv9xccb
y4nj9G023y1jbLH5i8HaVH/px4IK1JupFeNOfEVzYNw57H8WkzCeWFGuMf4E
9KSfHPOT9nOty9QqoH/DZNM9xHeieL4yzN+2++N6qL7eAsMdj+DfgsxiR2KN
eXd+PoX/lUIXPvmXPe6eOeZXJntlajeI3t/7G7NfwZ+Lg9P6cK9iwYrOsZgf
B6cscQW+i0wqbfqEdd6Zl3M34jvIauqPS7E/S5pfMx3fQZZ84UYO/Jcv1Ts0
mu4lMclrfzbA308Tz5jhXGYvPT37YZ4VN9uX8HEOM3nLlLvlmPc9TSc34xz+
/x/3Hx+j1fg=
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], {0.8213898624895379, 7.10839427566285}, \
{1, -1}], LineBox[CompressedData["
1:eJwt1A80VFkcB/BXnKKUqZRRZISJDImUtNVrM5vTklH+bFgNoWnTMW2SmJgN
GyWpJkYhS9rZqGZtRZSEMv7rrMLGZhk1/dmlSFP+7fe2+86Z887n3Hfv/f2+
774xCQrfFjKVoqjD+JH7f9dcmhqbxMWmKRfL3Wx9WO8aq3nrUppiFURe3AIr
t3nlnodV64tjM2GmWRO/B+7gOB6cMo+m0rLtXIwsaEromj0QC3clZk9xJz5k
6zxLD8/b3lUcgNPq3AYuw7kBN8THYV7mjT+482lKUhpbdQbmH3Mu6oOZQea9
KfA3UWxm9AKaSvGOe3UYZgqd7DT0UWfejVN+ZL791bLDcCnX3mAlrCVvD+yE
bd3tnaeR8dWjk4uZNBX2YTPrMeqlH8yocIE5+xQv8uHB3u+tveHWc4wnB2GB
4KobGadKbo67wbL9O+JM4NxdDazlsHxfbEg/1hexnU4uIvn4HLslhStlwxN6
cI+H1yQNM8xSkg1hfo7IT4n6o65zj9vBvLdb2Mmwq1lwvjfJr+KszAHOjeur
PAYzrfbUDqD/lLsCdg2sbuoquQPrfV2cqI1+HJV55bkwz3O3oRdMf5p8mQMz
+mra82GVb/302/Bwi5/oHSxPThSS9YYV3S3rLGnK4nLlnI3Yj+7oqjoKM2cP
RxXCl9wDpRWw7OmyoWWov6faS3sAZjj/eaeM9Bs/ETh3GXKZlrHBC3mohiYy
lsK8plW+w7Awv8XHBk7L2Sg/bUBTOmUjWmRcOs98jL2Qpto4jQoyn9nvyb8G
j0lm+Q9hfarR9Lcli/D+U8f0G+Aoj4T7ccSatjVZsO3C7YlVsHTDxci9MCtr
n+tL+I1p6V4nmC7Pah6CNXUSu3Rg1c+OK/rglOTJtn6Sj6eP+jbs0n1FRwGL
9bjPY+AbLgeqb5LzKHldbw3zZ0svyWFZ3XnuY1Jfq/6vt2EXoY8oCjb8eNPu
ESx18G00gldW06Ujn/OvOtRA+jVzWWSJ/fk2Ms9jcETraGooLDbL/MEbpo8K
S4pgqWOw6TpYPWGsUMNp1tHL18MclYFsM/IRLivg+pHxK3MWpsP8oxoXJGS8
etPzns/5eX9QwXKRnqa5Fc4du6HGC/WYlbnd3wmLRYIV7XBY16QyFY7SFfMF
6K/G6ctGOaxqOfOLhiHOU0dAXA1MvY//Kw/mm/lU1ME80a4rG4zQd6Gx5n0y
/33tg99hs2cCcSGsZZcasmMx3ksmV+sEzM99FdkAq1dGTgTCSVpTlebGONc7
Tqy0h1mryxQhcBZT+HAKrE5nSpPhIhf7d63oxyLc1fY0nBTO/CcfHgwI6joC
0z/OvneEOPzEpm3EkoI5gSSfFy1fzYUVBTH6PHK++lXNVdhfXPfsO1dYEKdI
2QOLwgw+ecOlizTlOrBe8c7RcFhV3p5ejH6U9oavSL7Uy4aYQDjiQtbJelgx
xjY3hofLu7S0Ua/FvbXnB5FPrn/2O3dYMOjX2wknFaRFZJE8P5S2dsMJR7SF
r2Gm8vGzcVig2H55DQfrRQcvdiL5vS3sjYc7MhJtTsM6o7dMa2F1Z6QPhfpa
TwZVUda4P1HI4mHhIweJDZzb4WW9AP1KW7ynu8MqoxCrYng4pnNVIOyvGVBi
waIpZz+PkWCYxQlvjIRlH3XbfOEvQkvWVMKD1kNznMnz9CbWVBOaatzPOrcE
pmdGT3WC/ZniJjXqUSZ5KEPgjo8O6XVwcPH74AS4pvk6Qwp78jJbJbB411LR
bljvaLJlBtwTf2nmWlhipWuRAsuvZN+ZDwsnjVcchBluW20/kTz3+zh7wmMB
t5JfkfMlYPVawW88P3moiEO/fT2BeiXCpOBhOK3bVtQKO1ZqKGdjvQjJw+p8
uGgk3nE1h/x/mD+NgRtraf0wmCdhZfvBbe3cs4XEp0N/4MJ0ns+qIVjAyBSt
hTnPalk0+m+rGH++Hk5wyrE5RfKq1t/LY5HvwYHVDQtqtcbDyfyidTVsG+xf
b/k0CxaMzjDZA19it2U8hiuNdC/8ZEPmdVkx0Y9kIH1BM5zS2MQIIv3uYcz7
GxZzpIFyE/I9RFeMw5+vJf/fl9P/Ahw0s8o=
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], {6.325036049813624, 14.053684443959671`}, \
{1, -1}], LineBox[CompressedData["
1:eJxFlwk0VWsbx0/GQ5JEiLD3Puxztm1IfRdpeHTvjUrlcxNKXRWuSoZKpgwl
lTFHk6IS6tKEckUplfIZoiQSGoz5QtKA5OS+e63W21nrrLN+6x3O8w7P//m/
xCY/R08pHo9Xhb7cL290An0I0JJwv+rA879nOFRDgKn6nEaLiBnAaz60aCKL
gAtbpqiaK2sAL3WnxCaOgMp18vNbLiJulo1XjSKAKltdGrBSE3i9N3d+jSHg
n1bFobaPiPWt9/ydRoBNfrPeF7EW8Bxsq76WEeDx8r6kxWAm8KLSZikMEdCj
Hh70ey7iHONNv7IkdDDhqZUa2sCrVCaTfEk41028UPFFfHeWkX8hCctNdxdP
vYhYZUgAYyQYHJaz16hBbNZ72Wk+Bco+y5w66xFr5nrMC6Kgr3KZx+G7iC2Z
jc1/U0AUrEgMPYU46kZ8Vg0F/lf1TGZ6ID60uPrWGwoK+y3IOyTifDMDuR4K
ikzOH1zahuLzP3/SupWCFBnPx53HEUNeff9dCj70HJ93wQWxflRyaCoFGU8L
1ZfRiB2sLKU9KJhkrfy1VR6xS5f7EkPUX6lKNfg72o8nTpLIDhKWxSvKTVfm
+o99m59OgrpFy2JHS8R8SY6RMwlphH9fYDhibxuHdzNICFMt8nfi4jGz/afp
FQFS5UNqfo4oXv+JvjcFBJRpj8UotHHr9/6wOYWAmICVtZ67dIAnfDhFbh8B
ZhXXRr+rzwJecPLtzL0EdE1daPDsJmIXll4kRuO72hRL3HRRe1mLQj4BFVXZ
dTlfEHu3VHu2ESDenlU+I0oPcfLQxHQSbkzceGk5glg/MOL9Hyj+iaiRLCN9
4LlP6nueSoLO3u/CFysR8/p79V6TsDr8KHvWAzE/7bEGRYFYeHXdlO2IoxQn
TDdS0NCqJP3eG7FK3Tn6OAWrZjhUXHdFLKxbYVlGgWNso7mXDeLR1/OsWygI
9/r/gQMk4nxfnYpuClr43+a2TaB4VMTaC9sp2Dy63tmhBLHQ5tPrRxRItbXO
Sgni2hXvl+ZSkDr2sjoWEFdW37oUQkE2/5FsshbXf1HY7EUUzEsmGEN5xJoq
CzdISKg7+ralRInjkcfZN0hoftAhE8Qizji//HIACYXV3cXMX9z+RMzSMyXh
fMcaL8tSxGYaL0I+EaD/bEC6Xg3F6/19V9s9Ao6+5G2btgZx82z3N+kEhFnv
T7xyFnFOWVbgAQJ6Cxx8ZQe5/nFdlZEEvGJ8BawNgfJRK3NOLAGddlEzpx5B
bPk5xiKTgG1LRHZn2xEX75GKqSKAFJVaj4lIdL4+vUoSArx2a9cmb0EMHXI6
81D8r0U7lp5B7G+xOTKcBDltNe/0CsSW+8m8chIkI3UWOe2Ig+W6JXwKpEXj
+xYMcvOpaVYvpeCMy7Gwdo5z1HOv7qOgs1K2p6ILcXJQQn4+yjctM5k7j7nx
FkVe9RRE5Jyy0bmOuNLaZ2YnBXmaS96mi7n2ZTavuijon3geOt+X44v7TzVR
8D2v/7qKPcePIpVLKIgt+aSnZ4KYvzagIpGCmB1JZ+ZqINYfqJFzRvN76jaW
KSBuTqq7okEBPzQrOV8ecUaQ8pQGEhIE5jXrVTlO+1KaQMLt7FMFOxnEdlfi
fOxI6C15furdKm68SCEfzXMyQ3+b/D4u3ulvnjQQsDeC3eBZxu3f2rRzuQTU
x/KL+HIUd97yLokEpDtuWB3yB2JhSrwf0scyfuKLzmyK20/bY9Eo/wINEheN
IO5Nm3T2OAHyEY2qQbYCtL4ht8RiAnxCNKrEKYj9WeuTbwlYaMC/0Noo4PTj
2HICxRenEaYw1QCNjzp8ZhMJZz9XFzvPR6xZO2GQg+J90Kae6Ya4UsNtwXsS
Bh/ca9vhh/jJlxTL2RT0BLerKgRy7Yvtj22noGZyEe3ky83XPirKoGBOzGTX
fm581AJrhwqUb6lauz8tRuwv489/hfLF9JKuFIVY2B6qhvRx4QhXPwS43efp
6nZJmwCPL9jSE6t0W4Dnr9/z+cL0LAH+f6vhpc0XxQIcn26s7sBwnADHnyBa
SCUmC/D6OkXUu/Xc+B/r95zyH9uc8p/7oxPUu3/4w8/9e9g24ipgDPD+njjU
+4vvdgO8/5JoZuBQsQE+n+UhLTvu8g3x+ZV27zDUWWeIz/evvHOXDlw2xOdv
HjyydOSrIb4f0dEN504Bje/P1o2vj46G0/h+6dgJPdXzaXz/ypZ6rkxopPH9
/FBVOzdzgMb3d/ygm9+qURrf75j0dgaGaXz/Iw8HbKzppXF+hNkpvXlTT+P8
kXOcbj94ncb5lfyejikX0zj/ahtLNDf70jg/Y1w973Ta0zh/O3off7Mxo3F+
E1ZjWlbaNM5/r9yt+3VVaKwPvBfS4fc5/qEfEcNmlc66NNaX3Q19JzZb0Vh/
WLIpsWgjjfXpdHyXud9xGutXR/OvD2SbaKxvqbeabrjrCrH+ESWR3R98hFgf
T5eLWxvuCLF+ajvkicdURFhfYyvCdji6i7D++gkmjr7PFWF97jJWHTfpE2H9
Lkh+9qiTYLC+5+okZm21Z7D+qyQkhT/YwuD6kG6RoJoVwuD68dZq8J3PHgbX
l2sSLYnFTgbXn2IZ8cxbfzI/65Oa6tAvvzG4fi3/6PDMmWJwfZu6dV/3NB6D
69/BtBkhIS9FuD5eC2ZqT94R4fpZ2JdnZX9BhOvrbMNP49NOiHD93fniv9kf
U0S4PgsDtjW4p4lw/f5z+6TnhgUiXN8HpSL5bs9EuP4LpQTizTIM9gfWy03O
fF7EYP+gf/pKqlEMg/1F9mFxaFY9g/1HXI/7wDHSCPsTj/gL0bxAI+xfbKpc
tGofGmF/I/gsteDbNBb7n2j9g4GVa1jsjypGs20bxSz2T78M2Sr+fo/F/urj
05RXTZ0s9l9NOWN7hkdZ7M8SwtKGy3nG2L9FdwVLq46z2N8Vphp8WdvPYv+X
kFTYcbmBxf7wVuQKzaRCFvtHwtl4fisXzw9/eXFy1/sMXxb7zxrmQ+/HFSz2
pztFriX3zVnsX5NOt6wo1mOxvx2vWeukrMFi/xtwc9x110wW++OmpgfUKMNi
/zxnqt+RETsW++sjPveua+9isf+eFmTz2/pLLPbnjkd096oOsNi/d+VO95e1
MMb+PjMq9KD4gDH2/++SGon/NRvj94H+6vH2FMYEvx/MVnwd7gk2we8LnyAv
9a67iH+8P4KkuceIKfwLwbj7Cw==
        "]], InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox["g",
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->7.6718816067653295`],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          7.6718816067653295`]& ], {8.0548, 10.5}, {1, 0}], 
       {PointSize[0.04], PointBox[{9., 15.5}], PointBox[{4.5, 11.5}], 
        PointBox[{9., 5.5}]}, InsetBox[
        TagBox[
         StyleBox[
          TagBox[
           FormBox[
            RowBox[{"C1", " ", "N25", " ", "T25"}],
            TraditionalForm],
           TraditionalForm,
           Editable->True],
          FontFamily->"Times",
          FontSize->6.137505285412264],
         StyleForm[#, FontFamily -> "Times", FontSize -> 
          6.137505285412264]& ], {10., -0.5}, {0, -1}]},
      AspectRatio->1,
      PlotRange->{{-1, 21}, {-1, 21}}], {0, 22}, {0, 0}, {22, 22}], InsetBox[
     TagBox[
      StyleBox[
       TagBox[
        FormBox["g",
         TraditionalForm],
        TraditionalForm,
        Editable->True],
       FontFamily->"Times",
       FontSize->9.206257928118395],
      StyleForm[#, FontFamily -> "Times", FontSize -> 
       9.206257928118395]& ], {32.75, 91.96}, {0, 0}], InsetBox[
     TagBox[
      StyleBox[
       TagBox[
        FormBox["g",
         TraditionalForm],
        TraditionalForm,
        Editable->True],
       FontFamily->"Times",
       FontSize->9.206257928118395],
      StyleForm[#, FontFamily -> "Times", FontSize -> 
       9.206257928118395]& ], {37.25, 91.96}, {0, 0}], InsetBox[
     TagBox[
      StyleBox[
       TagBox[
        FormBox["g",
         TraditionalForm],
        TraditionalForm,
        Editable->True],
       FontFamily->"Times",
       FontSize->9.206257928118395],
      StyleForm[#, FontFamily -> "Times", FontSize -> 
       9.206257928118395]& ], {41.75, 91.96}, {0, 0}], InsetBox[
     TagBox[
      StyleBox[
       TagBox[
        FormBox["g",
         TraditionalForm],
        TraditionalForm,
        Editable->True],
       FontFamily->"Times",
       FontSize->9.206257928118395],
      StyleForm[#, FontFamily -> "Times", FontSize -> 
       9.206257928118395]& ], {46.25, 91.96}, {0, 0}], InsetBox[
     TagBox[
      StyleBox[
       TagBox[
        FormBox["g",
         TraditionalForm],
        TraditionalForm,
        Editable->True],
       FontFamily->"Times",
       FontSize->9.206257928118395],
      StyleForm[#, FontFamily -> "Times", FontSize -> 
       9.206257928118395]& ], {50.75, 91.96}, {0, 0}], InsetBox[
     TagBox[
      StyleBox[
       TagBox["\<\"\[RightArrow]\"\>",
        DisplayForm],
       FontFamily->"Times",
       FontSize->9.206257928118395],
      StyleForm[#, FontFamily -> "Times", FontSize -> 
       9.206257928118395]& ], {55.25, 91.96}, {0, 0}]},
   AspectRatio->1.075,
   PlotRange->{{0, 88}, {0, 94.6}}], TraditionalForm]], "Print",
 CellChangeTimes->{3.543121736741829*^9},
 ImageCache->GraphicsData["CompressedBitmap", "\<\
eJztnQeUVFXW73u6OlQnQNTRMY1jQAEFRQEFFEQElKSiBBEVCYIKIqCC5CBR
QAEBERHBHBEDYI5jGnNWzDlnkkC9+u2z973nVt+qxvXG76231jdrWrqrbthn
h/8OZ59zOvQa1r/vwF7DBvTutWebIb0G9x/Qe+ierc8bkv4o8be8vL/1T/9M
3DOP31N5efafVPr/qQH8h0/+9/f//f1/f//f36v+fUf5p2Tfde9eM3HYqKta
3P3I490fuGHmvnPfXVe65fd35q44t0X7wXe/m//7llRevlxbLf3fTcd9eu+F
bUet+jh/w5b157499/jexy5+ZebDQzqOHjhhxgXTp8/eafVXPw5/ecrwtotX
3Tdj0bBp1Z7/eWuB3F6eSG3+9dSXl3ccdcTER5Ofr/9h5hO5bxNq6zpqd3DU
pv/78/KnTm2196y1G/kkP7VlY9H3G7ekf98w+N3ZXfaZ897GPPe6in+u/+jm
3e76dF2LHx4ZMaPzsKVtL1v1RXLj+k86P3TbLbs9+umGvK2p1N9SW7emr143
4bXR7feb8vaGvEK5t6zRr8/269bpxs/zNqdSya1V3BNP5y+Ln+nd2uhM37M5
sX7z1mx0HnnzYwuvPeO0xdut/WFt66VrvijesGF94eZNH69Y0umcak/+vKnN
l6tntL5zzV19Fl/1SME3f6Ti6CzeUsU9Pp1O+sldN35217DJM65vdv8TT/Rc
vWz6XovfX1+25bc3r7yxX9t9Zr+3MREIfmObz1YPeqzVkUO2f+C7Tfuve+u2
kQMn3XfWswsv7DjvrhWLZ/aeUvra71uP/P6xfqNGTJzRf+aCewq/3JRyt1eU
pNatHbhozp29Vi85YWTzSSvPvOfqCwevmJ3z1gi1u8o/CaSdv2mLfOO+b5db
x/MSJ9xxxx07fvPNN+Et/eyrknXr1o0dN27cXu+//37GV6JaW7ZsmTB69OjI
V84QEoNnz57tnmhP7RP5ftiMGTP+tlXUJPp9XsHFl1xyCV8/fsQRRxx37733
yrd99dtCbhoyc+bMA1999dWjH3zwwd6LFy+OPqBo+JQpU2q988479v7+CxYs
+PvXX38tf/R2VznNSuzz3nvvnXj77beHZJwZ+X7/t956q8PKlSsrfZ9XzL97
fPzxx+PGjh0Luavatm0LN6r9/PPP0UuT/MtXic2bN3dasWJF15tuuqnil19+
mXbhhRcm169fL1f3svHzLyNLG/30pk8++aRybOcvv/zyrIULF4aknOHuKHbf
D7300ksDju8s/y0s++233xDe3HPPPXfOwIED4YK7t2X2e91n28Po2m+++Wad
N954A8L5dLsffvgBhp87d+7c4++8804+5/kXTZ06FXL5t/WaNWsQDooz6PLL
L3+jTp06efkSiSWgIaoVLXTUu/Nv2qY3tHrggQc63nXXXbAVsm7s1q3bM40b
N54/YMAABFnjxx9/POill14aOWnSJB7PK/n8iMcff3zM+PHj4W/7u+++e/SE
CRPOnzVrFtq0/Xfffcfz673yyisL+vfvz2cFf/zxhypjYc9ly5bdetJJJ/GM
EZMnT77l5JNPrprkcoTE6xu88MIL6BwiXnr66aff065dO4ZyyvXXX4/ywP1R
EydOdLae4LY1rVu3lr9UuOW//vrrvccddxwjy9PrJo8YMQImetcl4crAOXPm
zBg2bBif7P7JJ58817Bhw4VnnXXWLp9//rkv27zivdeuXWu01/z+++/h5yPN
mzfHquzNEAYvJ44aNcrejCiPuf/++9E+u677DTfcwNsYqH5WDl97LVmyZMD8
+fOr//TTT2dcc8018O+2zp07w4Q7jz/++MJNmzZxNYwSQlpFDAxR7/vuu+/y
Sn1sAa9AwzCTPT/88EMPUoAcpG5U9bvyyitLf//9d+/2cjQEjUBR4dUh//nP
f/gGqV923nnnnXn11VczaqNKH7XrZ599VrRx48ZQ0M19Sks633bbbf/86KOP
Lpw2bRqDwvYRD9Seunz5cr4zslA8cPXkW265RT/7O99fOnToUEjmEwwfMq/r
0aPH7SeeeCKKLkqpwkLEdV9//XUY/I8vvviizerVq2Euit3txhtvRGiHPv/8
85VJTQJBYMs1Z5xxBjLnEXe3b99+Ud++ffldxcwoDv/3v//tjMBZPRyYfsEF
F/BGPtnt008/ZYSXXHzxxYYC/IuuYxrA2FEPP/zw1IvS/0szs+2qVat4paiO
T5p7fjHXIwiQhRGiNjt99dVXjMoBpUOtk2699VbUimEgGdMN7udzVBuzdY8t
FK1M/8aQYBpAFbHWIjfkdvfccw9471l/osvNN98cWIqS2ejZZ5+FpH998MEH
mPKV/fr1mzRy5Eh0ze7jewRw3mWXXab3JRBQFC3MGBPtV929bMjkmU/kf592
z26kCV7LSD0TL0DF4TpqjLmrsFA7mMW/RgGjBetgilFgnIihYOdNX655ZHCL
QWUv/ZZShhSghYAOWHXY008/7Z5chkKnxTlx6aWnt3zywKatVnbq0HrkmEmr
hHh1qRgAIs8r5ZN8npBXAFMwxvFjxoxhdL4K5CWu6H72hAbLX/iJYEwJrml6
DSwCvMAeFGE7zZ544ol0YPj9ogf7Hn/RmVMXNPjghes+OWT3BuUv/rrVNBE4
4N1CRV4Rruemrl27gkUEAUg3iCICQrpddePV7Rfc/eHf1m81QqqBgOgOqs3v
DGN1mzZtwGrn1NMOcMsPD792/AGH3d2ifc/+wxfcddALL71UzSmOQQqWg+07
2PEdRqL4sw2fr76+TYe/3/n1Fnsryg0IAg0guJk/b8aokG1RauMHixb3vejG
E7p1XnlUh9N3X/vJp+6tCRFArLgLTp2y/LoVEzsdd/bgK1792y9bU+rscDVY
DorCSxmyKlQJPh83hO4BnTW3fr/mgfatlkYIrxYqZOyb3bN2TIeif5AM8NcB
r732GmzFgfA3Mp4yfPhwzOvIxx57DNnf1bFjR5wOz03nQd9csvrifplDUAeF
7q4b+NacfucMmXebb1cO/4ogveFzzz3Ho7BO4gLE4uuAWhsahI8Bg6DIvSCJ
7PdOx4aPHXnkkZgF8IeSzjr//PNhoHovf4z6xCLT1z2WfbzJtzilDTfw4sEH
H0yYxMsBYCAgop8SgmEACIlACyC4/pRTTsHmLBbgc/QUlMc3EvnwDRaA9rsX
lmXjFar8TJ/GrSM2qURagARxoDm+D92IEJnErLBe0wKwn1gI6QKUilL4YRwl
6GURRkRtFXOyMc60P2KzBVUoYV4yDNvdDwrQ56qrrkLfYZVC8NlXXHFFcJmj
rjSONXGmoERI8BFHhEIywsCUxdLUYYHyhLpEAzgX/tZBlcUNuCqLICVCh8kQ
kBgZCTLwJVbufBtaN3vw4MFYSPNHH30UHQrQxz2uMNbwcyg993645557Yit8
gnvHh1R+fRJwIwwjwpNQTnEcrUHH9InZBuzEVoTgAWVegvJj8sQu/gsrxC8R
CqjWoawWDZpwIqMprkKgNRxooEoE9ctPPfXUHtddd12NKpSxunsh9P778MMP
T2ll+o4TTjjBDILsjnGIgasrw/jxz9gVz5bQLc0pf4wKxmASodK1p512mmYu
xfcde+yxRg6ATrhFRi9kloZo9O6+++4LCPMJ5kvYXVlu1RDxfm+//TbM4XFg
+VV9+vQh9eDRFjESncFzfCCRYWmooPhjlJMfIGaHb7/91n+TXsqT8BanXXvt
tWAMqQR2oqpOPAarIISkmyfBIoUbtJ60PvAUuSRT4r5HczADiXD1OXC//ssv
vywFBqcsSQZhMTo/xGm4BuJ9zKmoCqdcFLpgBgSrYJ8Ey6oImAR5laTk+loS
JLIWeyYjhlSegQT1scReWBCj5/KWDz30UCQC0eCW73EosJ9PGCn20+KRRx7J
87hIRCOvdc8vItQEV5o89dRTpBJwFSfkrKaIWgnyIBgDio697777+LpyFpDE
HYTVn1QK1AIXGBgaX+bsDG0lBAQu+Fhpg36eQIxp+IdtoCs8Abpw+bCmsluF
TDjFiJEdMadwQiMCmI8uEOIi3wrHNLQNuRnJvJwhSOIS59Wi3giaoctGTSkC
D0VSwWN1aJh/4FL1zRgbtk2YgiYQLcAwDMzenD3qT0qKi3fRr2EqykUtCH+4
vVMeTACDg9fzzjnnHEIzZUkxb2b8CJ1PIBidlcQsGuJajug5hwQEwy4pO7iy
agWPwJrsWv5GplBKqQcSsCocCpIIdTmCSrAoNrrR58Z/57SwHMt2eWoqhf7A
EZQXvUc7yLAxUWwFecW8PlvMwrdZv1NzIghBbtgMr2KoqIhyjSw4lFumW8sr
jI3f8nN85zxnAdGIqwNWLsroo2Mjrvwc36lTJldBiAA4js5Kjr5C6itiA4z8
HN9puIYB4G0+23XXXass0bl3VWSNndLfZv1Og2zsFdnjIPHfwBEQjWQwh6pI
2M6RHYkyXBxV3f+MeAkwwo81fuaZZzAN9MLgwne2Lkv0WPp3x33II6jCuDEd
MAIYVIgg8EGbXcDLZ23c7TXd7UAPESlRqoUL/Jsf+iUKQ1Ii08+ol+L2HPp4
j3QBUTFOhFFRrrJK+rONGjUS96xkQS04IqVthWDAAAjmJ0g7XL00z7mGYj4m
9AKWMBqSM0ASiu3R+ALibr/Yg11jWUKyXoefwNOHwtN3qWPDI+D7SNkgjXch
MA+zqXTKI7wK6sEvvvgi8rRX8xhgEJ/oXtPevUbxADhCOHCKZwGDnvxAQGQo
JWHvNacvXboUytwjT/BdHYgCsqBNOG4SXEIyn/fUddE44z3lfBiLBhFpKfHw
UC4LeGRvSuDnkbAP+UTHQWblBVT8JoUSpYAIJpx84L9d7LFSCs/wJIwXgkEB
+wyL5DGhEp7qHlEYagEiIqy11xKISikveG2PyD2U9RAVUblFpdm8ic8MNaVs
yO9fun0OpI65LhZ2Y66Lxc7K12VNr+TS492lO8Vgl/y3k/tefv8L598drv0V
8+9/ZN7v9KKq+fdKtx3811C48+ovv8189TZ0CMTd9hdR+I/VX3w16eGRI9ss
Xb3ysnnnzSx/+ddt6WGIu+0vopDBp6/b3PSnJy+7p3m7pcXvbdjGLotKt+3m
1FHbQfK2vcGifFsaLPz7HPyU5uqt8C8/+E9TtE0tH5VeuQ0tH5XuOegvoW1r
2R+/AUa/LHi2f7s9F364aRtoq3zPX0Bb/tYtP/Z77sprT7rz1kvva37sFTWe
+PGPqmiLvaeSsm1rl0z5NnTJbK1C2TIaZLbGK9t/s29na6VXVt23U/meg/4a
2kq3/v5h66fWLJ553pCVBV9tU09R5Xv+Itr2WP/xqiNWPH7vlV36PZP3S7yR
ZtJW6Z7dfEe7ja1OJFXb0uqU8m/VwKt8G/qcIvc1+DOUbWsT1obeHyyOvHHb
m7Aq3Zp38F9B4aYOn6+8ou3Nq269dvxpM5Jvr/8TFFa69a+hED/0x1HfPzzl
mlZniC5tO4WVbjU13C2IN8MetoqYz8pjPjsgL2eQXhhzS9dt/KyZo+7svJyx
/QZ31Tl52cP6i+S7YPbAqiOj3Z2uTkaeKVUfpYSZN+qtgXCy5QKuglNAlkM+
TPpG0aC++5hShU07XHH22Wfv7Z7OFCP9Xd7YtYmEBNT6M1xKVkDKzUQt6S+/
56rkuARa6uoknzKCeu4x/gzI84ceeqiSQoJJ3kkhzkjxatFBY4XyhQzOtf4F
CpE1p3FFiQS5dFC8d22ThVQkYDG1FTrAmNHJ29ddT07LfIj8dbKjSPNHyixU
EXyKIpNG1QM9ClOnYxyVVBBI7WlEO2fevHmMjJy2tqPIryEzTS99WUoRXA9e
E6WIDJjJPKm/KkXUOgKKPCEy04YgqRp4lRy4L3+5txUzc07p883atWtbiYUK
kFBYy90XqXifpAoktQeKBdx9c5cuXVBq0nNJwd1VRfQ8UAl48Oijj+YpVAvo
Z3HDKmDmmfkIxsVkghtmAXSgtExLUF/Zy2Ebo6Lp7JEWLVq80KBBg9fr1q1L
XZ+pLabDnY4VYViMkpo9FRtKoaioEV4AAXyJWVIw8biDlshfLo9OUo6h8kH5
wVV0UinqWBT0Icc9M0E5ZeaQIUMQpcqqGKWjRQUZMFMGK2xKJ29P93hYQ9cE
HREPtGrVinaQ+4855hheybVuRMX8SjEEI+PtVO2Rkcy1d7Zh8WBkQQ2P8arO
WMeK/LicPwHPMRSP3gRGgAjlryqqIW2dnJgx6Lto0SIUm/KaMhK+Bp3Be7jP
KJEFXWhahAIEGDFTHKihYgT1K4hD0f3OyWB670Q3Yp3GRUmCKRu1CWnWsjGX
5IZ0N5YExFBzpZJp001UxtBs3oyiALfwfNcYs/Bqdfwm5S5n7NFpGy3QOFdV
xNNgFW0xPJ23wD6nV6KpsIHmD8qpZTn8TrV4v9PI0cC8G/RKrUur3igJ6E8N
zFqfrChLr/g/nCqApnxEgdymXfn78kGDBtHWiGJT162ia8epfAIwDCYF94yn
+UDHI+1zRK/RCYq+Mg+XctNb0IA1OHUoxo4YCfoAOQAIf4tulOTwqW7OoRij
wh8yXCAEqIJjlLJj5yAOdwMCXqx/UrWgAMVBafDNfOfyvHJmN3kkkn76sMMO
o9eH+XumwTA9psOBC5qzqOomcmuuM61CcIuXMZPA06Up3skuyWCQG5/BdRQK
hwHKA5tx46rrc78ARQDacCcMRQ0SoWCknk4X26QQl9qcFpNFMoNbkiOOcM+s
wPyQHqYInAB5CNma+yCa1gckRdchDVYmGcw0UzLMgwBPTHiaSYO0LDnASeH6
YTltoK5gWs6ftkwC3/Zo8+bNIf/l+vXr06CAecNvvgdYC3IY5O6OK5Tiifmo
dIO3cIZRSueSKyVXQyz8DcXWMgYqUtZn5EwiQgYRBdjN74w4h/g0FmY6IgiH
vCbTTI/ADCm8kokfvY5ZUiDejcPJiOhryr3D+yzo0r//G8fU2e+OI04Y0mrl
Aw8yMu7HSG2KipZKMXXFG/pKaEkCMDBoZGzTXczqNHWvhUECU6GrSDD/RBMQ
ntDIQ4+DBSDanMMEnvgNz80wBO6DsV6DPkYYcCHXtKeTYwL5WAjjo73MRYU+
s5wRIzugnOvhIppsvWHIlhmeJb169YJj2otIhAHMmyyBDqDH5gIVE91LCoiK
iG1wMwCf0/3tMHU8rXWuW6c770WXwChoQv8IINySH6mJ/THw8jlz6FGzsWGF
WIk0KigruQ+NArgYk14aWQZ0pPsMY4UMbx6okKGzdMI6NpkDs94mFCaYCNf2
OdQcswE3+UTSg4IcQKIRIAABaBhNgBDApI0OsNo6SHgko8Tty9SeKhwzf2/t
v//+ILmSXwbeWf8aERrcpOEerhG9mVsT3+9SMoW9Yl5FVzrcQCjEmQhCbnHw
WcZ0FJEUPg6z4JFkK+g9ymqxnWdSEoK4xVmhrTAkQEKaKbx5XX7z+soLACUU
kPSM4XrThZnCRJ8ZvUxKKxcJBUBnEk0+YVjouqR2LlcrgKPoCraDy9bGUxB0
ZYcOHaCQ1zEy3LV+nS3Dc9FCGYpNLA6MAJh4JTQFwwTqeRri9KcCMdTAXSlP
wAkGJgmUVq7gDzgBVRYME0zAJyzRQj4icQbksl1FWwQDppmztX5rzAArglgs
CP3jG4I/XoLqG6FkQRi0p3cJAIygyxc8mE5OL73Weh25KvcS69lnhFNYv/88
85+SiezvkIPPMEl+YBzmAibTK0B4AgPeqVWrFn4i/d0H9/c95qALzp6+9Kbu
XTutbtWmt3TceKv+8FoS73uKym+Cuurv0RTosO/wlBgIEAgU0qREfoDyYhxS
CTgm1FKyKt5l48JLBjmGi+pqWJ8X9oracT3KQvCKwrglJK4Nm2yNsAs4w85R
Dm1IiaT4LrYqh/XoDkMilIDFQAIsBOzB5/8ccsghDMHra0NyZK3SNOB5ZAAL
MzSO8UikIOCqJoskV3Tq1AkuoY7aU43D5U+0nMwXYeJBATnaqkAEfpfFG3VU
ZRtifWANw+SH8A01xZUjEoyWcOvqM888k/QaImEZKkFTK0RAELkwouReKEDN
UXFwCYxBLDwblcA+ebZ1ExAGgPC2GAzbQ9Wgi3AB0dH6ALOwObIHRIwIYRjP
w0vSwS/tTq6qUROzoqggap/+BJMEzontAKrFvXv3hj64Jg2V6RB7yT29Okzt
ctElky4Z2fuN4+ocW++uV971NBq5SS9bfugfGRIkWfyARQEXkI56eNcXwSrS
PCycgBqSEUH90PAD2HXRaMJ6XqXyoAEsUenDRx11FNLgh9cBMM5l1gD4bND8
IBDEjsDAG8CRpVH8C3Ci71bjQjDOg9bEV/Fk87wECvgj/Aoyw6PyKrQLHmJO
FmYSm6AjBByefmNpiFb5UYrlY8WIEr6hTqghFIEAy3r27CmxsANRpEXwKK3T
6U9Yo8FbuQX+CBCYbicQQEZwlwBObFmefQak4v8kElEjg270BbhjTDoGuAZN
7i/3XxASdfc/e7Jp06aYi/8aOk/X7r333l50XYjuWNbC+KmYWjaD2w/IV5FI
N4x9lnILQDAvc2u4I3TM0nH4TV7yceM9av27/uHHnDT11mfa3Ld6tZJEUyg8
lV5+jxsUcUWSOtME/PBoey3XIHn8t0UeKI7UouqFnhWrkn5z1WWcFVrhs4Vk
jOhGQg79DLMBUXyWEtYyLO/eIujANjA/aMTUcBqa9/hdp3n/crdkcpBwEzLz
0ei8UqwN14kmUTSAsdaPjX6AY5iTEgVMwgiyR8v7GSQQA0wyENUoXoye8jH6
qxVCYytPcL1dqRR+XpQ3koWL04DLImy1CLgChjJU8JTvWGJKhI1iSa+d1ySH
X5JiiCdtcNdvNcMBMTCRiH5GgQM8kERAlRdjNfdp67dNealsBGzezz2D++GC
t664BK+F70QDCHGSW9avfaFDg6YLevU/85a2J59d/euffjYawiW7KUtFCwhG
wX9CcHih9UAYTBgtfym4YvbBDIibB01g5rBD/KtKBLeFAwWXBRI0MpBVv1on
4nvKTigv95Ka8g3P0+EWwBbYRsSCSqkeoFnWlojUvNgoiLqVwf6AiWEkRsqX
6mLS1u75JokK40J4q5qAraSWvyIltYQlSPI8XQ6Fl+BN6DR0gy+wF0LBJ8IZ
2JwfBmB4A6+rMIFEkKaUX1VyBJO2oNoPdyBaBqX5L/fwLDw3bsLvhQVntJaK
z+LVYrJ6K8oFxXjk8VPG9P5m5x0bnD9x1sS1J+xd68Alr36mK6LQay6zyAhA
l3oAYbBNHab5Fcy91I/aia88JM/EeLLngDo0JMvzcBK2tBVR3dC9e3d8D2Ty
LNcIWkyhD4VA13Cz+APiA4lgVY8ghxAIMwm7dKUmB3DBV6h1RQFZcwVfDFd4
GQOFWIzNW1jBeCTi0HHjxMzXZ+gKwQXxird1QCl6wFD5IVIWv57+BvZCEIrB
m/WNBBsQJj7CC4NZj8btphcAHyiWiT7oi4c+svyY56FbUlJxl0bq7C6vkX7o
oMdU9QXqsN5OK1csv2li17bkmSvHdTh2daM2fcq/+vU3ZSdgAK7aI4mB4BMY
iWyVdcjL0FvbQKIVtl0cz2ACMoRKtBj1wWCQDt9BKQNX9cAeiKTwhbAUG2C8
Em7o4IhSMqpdRYiLa4j5KcDJNFI61NKSCkqK28QdYekS+yVCRERPJCHWGSBQ
0KYMCRVwOBiQRlrKA8YVqI+31i2AH/3MLSVxAYMpAkhnW3fYdShKEHRkf16F
rUazH5tDJqYka6UkTn2C54P/Mt+lMsId4fq84Dqx0zdffdF//oIFzkGF6By8
Q00d7UFRbZkhOgD3YDbKib1Aq0OQQl6NqdssD+LXLLLCdroh2yL2ks0AdHkN
pBEKMkdAusB94q3zJY0W08RzSrCjoohMULsgoti674mV0AVIwzsIdqvrIzaD
dcA+CMFEK2/xiw4oDcm4pDw6F8W7KWUCZ7gVhm5xuFsWUQTQ2N45kEfoCelu
j6hSWxZqLo2cggQAQCSWYI4JKhqHjicYoO5vYBs0EP4wj6kt/baBDQoMX226
1YWpxUiR5BKDxtOhPQxZ6jNlwfNjZ7NcMLAdL8UkGKLFitCNCWGFpGKgNVzD
L/BKA3pY4vseq9F5kktAHkrlBZllMp2i1yH99Hsu90lceVyHc/Z7/m23llAV
m4AkmHVzpl0IguJtbVsfqZep5Fw5PWnVE4Znc6rEVwhZ7NY9jzTE34qJTBzf
TY5wbXrUyACmNnQvJhvCY6DWfCWxjvM2smzZZj1wEQweIgVRnVgLkZeYkPo4
CYq17wR0tSIqaq6ai+SDtLiKCWFFPhwL4gKHbFqNsq1WCrFD7AdnwgtFQgpB
SBI1RQPIlBnQIU54uDyyRkyIwlDD5597yCfiveb7HLnnQx9+LePV/hIwWJYB
es5Z1yjzdh7FI70Fhhh70Dfj5pikhhGolzpSMNvARnaacUJgLObGGbJVYrwV
PUmCLV/mFAbRA1iGo3BclCDUNgfS9i1BfFl46KE7VutW/4UKmmN9W5L7kTVU
E2TBADwp/4YLWipwb0ya0RllW1fJ6un0t0QWNr2FUtMBI4n7vrlN32lhOULG
zKVml/4E/pJntH/k7tlGdeNrnvlm8MzZswn9VJj8GpQHDvRxUuSc4eGK0k+d
HEeEwhPYwrj4IQ/CXBhT3Ipo7bLEMnA0WI1BAv8iYM9iIsFUfkg7b5BKmwoY
/A8E7F6RwHTIA3xhxk6tOVbKstkgEk+5pcq8g8ojI1Rvj5NAtWSFacptA4Sj
AN5BKm4DvzE9gjUZ/b65jd3BTjU8NLEeURa5LKYJowgYGCGGMnbiuCGZI9Bp
R3QgaB1SobpMoRjXlPalHR66uOWh9ee//GVkjahGmoQ2DM5CHqJLQmyo4bvC
mEhEWc3XlFlEkqozmKKZLlqKsyFLdXmQrEsnBIQyBC7w6R5XRDTJ35TCeR2+
hiAn1+y9CtGWShuFsAxlwSLDfULK8AMIieqBhW9UVoh1MWbiILAFP216Fynm
7JMDHNz1NQgfiZupGcEE4mBiFHsOhkbwC8/nDT2nc+aQ1B75Gohz247JzQl/
jbVmaeZPsuGFk14JqEcQgpox0Nqfvnnrh0323H9N09ZdggE4hahGIOZXcTEM
CIYxtiMfg8PxoPkwi9+bOJ0jtEXoBk08Dtv1A3sGQv0UPSP2Y/c9tML1ERcg
MeyJp8uK7TBGCWqrGmVlm65TDIrMs7tbqlHIxcxIjU3ZbVfBdJh0yvxFA469
8Oxp10wcM2rwqmPa9kl+uX4j+ForB5botCQwZov+4ANBJ7AsNUVtRCBWxdls
/+N378VR7qy6CDdIjwnxh+1WARzVjog9G7Ko2KkyIAfZaygdexvts/sPHnD+
8FkrhXbF0kjsrlUy5IS/sJYkDJnghyofViom5+ptpUTQPIPmSOomCBBHiexh
LREhA1EV4FKiOjhPKcH2tXQJUgHhF6jMJd78FS+UWpeYs/ssZuGzJPPkuAJq
zmtXwzEAqyAz7TS4YrJzQpiuN9909cMjjjpkYvdR02aOHNLj552q7fRi7YMP
gQQn96QPP4/POqLlxJ6jpti2dRirpjKAOe6HmN4aSaBaIti47W105xbbrwLA
w5ok3NGAOFdIopImSGZgFhUZtclP13/2TtdatT2wLCJAQ6FxVYQvtvWStgVi
dTbBg6ICkKD8YSEwgXHMA+XlCyQV8jQGblVq8cnaW0FhyEo0eY1iQgPHgJ1x
HMA4OotoSKFpYLZgDQrJEsAT3mFbsPJeZAB2E22hm2QX0NfpwRUz4dgbe9c5
RAvEXJIB5yUGIsMHT5n6epu6+587aO5LmCJqSyTrlQolDeVvbx+X0kjHp/uJ
BWNdVQBCBBM3kdaaeHApqQx1bx29f62Bg+a8CJWFoa+XEo4Wb1F1bFf6VtTG
pYPJiNSECLuFVzQ20yktJWWvdhZcXyMGJ1xiUQgwkTmDd7gJyaYdBNcgB4Fp
JN62dxPM42/0gOok08rQT2jIPApRAHgjDdJSdCgCpe21KB3i51ZFXhwkmobm
gD7GyIeOaHlkbAOlm9gqQxYUUOCUzfyYeVrqg33Ixlq6dorwDgpNQ+GqFZey
7sihsif+CawhKvvY+EbREkRBkDjWoTMvnTE2zZSwZ11gMWMf1wKgDa4ArCCo
VpQimZhLuUqt19GKICAsHp4khb/RbyIC1QCeFqi804A9AAiK9FgeRS/bcBNn
i7kgaR5LmwVZGoMB4pAZZsbrQRbLieApo0KjeQafoR38jUYxYSDzvg7b8fM8
wuIWGyWvJIyu99Ery+Ht3s+tff7To3bb49o2p/Wj/ukAoIhLuAUMQuKgIiNS
9iJsvITs5KJKAFuBQXJq1BnIQwQ2RRwL1rqexYoo3IPiSWeTTR/L8/FfBKuw
pyh3pKM5KUwErclPbKstoACByD4vbigEa5bC+C05weyoqkkkA3NqUmbrDuxz
ak/IBFmSMVGYkQ0+8QmaI+LS0ULrzUAPsBWn+tXROG63Jndr/UAIpJQED4yA
7hn+RRX4198ihEKbqYhNT2IvUgxUUq1ux7+opcQF7todeCce1zZotRkvbI3C
P3IAIqwKAq30lrVds+qWOIE4ZEliQGi6kQBGgo3gGgji9TLbbJ/FBxgXDJNN
VzVs9Hue47yEU60iiGXgDJJgH8NAbTVszCvChRJTEl8C2dRIeHZcr5FOasIE
DEk6eDTMYTS2SS6PwOYJuPztLIjhwE4LhcBQXu8cj2SPUhMP5VaM8ycuZ/oY
aIWBDEUsTx/La0EsrA9LIrnC6pxKSeNwsPGGOmgQF0OFoaiS5frEpCxCACu9
pUqADxogj1GNQnMoMaHgPI60jmwI5eYzqdvqDJVtzUKozye8kpHxXCJPcALB
6Ot4M9RJO1giRg5uCVIist2k56GBEanfukiq2JQ9xw6LWfNFr9HHKlzoO6aP
2aoaab0UsIYAsJGruAOWinW6AnsBhWekCTJjWTp7EG70EuiZCJZSHFkCdXf6
CCQkdqiJlTA0cnoKvN4EQgH6ga4gfFyMlzEGG/XpDlIIFcXnbaCWbTXdIAQ+
SJQ1Kfp0dIHQljcyPm/qHNEL3KqaGJixooThQgEYSWQFq8TUVcaoBT7P64so
QBcggfsJb9zYpYEFXZfFgk7MSSsoZHMMVSzgSISDCARxgC9eKeTSUOTtCCsb
J4IvxABkgqg4Y3LBfgnAhq68XK9ePdvi3XAXQUgAqvGsbUHIdcgM9aZylJ9b
Q11HfAHwiscAuXE42utsra5I1aZUMFvZPUjlBnDwUlkyqmwAq4KsxGFpKWgd
TA66n1iKtDvAdmj0HltCoxjhKGgB0JBPgl22M6D0dmhRm1oEIZTFMHZ8AyiD
SmgEyeiCJWduC7AiDM52vGQJH5cz6jgw0R6P2Pikap0AupC5NydUTBZmuzLi
GG3BiOiNiwNKrYcTH2FhJUI398O91P+qhWZkFGQNqf/pSEKv0DkBdXVZ8DBY
e6hix/EC9J4ORsMcx+BS/Lx/rEG296vYqe+QWXhbyJegTTTmA5/SLJJy+as0
OaYfLd0P3v7CQVTlTUuDKqIKKnc8p008qdyLQRfcKP9aixGIJLNvutV9bErp
TbpnETRkIRRJv/VyWxzpkwrX0VJZ55TvGm0YZkCqS08LgFgSJuvj1tuJUWyD
RAW2kuhWqllCaV3RhwsK9i3Voh96ZI1RRjpxSNBPURQ6FCAEo0MPxRiV27aC
xBtqvMm4sD3pdynygwaglChh2ISVsBlGx5MYHdTqL/AUKIUTtuxCBmukOK3D
wvNKx703rFi37/UNYqLisvJdq4ttCS8/+0WUAO4ES7x1CAQ2cNIvikAqE2Be
O3INdJhrbFEA1o7HQ6cxReyGIeGLbftOOG4r0F2yWRLd8DQ+9tUey2hZyXMj
c685t91dzTr2WNPmmOaPHNGi+2EPPP2szn7o1+1vaNX9rMFzZk+4pscZl1Dw
ZST4Yp31RT1sW2FwXMo3BTkMzMW4JZF+ATVO5M0UDzgkUWNRgD6V3EvxVxs2
ERrCEJvsQrWxNrfnQIFFS8x3E89UkS56HaxMgUsJJe0+uRPCIuXlhGGJv5Uh
DhfEF73QaBL3BgZRpCFIgh6GrrmL9X5jYGAKl7Ayx3YTcG+ThYg4QcsX0pr2
9DUzzzjaZ8gO331bSbmdH6jGMIg0Sd7JoCAavqFwfa9adNmqKW0PB8MP/vDF
699qvf8xvSYvuZ5wwb29BJh/tk+jukP6zbyaLnx/n1UeI/1jylyiNqgEJeCP
JdmJHBboIrnqmAWRDj3xZLf8zSNswQ9lsLTHv3nxnN7HzOt8zujIrrI6jRXn
kTivggoI0QKkEQZIdqXL5XHQticGJTan/6XRnfdSKURi/h2Fw1IZmeqF1hFB
7GCKKD80Puzc7/yleEqYI85AZ8XhGek59s/vZlIkCsyU4+fAHRiB05AGOufL
qmN2wBfZJwp0U9euJ2QyotpLP8dvt6qbAWDK+GC/G5imEDu5xkf52d0HT+T8
DQkl3NhL/r7h6/tf6NGgue8FsEHSUMxa5qcVivHzNmlHJAnW2URpNgN1c2DF
hBOoGRE/HoMAijDDM8WiXtcsmfd8r0NrX3zGJfMqh/axZwzwDcUluMjUNbND
DkiKeAsgYlrCSmXUoCIGXDVW0LYCCkrYt9QrNJoFt7EuwhLET7xORg+LCY1U
Q+A6BRzpxMyXDFccEsSIxTkALrXeeDQG5yU7fz9w56WZ44uLeHUNLRSCC9IA
oVTyWhTOx/AO81d+cOLNt9+B49KSQybEV3z7y69kRlpYtlWIgUtJZSxLjTsI
4KCQT0SwuE9LNrgXswk30sgVrueM8Hhk0Izjlq8VM9MKsmfu+CtlSZV2ZOJU
pb1jyDPyGowCpCGMwnhBNGZXNPVBdch6CfoAfHwGA2PF1EMtW7YUO9E+vtGX
TBhWaQSujlaB/UtklnKFf7rS0EXmDOjQO3/hrPOeOLrZzAjYavXRB+KHFxzV
5vITB10EqSo3pioDGEuGkVcwcJ3yAm7wW1ITyA8ZhBFJMbVqQeSMyoAPiZ9D
IUWPedLrcI5WXzbW+esI+ZFO2Dq+wOQIKPI2/5Ar1A1XQQzgtWdTosOReweg
RTZ2AoH0xWOmj+9baUBurrSMt/FWYkU7rm7shHEXPdGjWYM7jj7hhHtGtWsd
4LJ6Ih8PWdx/3rmXPb/Hmx8HGgqzQQrtJUa9bEqJr2TJ9RFO7HZIHHgD1qAq
YRdILlFEUHnVRW2Pnt9pwNwdP/zmW+UPTiuIl492j6O0gEKSRvCvtCh4vXC2
gtT2kLJdTqx1iu+ltTsiNBKKjNC7AHdCqAVLvNNvGGrGAsEsQisaOXnSyDin
4+ZByol4KV9gFMgQ26NVAvINkfHJBmQKj9BKrIF50xawy5eff8rXceUErcgS
QRAF2El6r9Srd8BFz0w9PbO24jorqziNqTqwjhLgx0lQWflq/tjElXUbdp32
BnDrvPXG64NnzZ5NtojzQpHcrmcVDMJa5whxeCwMJxqHVYwfXUMnYZX0tqup
2OQWSQUaJLs4qLhdmVRqUrxVPKDX/I1yeFsD1DDMZt2gjYxYmSI5oYEoWspN
LaGYlKq5jjACE4nzjzoVag4eYGYksjF4OjqHEbabP15cpkKd5ItBLtyGNVPh
E+CKt2AiLisrxS3BJfQfNSj/7ddPXzrloFqZNRYVf+4aZinxhaz8T/9FLQJ9
xO0gF1uUDxPi2i80ibPCEMSi8SIiJ/pq8NSvvWN6dloGTd+4B1sJyvfIUjqB
3KOZO7LuUiiT4p0idLUAyiPqPXL0pPvGjBg/AViwPnzYJRO0WuIi2MqYOKog
jyalxH6ptKEFwJEtScPSCMiIpoifmWrRlF+OTbQGRsJAmCcr23CQCrrgA/ch
Nqp8EttqS6otpTUuyRKc9PeoBGCNNvM7AIHD0vJU7xsWj3q5S/1mkcCmfpVB
TxH+2AyAaITXe9Nq4GFQaNGYhpw3UMajwzAt2KJG/QMC4vG04kC17LnjrSgL
lnJqyGCL1PxYqVplxf3Hxi9Wf9Tonw13fPobQ260xFZ7Gg7lhjqJAWhycAGz
1BeSlmLAVqDQTjXBCqnAuzZUqVExUWrT/OAN2gDGkAforA6C4yM77A34CRZQ
aTSDUtg2IrgaURJNpqgYcj1FAFvaRYKHL7T6t3XTN3j1hVX3Dj2uWyRiqp8j
mlL3Bt7wTLJm3q2Vv0hzQ1ze0lzFktYEq2sQtgIQZEOa3qL25Oa+kMH1IM6K
pD+BmnJuYs/xyx72ukFlRTEeU3SxMDeaFYYEE5KJSunbI407OsGMF/IX7nM9
PCF9J1DSySvqbmT1UICNaw0BELMNzfixmRukg+/CHUK4TJ95c9BcZ87GNquy
HR9VqL1vXHzxky2bzojEV06o5bFn3GnsAouJPjBnqCXPU63HFNEncW/aWBap
mzrBFqP5Boq2pyD3SHSt5JGI2G5emIM0JenkIHoF9Pvb5BDE2vR5IT7UmhUg
QKruXvPW4kW9L7jxxG6dSSJFYXPtmqedW+Rn/jwTqsc7pE8o7gDAvcP4IMOx
Cu4RW0ka4K1gB2kEx9TfoSA2iyQRHRCiz7Bmauko0tocHiRIPVJu0RlMtIUH
ky8eMTguunLORWJkoBZ04nKvf6M4LjC7YNL0GV7RKGGHLAtQ5ocOCy2FXagM
eg/uSAuRLmREW+14EmMxTlLmjg8OaUNvYDGiEHegSMCQgx4Fbz8O9EqKQvoe
kh0+x+HahA+xkrRMqKfDXnGs6CfsxUFbFJhX6vd28y0CQjOhBg2WlWVppNOK
K7hyyYSLT3+3zr7dru98yknvd9xr354jlq0oy4Gdqm7AvzWL0ZVg60fFnuLm
JFz7j7SNkswRADAO+nO8ziIwBnckw3JaU4pIJFzUR8EaTAxMoqzNtaiCPiIS
mLlUssjnC/4enIEntvjz5x+/P3fO3LnuL4cxOC4/XsOgET76ar4bKLO3Kywj
U3QJN0l4Z7sRNahMCPUIOco1bJzhV7ydNOAqF8kXgrXyOg8Gm9Acbve2NEQ5
ggWlWj1EuQEfO4BIxqQKozRTzOBpzJsDl3aYqwI2+ZC0xf2x4QtMbOiwS2e+
0LlB/YUdzrq85T0PPZyr89ARUWbn6hK2EXugOQAJiMp4sRD0U84hd7MeSduR
lvIP12JtcJRdRrwx23Z93phlTRlaBNhL9dR9yUB4o+1TzVdYiPMqJbyEbhGb
ooFIqxmBVDLdpYLic0zV37wq4vALQ0rQGLQHRHQrQGV9C8RZCzL/kh0pKGG6
gJU1zQBMOG/BWm1YD48FCkEF2QdAo7oNqGCgfsihmoWMMSBvLlC2O0b1cRvU
Ingtg9c3kMteMGP6tF5XpxMlTdxzr56QTTJgATJmYLACh0ckCLtl4w3X0p3k
bRQaLFIBq+zEWGZk9I1wHhMABP1ksSjGzemKPayeAE0qYqoPtt0w+IofZ8Ew
JWHbyz1tq0EsmAxhOwPSpLCHlQmUa2CE+Vu4i6Sg0HqIcDlI1tZVWgGcfIrX
yzt0KKR8weL/qPR4HRDoN1EgbEqjKIJtfw4ieXuWRTciCbetDzFTz9uAO/7M
I8+kBkY5hHzA8gJtrIJbkAIeEsx7zrkQrcH3s/8S9uoFpcU2e+PvqsvvYnle
MJspUDjKO0RV1G7gNLk0FV1KqjgaislMVZm22swx0gH4bGMKTYjB68C0Dg2F
TijkbepQChoxHK5Hg/219HAGq8bLaArHZeTNfER4gNqR4qgsKb5YQ0uGmEEN
aPVisQpKktRc4QtmQQxHWgFCYdDwlM/swFQJRvSkFtufmSDDzm3HxViiJvx0
3qo6XheK0UI7YBIm+IsuCePp/LcDnVFLCekdTiV5j80DIHfkigz4HPp0wyVI
hn/CBTUiYA98NqPDEOAzfMeN8UqYKt5SYyhb4WSJCqKlTO1NqCWC7hNPxlzP
cEkf7P0glhUciDelay+t5giTggj04DRkxspZUtJal8BUU1vYBOvQK428+Ipb
ea1t9wBm7B+RPUFoUCjWxJhAC7220j7E2FaHPE12tFIwxzvhxdAdiELzYLLr
DynhY8SHuZKS4Dr8wwcER118W24nDxvfII3r8dI2NWRbi0CGgg2vsGKaHYnI
2BERn/NatIaJZskMnDok+Z1qmGkabEfjbScbNXgiRxSWuAJJ8zdAI50VCh7M
q8F9aRBSJqKAMBDfhL+xkyhQULyidBzqMiOCPbTSS27KrcscsKHpnQYIGM97
2XCZzyihwUEyQN1MFG5QFCFZCI8Ql/Q+mLlR0SEmBow+EhkRBqDDqiDaboAB
827b3wRNRNsBPUBO5g+1IsPv1DOxFiIhxshTJXjaLrRC+OQdsR6N4uuFPMEy
ZT1NIgRyHID5boDDtkSyZyH2YOGKTsrCCACIqAwaGSWqAX+RG59Dp8OkAjwq
m09ikACt1/5MSCBzTlpfQgJAp60SZNIvL18ashL+EgRzH2gAuo8zp56Mi0Ga
ss+lO10liQeEsxKppj+Rgn86mjEY1ldjbURdKCMilOmc6iGTM15daKkUjoCY
UdJMjdKTYXgQTMJqWYax4CxBovDtEvPxsb+Lle03L90D+W7TUQYYlKPUOvkM
oOJVMBMrpI9YVnFpJR0jh2K+Y/2MBVFeWxDaZZUdIB+D1v3YMTKeSAoNXGoW
gs4hZ+4EkdAjJKZYCEeDXQeUDtTdmqoQAMLAq6pOWBzohQiSYcEGrMQ+s8Mo
RDN0y360kM+sAxGIZQwIk89UHcBt2zeDH77CPVESwnB0wxMyQAjE0rE9Pf1m
0qA3L6986rPGzeAZGskrKN2jcaa1weIpXfyluR6ggXYBwAQlMoFSEMofk/Va
0oVBdvSNfUaOQVIuSZIK1CYbGZ35cBikIRwoQIgFsqD0ZGhQLJVBR2HSsgBj
FPbKrJdFkToVhGYBpAAYb+Ey27ffgAafYaej2IojINI/CgRjCTo6HQnlkABg
WjKNdlOOQJPtiHkUDi3CoFQ7eCx45+3TWw1zZtrD/AAM59G8kilD7kFuVlkl
9JcTkpwFkLcAIuwOgUoo0RCExKUbQD1NWqRP0b5255HH9/S15KCXX3rsuTMb
1pncdcTk8VPH9H29fd3jKl74ZYsG70gVgrBkCIQfiClY/JP+HstR/dGiDhZp
wMYPgQ8xpcCOzieiQ9i7VGSUcOyP0pK3EZVsg0N6h9D5HECVFRIsPtC1GrCJ
yjlNQryXOUlpTg29BaopsZvW7PHCDAy2wX0tsfFkzFgm8DxTt0KPUYqKBl22
qt1+AZsfhI0aaygCBRLh6deWdFCbQEW9pJOvvP3JJUeHWOmJ0UlLglYCWwSN
9qLZ3IfLg1IQEa13XSPFtgMe7EGBuQwtc77MvQaeBDCuDXLDp04Zs+iBvsfP
OGnYeH96ALdwyyknt3qmd+NjKCOfMP2O56cPu+ACSS8UoDEQi5oIUrUOhLla
fcNWVkISJoxUI8t6ZMPYYD+o/BDDIdyr7okjlkmh0K2JPpEJS+brdYySr3nb
gEtWZZuioeUMDjeiThgVxf9jT7xC/ICbMy2CzUAavAQqsWCvo5xAEl2SlWgl
obPFMSFNb1ddimsCtGFMU8TA0U7eCDRZul8vHF+gcVrPIZVHiwUylAp8tS2k
N/0BegjjXjrooIOwS5AQq+Z3ijfYG3rn9Cdpu4PZ6zBfbIfLw0bfHcDUWcPP
P+WN9nUa2exCkyeeeoqBDZs1Y5RfBv77p19/YxkIWs9oDFNl46K0OqoXNQ9M
QIKH4G+kYuehRNMdfzbWxM7VwZnnOmfDkIMNVTxcgNsITRZkOXEQMeCObGU1
noyMWJZhauyFaw/2+klp2uOUOYk0fLeF+0cioDeg7hovZHaelZ4IilxBIEbj
GnpmeQxGzrFtgBzQpCsNUQs8kAQfXuN+sGGZ1wTEAP3+HCinC+6jf/7zn9iH
OzUmGZnnS7m0m0ehXqiGzrVnlveHT5oiM0ETJ406wy/kTu1+0Xj8sWcawKoU
mp3kSkEPwiCAjbdhSbDKtolFQRmQyjs/5Bocw5Oi6hKauE0FE7YS2t9cE6Nj
DGIOqmHcZ6sGgQDYYaWMsBU9GSnrpH/QV+wYvyhWJl/IZnioguUomD8xqUWB
6CzcBRnZboaWNN6CKqDjcp/b+C5Ivnk8jpDr4Imuf9d97+b7i5CxJFjpn3GR
2YPlKsiF5DpcRqiG2Utk6NLMStOjbaet+jejqPfaK49bofbJXk0bzz5p8NUj
xk22IBXBMiUDFAJeCM2f0oJf+EqqTxZ4uuQEi7L14AiVOAJBETCrPPk4mJrQ
4TIzhX/xDkVJcpufcZI9cszTawcccAA5cq0QvqEPoIUF/M7bvIie8EbSKLd7
XAHhD5rB57ITp3xcYgkBf+FcbdMXNIPL5DuvRy4wLKfLSRwvYraiCZ4QbmEC
4ebvWRsyFP3hM2L03Holybt6hJRPLOyFIJykbB1DUVU79HKv5pR+lZIN634b
My6YCBU/jIQpJ9hUPZ+h4ryOZMgWCeEwcSpaqcxLcEHGNq4J2/pL4LQ8Nxd0
vRQmY5mhGT0eyHbzy8YZbU1B6n6BHjwARwjowRbd+dgSTWmn0plsgnOMmGiX
30OrzJdxCTHBdhW6aA+1D0IXHTVix4Bk7V8Vi2dV9li8lY5thJld1TonRlhK
vGEjpFSAK4NByCDuOM/8EG+I573+XVk3x5u91KaY+PS9ffbZBzXDmWKMTFUJ
JgUCj+saYBzcLa0T5bmHXjNURGxUzo/JLVzeGPRYpdz6A2pABAgUaNyhvFJF
QIVwWJDMbeHBSRImyMtUPeqE5hcMR3eKi222ONZdHzd8slh8g6SSyW2yeuhH
Ll5Dgqz6xJx5lE3VMICnmjRpgp+XZKiuySGoiPBTMwfhNUMtgC3iC7Pomh7i
6keNNkbMA8LEU7szJCuwcWzdThHkUwg3B4D/5x4qZ7YnjEbhiWBqy+N7bNeB
8j0y3Iptsi4iviC40IyPyQMehb81nULt4rb4iTRUxxPX270JeIABUilTa8Im
CADZ+5hyLpPZWKEUZh2gx0+cn5JDlhpBkBKSWXvzjpWMp26E+tg3KfWkssQj
3qYmSfIpxEiSRDMv1wCmBODgRsPc3qZ7Dp7VCL0OZVqJfrPoY2QMWV/W35EM
81kdjBsjGuNv28AKTTw8BiG75eCO6961qDRyWz/3GVEJ4YhM5eoQbDdSfjC3
eblpd22kea4KIavjcS3i5L1IH0j7cuedd0Z7F8bQ0zLyFOISy3qyacf77o4p
2/JtplT0W3n1gD/5e+0cyt208nWxChRzXawAK1+XVQxNfEUr2Xfdu9dMHDbq
qhZ3P/J49wdumLnv3HfXlW75/Z25K85t0X7w3e/m/x6spQSJNh336b0Xth21
6uP8DVvWn/v23OPPPPbqj0s3RK9Ppta/dcuUk+cXvb/R5tnL0tT8eurLyzuO
OmLio8Wfb9ia+Y7IPQ3+NG3VtpG2DWd+cPV5J069fdWk5SPHbv/Qd5tdZFRe
BXmVbjv4r6Pw9A+Xjj12yX33jr5qws1Fn2xMbSOFmbc5Cv+xLRR69lWJwt7H
Ln5l5sNDOo4eOGFGOjidvdPqrza0+Wb1qB5jrrvz0oVDZ5a//OvWvBgSk5+v
/2HmE7nvc8GMLuvAL/68/KlTW44fPqYPkUSHVSuXXDB6+mPpSGLD4Hdnd9ln
znu2+3j5P9d/dPNud326rsUPj4yY0XnY0raXrfoib1MqvM75tXX9314wqubj
3+tRHqWNfn22X7dON36uqzuzXn5whKJWe89aK5ek+bSx6PuNWyK36nKCqihK
++/vbl1zUtcaD/+4se+Hi0488OJXfzfbyEZW7D0H/fdpS1+1uckPTy08febS
Wxdc3b/dXnPf31gVbbH3/JdoS25c/0nnh267ZbdHP92Q9jHf3ba6c9caj/64
sf8HCzoeNOylWL4lt1ZxTyVl+2XxM72PumlA146y4GDTF6sePbc5IVUmiUlI
PPLmxxZee8Zpi7db+8Pa1kvXRNinUWPJ1nUfdLpnxTt/+y1cKJWNe3G3HBSh
rLUxL60EmxPrN2/NxrxclKWv2nLMt/cPPrfv3GXLJvWcUvr676ltEGzle/4C
2tJg8cVdN3fsVe3Jn9dNeG10h1rT3tlQFW2x9/yXaCvesGF94eZNH69Y0umc
6k/+9N2t959UpdIVb6nint18X5vcdeNnd42+ZMLIN46t0+jBFke37tBn5Vdl
m35788ob+7XdZ/Z7un4ZR7GxzWerBz3W6sgh2z/w3ab9171128iBkx6q/tVP
waXpa34f8O78acOmzpgxc+KQHnsteF9vryhJrVs7cNGcO3utXnLCyOaTVp55
z9Wjd37py5y3asqLh6+Uye3+5Sd3DZs84/pm9z/xRM/Vy6bvtfj99WVbQqrz
/hzZG3t9tGTASeNvve/yJYMurPno91u2nexKt2rbjjA2F4l/ksIeH103suOC
u1bOmDdsfsnb61J/gsLMW/87FN531rMLL+w4764Vi2f2nlL62u+bW33zwNhT
xl2PJ51d9spvW7NTeOHgFbNz3mo6qtvgx0Wh4Hf+pi3B9tfB36YzmZ85k6xq
8U7klpJtfHTT//K9zfzRx8fW7uT1+Dh+g3971pC7U172CF/XsFNLIP2R+mZX
+ayAIgjlO7rsyLVOdi/LKyAntp1iqW79PRhYmCe59d2SPgcn6lXLMUqXApYw
yUidiFkqsknrxeH9JFtSSHAHYQcHtVHfgAxmIZl6ljKfW29XRHIdVA9TrqeD
MbZzY/G29wt2gXAnasrENi1k0uBQLTeD3bYcctzZ4t69e1OIoepkLVG24lDW
dG3ZssVJtKYVfqnpWM8JUyZk08zdUXKwbgXSVZvfYhKAYguy4XGaPWuRleo7
pV24w3SVVMo6uzHRERNUg2rESK21+4wShWzN7K39ITW1Y3Ap7qEADFRWT3d0
91E1ZdJOZmiUt1R26XGXv9yztrOz4igQUzdAssxBMCVAr6PtNm8MtJNn+Rf6
ZR6+iS9C6YRAYcieYRRFMciU3QRP1KGmmRXMCldxGoOrhRVYWznlADl3xT0J
ETDV6i98om7PrI07ecttrwZFwaZfbnufhJ3n7h2qKM2yqIHXhBF0dfr9ZQyc
iRrvugpUhnoR9WVUhTotZmGrkO1UMZ4TrAQ+JKL/duCo2/DTjZwCPRVvWwft
BBhtVEzmBlrlIRKlhMZbwtMJpbWe2QCZSNTPoJUamNv0zEkWPtDpZYvQ4Sz8
klUhTvelKkgvlczseIvZgR9eb8+HDFsAZtcxaAxFSv5ez1YwD6VKi/LRQcu1
ZtEoL0prJVtDRcDEZulpTaCjQyYrakf4budFyaJvncdAy2jVoTiFAmNvFO8c
YsnyGluxQmMsyglTt6Gebicy+C1ctvePv5U8A2GAsqeFp9w0vXud48X+TLEx
zI5O01We0pyD7XjnzshS6mCDam/JCwUvYbonGIQn7TDeBD3zu/7Rj3YYjb+T
Ae+kfcITYDVYhyLxbhpBaEECERkv0Gzb3CNQ1l9QnsPQ/hWRGZ4pAHWlipIt
lHt9sQn8hrRhpQIJFOOhUAs74xG7YhpCICLXJpCdQlwO5sfyQ9WHK36vEpzj
2f75iXY2jHfAahFqajiLYTMG5os1KIApMNbfWBLSM3aokek4bvMRzVpH/P3o
eJYdkW738g5Q05uNLMRSOFDFKqvUTO1kAKadAvxx28lZ7y4j49HeTHchzUym
n7xaWo3Uy6G7DEXmYCwlTqNd0KpWnCNeqWLG2YWqUlGGYlMljYqwwGBv8/wo
9X5rmx2q5p09nLA1L54OJKmOcx8j5wc9o1PGXqsoyeyMrbXzB4xByKY8iRAA
KLaLTLSqjU+1PdG9E+TQOr7yRF8IhfCaOUe+e6VevXomPo6uyCI+FJm5cQ+H
i9OPmvBUlya1jb0XTpj20MhRky4RkTlEjDvoscotFbM4rGToJRgEzSexJ1K0
CEEmY8+8YDMxbwmcTKgxgeyZXiEqQBNrle/q4J4BOOLV/dXfqAtdat4hxzJd
TnjlAanM6uKhgCPoBVRtlgEwVoBzOUs5cNr8sUfvfuasxgdkbluIprBSGEqk
aTFNTeswXMl53k9+Dg+VCLUJzREm5svTgu3H8YmxDFKwAoAgTxrFdW0RGIwG
Wpe7bQVAlzgxKTP7mQATebbGzbK7m20b4nW/WEOsxUy8H6oJRVAOr+U4U+kd
s7cH0clXxk4d18/nSu3X3nyTNiHyGoI+IgA7CTgb5tieWnT0Ykh4ARp/UTvM
W/fsNQfTY+F1i+Z3GzDhwsnTptskPgPw4FAaynkEr2eJI60RzzVs2NDmp5xf
k3geYAAFoJL1HAQnNruNDPHOIIF11RC+sTWSPSrvDKcfZDU8A9hEiQWxvcgk
npElRGfgVdmm394193nC3DveGTdy7Fio9jfHwG6IrIGBpStOb7fXNe+v82HA
8bEYhtgaJjvsBEZIG6PT8HJei3gZ+cWzLun/Tp1a3S49e+jZj85p3kr8RPoq
0kKYyIgVgBgkcSEe0doceIyzpWL/qdgCzhSCJeTVQfhP5ROyXNbWwjse64UC
ActcOFRCCAOW2y6uKBqJqK2AJjjSjXrtoALfBz47ulGT9pPvftzOTjWwJj6k
o3nI/Jnnf9x4j1pPHdykTZOrn/pSLFw9H9K3fRR9dxNYl/Pb29kRZVxrdYAg
Ukq5LcLuHHH80Q83Oqrl3WPatzGAJ+3GPXnT9UUgAwxHybF020DqKEd2+lVf
rhjWqfGKIzqdeu0Zp51884ldLpoyeLh7lXKRMJG8xOvoqKGv+uaeQe0ONVO8
fMCghUevePAhOwuNK+0kTD5DkLZSoIc8ppR4X2I3FRKROPaDg6DPEsAGTyLy
iDi4e0ce1/rexsf1b77qUT0GJ4kxAh1kv2bvvS9fPPe21p3Pyl+3ZaubCy8h
9SIKRodsqxRDC/RI8m5lAd9lRO1J26uDKothPbGIbVGsMMwt6Bgb4sFFMlR8
H5ygkGG7hYpSuNbL8iwknbfknl4dzCutPWLvZtP6XDjSW+XnU+RHRzt9/dU7
z/VpWMd3aFP7XiS9A6omgNVb+++/vy0nQQUxwh6hIWVuP0UwNSktH+tMlxYj
FZQ2u2bu2otWYNI0MoEAvmE9P+LQwxa16zvQAlbwTNjtqoRyXiPuhdVgTzRr
1gyDwAj9eJpthTJTBNsaR1aOeF2wGK+fIgAhdCB63c9lxC2267udIMMYXj3w
wAMxeGIbjFrWhDQI6UTrzd0yjgw6k0anHw7M6Tpw3MH/cXRmJ7PYyBx56aQB
2fYcs6PMbe0QeIBWui4U2QYRFeErOoasyVAnaiMtqO4n1uPu7ES9k/xTjSgB
/LNlhmajQy6YOevtFvvtc1fTjoNkG8OUKxzYOYKuQ6kcCdmZJEgAZOZ3gB/4
Ap3pssexel24XEr9QLZL8Uor/OYLlzqDnQ1qq0Izt+8nEqGDzA6uQK8RvltR
URZHIRZi+60wGG6X5rNECBGQV+fdNx42v7y846lDSWshL466XLu1q8+InOPn
2riSoBXMshWRADSQQnjMaHTVVuY29dmSARWuo40ahLRc7uK8FOospnzZ7FmY
twICFs1rGTFeVpyzs4qaJHO2ux8/6CB7KCAsAiQsBvCHo1gNFmJuEfAhDOTZ
yjHansFjMWqNt22vIn/5YSQ9cpuwFGcjxdu+soDPIAVhh3sHJY0S9vINcGv4
oYfNPmnwxZCS6wRgTX1M64itKPgJtbpQg0gw2GhGz1fNZn2u27IaJh5s3aOB
kG2PhoZCvHkREgJCOQprqmWx+YjJvhCOIHdCSPRTAgD3bcLOUxLLU9zB8bIq
k5TQUjbadd08XM3ghCP9QbWIq1FRPJyV+EFZdIlCujkXggSuI8HRc4WQIWpD
3MebocgWWWIhukF5trfKLgYqbv+t4dE+SXvpYc8+vTouoY458DIm3yZ8srUj
OH9ow2m4ad8CO+AMZ0zFxI2uPOtpMrn722PahktwBWA8oQE6YZ3geLc36tSp
I0sYcsGOKoTaFOoWvMahfwLTDeZWvPoNn3s4LCUhgiG288AjuUp8AQ6BiA2G
h5sUyXlWzJTYQhZvMWIwRpcBVaA/5qkBBxiNEVvSZI36/A4cyhq/g3O9PWFv
9xYGR19t5PhBjp7Nkxn4EPDgHUF4AgliTznT2T0CynDqEjU7BSiLM82sSqGa
iKcEUZE2aT6WH4K/HHRn58SigbZNUEEO2IrIXvYdZDEMgZhtwsoLXPNqkW22
KAFoym3hQS0zrrqgzAe1CaVw8LBBfQkWCbOwCjZyk7Zst3atWmaAYmVs296G
pBn/YRAFF9CHg+LfqKK1jEV+nKMrtDcR6gYLI9xjZCesIHXR/XFjrSeV5WQg
PRDTzl+3d9vMFfEtpHqbLGdoXlbgcUZpwSaYCNgRiNp5UbgJfCUa4SRcZAf/
yTaleiAndbI42TmnXoaD9k9gt9ICjp9sAP3irbJJsc64Rra3Ur1ETajZEBOi
j6gwhTinIonIa/Q8pUgIpIfPoSu4VLFzhwtlsTqdynI8T3Fo5BmHchVQiEa7
+RwXrVKJxJBFMXjwd18UBZgLTtTOP1ZlpzRJJYiIAzHIAFQsEj6mBwVPKZNa
xcgtvi1A11FmWCdnmjoawJtgtZQulCFAQcAsELD93GFtQahgQYrXMhhQrLPR
PNxAFTPgicAOZuRQTTZtQKwsvgRf7RLJ6spUhbKocI6t/mS9BfVXqdoXhNYY
nNWou0Dj+WECyh4cyP4vXyBSMEY7pc9BMywcMhGubWRAaoxqSWStSwQITVAH
oAmeAjNy/qd7LB414GXc7vK6FwUuwLbc5pEEU2CNrB/yDlkN7lO5ZPMDKhc8
MYVKmfxNuV0IodCFmQXEhAyO8I4YQHmBihtwK6AlTZdzr/aTLU6tYYOAj91z
MA1pofB8E5OMSIm8CNYRXEYEIltEWwrDDwrKk21PbC8+N4RhOC4aLscD2AHc
ID54DU+ZJ0DUdqApt7Jc1JUWorv5qWj8LRt4OeEhkvY3u41Yv56yEAv1KheG
zfB5NhCAg0JGKhcCDTunm1d6kxpBiO8KK+WZ8QWXE/bbVrn8zSBhJYirMqBc
z8eoLj8YLrCgMtC9LYkXKcBR6kVH1NtQGAU77GQATBskcsBe7us3UsR/IB5C
KCaj7awkO+XSLZORY04ZIeTY+naoVoBl4IGX1VEQLUMjsZqdgMAb3cRUfAir
yxYj+aArtsm6YaQqiYLGs0wYBcf9qX0AOWiKzD/qPgGRgwm1Jq9r37GDYNOG
lJsGYFUTAZi19Ng2vHg3h9LVMH84ayuv0RGbCsbxAAdyLlHaMJA2AId/cA1B
xWg4POMy6iSwl9RNJhm08IFzsEOUkFo6G7o9xxm7ABmSwc3ghYjpGZyyOxap
q8cYlqv0FHEr+oAKgT4MlokFp9nSc2Qb0IU7OsmWAEGEpv2FkW4cZX5Z9MWC
4Zp5o3i0LYFxWLPXd5C0oxCs5GDOENbxWq/dIHijggfWikHL9tx6HbgXqIb2
LqOpUhtKuV1vZKD3r7n9/vHHNK4UzyvrCdKZSqOIa00miECPU82Gyo4/kmyR
aDFobMWtpSsgXCYFhOgw4paVosHiR2fTxXR68U4w1Y72C84B1fWeQaRUWQoE
8EjAY00xoALkmIT8jZ9UQZO4iaBxLP0DrEMxuu4FORH5O8+Y9Aw8ErkMmzTj
seFjpmjFTeSN4fGmwQtnD8lyPFfEvF2fYzS8022sURtq0ra2TQ7a0uPD0XfC
b9m+Wp8bRCOpwDkkWWWs+0kJ5RefdclVCwec1XPqkIuu77lg2XJdiwqfrJUE
1aM2B08jMyTSvUrGTLEKAjTQRKUZNtEYZuy18RTyEGRNRRjavLWBMgNkMasl
H0RfPMfq9egBIcSRDqp5tAkoM1x59vRGPbvOvmmFHctIhhKH2nEzyK4Pt9D2
HzOO45jMIoFM1EXiCA1krO/QJ+X0O5aO+6DJvw4/beq1Nyl3KQwRlBE02BmN
oFCUu0SEaA4eV84Kd6gEsADZ+Ez6BFBrpMrntqSe31F5kE+8g/ZsIDAmvPAO
qD4pAQS4IVUAFjCY4IXFvtguLtqijVvanjxgcafew27q0rUrrPH2W855olfE
hFzvbxGKgeH7yzEZinoY27GC6VdcIt4Z/ZYqkvPQMueFvqMXVOwNV2KDI22M
RmJwxRqx/Whd4YgIxD8FllcDTWL0WuzidmbWmSyw04CIfw2mJGZTptscN56f
CACoJZBwTK+GkwAoiDesZsa/Zy1eOPXB/kd3uuys8wagqsyycxthDORUkZ3r
17AYG8MtWTsxxLv+7iK/dVpsSJtmnRQSqB767W+7jKPCugWdNQpBcaSECQSr
5yHFJMOIMzkF9WDvIw/U3eqtItuFLB1pjDSEfbZxI63xFPl1AphhB9MUxTxY
2yTx/ojQ24srOXbauD5r99v7RFPaw+Y//TaxDYiD6elcVWYcDMCxOSLlH0RH
ZITJuRbtEizPquFYG1jHDnlMMSMHaVlUDpMzBKfeq7kgfdmqUzjhOAw/rOzM
D04KPw9mNnrr2aszTa9qDiMfDJxpW7Cq36Arb3m85RGxVTQNkyNVlVahJTza
onmTD+vvucvZI6+YbzpY+vXv6wLw1y2r0X6SA2zettKGl67/qsTiVJucABbs
9AJ6J9h0Sutih1v7BpoJvNi+SCCgzWlb4y0kIE0+s32+MFoMkt0oyB3QWNvN
FhlxHdpLkyr+Btzhft5JwyMIvMtXn79xw5Tu7W5q27XrK+3r1b39iBOHHv7Q
v5/GQrjX6IA21ATEtsY9/sUNYNG2OwkeBXrYwp2Q0HAprwDKLDKjuLa9erRN
3z746SG77XNtp9OG3tni+NMW9nNVG908h1jLdmiEFrAOXHVTAoWoDh8BCbYj
tGEg8yv+Eno+DaxAJwEieWn9HM90y49KmawLWiPTP3g82Ag77fQi0hedQCOL
8Y9y5Hc4w6j8PXXoeJDWIYdP1UnayTloZmPzBGDBlncQp6JN1oyLVtGuQiTl
9Z1ICzSkyRkTWgxg+D2vXbaMLZqxRP2YNIjQFxgPmyQKSeugzOaF/PY39DrT
KDVitEJEWuVejkuWXABR2PCl5+657/xju8RM22atpunXGNfrdevWtW2uUAiw
y3FddtwNihLqM0lT4WZEIarHRE0NYp7hatwJHGDwmW7PCG/AeNsLWwusCJCq
sd/pDVLwmSdo2XyUjJEQARNV14ylM9GK7M21YTegBw2Jfks84AXi+ItpeK1N
Z/tdoHZIpZ/oBb18qRwNjiphLWJhEWPHjxseO8GiNVQiiSnjhp/2xW7/aNpp
2Yrla65r3R5Qr2IbJv2aAQA3uBB+J7CAp4Kc+W5rU4jHeCTZdehebIpzT5N2
Xc9Yds1lzzRs3P7KM/q5zkEVN0YUzE4dku2BWr6k6GR7gNCzACgQr+m+wJG0
PVu/pdszRSolVEz9NQncjzZ7VVVZNIS7pexn1wG3eGt/MzoCYNYpcB1qqLeT
nTBcv8te9vZPhxjikfU6PDj1Da9pXLaIDLYzTrnmSzCEiWOeGVniIFVrVrqM
mTb+rI8b7VHrsUOPbN9w6XPfSayqJw7AWfzIzt98+dajpzdvOHLQpEvea7bP
XoMGXv5CWBbN2e0baU3UharwesjLM3vfd9ixJ69p27rF+IvG3HHgU6++Dm4T
+3orjm64oXubc86Zd72vZdoxANesfm3dPwQ4it5wgpoLWEcySYZiL9DyYjWg
x6qufALaEjKA/Lasg9DKLAznQY2iig5zVRmehLYJ6niyhHBZseYBOBrKQEIA
L6EBjFoU2E5iYUQyzUBlzO+ZRVAQ6rqp3We8Fq2V+RG9DsTCUPwVOGglDBK3
piMD5fCkJjneRcCzR8RXwG07VcKC7HOmzZtxQ7vu5+EQ9IR2HhZsVZ/+oUJO
zoepHPXIQw+KS1dVytUOFClq6vYZiICWv0Pm/ueT0ZdO6O+1D8ix3QLXuujm
0LefX/Zhkz1rL+jaf2zGDlBFRFdEwkQ9JJwSTKej2/qh2OCBv0YjeDx/bRde
l7EpcgkKRo0CkTMEKhlEGkyE4yLcLvo5LEn3cLZVsN6zZZs/WwxgR5qQXMJi
29Ee0CNT/HaHHXZAP2A7boNgkNBEtqnWMdmKMH8xEIaDuPzVXRiIrCbzaIE/
RPvetldFgC+BCIkzhgMtGNbuET1CG3kzV/tZ/NPjD2vWbcyN9+kRDcDGbRd3
bjJ40OwbfYjGnsBNqdrkmuP3FkRRe0AIqC4qjHI7WSfHTRnb992j961/87Fd
zg5kkP6GNJRwze34XxYcm6caCd4AQxfNmDri/UP32n9Zl55drz7xzIsLfvtj
s2qZNEVZdVemFJju0Hl27rV9/I1SeyVvtJP9eGdFGDwE3fJaQLbGVrfUx9m5
1W88acUbmptsLbMNLEEFNBaScJ9oinX2o+lSr981RIwnmzZtipRt7kfmc31J
l6FHJBmy/b3WDXpOXrb8hRMb1Ht9z7rNzp86azY0y9GIRSHKsj97rcXv/Oyj
rG4QXUX5gTiEhl+EzSekXXKIsxN23yWLpj8woNXxPhvgunXdKt1wmujPhGcb
3qJmLzU66PweC65b+MSMZkf1G3rlDdYBEKw1T4WBKYmWLLjy7MZ/nR8WBu/T
3JWGLd6L7ZEdwUfw3ZtByjigPN4KVMj4Oqv2QCrIxyuZJrIiUnBUkxNyIc4c
80bwVFokO1Kf4MQh84kY5PCpUyZbxQJPQkHDzk9Bh3B2y3r3bPd5/V3+9dwB
DY86fsadL3ihR3FmxYMYkrDenSrkFln5E6h2OkLckM3s+Fd36CV/wu4hC6EA
P6ZJk/qNHMmJ96POnLhaWnk19IyUMhqHzjPYZ1hB3J4NIGIWkgM4ZZad34MD
atI/hI5EFTaPpQc1Zrb+ZFNyPViHzDGosyuTZSdP3UQSCnA1VGvFaHUTvkhw
5jpObHKUW9E0biGCcGMrt7NI7S60wHb8rvH7j2+80LFB0+6Lblh8Y7tug7Al
ZV2kbuNsIRk3pnEjxo6FlfgcxUA4xoLCxb1797bQJdvJ6Zou2kwyHhB1lgMW
dJoCq7E35GW8gvqAbfzOK9yMVjJSPFZu4qqwFpyZLigEmINxxvXIuOxSVqqg
/dZAYCc46skRPBF3SYhny0a4RKoDbtq2KJijSLkNQk3LdvdFKP0jNvljQ0XH
mE/AJaBz5Az87gHGky2bTp84ZNTQd7rVqu1PckYmBRuF46v+408/SSyqaYgt
IMAzUVUh9mEgBN5wV0tHUEfhBQqpjFJnQwB6ihi4LU/1kNKe7CVHxfZUo4w0
H38lba+FoWQCypURREhWIiWywmCJevQ0GiYWgiaR9A8BNhmTwZCuBdQC8Ti0
ifjOW2Mhe5fyl+7bYhtpI3YGAChKE5mTmYO96lgnlky5QYKwlGvcRj1tNj0b
GNgGJnbIHkQxLOqspMyuE6Hcto8g+SOCh34usQ0H8I5YENCE0mlTh8wIpGm3
FU6IFwd/eAglto7ONjWzp1H4YN925ETxys6i0j4HXAZjJVsHpcjYZDdT9xQ/
QePHzoCjqIjSqCjQJ5YT2ryt4oPNcnmikCOimO0B/PmBzryIHEpsBbucN5Jy
x3EzaialqOFIlFYQY+Q6wYZrYqdaIBT52YF4jlsVaBxzbgbQKD6GjkEgF9N8
4gBbzBvbi6FTgcjTIjY7VxEFowyJyoI59izrH7djUDXbhkpU2I5HsbVEetAO
cSW2Rqna66bzz6C20z1IVklucPPorJb7UUGL9GGf5bQRxpeRHYGOGCDvAz3A
cbJgiqcUM5CdJNBujkF6BymGIHqgkfuJQVQ1sbaMhb0FuDWS62APD3ep9Rd5
oowWGN1ywgIggPkDbg/XYRZyOzZNpQ5dlPmSihgXqBvQAx94F0wNljBHg3ik
9qDWjCnSwkuUQvrHABGtg1HZLCY471JduHtjKeMyZUH3cOPMBpEgwhOeBj54
R2Vk6lXkM+URThh/5Z1PXQTO4w4NUWUJS1reJTGPcSyU6iXmi2BlgV645j3r
47TfIlL31/NuSZ/MmvixvQnsQAE9NxCgg7vwxTssm8KhRKihGmctY9u0Z1qj
fJliICQXu/syKLPjlvkLg8NTI4ugfzflDnuUUDYucWgSahbWaMdkCLFKPHLG
BPwz5tES4jL03K6jRB1IQq2ebh0s3Y4MRNml79SpEAoKPBOMUP0EnxCWzUbb
K+LeUBj6eeCNH1ImHiMTLe4WPEzG4UbSG4UZMCkiOxO5S3EfyE0KWoo/kUC5
ip2K1PPj1nkEdm4rdzAo3aPOvUy2msKnEaxjxnghRuy1kkjRCNNkmStuEeJg
gc6RQBtaC5pKXz7FG10JAVfgu6isHrjKUAFooI9rQWK4JXmHhuU4BtACxofn
ncmslwVQqIYEi3qUHS6LSjOkcIs03R4YQ4bCRqYl2TFIuOZtfbXioe3ghJfg
djk9WPdqp2cSlwdpXCfa6/KSAlwZmkkfJWRrAS9HnVkOI6Y1CWYhXYyKFFel
mleIhfClnegrua+WGIg/eSelMbyCHYerES1DApIADjvI3npliWx10oQYhvlB
VAE0x17x/65+tx2DRdOhjo95IakfpVFrjACH0DI0i6gFbYKxaCIUWGiPRrKJ
uST8GgkjS9QHRgNG2CgaKftfKE6T1SBvMh5QlPsRhCOx5raSaAwwEi08A1Gl
ocPJizAY/IXSDGqr5aQ2fQWVDURl7bvIE6/r0oMCAhouJ14GO/MlUEtEFsG5
uKMYXSbJ4OgN4ijwiuxADhLV3X9ylJ3lQBMW02HGKI102yjK55X7vSv8wCrM
ASmibrADAjEB9EUhDi4zZLQSovRjm6HmTrjnhSXBUcs6t44c0FM+R5TANJ7G
ibI4soIr5aqX7++1115ycpBubkB8xS4EYJsdswq647SIw+A945BGFM2h0EwI
xqd6x6fbJK6/M1TGnvnRJqz6f45Moiol85bFc3ofs6px25NmDx3c7+lGh3Vc
2bZDRzzx/y2Z+hm3BKWeBiFOZiyVkZ2lQB1ZCe6SpNJsMQPf4tFwgN6CaEtl
JLNTuM7VxhaJDHRW142uGvEvSG8MsMPQCMRxKIRb1ELQVz0zdZrX8cslXC6z
Ywqp/E7IDfhwue13ofWOyD4tOnOOGAj75TH6aEIdVvR4Wz6VQ6mdtMwP1oGN
on34ZFDWdrEjZMoXgSTpsUN8mC5ishPQ0RaysnxXGcAsAgkempWymlCGS4Iy
goZlt/c8bk7HgSNePqR+LRom5/U4ZzCVWbDov0ZdAdTZMi/YqqzD2wfTSV5p
GBCUqTlVsRwLZqXrDSAEqlRlmGYI8gMNyaoomSMY23CGcWBHyF1dqZdvowIg
GZGLu7kUVf58l112AUsYDniO57K+Gzm5Pf1QdWS235C/k5Yt5PP6++LWwVVg
SICkcCflzguj44WpdrqmcBs8A5FjHt65V2LkRB4SDLkR1eR73JSZEAUGpud5
D+qD84Qu3mFnufAdz/lmxx135N5wsW8iQp62zspBxmkLtEUkl114Xve3jt3/
kJVHdTj9sm7nTZgwymEKmhZD3iVPdG9WZ9B5l98Ettze8cQhN5zUfZvIe7N2
7doUUHm/mzktJNbhNjIKnJZ0m+yYI9AqDuWO0ZBFImCHBmVxW6AQYeM9oYLL
oURes6uvSTWRDbLzzxDChuh15mxOTM92JIF5xFh4PWwNA7KtHQtCXOIt/qaE
zEHaAjQDWssiURHwRyYzHHMqgEJcM3ES5NkZ5qQg5EIgB0yzZMdvT8VzWqJu
n6H1OGhvfr4U2cIR4xjfw4ZPdt99d4u/sy1M1RWjPpmmYpAJF5EtqH783Xcu
fuakxi0Iba46qc8ozhwFJ1CHDDIl0B0zYfyI53sdWtvHlyEXzRRSFSCqoBQG
BZTqtIxFMJYLExsDq8Ar9r5DjjhM0yM0CZjAoxEJIhNkLCqjQREmj3Li7UhG
qFbJhJWvcEVgEWG+HV8GG2QnI+lSKLIFZQiL/g1emHGgLXe73YfEm8sG1qU8
InMbanALC+NiiOd5GovDQZARbgKBqDhBnZsPrsC2cFhovPWtMSyCZjAXNedv
fkcdvf18BC2pLkh9Qj9D/XF03mdlmAn348is5IhOUW1mNCbcrJ1lqodGq+e7
KqCNGg48pWDX54arRrxTt9YpBz380iNv99ivrq1QjqG1htE6evqE/oZDza56
4vNBs7eN1jhSVRHRouCIwJSbPrGWX6x4hxxRmHOfBagPEgdwKWLmh542KAi5
OdtCi5FIDblUdHU3P3Cr8EvbyBkYYjzwjqAcbeRzbBatJEXw93JivNLCoe0m
yAL3gddGwW0CH0uDbz4swQxLaK2oAZZwLbxFhsgHU9JIGN7JEp8wnhB0I2iQ
qMYrBUGG9CHoZ6TzDMk7CLQa+TNgAIzZqaZ2ECgJklXlMg/NcrPYFYyMCJoO
Lfz8BZdOH/f0yYfVv7bjaaevHNuhrYU2MeRsb+RMHjXiXAOd/mMXPHjCLXf8
aXI0n4nWo3TYaKacxc5ilR1yh2BeWR0FkF2c9TNbUuPE7D6LTOBGJuIL7Cvk
GZ7kLdAgjU3hLkAJ2z7D6worR3MpYfM5WkvuzoBRP/JDJjQsUEI1NVm2JMmc
qnTSHxKK35aeWJs3GmbLt/nhVYCr38jG71S/5TpXmC6LbOGr77MVplbzDkKS
ovBdDda+sNTses2y1u3ndxowJOu7NHXwe8A18Y/O+eg+wExJIGcCgHBipdCf
ryEtldBaMUBX8BO98FY8hc0YmdhJ1oIztVVgvIUJbu+wzwSBNtrp+YFCuM/E
GzNRqJLrIJXAqJCmZcJEHJj1/uskeZEpAzpEVsP7SFu0bYBisXVv20wBEBRU
X7zuNIQkkFWaW/ETMY8+3cnNOjkpswKieDsoFuTSLiB4DoyAltQB4Boqu6uP
tcGWB9gDFg0s40+lBJAMzYzPROoev/nN37aZMIAAVyBesRfqKAgzhQdv8a24
eLIDVrxL6ahBGBGBs7bk3UrpREWEnLoAEMhnQPQUwxipN20fo4SuoV9KBLzG
1cPcZzw66BzU6JcmAK5BJahxSw9zJExKWvHflBcMtf38GVlFiCjkOH57su30
LpV9/YxYGYWiF9Eq/ZkHJaqTsX0TfWUiUwy2inVL+IoBMl6BrAihUEJ4Ks1u
bvNsOVQSWcuWMF4pKLBo7RjEg6BBxCIgvaB6JOWV3u7gnBMvWYW/oi7KER5h
O9DYdZiq7Zhpn8FzzEtmHHNzJDIJ6fY3TOLpg46vlOsTwMfxL8wuDOQdW5Ma
5sYNYmJZRDQUiPw2T/gRGPUeEV4g8WDyV3cTsBY074DYBA4XM/MS/EoHYOoW
SdCNy0GSXNIt1Oigg0OfSuEZ1ZSgU8eZrTAy1OkKETwKD1PRD2rceAxvX+8i
7Ncv8KPxDErtwoGNhRL8IC2AkwkEtR4p2gAgKLFtBgA8AbRWVSVPobygRo6+
2UbOsi8mHlLXXMfm4kMcx6xRE5JQQuUOGMHQ/LkqKOLtmAK5OECJLu+iQ0ta
54lpEw8A4xAc/7rjVZKE5RKV6GXoAUGU7ZXoNtMulsGlrRES+J16PZYpnk2D
49hkz0krAbm2oMkSZp5h0wP8gBAsv8FzkjjxfFQyGBKhrr9vEzYKXNtuB3pi
jO1D4isYyZmUCvlLhw46++9Hi0ASirp4Rx1WbOrgwKgEVGAewiqHkj2mhQ0y
EJHJJJhpW3Se253XFG2C188ihXWvoMvAZD/LKnxvS/l6B0I6brFdUxApEx9k
GcjC2iswcetFAhJtRSPRh/GRKZ18SUuK/ZXM/IAG2K8oudv9qZgIlNcBQvAC
0CYYksftYfywLW/8scd9FjnbOs5XuhaEJHDnUyYro9L2QQAanmFTYLuUoTbc
4j4+gMAa5Gai0I4fx4hIeFF5kliwgVCERMt2MeAam022Y24smuZeAjjg3hZt
8jY7Wh5W42dt2gQxwHYcISkL5PEeSEY9ATc7v1nZKCPdIfSDQZ+aNyUS4IB+
hlhsw1v7DBdPrON/hkMjzpE011teAqp7Z4nsaNtSMHRbg8o3xGekPTyb4SJc
TAY2U9FFLbjHzqhgq/mvdtppJ39Kzh8fmBp4TqEnP9wHMGGRrz8CRh5EB+4O
6SAJx8JMlH8HUE6FyP9MzpVOOzfvs0IQiljclM2vqcCzQBF3rTwOqArm/xLZ
qccyg31LPHnCA787xKZ+xYq9z2yhnt9Fwr0Coh6HrNkvz8v6/H3VstaLYsZG
MhnEevoOEgaiAE8KsjO3+xtbREv8O9CmzM8AFDjkLY6RYJVR+qvdzSHL0glv
LR2Ga/MgmSGLr2y1hECvKQ5VDzoo9CVYpkQE3mcM0c6+s8+Y584UNQPBhMSf
7+W9WY98iWwc6H//Z08T///sd5eZEOBubvXdA6Ou6tZnwqkLly8ftWDi6H/d
+MGGitxfl/+Vd8/3KSzmkOU1q1o3qj3yTVk+cvBvL557xRFnv5j3W8qW3Oa+
pux/8DlXREhP/3fL4T/+e9aFw6YtOf2WpVP+febh9Y7veedXEoaWb8M1Zf+D
zwlPO1xX46sfN4m/d+PIc4hemEytf/PpsYc1vKjX1Bv2euz93/K2pIJlA7Hf
VfwF97mGy4KC1B/fjL5/wgX7X/PW75A63qeUdOa3kS9N6jL43NmLR8ybPHvP
lR+u56qK3F+X/5V3lwWotPWAX15bPuxyDthzx+yNmz72jBfqNhhb8vq6VF50
JGkevPXs2EYtd1zxzZYD17064sFDj7458eVmoyXb1+V/5d1OUwrSEfG3ox6Y
eEHtJW9WFgG6tuGMD64ZMK37hZefv2jW2en0bNBxk+/9Mm9TRGezX1P2P/gc
XaWRHtHvNT//fqOv+2GMsLVo88bN8lWNmM+q/19cN+//rSvI+9v/Aa0K1nM=
\
\>"]]
}, Open  ]],

Cell[BoxData[
 FormBox[
  RowBox[{
   RowBox[{"FeynArtsGraphics", "(", 
    RowBox[{
     RowBox[{"{", 
      RowBox[{"\<\"g\"\>", ",", "\<\"g\"\>", ",", "\<\"g\"\>", 
       ",", "\<\"g\"\>", ",", "\<\"g\"\>"}], "}"}], "\[Rule]", 
     RowBox[{"{", "}"}]}], ")"}], "\[InvisibleApplication]", 
   RowBox[{"(", 
    RowBox[{
     TagBox[
      RowBox[{"(", "\[NoBreak]", GridBox[{
         {
          FormBox[
           InterpretationBox[
            
            RowBox[{"\<\"[\"\>", "\[InvisibleSpace]", "\<\"T1 C1 N1\"\>", 
             "\[InvisibleSpace]", "\<\"]\"\>"}],
            SequenceForm["[", "T1 C1 N1", "]"],
            Editable->False],
           TraditionalForm], 
          FormBox[
           InterpretationBox[
            
            RowBox[{"\<\"[\"\>", "\[InvisibleSpace]", "\<\"T2 C1 N2\"\>", 
             "\[InvisibleSpace]", "\<\"]\"\>"}],
            SequenceForm["[", "T2 C1 N2", "]"],
            Editable->False],
           TraditionalForm], 
          FormBox[
           InterpretationBox[
            
            RowBox[{"\<\"[\"\>", "\[InvisibleSpace]", "\<\"T3 C1 N3\"\>", 
             "\[InvisibleSpace]", "\<\"]\"\>"}],
            SequenceForm["[", "T3 C1 N3", "]"],
            Editable->False],
           TraditionalForm], 
          FormBox[
           InterpretationBox[
            
            RowBox[{"\<\"[\"\>", "\[InvisibleSpace]", "\<\"T4 C1 N4\"\>", 
             "\[InvisibleSpace]", "\<\"]\"\>"}],
            SequenceForm["[", "T4 C1 N4", "]"],
            Editable->False],
           TraditionalForm]},
         {
          FormBox[
           InterpretationBox[
            
            RowBox[{"\<\"[\"\>", "\[InvisibleSpace]", "\<\"T5 C1 N5\"\>", 
             "\[InvisibleSpace]", "\<\"]\"\>"}],
            SequenceForm["[", "T5 C1 N5", "]"],
            Editable->False],
           TraditionalForm], 
          FormBox[
           InterpretationBox[
            
            RowBox[{"\<\"[\"\>", "\[InvisibleSpace]", "\<\"T6 C1 N6\"\>", 
             "\[InvisibleSpace]", "\<\"]\"\>"}],
            SequenceForm["[", "T6 C1 N6", "]"],
            Editable->False],
           TraditionalForm], 
          FormBox[
           InterpretationBox[
            
            RowBox[{"\<\"[\"\>", "\[InvisibleSpace]", "\<\"T7 C1 N7\"\>", 
             "\[InvisibleSpace]", "\<\"]\"\>"}],
            SequenceForm["[", "T7 C1 N7", "]"],
            Editable->False],
           TraditionalForm], 
          FormBox[
           InterpretationBox[
            
            RowBox[{"\<\"[\"\>", "\[InvisibleSpace]", "\<\"T8 C1 N8\"\>", 
             "\[InvisibleSpace]", "\<\"]\"\>"}],
            SequenceForm["[", "T8 C1 N8", "]"],
            Editable->False],
           TraditionalForm]},
         {
          FormBox[
           InterpretationBox[
            
            RowBox[{"\<\"[\"\>", "\[InvisibleSpace]", "\<\"T9 C1 N9\"\>", 
             "\[InvisibleSpace]", "\<\"]\"\>"}],
            SequenceForm["[", "T9 C1 N9", "]"],
            Editable->False],
           TraditionalForm], 
          FormBox[
           InterpretationBox[
            
            RowBox[{"\<\"[\"\>", "\[InvisibleSpace]", "\<\"T10 C1 N10\"\>", 
             "\[InvisibleSpace]", "\<\"]\"\>"}],
            SequenceForm["[", "T10 C1 N10", "]"],
            Editable->False],
           TraditionalForm], 
          FormBox[
           InterpretationBox[
            
            RowBox[{"\<\"[\"\>", "\[InvisibleSpace]", "\<\"T11 C1 N11\"\>", 
             "\[InvisibleSpace]", "\<\"]\"\>"}],
            SequenceForm["[", "T11 C1 N11", "]"],
            Editable->False],
           TraditionalForm], 
          FormBox[
           InterpretationBox[
            
            RowBox[{"\<\"[\"\>", "\[InvisibleSpace]", "\<\"T12 C1 N12\"\>", 
             "\[InvisibleSpace]", "\<\"]\"\>"}],
            SequenceForm["[", "T12 C1 N12", "]"],
            Editable->False],
           TraditionalForm]},
         {
          FormBox[
           InterpretationBox[
            
            RowBox[{"\<\"[\"\>", "\[InvisibleSpace]", "\<\"T13 C1 N13\"\>", 
             "\[InvisibleSpace]", "\<\"]\"\>"}],
            SequenceForm["[", "T13 C1 N13", "]"],
            Editable->False],
           TraditionalForm], 
          FormBox[
           InterpretationBox[
            
            RowBox[{"\<\"[\"\>", "\[InvisibleSpace]", "\<\"T14 C1 N14\"\>", 
             "\[InvisibleSpace]", "\<\"]\"\>"}],
            SequenceForm["[", "T14 C1 N14", "]"],
            Editable->False],
           TraditionalForm], 
          FormBox[
           InterpretationBox[
            
            RowBox[{"\<\"[\"\>", "\[InvisibleSpace]", "\<\"T15 C1 N15\"\>", 
             "\[InvisibleSpace]", "\<\"]\"\>"}],
            SequenceForm["[", "T15 C1 N15", "]"],
            Editable->False],
           TraditionalForm], 
          FormBox[
           InterpretationBox[
            
            RowBox[{"\<\"[\"\>", "\[InvisibleSpace]", "\<\"T16 C1 N16\"\>", 
             "\[InvisibleSpace]", "\<\"]\"\>"}],
            SequenceForm["[", "T16 C1 N16", "]"],
            Editable->False],
           TraditionalForm]}
        },
        GridBoxAlignment->{
         "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, 
          "Rows" -> {{Baseline}}, "RowsIndexed" -> {}},
        GridBoxSpacings->{"Columns" -> {
            Offset[0.27999999999999997`], {
             Offset[0.7]}, 
            Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, 
          "Rows" -> {
            Offset[0.2], {
             Offset[0.4]}, 
            Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}],
      Function[BoxForm`e$, 
       MatrixForm[BoxForm`e$]]], ",", 
     TagBox[
      RowBox[{"(", "\[NoBreak]", GridBox[{
         {
          FormBox[
           InterpretationBox[
            
            RowBox[{"\<\"[\"\>", "\[InvisibleSpace]", "\<\"T17 C1 N17\"\>", 
             "\[InvisibleSpace]", "\<\"]\"\>"}],
            SequenceForm["[", "T17 C1 N17", "]"],
            Editable->False],
           TraditionalForm], 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"[\"\>", "\[InvisibleSpace]", "\<\"T18 C1 N18\"\>", 
             "\[InvisibleSpace]", "\<\"]\"\>"}],
            SequenceForm["[", "T18 C1 N18", "]"],
            Editable->False],
           TraditionalForm], 
          FormBox[
           InterpretationBox[
            
            RowBox[{"\<\"[\"\>", "\[InvisibleSpace]", "\<\"T19 C1 N19\"\>", 
             "\[InvisibleSpace]", "\<\"]\"\>"}],
            SequenceForm["[", "T19 C1 N19", "]"],
            Editable->False],
           TraditionalForm], 
          FormBox[
           InterpretationBox[
            
            RowBox[{"\<\"[\"\>", "\[InvisibleSpace]", "\<\"T20 C1 N20\"\>", 
             "\[InvisibleSpace]", "\<\"]\"\>"}],
            SequenceForm["[", "T20 C1 N20", "]"],
            Editable->False],
           TraditionalForm]},
         {
          FormBox[
           InterpretationBox[
            
            RowBox[{"\<\"[\"\>", "\[InvisibleSpace]", "\<\"T21 C1 N21\"\>", 
             "\[InvisibleSpace]", "\<\"]\"\>"}],
            SequenceForm["[", "T21 C1 N21", "]"],
            Editable->False],
           TraditionalForm], 
          FormBox[
           InterpretationBox[
            
            RowBox[{"\<\"[\"\>", "\[InvisibleSpace]", "\<\"T22 C1 N22\"\>", 
             "\[InvisibleSpace]", "\<\"]\"\>"}],
            SequenceForm["[", "T22 C1 N22", "]"],
            Editable->False],
           TraditionalForm], 
          FormBox[
           InterpretationBox[
            
            RowBox[{"\<\"[\"\>", "\[InvisibleSpace]", "\<\"T23 C1 N23\"\>", 
             "\[InvisibleSpace]", "\<\"]\"\>"}],
            SequenceForm["[", "T23 C1 N23", "]"],
            Editable->False],
           TraditionalForm], 
          FormBox[
           InterpretationBox[
            
            RowBox[{"\<\"[\"\>", "\[InvisibleSpace]", "\<\"T24 C1 N24\"\>", 
             "\[InvisibleSpace]", "\<\"]\"\>"}],
            SequenceForm["[", "T24 C1 N24", "]"],
            Editable->False],
           TraditionalForm]},
         {
          FormBox[
           InterpretationBox[
            
            RowBox[{"\<\"[\"\>", "\[InvisibleSpace]", "\<\"T25 C1 N25\"\>", 
             "\[InvisibleSpace]", "\<\"]\"\>"}],
            SequenceForm["[", "T25 C1 N25", "]"],
            Editable->False],
           TraditionalForm], "Null", "Null", "Null"},
         {"Null", "Null", "Null", "Null"}
        },
        GridBoxAlignment->{
         "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, 
          "Rows" -> {{Baseline}}, "RowsIndexed" -> {}},
        GridBoxSpacings->{"Columns" -> {
            Offset[0.27999999999999997`], {
             Offset[0.7]}, 
            Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, 
          "Rows" -> {
            Offset[0.2], {
             Offset[0.4]}, 
            Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}],
      Function[BoxForm`e$, 
       MatrixForm[BoxForm`e$]]]}], ")"}]}], TraditionalForm]], "Output",
 CellChangeTimes->{
  3.543120327733699*^9, 3.543120378188611*^9, {3.543121725918185*^9, 
   3.543121736798252*^9}}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"CreateFeynAmp", "[", "AA", "]"}]], "Input",
 CellChangeTimes->{{3.543120489833661*^9, 3.543120493895216*^9}, {
  3.543121761181799*^9, 3.54312178590814*^9}}],

Cell[BoxData[
 FormBox[
  RowBox[{
   RowBox[{"FeynAmpList", "(", 
    RowBox[{
     RowBox[{"Process", "\[Rule]", 
      RowBox[{
       RowBox[{"(", "\[NoBreak]", GridBox[{
          {
           RowBox[{"V", "(", 
            RowBox[{"5", ",", 
             RowBox[{"{", 
              FormBox[
               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "1"}],
               TraditionalForm], "}"}]}], ")"}], 
           FormBox[
            RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "1"}],
            TraditionalForm], "0"},
          {
           RowBox[{"V", "(", 
            RowBox[{"5", ",", 
             RowBox[{"{", 
              FormBox[
               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "2"}],
               TraditionalForm], "}"}]}], ")"}], 
           FormBox[
            RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "2"}],
            TraditionalForm], "0"},
          {
           RowBox[{"V", "(", 
            RowBox[{"5", ",", 
             RowBox[{"{", 
              FormBox[
               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "3"}],
               TraditionalForm], "}"}]}], ")"}], 
           FormBox[
            RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "3"}],
            TraditionalForm], "0"},
          {
           RowBox[{"V", "(", 
            RowBox[{"5", ",", 
             RowBox[{"{", 
              FormBox[
               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "4"}],
               TraditionalForm], "}"}]}], ")"}], 
           FormBox[
            RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "4"}],
            TraditionalForm], "0"},
          {
           RowBox[{"V", "(", 
            RowBox[{"5", ",", 
             RowBox[{"{", 
              FormBox[
               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "5"}],
               TraditionalForm], "}"}]}], ")"}], 
           FormBox[
            RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "5"}],
            TraditionalForm], "0"}
         },
         GridBoxAlignment->{
          "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, 
           "Rows" -> {{Baseline}}, "RowsIndexed" -> {}},
         GridBoxSpacings->{"Columns" -> {
             Offset[0.27999999999999997`], {
              Offset[0.7]}, 
             Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
             Offset[0.2], {
              Offset[0.4]}, 
             Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}], 
       "\[Rule]", 
       RowBox[{"{", "}"}]}]}], ",", 
     RowBox[{"Model", "\[Rule]", "\<\"SMQCD\"\>"}], ",", 
     RowBox[{"GenericModel", "\[Rule]", "\<\"Lorentz\"\>"}], ",", 
     RowBox[{"AmplitudeLevel", "\[Rule]", 
      RowBox[{"{", "Classes", "}"}]}], ",", 
     RowBox[{"ExcludeParticles", "\[Rule]", 
      RowBox[{"{", "}"}]}], ",", 
     RowBox[{"ExcludeFieldPoints", "\[Rule]", 
      RowBox[{"{", "}"}]}], ",", 
     RowBox[{"LastSelections", "\[Rule]", 
      RowBox[{"{", "}"}]}]}], ")"}], "\[InvisibleApplication]", 
   RowBox[{"(", 
    RowBox[{
     RowBox[{"\[Integral]", 
      RowBox[{
       StyleBox[
        RowBox[{
         SuperscriptBox["\[DifferentialD]", "D"], 
         FormBox[
          RowBox[{"GraphID", "(", 
           RowBox[{
            RowBox[{"Topology", "\[LongEqual]", "1"}], ",", 
            RowBox[{"Generic", "\[LongEqual]", "1"}], ",", 
            RowBox[{"Classes", "\[LongEqual]", "1"}], ",", 
            RowBox[{"Number", "\[LongEqual]", "1"}]}], ")"}],
          TraditionalForm]}],
        ZeroWidthTimes->True], "\[Integral]", 
       RowBox[{
        SuperscriptBox["\[DifferentialD]", "D"], 
        FormBox[
         RowBox[{"Integral", "[", "]"}],
         TraditionalForm]}]}], "(", 
      FormBox[
       RowBox[{
        RowBox[{"-", 
         SubscriptBox["g", "s"]}], " ", 
        RowBox[{"(", 
         RowBox[{
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                RowBox[{"-", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "1"}],
                    SequenceForm["p", 1],
                    Editable->False],
                   TraditionalForm], ")"}]}], "+", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "2"}],
                  SequenceForm["p", 2],
                  Editable->False],
                 TraditionalForm]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "6"}],
               SequenceForm["Lor", 6],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "1"}],
                SequenceForm["Lor", 1],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "2"}],
                SequenceForm["Lor", 2],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}], "+", 
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "1"}],
                  SequenceForm["p", 1],
                  Editable->False],
                 TraditionalForm], "-", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "3"}],
                  SequenceForm["p", 3],
                  Editable->False],
                 TraditionalForm], "-", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "4"}],
                  SequenceForm["p", 4],
                  Editable->False],
                 TraditionalForm], "-", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "5"}],
                  SequenceForm["p", 5],
                  Editable->False],
                 TraditionalForm]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "2"}],
               SequenceForm["Lor", 2],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "1"}],
                SequenceForm["Lor", 1],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "6"}],
                SequenceForm["Lor", 6],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}], "+", 
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                RowBox[{"-", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "2"}],
                    SequenceForm["p", 2],
                    Editable->False],
                   TraditionalForm], ")"}]}], "+", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "3"}],
                  SequenceForm["p", 3],
                  Editable->False],
                 TraditionalForm], "+", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "4"}],
                  SequenceForm["p", 4],
                  Editable->False],
                 TraditionalForm], "+", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "5"}],
                  SequenceForm["p", 5],
                  Editable->False],
                 TraditionalForm]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "1"}],
               SequenceForm["Lor", 1],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "2"}],
                SequenceForm["Lor", 2],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "6"}],
                SequenceForm["Lor", 6],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}]}], ")"}], " ", 
        SuperscriptBox["g", 
         RowBox[{
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "6"}],
             SequenceForm["Lor", 6],
             Editable->False],
            TraditionalForm],
           TraditionalForm], 
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "7"}],
             SequenceForm["Lor", 7],
             Editable->False],
            TraditionalForm],
           TraditionalForm]}]], " ", 
        RowBox[{
         FormBox["\<\"ep\"\>",
          TraditionalForm], "(", 
         RowBox[{
          RowBox[{"V", "(", 
           RowBox[{"5", ",", 
            RowBox[{"{", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "1"}],
               SequenceForm["Glu", 1],
               Editable->False],
              TraditionalForm], "}"}]}], ")"}], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "1"}],
            SequenceForm["p", 1],
            Editable->False],
           TraditionalForm], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "1"}],
            SequenceForm["Lor", 1],
            Editable->False],
           TraditionalForm]}], ")"}], " ", 
        RowBox[{
         FormBox["\<\"ep\"\>",
          TraditionalForm], "(", 
         RowBox[{
          RowBox[{"V", "(", 
           RowBox[{"5", ",", 
            RowBox[{"{", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "2"}],
               SequenceForm["Glu", 2],
               Editable->False],
              TraditionalForm], "}"}]}], ")"}], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "2"}],
            SequenceForm["p", 2],
            Editable->False],
           TraditionalForm], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "2"}],
            SequenceForm["Lor", 2],
            Editable->False],
           TraditionalForm]}], ")"}], " ", 
        RowBox[{
         FormBox["\<\"ep\"\>",
          TraditionalForm], "(", 
         RowBox[{
          RowBox[{"V", "(", 
           RowBox[{"5", ",", 
            RowBox[{"{", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "3"}],
               SequenceForm["Glu", 3],
               Editable->False],
              TraditionalForm], "}"}]}], ")"}], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "3"}],
            SequenceForm["p", 3],
            Editable->False],
           TraditionalForm], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "3"}],
            SequenceForm["Lor", 3],
            Editable->False],
           TraditionalForm]}], ")"}], " ", 
        RowBox[{
         FormBox["\<\"ep\"\>",
          TraditionalForm], "(", 
         RowBox[{
          RowBox[{"V", "(", 
           RowBox[{"5", ",", 
            RowBox[{"{", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "4"}],
               SequenceForm["Glu", 4],
               Editable->False],
              TraditionalForm], "}"}]}], ")"}], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "4"}],
            SequenceForm["p", 4],
            Editable->False],
           TraditionalForm], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "4"}],
            SequenceForm["Lor", 4],
            Editable->False],
           TraditionalForm]}], ")"}], " ", 
        RowBox[{
         FormBox["\<\"ep\"\>",
          TraditionalForm], "(", 
         RowBox[{
          RowBox[{"V", "(", 
           RowBox[{"5", ",", 
            RowBox[{"{", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "5"}],
               SequenceForm["Glu", 5],
               Editable->False],
              TraditionalForm], "}"}]}], ")"}], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "5"}],
            SequenceForm["p", 5],
            Editable->False],
           TraditionalForm], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "5"}],
            SequenceForm["Lor", 5],
            Editable->False],
           TraditionalForm]}], ")"}], " ", 
        FormBox[
         FractionBox["1", 
          SuperscriptBox[
           RowBox[{"(", 
            RowBox[{
             RowBox[{"-", 
              RowBox[{"(", 
               FormBox[
                InterpretationBox[
                 RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "3"}],
                 SequenceForm["p", 3],
                 Editable->False],
                TraditionalForm], ")"}]}], "-", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "4"}],
               SequenceForm["p", 4],
               Editable->False],
              TraditionalForm], "-", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "5"}],
               SequenceForm["p", 5],
               Editable->False],
              TraditionalForm]}], ")"}], "2"]],
         TraditionalForm], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "6"}],
            SequenceForm["Glu", 6],
            Editable->False],
           TraditionalForm], ",", "8"}], ")"}], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "1"}],
            SequenceForm["Glu", 1],
            Editable->False],
           TraditionalForm], ",", "8", ",", "External"}], ")"}], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "2"}],
            SequenceForm["Glu", 2],
            Editable->False],
           TraditionalForm], ",", "8", ",", "External"}], ")"}], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "3"}],
            SequenceForm["Glu", 3],
            Editable->False],
           TraditionalForm], ",", "8", ",", "External"}], ")"}], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "4"}],
            SequenceForm["Glu", 4],
            Editable->False],
           TraditionalForm], ",", "8", ",", "External"}], ")"}], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "5"}],
            SequenceForm["Glu", 5],
            Editable->False],
           TraditionalForm], ",", "8", ",", "External"}], ")"}], " ", 
        SubscriptBox["f", 
         RowBox[{
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "1"}],
             SequenceForm["Glu", 1],
             Editable->False],
            TraditionalForm],
           TraditionalForm], 
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "2"}],
             SequenceForm["Glu", 2],
             Editable->False],
            TraditionalForm],
           TraditionalForm], 
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "6"}],
             SequenceForm["Glu", 6],
             Editable->False],
            TraditionalForm],
           TraditionalForm]}]], " ", 
        RowBox[{"(", 
         RowBox[{
          RowBox[{
           RowBox[{"-", "\[ImaginaryI]"}], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "3"}],
                SequenceForm["Lor", 3],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "7"}],
                SequenceForm["Lor", 7],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "4"}],
                SequenceForm["Lor", 4],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "5"}],
                SequenceForm["Lor", 5],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]], " ", 
           RowBox[{"(", 
            RowBox[{
             RowBox[{"-", 
              SubscriptBox["f", 
               RowBox[{
                FormBox[
                 FormBox[
                  InterpretationBox[
                   RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "3"}],
                   SequenceForm["Glu", 3],
                   Editable->False],
                  TraditionalForm],
                 TraditionalForm], 
                FormBox[
                 FormBox[
                  InterpretationBox[
                   RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "4"}],
                   SequenceForm["Glu", 4],
                   Editable->False],
                  TraditionalForm],
                 TraditionalForm], 
                FormBox[
                 FormBox[
                  InterpretationBox[
                   RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "5"}],
                   SequenceForm["Glu", 5],
                   Editable->False],
                  TraditionalForm],
                 TraditionalForm], 
                FormBox[
                 FormBox[
                  InterpretationBox[
                   RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "6"}],
                   SequenceForm["Glu", 6],
                   Editable->False],
                  TraditionalForm],
                 TraditionalForm]}]]}], "-", 
             SubscriptBox["f", 
              RowBox[{
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "3"}],
                  SequenceForm["Glu", 3],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm], 
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "5"}],
                  SequenceForm["Glu", 5],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm], 
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "4"}],
                  SequenceForm["Glu", 4],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm], 
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "6"}],
                  SequenceForm["Glu", 6],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm]}]]}], ")"}], " ", 
           SubsuperscriptBox["g", "s", "2"]}], "-", 
          RowBox[{"\[ImaginaryI]", " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "3"}],
                SequenceForm["Lor", 3],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "4"}],
                SequenceForm["Lor", 4],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "5"}],
                SequenceForm["Lor", 5],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "7"}],
                SequenceForm["Lor", 7],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]], " ", 
           RowBox[{"(", 
            RowBox[{
             SubscriptBox["f", 
              RowBox[{
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "3"}],
                  SequenceForm["Glu", 3],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm], 
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "5"}],
                  SequenceForm["Glu", 5],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm], 
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "4"}],
                  SequenceForm["Glu", 4],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm], 
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "6"}],
                  SequenceForm["Glu", 6],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm]}]], "-", 
             SubscriptBox["f", 
              RowBox[{
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "3"}],
                  SequenceForm["Glu", 3],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm], 
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "6"}],
                  SequenceForm["Glu", 6],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm], 
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "5"}],
                  SequenceForm["Glu", 5],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm], 
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "4"}],
                  SequenceForm["Glu", 4],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm]}]]}], ")"}], " ", 
           SubsuperscriptBox["g", "s", "2"]}], "-", 
          RowBox[{"\[ImaginaryI]", " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "3"}],
                SequenceForm["Lor", 3],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "5"}],
                SequenceForm["Lor", 5],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "4"}],
                SequenceForm["Lor", 4],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "7"}],
                SequenceForm["Lor", 7],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]], " ", 
           RowBox[{"(", 
            RowBox[{
             SubscriptBox["f", 
              RowBox[{
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "3"}],
                  SequenceForm["Glu", 3],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm], 
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "4"}],
                  SequenceForm["Glu", 4],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm], 
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "5"}],
                  SequenceForm["Glu", 5],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm], 
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "6"}],
                  SequenceForm["Glu", 6],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm]}]], "+", 
             SubscriptBox["f", 
              RowBox[{
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "3"}],
                  SequenceForm["Glu", 3],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm], 
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "6"}],
                  SequenceForm["Glu", 6],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm], 
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "5"}],
                  SequenceForm["Glu", 5],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm], 
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "4"}],
                  SequenceForm["Glu", 4],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm]}]]}], ")"}], " ", 
           SubsuperscriptBox["g", "s", "2"]}]}], ")"}]}],
       TraditionalForm], ")"}], ",", 
     RowBox[{"\[Integral]", 
      RowBox[{
       StyleBox[
        RowBox[{
         SuperscriptBox["\[DifferentialD]", "D"], 
         FormBox[
          RowBox[{"GraphID", "(", 
           RowBox[{
            RowBox[{"Topology", "\[LongEqual]", "1"}], ",", 
            RowBox[{"Generic", "\[LongEqual]", "1"}], ",", 
            RowBox[{"Classes", "\[LongEqual]", "1"}], ",", 
            RowBox[{"Number", "\[LongEqual]", "2"}]}], ")"}],
          TraditionalForm]}],
        ZeroWidthTimes->True], "\[Integral]", 
       RowBox[{
        SuperscriptBox["\[DifferentialD]", "D"], 
        FormBox[
         RowBox[{"Integral", "[", "]"}],
         TraditionalForm]}]}], "(", 
      FormBox[
       RowBox[{
        RowBox[{"-", 
         SubscriptBox["g", "s"]}], " ", 
        RowBox[{"(", 
         RowBox[{
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                RowBox[{"-", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "1"}],
                    SequenceForm["p", 1],
                    Editable->False],
                   TraditionalForm], ")"}]}], "+", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "3"}],
                  SequenceForm["p", 3],
                  Editable->False],
                 TraditionalForm]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "6"}],
               SequenceForm["Lor", 6],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "1"}],
                SequenceForm["Lor", 1],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "3"}],
                SequenceForm["Lor", 3],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}], "+", 
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "1"}],
                  SequenceForm["p", 1],
                  Editable->False],
                 TraditionalForm], "-", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "2"}],
                  SequenceForm["p", 2],
                  Editable->False],
                 TraditionalForm], "-", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "4"}],
                  SequenceForm["p", 4],
                  Editable->False],
                 TraditionalForm], "-", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "5"}],
                  SequenceForm["p", 5],
                  Editable->False],
                 TraditionalForm]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "3"}],
               SequenceForm["Lor", 3],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "1"}],
                SequenceForm["Lor", 1],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "6"}],
                SequenceForm["Lor", 6],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}], "+", 
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "2"}],
                  SequenceForm["p", 2],
                  Editable->False],
                 TraditionalForm], "-", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "3"}],
                  SequenceForm["p", 3],
                  Editable->False],
                 TraditionalForm], "+", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "4"}],
                  SequenceForm["p", 4],
                  Editable->False],
                 TraditionalForm], "+", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "5"}],
                  SequenceForm["p", 5],
                  Editable->False],
                 TraditionalForm]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "1"}],
               SequenceForm["Lor", 1],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "3"}],
                SequenceForm["Lor", 3],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "6"}],
                SequenceForm["Lor", 6],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}]}], ")"}], " ", 
        SuperscriptBox["g", 
         RowBox[{
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "6"}],
             SequenceForm["Lor", 6],
             Editable->False],
            TraditionalForm],
           TraditionalForm], 
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "7"}],
             SequenceForm["Lor", 7],
             Editable->False],
            TraditionalForm],
           TraditionalForm]}]], " ", 
        RowBox[{
         FormBox["\<\"ep\"\>",
          TraditionalForm], "(", 
         RowBox[{
          RowBox[{"V", "(", 
           RowBox[{"5", ",", 
            RowBox[{"{", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "1"}],
               SequenceForm["Glu", 1],
               Editable->False],
              TraditionalForm], "}"}]}], ")"}], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "1"}],
            SequenceForm["p", 1],
            Editable->False],
           TraditionalForm], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "1"}],
            SequenceForm["Lor", 1],
            Editable->False],
           TraditionalForm]}], ")"}], " ", 
        RowBox[{
         FormBox["\<\"ep\"\>",
          TraditionalForm], "(", 
         RowBox[{
          RowBox[{"V", "(", 
           RowBox[{"5", ",", 
            RowBox[{"{", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "2"}],
               SequenceForm["Glu", 2],
               Editable->False],
              TraditionalForm], "}"}]}], ")"}], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "2"}],
            SequenceForm["p", 2],
            Editable->False],
           TraditionalForm], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "2"}],
            SequenceForm["Lor", 2],
            Editable->False],
           TraditionalForm]}], ")"}], " ", 
        RowBox[{
         FormBox["\<\"ep\"\>",
          TraditionalForm], "(", 
         RowBox[{
          RowBox[{"V", "(", 
           RowBox[{"5", ",", 
            RowBox[{"{", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "3"}],
               SequenceForm["Glu", 3],
               Editable->False],
              TraditionalForm], "}"}]}], ")"}], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "3"}],
            SequenceForm["p", 3],
            Editable->False],
           TraditionalForm], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "3"}],
            SequenceForm["Lor", 3],
            Editable->False],
           TraditionalForm]}], ")"}], " ", 
        RowBox[{
         FormBox["\<\"ep\"\>",
          TraditionalForm], "(", 
         RowBox[{
          RowBox[{"V", "(", 
           RowBox[{"5", ",", 
            RowBox[{"{", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "4"}],
               SequenceForm["Glu", 4],
               Editable->False],
              TraditionalForm], "}"}]}], ")"}], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "4"}],
            SequenceForm["p", 4],
            Editable->False],
           TraditionalForm], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "4"}],
            SequenceForm["Lor", 4],
            Editable->False],
           TraditionalForm]}], ")"}], " ", 
        RowBox[{
         FormBox["\<\"ep\"\>",
          TraditionalForm], "(", 
         RowBox[{
          RowBox[{"V", "(", 
           RowBox[{"5", ",", 
            RowBox[{"{", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "5"}],
               SequenceForm["Glu", 5],
               Editable->False],
              TraditionalForm], "}"}]}], ")"}], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "5"}],
            SequenceForm["p", 5],
            Editable->False],
           TraditionalForm], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "5"}],
            SequenceForm["Lor", 5],
            Editable->False],
           TraditionalForm]}], ")"}], " ", 
        FormBox[
         FractionBox["1", 
          SuperscriptBox[
           RowBox[{"(", 
            RowBox[{
             RowBox[{"-", 
              RowBox[{"(", 
               FormBox[
                InterpretationBox[
                 RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "2"}],
                 SequenceForm["p", 2],
                 Editable->False],
                TraditionalForm], ")"}]}], "-", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "4"}],
               SequenceForm["p", 4],
               Editable->False],
              TraditionalForm], "-", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "5"}],
               SequenceForm["p", 5],
               Editable->False],
              TraditionalForm]}], ")"}], "2"]],
         TraditionalForm], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "6"}],
            SequenceForm["Glu", 6],
            Editable->False],
           TraditionalForm], ",", "8"}], ")"}], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "1"}],
            SequenceForm["Glu", 1],
            Editable->False],
           TraditionalForm], ",", "8", ",", "External"}], ")"}], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "2"}],
            SequenceForm["Glu", 2],
            Editable->False],
           TraditionalForm], ",", "8", ",", "External"}], ")"}], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "3"}],
            SequenceForm["Glu", 3],
            Editable->False],
           TraditionalForm], ",", "8", ",", "External"}], ")"}], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "4"}],
            SequenceForm["Glu", 4],
            Editable->False],
           TraditionalForm], ",", "8", ",", "External"}], ")"}], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "5"}],
            SequenceForm["Glu", 5],
            Editable->False],
           TraditionalForm], ",", "8", ",", "External"}], ")"}], " ", 
        SubscriptBox["f", 
         RowBox[{
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "1"}],
             SequenceForm["Glu", 1],
             Editable->False],
            TraditionalForm],
           TraditionalForm], 
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "3"}],
             SequenceForm["Glu", 3],
             Editable->False],
            TraditionalForm],
           TraditionalForm], 
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "6"}],
             SequenceForm["Glu", 6],
             Editable->False],
            TraditionalForm],
           TraditionalForm]}]], " ", 
        RowBox[{"(", 
         RowBox[{
          RowBox[{
           RowBox[{"-", "\[ImaginaryI]"}], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "2"}],
                SequenceForm["Lor", 2],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "7"}],
                SequenceForm["Lor", 7],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "4"}],
                SequenceForm["Lor", 4],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "5"}],
                SequenceForm["Lor", 5],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]], " ", 
           RowBox[{"(", 
            RowBox[{
             RowBox[{"-", 
              SubscriptBox["f", 
               RowBox[{
                FormBox[
                 FormBox[
                  InterpretationBox[
                   RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "2"}],
                   SequenceForm["Glu", 2],
                   Editable->False],
                  TraditionalForm],
                 TraditionalForm], 
                FormBox[
                 FormBox[
                  InterpretationBox[
                   RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "4"}],
                   SequenceForm["Glu", 4],
                   Editable->False],
                  TraditionalForm],
                 TraditionalForm], 
                FormBox[
                 FormBox[
                  InterpretationBox[
                   RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "5"}],
                   SequenceForm["Glu", 5],
                   Editable->False],
                  TraditionalForm],
                 TraditionalForm], 
                FormBox[
                 FormBox[
                  InterpretationBox[
                   RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "6"}],
                   SequenceForm["Glu", 6],
                   Editable->False],
                  TraditionalForm],
                 TraditionalForm]}]]}], "-", 
             SubscriptBox["f", 
              RowBox[{
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "2"}],
                  SequenceForm["Glu", 2],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm], 
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "5"}],
                  SequenceForm["Glu", 5],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm], 
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "4"}],
                  SequenceForm["Glu", 4],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm], 
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "6"}],
                  SequenceForm["Glu", 6],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm]}]]}], ")"}], " ", 
           SubsuperscriptBox["g", "s", "2"]}], "-", 
          RowBox[{"\[ImaginaryI]", " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "2"}],
                SequenceForm["Lor", 2],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "4"}],
                SequenceForm["Lor", 4],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "5"}],
                SequenceForm["Lor", 5],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "7"}],
                SequenceForm["Lor", 7],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]], " ", 
           RowBox[{"(", 
            RowBox[{
             SubscriptBox["f", 
              RowBox[{
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "2"}],
                  SequenceForm["Glu", 2],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm], 
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "5"}],
                  SequenceForm["Glu", 5],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm], 
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "4"}],
                  SequenceForm["Glu", 4],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm], 
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "6"}],
                  SequenceForm["Glu", 6],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm]}]], "-", 
             SubscriptBox["f", 
              RowBox[{
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "2"}],
                  SequenceForm["Glu", 2],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm], 
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "6"}],
                  SequenceForm["Glu", 6],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm], 
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "5"}],
                  SequenceForm["Glu", 5],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm], 
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "4"}],
                  SequenceForm["Glu", 4],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm]}]]}], ")"}], " ", 
           SubsuperscriptBox["g", "s", "2"]}], "-", 
          RowBox[{"\[ImaginaryI]", " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "2"}],
                SequenceForm["Lor", 2],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "5"}],
                SequenceForm["Lor", 5],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "4"}],
                SequenceForm["Lor", 4],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "7"}],
                SequenceForm["Lor", 7],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]], " ", 
           RowBox[{"(", 
            RowBox[{
             SubscriptBox["f", 
              RowBox[{
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "2"}],
                  SequenceForm["Glu", 2],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm], 
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "4"}],
                  SequenceForm["Glu", 4],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm], 
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "5"}],
                  SequenceForm["Glu", 5],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm], 
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "6"}],
                  SequenceForm["Glu", 6],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm]}]], "+", 
             SubscriptBox["f", 
              RowBox[{
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "2"}],
                  SequenceForm["Glu", 2],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm], 
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "6"}],
                  SequenceForm["Glu", 6],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm], 
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "5"}],
                  SequenceForm["Glu", 5],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm], 
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "4"}],
                  SequenceForm["Glu", 4],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm]}]]}], ")"}], " ", 
           SubsuperscriptBox["g", "s", "2"]}]}], ")"}]}],
       TraditionalForm], ")"}], ",", 
     RowBox[{"\[Integral]", 
      RowBox[{
       StyleBox[
        RowBox[{
         SuperscriptBox["\[DifferentialD]", "D"], 
         FormBox[
          RowBox[{"GraphID", "(", 
           RowBox[{
            RowBox[{"Topology", "\[LongEqual]", "1"}], ",", 
            RowBox[{"Generic", "\[LongEqual]", "1"}], ",", 
            RowBox[{"Classes", "\[LongEqual]", "1"}], ",", 
            RowBox[{"Number", "\[LongEqual]", "3"}]}], ")"}],
          TraditionalForm]}],
        ZeroWidthTimes->True], "\[Integral]", 
       RowBox[{
        SuperscriptBox["\[DifferentialD]", "D"], 
        FormBox[
         RowBox[{"Integral", "[", "]"}],
         TraditionalForm]}]}], "(", 
      FormBox[
       RowBox[{
        RowBox[{"-", 
         SubscriptBox["g", "s"]}], " ", 
        RowBox[{"(", 
         RowBox[{
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                RowBox[{"-", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "1"}],
                    SequenceForm["p", 1],
                    Editable->False],
                   TraditionalForm], ")"}]}], "+", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "4"}],
                  SequenceForm["p", 4],
                  Editable->False],
                 TraditionalForm]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "6"}],
               SequenceForm["Lor", 6],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "1"}],
                SequenceForm["Lor", 1],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "4"}],
                SequenceForm["Lor", 4],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}], "+", 
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "1"}],
                  SequenceForm["p", 1],
                  Editable->False],
                 TraditionalForm], "-", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "2"}],
                  SequenceForm["p", 2],
                  Editable->False],
                 TraditionalForm], "-", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "3"}],
                  SequenceForm["p", 3],
                  Editable->False],
                 TraditionalForm], "-", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "5"}],
                  SequenceForm["p", 5],
                  Editable->False],
                 TraditionalForm]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "4"}],
               SequenceForm["Lor", 4],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "1"}],
                SequenceForm["Lor", 1],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "6"}],
                SequenceForm["Lor", 6],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}], "+", 
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "2"}],
                  SequenceForm["p", 2],
                  Editable->False],
                 TraditionalForm], "+", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "3"}],
                  SequenceForm["p", 3],
                  Editable->False],
                 TraditionalForm], "-", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "4"}],
                  SequenceForm["p", 4],
                  Editable->False],
                 TraditionalForm], "+", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "5"}],
                  SequenceForm["p", 5],
                  Editable->False],
                 TraditionalForm]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "1"}],
               SequenceForm["Lor", 1],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "4"}],
                SequenceForm["Lor", 4],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "6"}],
                SequenceForm["Lor", 6],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}]}], ")"}], " ", 
        SuperscriptBox["g", 
         RowBox[{
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "6"}],
             SequenceForm["Lor", 6],
             Editable->False],
            TraditionalForm],
           TraditionalForm], 
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "7"}],
             SequenceForm["Lor", 7],
             Editable->False],
            TraditionalForm],
           TraditionalForm]}]], " ", 
        RowBox[{
         FormBox["\<\"ep\"\>",
          TraditionalForm], "(", 
         RowBox[{
          RowBox[{"V", "(", 
           RowBox[{"5", ",", 
            RowBox[{"{", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "1"}],
               SequenceForm["Glu", 1],
               Editable->False],
              TraditionalForm], "}"}]}], ")"}], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "1"}],
            SequenceForm["p", 1],
            Editable->False],
           TraditionalForm], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "1"}],
            SequenceForm["Lor", 1],
            Editable->False],
           TraditionalForm]}], ")"}], " ", 
        RowBox[{
         FormBox["\<\"ep\"\>",
          TraditionalForm], "(", 
         RowBox[{
          RowBox[{"V", "(", 
           RowBox[{"5", ",", 
            RowBox[{"{", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "2"}],
               SequenceForm["Glu", 2],
               Editable->False],
              TraditionalForm], "}"}]}], ")"}], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "2"}],
            SequenceForm["p", 2],
            Editable->False],
           TraditionalForm], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "2"}],
            SequenceForm["Lor", 2],
            Editable->False],
           TraditionalForm]}], ")"}], " ", 
        RowBox[{
         FormBox["\<\"ep\"\>",
          TraditionalForm], "(", 
         RowBox[{
          RowBox[{"V", "(", 
           RowBox[{"5", ",", 
            RowBox[{"{", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "3"}],
               SequenceForm["Glu", 3],
               Editable->False],
              TraditionalForm], "}"}]}], ")"}], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "3"}],
            SequenceForm["p", 3],
            Editable->False],
           TraditionalForm], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "3"}],
            SequenceForm["Lor", 3],
            Editable->False],
           TraditionalForm]}], ")"}], " ", 
        RowBox[{
         FormBox["\<\"ep\"\>",
          TraditionalForm], "(", 
         RowBox[{
          RowBox[{"V", "(", 
           RowBox[{"5", ",", 
            RowBox[{"{", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "4"}],
               SequenceForm["Glu", 4],
               Editable->False],
              TraditionalForm], "}"}]}], ")"}], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "4"}],
            SequenceForm["p", 4],
            Editable->False],
           TraditionalForm], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "4"}],
            SequenceForm["Lor", 4],
            Editable->False],
           TraditionalForm]}], ")"}], " ", 
        RowBox[{
         FormBox["\<\"ep\"\>",
          TraditionalForm], "(", 
         RowBox[{
          RowBox[{"V", "(", 
           RowBox[{"5", ",", 
            RowBox[{"{", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "5"}],
               SequenceForm["Glu", 5],
               Editable->False],
              TraditionalForm], "}"}]}], ")"}], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "5"}],
            SequenceForm["p", 5],
            Editable->False],
           TraditionalForm], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "5"}],
            SequenceForm["Lor", 5],
            Editable->False],
           TraditionalForm]}], ")"}], " ", 
        FormBox[
         FractionBox["1", 
          SuperscriptBox[
           RowBox[{"(", 
            RowBox[{
             RowBox[{"-", 
              RowBox[{"(", 
               FormBox[
                InterpretationBox[
                 RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "2"}],
                 SequenceForm["p", 2],
                 Editable->False],
                TraditionalForm], ")"}]}], "-", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "3"}],
               SequenceForm["p", 3],
               Editable->False],
              TraditionalForm], "-", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "5"}],
               SequenceForm["p", 5],
               Editable->False],
              TraditionalForm]}], ")"}], "2"]],
         TraditionalForm], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "6"}],
            SequenceForm["Glu", 6],
            Editable->False],
           TraditionalForm], ",", "8"}], ")"}], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "1"}],
            SequenceForm["Glu", 1],
            Editable->False],
           TraditionalForm], ",", "8", ",", "External"}], ")"}], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "2"}],
            SequenceForm["Glu", 2],
            Editable->False],
           TraditionalForm], ",", "8", ",", "External"}], ")"}], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "3"}],
            SequenceForm["Glu", 3],
            Editable->False],
           TraditionalForm], ",", "8", ",", "External"}], ")"}], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "4"}],
            SequenceForm["Glu", 4],
            Editable->False],
           TraditionalForm], ",", "8", ",", "External"}], ")"}], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "5"}],
            SequenceForm["Glu", 5],
            Editable->False],
           TraditionalForm], ",", "8", ",", "External"}], ")"}], " ", 
        SubscriptBox["f", 
         RowBox[{
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "1"}],
             SequenceForm["Glu", 1],
             Editable->False],
            TraditionalForm],
           TraditionalForm], 
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "4"}],
             SequenceForm["Glu", 4],
             Editable->False],
            TraditionalForm],
           TraditionalForm], 
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "6"}],
             SequenceForm["Glu", 6],
             Editable->False],
            TraditionalForm],
           TraditionalForm]}]], " ", 
        RowBox[{"(", 
         RowBox[{
          RowBox[{
           RowBox[{"-", "\[ImaginaryI]"}], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "2"}],
                SequenceForm["Lor", 2],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "7"}],
                SequenceForm["Lor", 7],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "3"}],
                SequenceForm["Lor", 3],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "5"}],
                SequenceForm["Lor", 5],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]], " ", 
           RowBox[{"(", 
            RowBox[{
             RowBox[{"-", 
              SubscriptBox["f", 
               RowBox[{
                FormBox[
                 FormBox[
                  InterpretationBox[
                   RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "2"}],
                   SequenceForm["Glu", 2],
                   Editable->False],
                  TraditionalForm],
                 TraditionalForm], 
                FormBox[
                 FormBox[
                  InterpretationBox[
                   RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "3"}],
                   SequenceForm["Glu", 3],
                   Editable->False],
                  TraditionalForm],
                 TraditionalForm], 
                FormBox[
                 FormBox[
                  InterpretationBox[
                   RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "5"}],
                   SequenceForm["Glu", 5],
                   Editable->False],
                  TraditionalForm],
                 TraditionalForm], 
                FormBox[
                 FormBox[
                  InterpretationBox[
                   RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "6"}],
                   SequenceForm["Glu", 6],
                   Editable->False],
                  TraditionalForm],
                 TraditionalForm]}]]}], "-", 
             SubscriptBox["f", 
              RowBox[{
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "2"}],
                  SequenceForm["Glu", 2],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm], 
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "5"}],
                  SequenceForm["Glu", 5],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm], 
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "3"}],
                  SequenceForm["Glu", 3],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm], 
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "6"}],
                  SequenceForm["Glu", 6],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm]}]]}], ")"}], " ", 
           SubsuperscriptBox["g", "s", "2"]}], "-", 
          RowBox[{"\[ImaginaryI]", " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "2"}],
                SequenceForm["Lor", 2],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "3"}],
                SequenceForm["Lor", 3],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "5"}],
                SequenceForm["Lor", 5],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "7"}],
                SequenceForm["Lor", 7],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]], " ", 
           RowBox[{"(", 
            RowBox[{
             SubscriptBox["f", 
              RowBox[{
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "2"}],
                  SequenceForm["Glu", 2],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm], 
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "5"}],
                  SequenceForm["Glu", 5],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm], 
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "3"}],
                  SequenceForm["Glu", 3],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm], 
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "6"}],
                  SequenceForm["Glu", 6],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm]}]], "-", 
             SubscriptBox["f", 
              RowBox[{
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "2"}],
                  SequenceForm["Glu", 2],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm], 
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "6"}],
                  SequenceForm["Glu", 6],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm], 
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "5"}],
                  SequenceForm["Glu", 5],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm], 
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "3"}],
                  SequenceForm["Glu", 3],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm]}]]}], ")"}], " ", 
           SubsuperscriptBox["g", "s", "2"]}], "-", 
          RowBox[{"\[ImaginaryI]", " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "2"}],
                SequenceForm["Lor", 2],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "5"}],
                SequenceForm["Lor", 5],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "3"}],
                SequenceForm["Lor", 3],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "7"}],
                SequenceForm["Lor", 7],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]], " ", 
           RowBox[{"(", 
            RowBox[{
             SubscriptBox["f", 
              RowBox[{
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "2"}],
                  SequenceForm["Glu", 2],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm], 
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "3"}],
                  SequenceForm["Glu", 3],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm], 
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "5"}],
                  SequenceForm["Glu", 5],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm], 
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "6"}],
                  SequenceForm["Glu", 6],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm]}]], "+", 
             SubscriptBox["f", 
              RowBox[{
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "2"}],
                  SequenceForm["Glu", 2],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm], 
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "6"}],
                  SequenceForm["Glu", 6],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm], 
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "5"}],
                  SequenceForm["Glu", 5],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm], 
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "3"}],
                  SequenceForm["Glu", 3],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm]}]]}], ")"}], " ", 
           SubsuperscriptBox["g", "s", "2"]}]}], ")"}]}],
       TraditionalForm], ")"}], ",", 
     RowBox[{"\[Integral]", 
      RowBox[{
       StyleBox[
        RowBox[{
         SuperscriptBox["\[DifferentialD]", "D"], 
         FormBox[
          RowBox[{"GraphID", "(", 
           RowBox[{
            RowBox[{"Topology", "\[LongEqual]", "1"}], ",", 
            RowBox[{"Generic", "\[LongEqual]", "1"}], ",", 
            RowBox[{"Classes", "\[LongEqual]", "1"}], ",", 
            RowBox[{"Number", "\[LongEqual]", "4"}]}], ")"}],
          TraditionalForm]}],
        ZeroWidthTimes->True], "\[Integral]", 
       RowBox[{
        SuperscriptBox["\[DifferentialD]", "D"], 
        FormBox[
         RowBox[{"Integral", "[", "]"}],
         TraditionalForm]}]}], "(", 
      FormBox[
       RowBox[{
        RowBox[{"-", 
         SubscriptBox["g", "s"]}], " ", 
        RowBox[{"(", 
         RowBox[{
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                RowBox[{"-", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "1"}],
                    SequenceForm["p", 1],
                    Editable->False],
                   TraditionalForm], ")"}]}], "+", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "5"}],
                  SequenceForm["p", 5],
                  Editable->False],
                 TraditionalForm]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "6"}],
               SequenceForm["Lor", 6],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "1"}],
                SequenceForm["Lor", 1],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "5"}],
                SequenceForm["Lor", 5],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}], "+", 
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "1"}],
                  SequenceForm["p", 1],
                  Editable->False],
                 TraditionalForm], "-", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "2"}],
                  SequenceForm["p", 2],
                  Editable->False],
                 TraditionalForm], "-", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "3"}],
                  SequenceForm["p", 3],
                  Editable->False],
                 TraditionalForm], "-", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "4"}],
                  SequenceForm["p", 4],
                  Editable->False],
                 TraditionalForm]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "5"}],
               SequenceForm["Lor", 5],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "1"}],
                SequenceForm["Lor", 1],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "6"}],
                SequenceForm["Lor", 6],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}], "+", 
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "2"}],
                  SequenceForm["p", 2],
                  Editable->False],
                 TraditionalForm], "+", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "3"}],
                  SequenceForm["p", 3],
                  Editable->False],
                 TraditionalForm], "+", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "4"}],
                  SequenceForm["p", 4],
                  Editable->False],
                 TraditionalForm], "-", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "5"}],
                  SequenceForm["p", 5],
                  Editable->False],
                 TraditionalForm]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "1"}],
               SequenceForm["Lor", 1],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "5"}],
                SequenceForm["Lor", 5],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "6"}],
                SequenceForm["Lor", 6],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}]}], ")"}], " ", 
        SuperscriptBox["g", 
         RowBox[{
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "6"}],
             SequenceForm["Lor", 6],
             Editable->False],
            TraditionalForm],
           TraditionalForm], 
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "7"}],
             SequenceForm["Lor", 7],
             Editable->False],
            TraditionalForm],
           TraditionalForm]}]], " ", 
        RowBox[{
         FormBox["\<\"ep\"\>",
          TraditionalForm], "(", 
         RowBox[{
          RowBox[{"V", "(", 
           RowBox[{"5", ",", 
            RowBox[{"{", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "1"}],
               SequenceForm["Glu", 1],
               Editable->False],
              TraditionalForm], "}"}]}], ")"}], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "1"}],
            SequenceForm["p", 1],
            Editable->False],
           TraditionalForm], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "1"}],
            SequenceForm["Lor", 1],
            Editable->False],
           TraditionalForm]}], ")"}], " ", 
        RowBox[{
         FormBox["\<\"ep\"\>",
          TraditionalForm], "(", 
         RowBox[{
          RowBox[{"V", "(", 
           RowBox[{"5", ",", 
            RowBox[{"{", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "2"}],
               SequenceForm["Glu", 2],
               Editable->False],
              TraditionalForm], "}"}]}], ")"}], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "2"}],
            SequenceForm["p", 2],
            Editable->False],
           TraditionalForm], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "2"}],
            SequenceForm["Lor", 2],
            Editable->False],
           TraditionalForm]}], ")"}], " ", 
        RowBox[{
         FormBox["\<\"ep\"\>",
          TraditionalForm], "(", 
         RowBox[{
          RowBox[{"V", "(", 
           RowBox[{"5", ",", 
            RowBox[{"{", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "3"}],
               SequenceForm["Glu", 3],
               Editable->False],
              TraditionalForm], "}"}]}], ")"}], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "3"}],
            SequenceForm["p", 3],
            Editable->False],
           TraditionalForm], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "3"}],
            SequenceForm["Lor", 3],
            Editable->False],
           TraditionalForm]}], ")"}], " ", 
        RowBox[{
         FormBox["\<\"ep\"\>",
          TraditionalForm], "(", 
         RowBox[{
          RowBox[{"V", "(", 
           RowBox[{"5", ",", 
            RowBox[{"{", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "4"}],
               SequenceForm["Glu", 4],
               Editable->False],
              TraditionalForm], "}"}]}], ")"}], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "4"}],
            SequenceForm["p", 4],
            Editable->False],
           TraditionalForm], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "4"}],
            SequenceForm["Lor", 4],
            Editable->False],
           TraditionalForm]}], ")"}], " ", 
        RowBox[{
         FormBox["\<\"ep\"\>",
          TraditionalForm], "(", 
         RowBox[{
          RowBox[{"V", "(", 
           RowBox[{"5", ",", 
            RowBox[{"{", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "5"}],
               SequenceForm["Glu", 5],
               Editable->False],
              TraditionalForm], "}"}]}], ")"}], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "5"}],
            SequenceForm["p", 5],
            Editable->False],
           TraditionalForm], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "5"}],
            SequenceForm["Lor", 5],
            Editable->False],
           TraditionalForm]}], ")"}], " ", 
        FormBox[
         FractionBox["1", 
          SuperscriptBox[
           RowBox[{"(", 
            RowBox[{
             RowBox[{"-", 
              RowBox[{"(", 
               FormBox[
                InterpretationBox[
                 RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "2"}],
                 SequenceForm["p", 2],
                 Editable->False],
                TraditionalForm], ")"}]}], "-", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "3"}],
               SequenceForm["p", 3],
               Editable->False],
              TraditionalForm], "-", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "4"}],
               SequenceForm["p", 4],
               Editable->False],
              TraditionalForm]}], ")"}], "2"]],
         TraditionalForm], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "6"}],
            SequenceForm["Glu", 6],
            Editable->False],
           TraditionalForm], ",", "8"}], ")"}], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "1"}],
            SequenceForm["Glu", 1],
            Editable->False],
           TraditionalForm], ",", "8", ",", "External"}], ")"}], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "2"}],
            SequenceForm["Glu", 2],
            Editable->False],
           TraditionalForm], ",", "8", ",", "External"}], ")"}], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "3"}],
            SequenceForm["Glu", 3],
            Editable->False],
           TraditionalForm], ",", "8", ",", "External"}], ")"}], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "4"}],
            SequenceForm["Glu", 4],
            Editable->False],
           TraditionalForm], ",", "8", ",", "External"}], ")"}], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "5"}],
            SequenceForm["Glu", 5],
            Editable->False],
           TraditionalForm], ",", "8", ",", "External"}], ")"}], " ", 
        SubscriptBox["f", 
         RowBox[{
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "1"}],
             SequenceForm["Glu", 1],
             Editable->False],
            TraditionalForm],
           TraditionalForm], 
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "5"}],
             SequenceForm["Glu", 5],
             Editable->False],
            TraditionalForm],
           TraditionalForm], 
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "6"}],
             SequenceForm["Glu", 6],
             Editable->False],
            TraditionalForm],
           TraditionalForm]}]], " ", 
        RowBox[{"(", 
         RowBox[{
          RowBox[{
           RowBox[{"-", "\[ImaginaryI]"}], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "2"}],
                SequenceForm["Lor", 2],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "7"}],
                SequenceForm["Lor", 7],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "3"}],
                SequenceForm["Lor", 3],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "4"}],
                SequenceForm["Lor", 4],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]], " ", 
           RowBox[{"(", 
            RowBox[{
             RowBox[{"-", 
              SubscriptBox["f", 
               RowBox[{
                FormBox[
                 FormBox[
                  InterpretationBox[
                   RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "2"}],
                   SequenceForm["Glu", 2],
                   Editable->False],
                  TraditionalForm],
                 TraditionalForm], 
                FormBox[
                 FormBox[
                  InterpretationBox[
                   RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "3"}],
                   SequenceForm["Glu", 3],
                   Editable->False],
                  TraditionalForm],
                 TraditionalForm], 
                FormBox[
                 FormBox[
                  InterpretationBox[
                   RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "4"}],
                   SequenceForm["Glu", 4],
                   Editable->False],
                  TraditionalForm],
                 TraditionalForm], 
                FormBox[
                 FormBox[
                  InterpretationBox[
                   RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "6"}],
                   SequenceForm["Glu", 6],
                   Editable->False],
                  TraditionalForm],
                 TraditionalForm]}]]}], "-", 
             SubscriptBox["f", 
              RowBox[{
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "2"}],
                  SequenceForm["Glu", 2],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm], 
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "4"}],
                  SequenceForm["Glu", 4],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm], 
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "3"}],
                  SequenceForm["Glu", 3],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm], 
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "6"}],
                  SequenceForm["Glu", 6],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm]}]]}], ")"}], " ", 
           SubsuperscriptBox["g", "s", "2"]}], "-", 
          RowBox[{"\[ImaginaryI]", " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "2"}],
                SequenceForm["Lor", 2],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "3"}],
                SequenceForm["Lor", 3],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "4"}],
                SequenceForm["Lor", 4],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "7"}],
                SequenceForm["Lor", 7],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]], " ", 
           RowBox[{"(", 
            RowBox[{
             SubscriptBox["f", 
              RowBox[{
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "2"}],
                  SequenceForm["Glu", 2],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm], 
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "4"}],
                  SequenceForm["Glu", 4],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm], 
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "3"}],
                  SequenceForm["Glu", 3],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm], 
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "6"}],
                  SequenceForm["Glu", 6],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm]}]], "-", 
             SubscriptBox["f", 
              RowBox[{
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "2"}],
                  SequenceForm["Glu", 2],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm], 
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "6"}],
                  SequenceForm["Glu", 6],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm], 
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "4"}],
                  SequenceForm["Glu", 4],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm], 
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "3"}],
                  SequenceForm["Glu", 3],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm]}]]}], ")"}], " ", 
           SubsuperscriptBox["g", "s", "2"]}], "-", 
          RowBox[{"\[ImaginaryI]", " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "2"}],
                SequenceForm["Lor", 2],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "4"}],
                SequenceForm["Lor", 4],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "3"}],
                SequenceForm["Lor", 3],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "7"}],
                SequenceForm["Lor", 7],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]], " ", 
           RowBox[{"(", 
            RowBox[{
             SubscriptBox["f", 
              RowBox[{
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "2"}],
                  SequenceForm["Glu", 2],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm], 
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "3"}],
                  SequenceForm["Glu", 3],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm], 
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "4"}],
                  SequenceForm["Glu", 4],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm], 
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "6"}],
                  SequenceForm["Glu", 6],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm]}]], "+", 
             SubscriptBox["f", 
              RowBox[{
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "2"}],
                  SequenceForm["Glu", 2],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm], 
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "6"}],
                  SequenceForm["Glu", 6],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm], 
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "4"}],
                  SequenceForm["Glu", 4],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm], 
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "3"}],
                  SequenceForm["Glu", 3],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm]}]]}], ")"}], " ", 
           SubsuperscriptBox["g", "s", "2"]}]}], ")"}]}],
       TraditionalForm], ")"}], ",", 
     RowBox[{"\[Integral]", 
      RowBox[{
       StyleBox[
        RowBox[{
         SuperscriptBox["\[DifferentialD]", "D"], 
         FormBox[
          RowBox[{"GraphID", "(", 
           RowBox[{
            RowBox[{"Topology", "\[LongEqual]", "1"}], ",", 
            RowBox[{"Generic", "\[LongEqual]", "1"}], ",", 
            RowBox[{"Classes", "\[LongEqual]", "1"}], ",", 
            RowBox[{"Number", "\[LongEqual]", "5"}]}], ")"}],
          TraditionalForm]}],
        ZeroWidthTimes->True], "\[Integral]", 
       RowBox[{
        SuperscriptBox["\[DifferentialD]", "D"], 
        FormBox[
         RowBox[{"Integral", "[", "]"}],
         TraditionalForm]}]}], "(", 
      FormBox[
       RowBox[{
        RowBox[{"-", 
         SubscriptBox["g", "s"]}], " ", 
        RowBox[{"(", 
         RowBox[{
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                RowBox[{"-", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "2"}],
                    SequenceForm["p", 2],
                    Editable->False],
                   TraditionalForm], ")"}]}], "+", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "3"}],
                  SequenceForm["p", 3],
                  Editable->False],
                 TraditionalForm]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "6"}],
               SequenceForm["Lor", 6],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "2"}],
                SequenceForm["Lor", 2],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "3"}],
                SequenceForm["Lor", 3],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}], "+", 
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                RowBox[{"2", " ", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "2"}],
                    SequenceForm["p", 2],
                    Editable->False],
                   TraditionalForm], ")"}]}], "+", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "3"}],
                  SequenceForm["p", 3],
                  Editable->False],
                 TraditionalForm]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "3"}],
               SequenceForm["Lor", 3],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "2"}],
                SequenceForm["Lor", 2],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "6"}],
                SequenceForm["Lor", 6],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}], "+", 
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                RowBox[{"-", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "2"}],
                    SequenceForm["p", 2],
                    Editable->False],
                   TraditionalForm], ")"}]}], "-", 
                RowBox[{"2", " ", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "3"}],
                    SequenceForm["p", 3],
                    Editable->False],
                   TraditionalForm], ")"}]}]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "2"}],
               SequenceForm["Lor", 2],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "3"}],
                SequenceForm["Lor", 3],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "6"}],
                SequenceForm["Lor", 6],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}]}], ")"}], " ", 
        SuperscriptBox["g", 
         RowBox[{
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "6"}],
             SequenceForm["Lor", 6],
             Editable->False],
            TraditionalForm],
           TraditionalForm], 
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "7"}],
             SequenceForm["Lor", 7],
             Editable->False],
            TraditionalForm],
           TraditionalForm]}]], " ", 
        RowBox[{
         FormBox["\<\"ep\"\>",
          TraditionalForm], "(", 
         RowBox[{
          RowBox[{"V", "(", 
           RowBox[{"5", ",", 
            RowBox[{"{", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "1"}],
               SequenceForm["Glu", 1],
               Editable->False],
              TraditionalForm], "}"}]}], ")"}], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "1"}],
            SequenceForm["p", 1],
            Editable->False],
           TraditionalForm], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "1"}],
            SequenceForm["Lor", 1],
            Editable->False],
           TraditionalForm]}], ")"}], " ", 
        RowBox[{
         FormBox["\<\"ep\"\>",
          TraditionalForm], "(", 
         RowBox[{
          RowBox[{"V", "(", 
           RowBox[{"5", ",", 
            RowBox[{"{", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "2"}],
               SequenceForm["Glu", 2],
               Editable->False],
              TraditionalForm], "}"}]}], ")"}], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "2"}],
            SequenceForm["p", 2],
            Editable->False],
           TraditionalForm], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "2"}],
            SequenceForm["Lor", 2],
            Editable->False],
           TraditionalForm]}], ")"}], " ", 
        RowBox[{
         FormBox["\<\"ep\"\>",
          TraditionalForm], "(", 
         RowBox[{
          RowBox[{"V", "(", 
           RowBox[{"5", ",", 
            RowBox[{"{", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "3"}],
               SequenceForm["Glu", 3],
               Editable->False],
              TraditionalForm], "}"}]}], ")"}], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "3"}],
            SequenceForm["p", 3],
            Editable->False],
           TraditionalForm], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "3"}],
            SequenceForm["Lor", 3],
            Editable->False],
           TraditionalForm]}], ")"}], " ", 
        RowBox[{
         FormBox["\<\"ep\"\>",
          TraditionalForm], "(", 
         RowBox[{
          RowBox[{"V", "(", 
           RowBox[{"5", ",", 
            RowBox[{"{", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "4"}],
               SequenceForm["Glu", 4],
               Editable->False],
              TraditionalForm], "}"}]}], ")"}], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "4"}],
            SequenceForm["p", 4],
            Editable->False],
           TraditionalForm], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "4"}],
            SequenceForm["Lor", 4],
            Editable->False],
           TraditionalForm]}], ")"}], " ", 
        RowBox[{
         FormBox["\<\"ep\"\>",
          TraditionalForm], "(", 
         RowBox[{
          RowBox[{"V", "(", 
           RowBox[{"5", ",", 
            RowBox[{"{", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "5"}],
               SequenceForm["Glu", 5],
               Editable->False],
              TraditionalForm], "}"}]}], ")"}], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "5"}],
            SequenceForm["p", 5],
            Editable->False],
           TraditionalForm], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "5"}],
            SequenceForm["Lor", 5],
            Editable->False],
           TraditionalForm]}], ")"}], " ", 
        FormBox[
         FractionBox["1", 
          SuperscriptBox[
           RowBox[{"(", 
            RowBox[{
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "2"}],
               SequenceForm["p", 2],
               Editable->False],
              TraditionalForm], "+", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "3"}],
               SequenceForm["p", 3],
               Editable->False],
              TraditionalForm]}], ")"}], "2"]],
         TraditionalForm], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "6"}],
            SequenceForm["Glu", 6],
            Editable->False],
           TraditionalForm], ",", "8"}], ")"}], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "1"}],
            SequenceForm["Glu", 1],
            Editable->False],
           TraditionalForm], ",", "8", ",", "External"}], ")"}], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "2"}],
            SequenceForm["Glu", 2],
            Editable->False],
           TraditionalForm], ",", "8", ",", "External"}], ")"}], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "3"}],
            SequenceForm["Glu", 3],
            Editable->False],
           TraditionalForm], ",", "8", ",", "External"}], ")"}], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "4"}],
            SequenceForm["Glu", 4],
            Editable->False],
           TraditionalForm], ",", "8", ",", "External"}], ")"}], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "5"}],
            SequenceForm["Glu", 5],
            Editable->False],
           TraditionalForm], ",", "8", ",", "External"}], ")"}], " ", 
        SubscriptBox["f", 
         RowBox[{
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "2"}],
             SequenceForm["Glu", 2],
             Editable->False],
            TraditionalForm],
           TraditionalForm], 
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "3"}],
             SequenceForm["Glu", 3],
             Editable->False],
            TraditionalForm],
           TraditionalForm], 
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "6"}],
             SequenceForm["Glu", 6],
             Editable->False],
            TraditionalForm],
           TraditionalForm]}]], " ", 
        RowBox[{"(", 
         RowBox[{
          RowBox[{
           RowBox[{"-", "\[ImaginaryI]"}], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "1"}],
                SequenceForm["Lor", 1],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "7"}],
                SequenceForm["Lor", 7],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "4"}],
                SequenceForm["Lor", 4],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "5"}],
                SequenceForm["Lor", 5],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]], " ", 
           RowBox[{"(", 
            RowBox[{
             RowBox[{"-", 
              SubscriptBox["f", 
               RowBox[{
                FormBox[
                 FormBox[
                  InterpretationBox[
                   RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "1"}],
                   SequenceForm["Glu", 1],
                   Editable->False],
                  TraditionalForm],
                 TraditionalForm], 
                FormBox[
                 FormBox[
                  InterpretationBox[
                   RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "4"}],
                   SequenceForm["Glu", 4],
                   Editable->False],
                  TraditionalForm],
                 TraditionalForm], 
                FormBox[
                 FormBox[
                  InterpretationBox[
                   RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "5"}],
                   SequenceForm["Glu", 5],
                   Editable->False],
                  TraditionalForm],
                 TraditionalForm], 
                FormBox[
                 FormBox[
                  InterpretationBox[
                   RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "6"}],
                   SequenceForm["Glu", 6],
                   Editable->False],
                  TraditionalForm],
                 TraditionalForm]}]]}], "-", 
             SubscriptBox["f", 
              RowBox[{
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "1"}],
                  SequenceForm["Glu", 1],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm], 
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "5"}],
                  SequenceForm["Glu", 5],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm], 
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "4"}],
                  SequenceForm["Glu", 4],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm], 
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "6"}],
                  SequenceForm["Glu", 6],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm]}]]}], ")"}], " ", 
           SubsuperscriptBox["g", "s", "2"]}], "-", 
          RowBox[{"\[ImaginaryI]", " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "1"}],
                SequenceForm["Lor", 1],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "4"}],
                SequenceForm["Lor", 4],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "5"}],
                SequenceForm["Lor", 5],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "7"}],
                SequenceForm["Lor", 7],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]], " ", 
           RowBox[{"(", 
            RowBox[{
             SubscriptBox["f", 
              RowBox[{
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "1"}],
                  SequenceForm["Glu", 1],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm], 
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "5"}],
                  SequenceForm["Glu", 5],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm], 
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "4"}],
                  SequenceForm["Glu", 4],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm], 
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "6"}],
                  SequenceForm["Glu", 6],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm]}]], "-", 
             SubscriptBox["f", 
              RowBox[{
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "1"}],
                  SequenceForm["Glu", 1],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm], 
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "6"}],
                  SequenceForm["Glu", 6],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm], 
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "5"}],
                  SequenceForm["Glu", 5],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm], 
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "4"}],
                  SequenceForm["Glu", 4],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm]}]]}], ")"}], " ", 
           SubsuperscriptBox["g", "s", "2"]}], "-", 
          RowBox[{"\[ImaginaryI]", " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "1"}],
                SequenceForm["Lor", 1],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "5"}],
                SequenceForm["Lor", 5],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "4"}],
                SequenceForm["Lor", 4],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "7"}],
                SequenceForm["Lor", 7],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]], " ", 
           RowBox[{"(", 
            RowBox[{
             SubscriptBox["f", 
              RowBox[{
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "1"}],
                  SequenceForm["Glu", 1],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm], 
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "4"}],
                  SequenceForm["Glu", 4],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm], 
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "5"}],
                  SequenceForm["Glu", 5],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm], 
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "6"}],
                  SequenceForm["Glu", 6],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm]}]], "+", 
             SubscriptBox["f", 
              RowBox[{
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "1"}],
                  SequenceForm["Glu", 1],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm], 
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "6"}],
                  SequenceForm["Glu", 6],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm], 
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "5"}],
                  SequenceForm["Glu", 5],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm], 
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "4"}],
                  SequenceForm["Glu", 4],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm]}]]}], ")"}], " ", 
           SubsuperscriptBox["g", "s", "2"]}]}], ")"}]}],
       TraditionalForm], ")"}], ",", 
     RowBox[{"\[Integral]", 
      RowBox[{
       StyleBox[
        RowBox[{
         SuperscriptBox["\[DifferentialD]", "D"], 
         FormBox[
          RowBox[{"GraphID", "(", 
           RowBox[{
            RowBox[{"Topology", "\[LongEqual]", "1"}], ",", 
            RowBox[{"Generic", "\[LongEqual]", "1"}], ",", 
            RowBox[{"Classes", "\[LongEqual]", "1"}], ",", 
            RowBox[{"Number", "\[LongEqual]", "6"}]}], ")"}],
          TraditionalForm]}],
        ZeroWidthTimes->True], "\[Integral]", 
       RowBox[{
        SuperscriptBox["\[DifferentialD]", "D"], 
        FormBox[
         RowBox[{"Integral", "[", "]"}],
         TraditionalForm]}]}], "(", 
      FormBox[
       RowBox[{
        RowBox[{"-", 
         SubscriptBox["g", "s"]}], " ", 
        RowBox[{"(", 
         RowBox[{
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                RowBox[{"-", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "2"}],
                    SequenceForm["p", 2],
                    Editable->False],
                   TraditionalForm], ")"}]}], "+", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "4"}],
                  SequenceForm["p", 4],
                  Editable->False],
                 TraditionalForm]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "6"}],
               SequenceForm["Lor", 6],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "2"}],
                SequenceForm["Lor", 2],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "4"}],
                SequenceForm["Lor", 4],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}], "+", 
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                RowBox[{"2", " ", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "2"}],
                    SequenceForm["p", 2],
                    Editable->False],
                   TraditionalForm], ")"}]}], "+", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "4"}],
                  SequenceForm["p", 4],
                  Editable->False],
                 TraditionalForm]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "4"}],
               SequenceForm["Lor", 4],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "2"}],
                SequenceForm["Lor", 2],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "6"}],
                SequenceForm["Lor", 6],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}], "+", 
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                RowBox[{"-", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "2"}],
                    SequenceForm["p", 2],
                    Editable->False],
                   TraditionalForm], ")"}]}], "-", 
                RowBox[{"2", " ", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "4"}],
                    SequenceForm["p", 4],
                    Editable->False],
                   TraditionalForm], ")"}]}]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "2"}],
               SequenceForm["Lor", 2],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "4"}],
                SequenceForm["Lor", 4],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "6"}],
                SequenceForm["Lor", 6],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}]}], ")"}], " ", 
        SuperscriptBox["g", 
         RowBox[{
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "6"}],
             SequenceForm["Lor", 6],
             Editable->False],
            TraditionalForm],
           TraditionalForm], 
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "7"}],
             SequenceForm["Lor", 7],
             Editable->False],
            TraditionalForm],
           TraditionalForm]}]], " ", 
        RowBox[{
         FormBox["\<\"ep\"\>",
          TraditionalForm], "(", 
         RowBox[{
          RowBox[{"V", "(", 
           RowBox[{"5", ",", 
            RowBox[{"{", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "1"}],
               SequenceForm["Glu", 1],
               Editable->False],
              TraditionalForm], "}"}]}], ")"}], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "1"}],
            SequenceForm["p", 1],
            Editable->False],
           TraditionalForm], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "1"}],
            SequenceForm["Lor", 1],
            Editable->False],
           TraditionalForm]}], ")"}], " ", 
        RowBox[{
         FormBox["\<\"ep\"\>",
          TraditionalForm], "(", 
         RowBox[{
          RowBox[{"V", "(", 
           RowBox[{"5", ",", 
            RowBox[{"{", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "2"}],
               SequenceForm["Glu", 2],
               Editable->False],
              TraditionalForm], "}"}]}], ")"}], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "2"}],
            SequenceForm["p", 2],
            Editable->False],
           TraditionalForm], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "2"}],
            SequenceForm["Lor", 2],
            Editable->False],
           TraditionalForm]}], ")"}], " ", 
        RowBox[{
         FormBox["\<\"ep\"\>",
          TraditionalForm], "(", 
         RowBox[{
          RowBox[{"V", "(", 
           RowBox[{"5", ",", 
            RowBox[{"{", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "3"}],
               SequenceForm["Glu", 3],
               Editable->False],
              TraditionalForm], "}"}]}], ")"}], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "3"}],
            SequenceForm["p", 3],
            Editable->False],
           TraditionalForm], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "3"}],
            SequenceForm["Lor", 3],
            Editable->False],
           TraditionalForm]}], ")"}], " ", 
        RowBox[{
         FormBox["\<\"ep\"\>",
          TraditionalForm], "(", 
         RowBox[{
          RowBox[{"V", "(", 
           RowBox[{"5", ",", 
            RowBox[{"{", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "4"}],
               SequenceForm["Glu", 4],
               Editable->False],
              TraditionalForm], "}"}]}], ")"}], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "4"}],
            SequenceForm["p", 4],
            Editable->False],
           TraditionalForm], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "4"}],
            SequenceForm["Lor", 4],
            Editable->False],
           TraditionalForm]}], ")"}], " ", 
        RowBox[{
         FormBox["\<\"ep\"\>",
          TraditionalForm], "(", 
         RowBox[{
          RowBox[{"V", "(", 
           RowBox[{"5", ",", 
            RowBox[{"{", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "5"}],
               SequenceForm["Glu", 5],
               Editable->False],
              TraditionalForm], "}"}]}], ")"}], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "5"}],
            SequenceForm["p", 5],
            Editable->False],
           TraditionalForm], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "5"}],
            SequenceForm["Lor", 5],
            Editable->False],
           TraditionalForm]}], ")"}], " ", 
        FormBox[
         FractionBox["1", 
          SuperscriptBox[
           RowBox[{"(", 
            RowBox[{
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "2"}],
               SequenceForm["p", 2],
               Editable->False],
              TraditionalForm], "+", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "4"}],
               SequenceForm["p", 4],
               Editable->False],
              TraditionalForm]}], ")"}], "2"]],
         TraditionalForm], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "6"}],
            SequenceForm["Glu", 6],
            Editable->False],
           TraditionalForm], ",", "8"}], ")"}], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "1"}],
            SequenceForm["Glu", 1],
            Editable->False],
           TraditionalForm], ",", "8", ",", "External"}], ")"}], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "2"}],
            SequenceForm["Glu", 2],
            Editable->False],
           TraditionalForm], ",", "8", ",", "External"}], ")"}], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "3"}],
            SequenceForm["Glu", 3],
            Editable->False],
           TraditionalForm], ",", "8", ",", "External"}], ")"}], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "4"}],
            SequenceForm["Glu", 4],
            Editable->False],
           TraditionalForm], ",", "8", ",", "External"}], ")"}], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "5"}],
            SequenceForm["Glu", 5],
            Editable->False],
           TraditionalForm], ",", "8", ",", "External"}], ")"}], " ", 
        SubscriptBox["f", 
         RowBox[{
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "2"}],
             SequenceForm["Glu", 2],
             Editable->False],
            TraditionalForm],
           TraditionalForm], 
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "4"}],
             SequenceForm["Glu", 4],
             Editable->False],
            TraditionalForm],
           TraditionalForm], 
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "6"}],
             SequenceForm["Glu", 6],
             Editable->False],
            TraditionalForm],
           TraditionalForm]}]], " ", 
        RowBox[{"(", 
         RowBox[{
          RowBox[{
           RowBox[{"-", "\[ImaginaryI]"}], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "1"}],
                SequenceForm["Lor", 1],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "7"}],
                SequenceForm["Lor", 7],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "3"}],
                SequenceForm["Lor", 3],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "5"}],
                SequenceForm["Lor", 5],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]], " ", 
           RowBox[{"(", 
            RowBox[{
             RowBox[{"-", 
              SubscriptBox["f", 
               RowBox[{
                FormBox[
                 FormBox[
                  InterpretationBox[
                   RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "1"}],
                   SequenceForm["Glu", 1],
                   Editable->False],
                  TraditionalForm],
                 TraditionalForm], 
                FormBox[
                 FormBox[
                  InterpretationBox[
                   RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "3"}],
                   SequenceForm["Glu", 3],
                   Editable->False],
                  TraditionalForm],
                 TraditionalForm], 
                FormBox[
                 FormBox[
                  InterpretationBox[
                   RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "5"}],
                   SequenceForm["Glu", 5],
                   Editable->False],
                  TraditionalForm],
                 TraditionalForm], 
                FormBox[
                 FormBox[
                  InterpretationBox[
                   RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "6"}],
                   SequenceForm["Glu", 6],
                   Editable->False],
                  TraditionalForm],
                 TraditionalForm]}]]}], "-", 
             SubscriptBox["f", 
              RowBox[{
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "1"}],
                  SequenceForm["Glu", 1],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm], 
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "5"}],
                  SequenceForm["Glu", 5],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm], 
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "3"}],
                  SequenceForm["Glu", 3],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm], 
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "6"}],
                  SequenceForm["Glu", 6],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm]}]]}], ")"}], " ", 
           SubsuperscriptBox["g", "s", "2"]}], "-", 
          RowBox[{"\[ImaginaryI]", " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "1"}],
                SequenceForm["Lor", 1],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "3"}],
                SequenceForm["Lor", 3],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "5"}],
                SequenceForm["Lor", 5],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "7"}],
                SequenceForm["Lor", 7],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]], " ", 
           RowBox[{"(", 
            RowBox[{
             SubscriptBox["f", 
              RowBox[{
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "1"}],
                  SequenceForm["Glu", 1],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm], 
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "5"}],
                  SequenceForm["Glu", 5],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm], 
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "3"}],
                  SequenceForm["Glu", 3],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm], 
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "6"}],
                  SequenceForm["Glu", 6],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm]}]], "-", 
             SubscriptBox["f", 
              RowBox[{
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "1"}],
                  SequenceForm["Glu", 1],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm], 
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "6"}],
                  SequenceForm["Glu", 6],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm], 
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "5"}],
                  SequenceForm["Glu", 5],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm], 
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "3"}],
                  SequenceForm["Glu", 3],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm]}]]}], ")"}], " ", 
           SubsuperscriptBox["g", "s", "2"]}], "-", 
          RowBox[{"\[ImaginaryI]", " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "1"}],
                SequenceForm["Lor", 1],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "5"}],
                SequenceForm["Lor", 5],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "3"}],
                SequenceForm["Lor", 3],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "7"}],
                SequenceForm["Lor", 7],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]], " ", 
           RowBox[{"(", 
            RowBox[{
             SubscriptBox["f", 
              RowBox[{
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "1"}],
                  SequenceForm["Glu", 1],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm], 
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "3"}],
                  SequenceForm["Glu", 3],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm], 
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "5"}],
                  SequenceForm["Glu", 5],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm], 
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "6"}],
                  SequenceForm["Glu", 6],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm]}]], "+", 
             SubscriptBox["f", 
              RowBox[{
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "1"}],
                  SequenceForm["Glu", 1],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm], 
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "6"}],
                  SequenceForm["Glu", 6],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm], 
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "5"}],
                  SequenceForm["Glu", 5],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm], 
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "3"}],
                  SequenceForm["Glu", 3],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm]}]]}], ")"}], " ", 
           SubsuperscriptBox["g", "s", "2"]}]}], ")"}]}],
       TraditionalForm], ")"}], ",", 
     RowBox[{"\[Integral]", 
      RowBox[{
       StyleBox[
        RowBox[{
         SuperscriptBox["\[DifferentialD]", "D"], 
         FormBox[
          RowBox[{"GraphID", "(", 
           RowBox[{
            RowBox[{"Topology", "\[LongEqual]", "1"}], ",", 
            RowBox[{"Generic", "\[LongEqual]", "1"}], ",", 
            RowBox[{"Classes", "\[LongEqual]", "1"}], ",", 
            RowBox[{"Number", "\[LongEqual]", "7"}]}], ")"}],
          TraditionalForm]}],
        ZeroWidthTimes->True], "\[Integral]", 
       RowBox[{
        SuperscriptBox["\[DifferentialD]", "D"], 
        FormBox[
         RowBox[{"Integral", "[", "]"}],
         TraditionalForm]}]}], "(", 
      FormBox[
       RowBox[{
        RowBox[{"-", 
         SubscriptBox["g", "s"]}], " ", 
        RowBox[{"(", 
         RowBox[{
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                RowBox[{"-", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "2"}],
                    SequenceForm["p", 2],
                    Editable->False],
                   TraditionalForm], ")"}]}], "+", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "5"}],
                  SequenceForm["p", 5],
                  Editable->False],
                 TraditionalForm]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "6"}],
               SequenceForm["Lor", 6],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "2"}],
                SequenceForm["Lor", 2],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "5"}],
                SequenceForm["Lor", 5],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}], "+", 
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                RowBox[{"2", " ", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "2"}],
                    SequenceForm["p", 2],
                    Editable->False],
                   TraditionalForm], ")"}]}], "+", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "5"}],
                  SequenceForm["p", 5],
                  Editable->False],
                 TraditionalForm]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "5"}],
               SequenceForm["Lor", 5],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "2"}],
                SequenceForm["Lor", 2],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "6"}],
                SequenceForm["Lor", 6],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}], "+", 
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                RowBox[{"-", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "2"}],
                    SequenceForm["p", 2],
                    Editable->False],
                   TraditionalForm], ")"}]}], "-", 
                RowBox[{"2", " ", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "5"}],
                    SequenceForm["p", 5],
                    Editable->False],
                   TraditionalForm], ")"}]}]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "2"}],
               SequenceForm["Lor", 2],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "5"}],
                SequenceForm["Lor", 5],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "6"}],
                SequenceForm["Lor", 6],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}]}], ")"}], " ", 
        SuperscriptBox["g", 
         RowBox[{
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "6"}],
             SequenceForm["Lor", 6],
             Editable->False],
            TraditionalForm],
           TraditionalForm], 
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "7"}],
             SequenceForm["Lor", 7],
             Editable->False],
            TraditionalForm],
           TraditionalForm]}]], " ", 
        RowBox[{
         FormBox["\<\"ep\"\>",
          TraditionalForm], "(", 
         RowBox[{
          RowBox[{"V", "(", 
           RowBox[{"5", ",", 
            RowBox[{"{", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "1"}],
               SequenceForm["Glu", 1],
               Editable->False],
              TraditionalForm], "}"}]}], ")"}], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "1"}],
            SequenceForm["p", 1],
            Editable->False],
           TraditionalForm], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "1"}],
            SequenceForm["Lor", 1],
            Editable->False],
           TraditionalForm]}], ")"}], " ", 
        RowBox[{
         FormBox["\<\"ep\"\>",
          TraditionalForm], "(", 
         RowBox[{
          RowBox[{"V", "(", 
           RowBox[{"5", ",", 
            RowBox[{"{", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "2"}],
               SequenceForm["Glu", 2],
               Editable->False],
              TraditionalForm], "}"}]}], ")"}], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "2"}],
            SequenceForm["p", 2],
            Editable->False],
           TraditionalForm], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "2"}],
            SequenceForm["Lor", 2],
            Editable->False],
           TraditionalForm]}], ")"}], " ", 
        RowBox[{
         FormBox["\<\"ep\"\>",
          TraditionalForm], "(", 
         RowBox[{
          RowBox[{"V", "(", 
           RowBox[{"5", ",", 
            RowBox[{"{", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "3"}],
               SequenceForm["Glu", 3],
               Editable->False],
              TraditionalForm], "}"}]}], ")"}], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "3"}],
            SequenceForm["p", 3],
            Editable->False],
           TraditionalForm], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "3"}],
            SequenceForm["Lor", 3],
            Editable->False],
           TraditionalForm]}], ")"}], " ", 
        RowBox[{
         FormBox["\<\"ep\"\>",
          TraditionalForm], "(", 
         RowBox[{
          RowBox[{"V", "(", 
           RowBox[{"5", ",", 
            RowBox[{"{", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "4"}],
               SequenceForm["Glu", 4],
               Editable->False],
              TraditionalForm], "}"}]}], ")"}], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "4"}],
            SequenceForm["p", 4],
            Editable->False],
           TraditionalForm], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "4"}],
            SequenceForm["Lor", 4],
            Editable->False],
           TraditionalForm]}], ")"}], " ", 
        RowBox[{
         FormBox["\<\"ep\"\>",
          TraditionalForm], "(", 
         RowBox[{
          RowBox[{"V", "(", 
           RowBox[{"5", ",", 
            RowBox[{"{", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "5"}],
               SequenceForm["Glu", 5],
               Editable->False],
              TraditionalForm], "}"}]}], ")"}], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "5"}],
            SequenceForm["p", 5],
            Editable->False],
           TraditionalForm], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "5"}],
            SequenceForm["Lor", 5],
            Editable->False],
           TraditionalForm]}], ")"}], " ", 
        FormBox[
         FractionBox["1", 
          SuperscriptBox[
           RowBox[{"(", 
            RowBox[{
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "2"}],
               SequenceForm["p", 2],
               Editable->False],
              TraditionalForm], "+", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "5"}],
               SequenceForm["p", 5],
               Editable->False],
              TraditionalForm]}], ")"}], "2"]],
         TraditionalForm], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "6"}],
            SequenceForm["Glu", 6],
            Editable->False],
           TraditionalForm], ",", "8"}], ")"}], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "1"}],
            SequenceForm["Glu", 1],
            Editable->False],
           TraditionalForm], ",", "8", ",", "External"}], ")"}], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "2"}],
            SequenceForm["Glu", 2],
            Editable->False],
           TraditionalForm], ",", "8", ",", "External"}], ")"}], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "3"}],
            SequenceForm["Glu", 3],
            Editable->False],
           TraditionalForm], ",", "8", ",", "External"}], ")"}], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "4"}],
            SequenceForm["Glu", 4],
            Editable->False],
           TraditionalForm], ",", "8", ",", "External"}], ")"}], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "5"}],
            SequenceForm["Glu", 5],
            Editable->False],
           TraditionalForm], ",", "8", ",", "External"}], ")"}], " ", 
        SubscriptBox["f", 
         RowBox[{
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "2"}],
             SequenceForm["Glu", 2],
             Editable->False],
            TraditionalForm],
           TraditionalForm], 
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "5"}],
             SequenceForm["Glu", 5],
             Editable->False],
            TraditionalForm],
           TraditionalForm], 
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "6"}],
             SequenceForm["Glu", 6],
             Editable->False],
            TraditionalForm],
           TraditionalForm]}]], " ", 
        RowBox[{"(", 
         RowBox[{
          RowBox[{
           RowBox[{"-", "\[ImaginaryI]"}], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "1"}],
                SequenceForm["Lor", 1],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "7"}],
                SequenceForm["Lor", 7],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "3"}],
                SequenceForm["Lor", 3],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "4"}],
                SequenceForm["Lor", 4],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]], " ", 
           RowBox[{"(", 
            RowBox[{
             RowBox[{"-", 
              SubscriptBox["f", 
               RowBox[{
                FormBox[
                 FormBox[
                  InterpretationBox[
                   RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "1"}],
                   SequenceForm["Glu", 1],
                   Editable->False],
                  TraditionalForm],
                 TraditionalForm], 
                FormBox[
                 FormBox[
                  InterpretationBox[
                   RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "3"}],
                   SequenceForm["Glu", 3],
                   Editable->False],
                  TraditionalForm],
                 TraditionalForm], 
                FormBox[
                 FormBox[
                  InterpretationBox[
                   RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "4"}],
                   SequenceForm["Glu", 4],
                   Editable->False],
                  TraditionalForm],
                 TraditionalForm], 
                FormBox[
                 FormBox[
                  InterpretationBox[
                   RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "6"}],
                   SequenceForm["Glu", 6],
                   Editable->False],
                  TraditionalForm],
                 TraditionalForm]}]]}], "-", 
             SubscriptBox["f", 
              RowBox[{
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "1"}],
                  SequenceForm["Glu", 1],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm], 
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "4"}],
                  SequenceForm["Glu", 4],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm], 
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "3"}],
                  SequenceForm["Glu", 3],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm], 
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "6"}],
                  SequenceForm["Glu", 6],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm]}]]}], ")"}], " ", 
           SubsuperscriptBox["g", "s", "2"]}], "-", 
          RowBox[{"\[ImaginaryI]", " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "1"}],
                SequenceForm["Lor", 1],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "3"}],
                SequenceForm["Lor", 3],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "4"}],
                SequenceForm["Lor", 4],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "7"}],
                SequenceForm["Lor", 7],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]], " ", 
           RowBox[{"(", 
            RowBox[{
             SubscriptBox["f", 
              RowBox[{
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "1"}],
                  SequenceForm["Glu", 1],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm], 
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "4"}],
                  SequenceForm["Glu", 4],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm], 
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "3"}],
                  SequenceForm["Glu", 3],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm], 
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "6"}],
                  SequenceForm["Glu", 6],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm]}]], "-", 
             SubscriptBox["f", 
              RowBox[{
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "1"}],
                  SequenceForm["Glu", 1],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm], 
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "6"}],
                  SequenceForm["Glu", 6],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm], 
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "4"}],
                  SequenceForm["Glu", 4],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm], 
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "3"}],
                  SequenceForm["Glu", 3],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm]}]]}], ")"}], " ", 
           SubsuperscriptBox["g", "s", "2"]}], "-", 
          RowBox[{"\[ImaginaryI]", " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "1"}],
                SequenceForm["Lor", 1],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "4"}],
                SequenceForm["Lor", 4],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "3"}],
                SequenceForm["Lor", 3],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "7"}],
                SequenceForm["Lor", 7],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]], " ", 
           RowBox[{"(", 
            RowBox[{
             SubscriptBox["f", 
              RowBox[{
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "1"}],
                  SequenceForm["Glu", 1],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm], 
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "3"}],
                  SequenceForm["Glu", 3],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm], 
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "4"}],
                  SequenceForm["Glu", 4],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm], 
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "6"}],
                  SequenceForm["Glu", 6],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm]}]], "+", 
             SubscriptBox["f", 
              RowBox[{
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "1"}],
                  SequenceForm["Glu", 1],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm], 
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "6"}],
                  SequenceForm["Glu", 6],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm], 
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "4"}],
                  SequenceForm["Glu", 4],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm], 
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "3"}],
                  SequenceForm["Glu", 3],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm]}]]}], ")"}], " ", 
           SubsuperscriptBox["g", "s", "2"]}]}], ")"}]}],
       TraditionalForm], ")"}], ",", 
     RowBox[{"\[Integral]", 
      RowBox[{
       StyleBox[
        RowBox[{
         SuperscriptBox["\[DifferentialD]", "D"], 
         FormBox[
          RowBox[{"GraphID", "(", 
           RowBox[{
            RowBox[{"Topology", "\[LongEqual]", "1"}], ",", 
            RowBox[{"Generic", "\[LongEqual]", "1"}], ",", 
            RowBox[{"Classes", "\[LongEqual]", "1"}], ",", 
            RowBox[{"Number", "\[LongEqual]", "8"}]}], ")"}],
          TraditionalForm]}],
        ZeroWidthTimes->True], "\[Integral]", 
       RowBox[{
        SuperscriptBox["\[DifferentialD]", "D"], 
        FormBox[
         RowBox[{"Integral", "[", "]"}],
         TraditionalForm]}]}], "(", 
      FormBox[
       RowBox[{
        RowBox[{"-", 
         SubscriptBox["g", "s"]}], " ", 
        RowBox[{"(", 
         RowBox[{
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                RowBox[{"-", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "3"}],
                    SequenceForm["p", 3],
                    Editable->False],
                   TraditionalForm], ")"}]}], "+", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "4"}],
                  SequenceForm["p", 4],
                  Editable->False],
                 TraditionalForm]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "6"}],
               SequenceForm["Lor", 6],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "3"}],
                SequenceForm["Lor", 3],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "4"}],
                SequenceForm["Lor", 4],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}], "+", 
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                RowBox[{"2", " ", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "3"}],
                    SequenceForm["p", 3],
                    Editable->False],
                   TraditionalForm], ")"}]}], "+", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "4"}],
                  SequenceForm["p", 4],
                  Editable->False],
                 TraditionalForm]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "4"}],
               SequenceForm["Lor", 4],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "3"}],
                SequenceForm["Lor", 3],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "6"}],
                SequenceForm["Lor", 6],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}], "+", 
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                RowBox[{"-", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "3"}],
                    SequenceForm["p", 3],
                    Editable->False],
                   TraditionalForm], ")"}]}], "-", 
                RowBox[{"2", " ", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "4"}],
                    SequenceForm["p", 4],
                    Editable->False],
                   TraditionalForm], ")"}]}]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "3"}],
               SequenceForm["Lor", 3],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "4"}],
                SequenceForm["Lor", 4],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "6"}],
                SequenceForm["Lor", 6],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}]}], ")"}], " ", 
        SuperscriptBox["g", 
         RowBox[{
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "6"}],
             SequenceForm["Lor", 6],
             Editable->False],
            TraditionalForm],
           TraditionalForm], 
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "7"}],
             SequenceForm["Lor", 7],
             Editable->False],
            TraditionalForm],
           TraditionalForm]}]], " ", 
        RowBox[{
         FormBox["\<\"ep\"\>",
          TraditionalForm], "(", 
         RowBox[{
          RowBox[{"V", "(", 
           RowBox[{"5", ",", 
            RowBox[{"{", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "1"}],
               SequenceForm["Glu", 1],
               Editable->False],
              TraditionalForm], "}"}]}], ")"}], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "1"}],
            SequenceForm["p", 1],
            Editable->False],
           TraditionalForm], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "1"}],
            SequenceForm["Lor", 1],
            Editable->False],
           TraditionalForm]}], ")"}], " ", 
        RowBox[{
         FormBox["\<\"ep\"\>",
          TraditionalForm], "(", 
         RowBox[{
          RowBox[{"V", "(", 
           RowBox[{"5", ",", 
            RowBox[{"{", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "2"}],
               SequenceForm["Glu", 2],
               Editable->False],
              TraditionalForm], "}"}]}], ")"}], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "2"}],
            SequenceForm["p", 2],
            Editable->False],
           TraditionalForm], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "2"}],
            SequenceForm["Lor", 2],
            Editable->False],
           TraditionalForm]}], ")"}], " ", 
        RowBox[{
         FormBox["\<\"ep\"\>",
          TraditionalForm], "(", 
         RowBox[{
          RowBox[{"V", "(", 
           RowBox[{"5", ",", 
            RowBox[{"{", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "3"}],
               SequenceForm["Glu", 3],
               Editable->False],
              TraditionalForm], "}"}]}], ")"}], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "3"}],
            SequenceForm["p", 3],
            Editable->False],
           TraditionalForm], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "3"}],
            SequenceForm["Lor", 3],
            Editable->False],
           TraditionalForm]}], ")"}], " ", 
        RowBox[{
         FormBox["\<\"ep\"\>",
          TraditionalForm], "(", 
         RowBox[{
          RowBox[{"V", "(", 
           RowBox[{"5", ",", 
            RowBox[{"{", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "4"}],
               SequenceForm["Glu", 4],
               Editable->False],
              TraditionalForm], "}"}]}], ")"}], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "4"}],
            SequenceForm["p", 4],
            Editable->False],
           TraditionalForm], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "4"}],
            SequenceForm["Lor", 4],
            Editable->False],
           TraditionalForm]}], ")"}], " ", 
        RowBox[{
         FormBox["\<\"ep\"\>",
          TraditionalForm], "(", 
         RowBox[{
          RowBox[{"V", "(", 
           RowBox[{"5", ",", 
            RowBox[{"{", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "5"}],
               SequenceForm["Glu", 5],
               Editable->False],
              TraditionalForm], "}"}]}], ")"}], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "5"}],
            SequenceForm["p", 5],
            Editable->False],
           TraditionalForm], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "5"}],
            SequenceForm["Lor", 5],
            Editable->False],
           TraditionalForm]}], ")"}], " ", 
        FormBox[
         FractionBox["1", 
          SuperscriptBox[
           RowBox[{"(", 
            RowBox[{
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "3"}],
               SequenceForm["p", 3],
               Editable->False],
              TraditionalForm], "+", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "4"}],
               SequenceForm["p", 4],
               Editable->False],
              TraditionalForm]}], ")"}], "2"]],
         TraditionalForm], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "6"}],
            SequenceForm["Glu", 6],
            Editable->False],
           TraditionalForm], ",", "8"}], ")"}], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "1"}],
            SequenceForm["Glu", 1],
            Editable->False],
           TraditionalForm], ",", "8", ",", "External"}], ")"}], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "2"}],
            SequenceForm["Glu", 2],
            Editable->False],
           TraditionalForm], ",", "8", ",", "External"}], ")"}], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "3"}],
            SequenceForm["Glu", 3],
            Editable->False],
           TraditionalForm], ",", "8", ",", "External"}], ")"}], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "4"}],
            SequenceForm["Glu", 4],
            Editable->False],
           TraditionalForm], ",", "8", ",", "External"}], ")"}], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "5"}],
            SequenceForm["Glu", 5],
            Editable->False],
           TraditionalForm], ",", "8", ",", "External"}], ")"}], " ", 
        SubscriptBox["f", 
         RowBox[{
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "3"}],
             SequenceForm["Glu", 3],
             Editable->False],
            TraditionalForm],
           TraditionalForm], 
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "4"}],
             SequenceForm["Glu", 4],
             Editable->False],
            TraditionalForm],
           TraditionalForm], 
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "6"}],
             SequenceForm["Glu", 6],
             Editable->False],
            TraditionalForm],
           TraditionalForm]}]], " ", 
        RowBox[{"(", 
         RowBox[{
          RowBox[{
           RowBox[{"-", "\[ImaginaryI]"}], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "1"}],
                SequenceForm["Lor", 1],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "7"}],
                SequenceForm["Lor", 7],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "2"}],
                SequenceForm["Lor", 2],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "5"}],
                SequenceForm["Lor", 5],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]], " ", 
           RowBox[{"(", 
            RowBox[{
             RowBox[{"-", 
              SubscriptBox["f", 
               RowBox[{
                FormBox[
                 FormBox[
                  InterpretationBox[
                   RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "1"}],
                   SequenceForm["Glu", 1],
                   Editable->False],
                  TraditionalForm],
                 TraditionalForm], 
                FormBox[
                 FormBox[
                  InterpretationBox[
                   RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "2"}],
                   SequenceForm["Glu", 2],
                   Editable->False],
                  TraditionalForm],
                 TraditionalForm], 
                FormBox[
                 FormBox[
                  InterpretationBox[
                   RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "5"}],
                   SequenceForm["Glu", 5],
                   Editable->False],
                  TraditionalForm],
                 TraditionalForm], 
                FormBox[
                 FormBox[
                  InterpretationBox[
                   RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "6"}],
                   SequenceForm["Glu", 6],
                   Editable->False],
                  TraditionalForm],
                 TraditionalForm]}]]}], "-", 
             SubscriptBox["f", 
              RowBox[{
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "1"}],
                  SequenceForm["Glu", 1],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm], 
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "5"}],
                  SequenceForm["Glu", 5],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm], 
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "2"}],
                  SequenceForm["Glu", 2],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm], 
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "6"}],
                  SequenceForm["Glu", 6],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm]}]]}], ")"}], " ", 
           SubsuperscriptBox["g", "s", "2"]}], "-", 
          RowBox[{"\[ImaginaryI]", " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "1"}],
                SequenceForm["Lor", 1],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "2"}],
                SequenceForm["Lor", 2],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "5"}],
                SequenceForm["Lor", 5],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "7"}],
                SequenceForm["Lor", 7],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]], " ", 
           RowBox[{"(", 
            RowBox[{
             SubscriptBox["f", 
              RowBox[{
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "1"}],
                  SequenceForm["Glu", 1],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm], 
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "5"}],
                  SequenceForm["Glu", 5],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm], 
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "2"}],
                  SequenceForm["Glu", 2],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm], 
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "6"}],
                  SequenceForm["Glu", 6],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm]}]], "-", 
             SubscriptBox["f", 
              RowBox[{
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "1"}],
                  SequenceForm["Glu", 1],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm], 
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "6"}],
                  SequenceForm["Glu", 6],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm], 
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "5"}],
                  SequenceForm["Glu", 5],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm], 
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "2"}],
                  SequenceForm["Glu", 2],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm]}]]}], ")"}], " ", 
           SubsuperscriptBox["g", "s", "2"]}], "-", 
          RowBox[{"\[ImaginaryI]", " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "1"}],
                SequenceForm["Lor", 1],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "5"}],
                SequenceForm["Lor", 5],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "2"}],
                SequenceForm["Lor", 2],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "7"}],
                SequenceForm["Lor", 7],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]], " ", 
           RowBox[{"(", 
            RowBox[{
             SubscriptBox["f", 
              RowBox[{
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "1"}],
                  SequenceForm["Glu", 1],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm], 
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "2"}],
                  SequenceForm["Glu", 2],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm], 
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "5"}],
                  SequenceForm["Glu", 5],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm], 
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "6"}],
                  SequenceForm["Glu", 6],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm]}]], "+", 
             SubscriptBox["f", 
              RowBox[{
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "1"}],
                  SequenceForm["Glu", 1],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm], 
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "6"}],
                  SequenceForm["Glu", 6],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm], 
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "5"}],
                  SequenceForm["Glu", 5],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm], 
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "2"}],
                  SequenceForm["Glu", 2],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm]}]]}], ")"}], " ", 
           SubsuperscriptBox["g", "s", "2"]}]}], ")"}]}],
       TraditionalForm], ")"}], ",", 
     RowBox[{"\[Integral]", 
      RowBox[{
       StyleBox[
        RowBox[{
         SuperscriptBox["\[DifferentialD]", "D"], 
         FormBox[
          RowBox[{"GraphID", "(", 
           RowBox[{
            RowBox[{"Topology", "\[LongEqual]", "1"}], ",", 
            RowBox[{"Generic", "\[LongEqual]", "1"}], ",", 
            RowBox[{"Classes", "\[LongEqual]", "1"}], ",", 
            RowBox[{"Number", "\[LongEqual]", "9"}]}], ")"}],
          TraditionalForm]}],
        ZeroWidthTimes->True], "\[Integral]", 
       RowBox[{
        SuperscriptBox["\[DifferentialD]", "D"], 
        FormBox[
         RowBox[{"Integral", "[", "]"}],
         TraditionalForm]}]}], "(", 
      FormBox[
       RowBox[{
        RowBox[{"-", 
         SubscriptBox["g", "s"]}], " ", 
        RowBox[{"(", 
         RowBox[{
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                RowBox[{"-", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "3"}],
                    SequenceForm["p", 3],
                    Editable->False],
                   TraditionalForm], ")"}]}], "+", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "5"}],
                  SequenceForm["p", 5],
                  Editable->False],
                 TraditionalForm]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "6"}],
               SequenceForm["Lor", 6],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "3"}],
                SequenceForm["Lor", 3],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "5"}],
                SequenceForm["Lor", 5],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}], "+", 
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                RowBox[{"2", " ", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "3"}],
                    SequenceForm["p", 3],
                    Editable->False],
                   TraditionalForm], ")"}]}], "+", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "5"}],
                  SequenceForm["p", 5],
                  Editable->False],
                 TraditionalForm]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "5"}],
               SequenceForm["Lor", 5],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "3"}],
                SequenceForm["Lor", 3],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "6"}],
                SequenceForm["Lor", 6],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}], "+", 
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                RowBox[{"-", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "3"}],
                    SequenceForm["p", 3],
                    Editable->False],
                   TraditionalForm], ")"}]}], "-", 
                RowBox[{"2", " ", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "5"}],
                    SequenceForm["p", 5],
                    Editable->False],
                   TraditionalForm], ")"}]}]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "3"}],
               SequenceForm["Lor", 3],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "5"}],
                SequenceForm["Lor", 5],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "6"}],
                SequenceForm["Lor", 6],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}]}], ")"}], " ", 
        SuperscriptBox["g", 
         RowBox[{
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "6"}],
             SequenceForm["Lor", 6],
             Editable->False],
            TraditionalForm],
           TraditionalForm], 
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "7"}],
             SequenceForm["Lor", 7],
             Editable->False],
            TraditionalForm],
           TraditionalForm]}]], " ", 
        RowBox[{
         FormBox["\<\"ep\"\>",
          TraditionalForm], "(", 
         RowBox[{
          RowBox[{"V", "(", 
           RowBox[{"5", ",", 
            RowBox[{"{", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "1"}],
               SequenceForm["Glu", 1],
               Editable->False],
              TraditionalForm], "}"}]}], ")"}], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "1"}],
            SequenceForm["p", 1],
            Editable->False],
           TraditionalForm], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "1"}],
            SequenceForm["Lor", 1],
            Editable->False],
           TraditionalForm]}], ")"}], " ", 
        RowBox[{
         FormBox["\<\"ep\"\>",
          TraditionalForm], "(", 
         RowBox[{
          RowBox[{"V", "(", 
           RowBox[{"5", ",", 
            RowBox[{"{", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "2"}],
               SequenceForm["Glu", 2],
               Editable->False],
              TraditionalForm], "}"}]}], ")"}], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "2"}],
            SequenceForm["p", 2],
            Editable->False],
           TraditionalForm], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "2"}],
            SequenceForm["Lor", 2],
            Editable->False],
           TraditionalForm]}], ")"}], " ", 
        RowBox[{
         FormBox["\<\"ep\"\>",
          TraditionalForm], "(", 
         RowBox[{
          RowBox[{"V", "(", 
           RowBox[{"5", ",", 
            RowBox[{"{", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "3"}],
               SequenceForm["Glu", 3],
               Editable->False],
              TraditionalForm], "}"}]}], ")"}], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "3"}],
            SequenceForm["p", 3],
            Editable->False],
           TraditionalForm], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "3"}],
            SequenceForm["Lor", 3],
            Editable->False],
           TraditionalForm]}], ")"}], " ", 
        RowBox[{
         FormBox["\<\"ep\"\>",
          TraditionalForm], "(", 
         RowBox[{
          RowBox[{"V", "(", 
           RowBox[{"5", ",", 
            RowBox[{"{", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "4"}],
               SequenceForm["Glu", 4],
               Editable->False],
              TraditionalForm], "}"}]}], ")"}], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "4"}],
            SequenceForm["p", 4],
            Editable->False],
           TraditionalForm], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "4"}],
            SequenceForm["Lor", 4],
            Editable->False],
           TraditionalForm]}], ")"}], " ", 
        RowBox[{
         FormBox["\<\"ep\"\>",
          TraditionalForm], "(", 
         RowBox[{
          RowBox[{"V", "(", 
           RowBox[{"5", ",", 
            RowBox[{"{", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "5"}],
               SequenceForm["Glu", 5],
               Editable->False],
              TraditionalForm], "}"}]}], ")"}], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "5"}],
            SequenceForm["p", 5],
            Editable->False],
           TraditionalForm], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "5"}],
            SequenceForm["Lor", 5],
            Editable->False],
           TraditionalForm]}], ")"}], " ", 
        FormBox[
         FractionBox["1", 
          SuperscriptBox[
           RowBox[{"(", 
            RowBox[{
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "3"}],
               SequenceForm["p", 3],
               Editable->False],
              TraditionalForm], "+", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "5"}],
               SequenceForm["p", 5],
               Editable->False],
              TraditionalForm]}], ")"}], "2"]],
         TraditionalForm], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "6"}],
            SequenceForm["Glu", 6],
            Editable->False],
           TraditionalForm], ",", "8"}], ")"}], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "1"}],
            SequenceForm["Glu", 1],
            Editable->False],
           TraditionalForm], ",", "8", ",", "External"}], ")"}], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "2"}],
            SequenceForm["Glu", 2],
            Editable->False],
           TraditionalForm], ",", "8", ",", "External"}], ")"}], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "3"}],
            SequenceForm["Glu", 3],
            Editable->False],
           TraditionalForm], ",", "8", ",", "External"}], ")"}], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "4"}],
            SequenceForm["Glu", 4],
            Editable->False],
           TraditionalForm], ",", "8", ",", "External"}], ")"}], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "5"}],
            SequenceForm["Glu", 5],
            Editable->False],
           TraditionalForm], ",", "8", ",", "External"}], ")"}], " ", 
        SubscriptBox["f", 
         RowBox[{
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "3"}],
             SequenceForm["Glu", 3],
             Editable->False],
            TraditionalForm],
           TraditionalForm], 
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "5"}],
             SequenceForm["Glu", 5],
             Editable->False],
            TraditionalForm],
           TraditionalForm], 
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "6"}],
             SequenceForm["Glu", 6],
             Editable->False],
            TraditionalForm],
           TraditionalForm]}]], " ", 
        RowBox[{"(", 
         RowBox[{
          RowBox[{
           RowBox[{"-", "\[ImaginaryI]"}], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "1"}],
                SequenceForm["Lor", 1],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "7"}],
                SequenceForm["Lor", 7],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "2"}],
                SequenceForm["Lor", 2],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "4"}],
                SequenceForm["Lor", 4],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]], " ", 
           RowBox[{"(", 
            RowBox[{
             RowBox[{"-", 
              SubscriptBox["f", 
               RowBox[{
                FormBox[
                 FormBox[
                  InterpretationBox[
                   RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "1"}],
                   SequenceForm["Glu", 1],
                   Editable->False],
                  TraditionalForm],
                 TraditionalForm], 
                FormBox[
                 FormBox[
                  InterpretationBox[
                   RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "2"}],
                   SequenceForm["Glu", 2],
                   Editable->False],
                  TraditionalForm],
                 TraditionalForm], 
                FormBox[
                 FormBox[
                  InterpretationBox[
                   RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "4"}],
                   SequenceForm["Glu", 4],
                   Editable->False],
                  TraditionalForm],
                 TraditionalForm], 
                FormBox[
                 FormBox[
                  InterpretationBox[
                   RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "6"}],
                   SequenceForm["Glu", 6],
                   Editable->False],
                  TraditionalForm],
                 TraditionalForm]}]]}], "-", 
             SubscriptBox["f", 
              RowBox[{
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "1"}],
                  SequenceForm["Glu", 1],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm], 
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "4"}],
                  SequenceForm["Glu", 4],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm], 
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "2"}],
                  SequenceForm["Glu", 2],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm], 
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "6"}],
                  SequenceForm["Glu", 6],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm]}]]}], ")"}], " ", 
           SubsuperscriptBox["g", "s", "2"]}], "-", 
          RowBox[{"\[ImaginaryI]", " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "1"}],
                SequenceForm["Lor", 1],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "2"}],
                SequenceForm["Lor", 2],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "4"}],
                SequenceForm["Lor", 4],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "7"}],
                SequenceForm["Lor", 7],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]], " ", 
           RowBox[{"(", 
            RowBox[{
             SubscriptBox["f", 
              RowBox[{
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "1"}],
                  SequenceForm["Glu", 1],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm], 
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "4"}],
                  SequenceForm["Glu", 4],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm], 
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "2"}],
                  SequenceForm["Glu", 2],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm], 
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "6"}],
                  SequenceForm["Glu", 6],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm]}]], "-", 
             SubscriptBox["f", 
              RowBox[{
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "1"}],
                  SequenceForm["Glu", 1],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm], 
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "6"}],
                  SequenceForm["Glu", 6],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm], 
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "4"}],
                  SequenceForm["Glu", 4],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm], 
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "2"}],
                  SequenceForm["Glu", 2],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm]}]]}], ")"}], " ", 
           SubsuperscriptBox["g", "s", "2"]}], "-", 
          RowBox[{"\[ImaginaryI]", " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "1"}],
                SequenceForm["Lor", 1],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "4"}],
                SequenceForm["Lor", 4],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "2"}],
                SequenceForm["Lor", 2],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "7"}],
                SequenceForm["Lor", 7],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]], " ", 
           RowBox[{"(", 
            RowBox[{
             SubscriptBox["f", 
              RowBox[{
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "1"}],
                  SequenceForm["Glu", 1],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm], 
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "2"}],
                  SequenceForm["Glu", 2],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm], 
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "4"}],
                  SequenceForm["Glu", 4],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm], 
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "6"}],
                  SequenceForm["Glu", 6],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm]}]], "+", 
             SubscriptBox["f", 
              RowBox[{
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "1"}],
                  SequenceForm["Glu", 1],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm], 
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "6"}],
                  SequenceForm["Glu", 6],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm], 
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "4"}],
                  SequenceForm["Glu", 4],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm], 
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "2"}],
                  SequenceForm["Glu", 2],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm]}]]}], ")"}], " ", 
           SubsuperscriptBox["g", "s", "2"]}]}], ")"}]}],
       TraditionalForm], ")"}], ",", 
     RowBox[{"\[Integral]", 
      RowBox[{
       StyleBox[
        RowBox[{
         SuperscriptBox["\[DifferentialD]", "D"], 
         FormBox[
          RowBox[{"GraphID", "(", 
           RowBox[{
            RowBox[{"Topology", "\[LongEqual]", "1"}], ",", 
            RowBox[{"Generic", "\[LongEqual]", "1"}], ",", 
            RowBox[{"Classes", "\[LongEqual]", "1"}], ",", 
            RowBox[{"Number", "\[LongEqual]", "10"}]}], ")"}],
          TraditionalForm]}],
        ZeroWidthTimes->True], "\[Integral]", 
       RowBox[{
        SuperscriptBox["\[DifferentialD]", "D"], 
        FormBox[
         RowBox[{"Integral", "[", "]"}],
         TraditionalForm]}]}], "(", 
      FormBox[
       RowBox[{
        RowBox[{"-", 
         SubscriptBox["g", "s"]}], " ", 
        RowBox[{"(", 
         RowBox[{
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                RowBox[{"-", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "4"}],
                    SequenceForm["p", 4],
                    Editable->False],
                   TraditionalForm], ")"}]}], "+", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "5"}],
                  SequenceForm["p", 5],
                  Editable->False],
                 TraditionalForm]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "6"}],
               SequenceForm["Lor", 6],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "4"}],
                SequenceForm["Lor", 4],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "5"}],
                SequenceForm["Lor", 5],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}], "+", 
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                RowBox[{"2", " ", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "4"}],
                    SequenceForm["p", 4],
                    Editable->False],
                   TraditionalForm], ")"}]}], "+", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "5"}],
                  SequenceForm["p", 5],
                  Editable->False],
                 TraditionalForm]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "5"}],
               SequenceForm["Lor", 5],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "4"}],
                SequenceForm["Lor", 4],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "6"}],
                SequenceForm["Lor", 6],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}], "+", 
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                RowBox[{"-", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "4"}],
                    SequenceForm["p", 4],
                    Editable->False],
                   TraditionalForm], ")"}]}], "-", 
                RowBox[{"2", " ", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "5"}],
                    SequenceForm["p", 5],
                    Editable->False],
                   TraditionalForm], ")"}]}]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "4"}],
               SequenceForm["Lor", 4],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "5"}],
                SequenceForm["Lor", 5],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "6"}],
                SequenceForm["Lor", 6],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}]}], ")"}], " ", 
        SuperscriptBox["g", 
         RowBox[{
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "6"}],
             SequenceForm["Lor", 6],
             Editable->False],
            TraditionalForm],
           TraditionalForm], 
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "7"}],
             SequenceForm["Lor", 7],
             Editable->False],
            TraditionalForm],
           TraditionalForm]}]], " ", 
        RowBox[{
         FormBox["\<\"ep\"\>",
          TraditionalForm], "(", 
         RowBox[{
          RowBox[{"V", "(", 
           RowBox[{"5", ",", 
            RowBox[{"{", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "1"}],
               SequenceForm["Glu", 1],
               Editable->False],
              TraditionalForm], "}"}]}], ")"}], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "1"}],
            SequenceForm["p", 1],
            Editable->False],
           TraditionalForm], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "1"}],
            SequenceForm["Lor", 1],
            Editable->False],
           TraditionalForm]}], ")"}], " ", 
        RowBox[{
         FormBox["\<\"ep\"\>",
          TraditionalForm], "(", 
         RowBox[{
          RowBox[{"V", "(", 
           RowBox[{"5", ",", 
            RowBox[{"{", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "2"}],
               SequenceForm["Glu", 2],
               Editable->False],
              TraditionalForm], "}"}]}], ")"}], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "2"}],
            SequenceForm["p", 2],
            Editable->False],
           TraditionalForm], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "2"}],
            SequenceForm["Lor", 2],
            Editable->False],
           TraditionalForm]}], ")"}], " ", 
        RowBox[{
         FormBox["\<\"ep\"\>",
          TraditionalForm], "(", 
         RowBox[{
          RowBox[{"V", "(", 
           RowBox[{"5", ",", 
            RowBox[{"{", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "3"}],
               SequenceForm["Glu", 3],
               Editable->False],
              TraditionalForm], "}"}]}], ")"}], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "3"}],
            SequenceForm["p", 3],
            Editable->False],
           TraditionalForm], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "3"}],
            SequenceForm["Lor", 3],
            Editable->False],
           TraditionalForm]}], ")"}], " ", 
        RowBox[{
         FormBox["\<\"ep\"\>",
          TraditionalForm], "(", 
         RowBox[{
          RowBox[{"V", "(", 
           RowBox[{"5", ",", 
            RowBox[{"{", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "4"}],
               SequenceForm["Glu", 4],
               Editable->False],
              TraditionalForm], "}"}]}], ")"}], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "4"}],
            SequenceForm["p", 4],
            Editable->False],
           TraditionalForm], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "4"}],
            SequenceForm["Lor", 4],
            Editable->False],
           TraditionalForm]}], ")"}], " ", 
        RowBox[{
         FormBox["\<\"ep\"\>",
          TraditionalForm], "(", 
         RowBox[{
          RowBox[{"V", "(", 
           RowBox[{"5", ",", 
            RowBox[{"{", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "5"}],
               SequenceForm["Glu", 5],
               Editable->False],
              TraditionalForm], "}"}]}], ")"}], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "5"}],
            SequenceForm["p", 5],
            Editable->False],
           TraditionalForm], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "5"}],
            SequenceForm["Lor", 5],
            Editable->False],
           TraditionalForm]}], ")"}], " ", 
        FormBox[
         FractionBox["1", 
          SuperscriptBox[
           RowBox[{"(", 
            RowBox[{
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "4"}],
               SequenceForm["p", 4],
               Editable->False],
              TraditionalForm], "+", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "5"}],
               SequenceForm["p", 5],
               Editable->False],
              TraditionalForm]}], ")"}], "2"]],
         TraditionalForm], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "6"}],
            SequenceForm["Glu", 6],
            Editable->False],
           TraditionalForm], ",", "8"}], ")"}], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "1"}],
            SequenceForm["Glu", 1],
            Editable->False],
           TraditionalForm], ",", "8", ",", "External"}], ")"}], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "2"}],
            SequenceForm["Glu", 2],
            Editable->False],
           TraditionalForm], ",", "8", ",", "External"}], ")"}], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "3"}],
            SequenceForm["Glu", 3],
            Editable->False],
           TraditionalForm], ",", "8", ",", "External"}], ")"}], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "4"}],
            SequenceForm["Glu", 4],
            Editable->False],
           TraditionalForm], ",", "8", ",", "External"}], ")"}], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "5"}],
            SequenceForm["Glu", 5],
            Editable->False],
           TraditionalForm], ",", "8", ",", "External"}], ")"}], " ", 
        SubscriptBox["f", 
         RowBox[{
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "4"}],
             SequenceForm["Glu", 4],
             Editable->False],
            TraditionalForm],
           TraditionalForm], 
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "5"}],
             SequenceForm["Glu", 5],
             Editable->False],
            TraditionalForm],
           TraditionalForm], 
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "6"}],
             SequenceForm["Glu", 6],
             Editable->False],
            TraditionalForm],
           TraditionalForm]}]], " ", 
        RowBox[{"(", 
         RowBox[{
          RowBox[{
           RowBox[{"-", "\[ImaginaryI]"}], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "1"}],
                SequenceForm["Lor", 1],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "7"}],
                SequenceForm["Lor", 7],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "2"}],
                SequenceForm["Lor", 2],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "3"}],
                SequenceForm["Lor", 3],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]], " ", 
           RowBox[{"(", 
            RowBox[{
             RowBox[{"-", 
              SubscriptBox["f", 
               RowBox[{
                FormBox[
                 FormBox[
                  InterpretationBox[
                   RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "1"}],
                   SequenceForm["Glu", 1],
                   Editable->False],
                  TraditionalForm],
                 TraditionalForm], 
                FormBox[
                 FormBox[
                  InterpretationBox[
                   RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "2"}],
                   SequenceForm["Glu", 2],
                   Editable->False],
                  TraditionalForm],
                 TraditionalForm], 
                FormBox[
                 FormBox[
                  InterpretationBox[
                   RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "3"}],
                   SequenceForm["Glu", 3],
                   Editable->False],
                  TraditionalForm],
                 TraditionalForm], 
                FormBox[
                 FormBox[
                  InterpretationBox[
                   RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "6"}],
                   SequenceForm["Glu", 6],
                   Editable->False],
                  TraditionalForm],
                 TraditionalForm]}]]}], "-", 
             SubscriptBox["f", 
              RowBox[{
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "1"}],
                  SequenceForm["Glu", 1],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm], 
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "3"}],
                  SequenceForm["Glu", 3],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm], 
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "2"}],
                  SequenceForm["Glu", 2],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm], 
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "6"}],
                  SequenceForm["Glu", 6],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm]}]]}], ")"}], " ", 
           SubsuperscriptBox["g", "s", "2"]}], "-", 
          RowBox[{"\[ImaginaryI]", " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "1"}],
                SequenceForm["Lor", 1],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "2"}],
                SequenceForm["Lor", 2],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "3"}],
                SequenceForm["Lor", 3],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "7"}],
                SequenceForm["Lor", 7],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]], " ", 
           RowBox[{"(", 
            RowBox[{
             SubscriptBox["f", 
              RowBox[{
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "1"}],
                  SequenceForm["Glu", 1],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm], 
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "3"}],
                  SequenceForm["Glu", 3],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm], 
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "2"}],
                  SequenceForm["Glu", 2],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm], 
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "6"}],
                  SequenceForm["Glu", 6],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm]}]], "-", 
             SubscriptBox["f", 
              RowBox[{
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "1"}],
                  SequenceForm["Glu", 1],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm], 
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "6"}],
                  SequenceForm["Glu", 6],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm], 
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "3"}],
                  SequenceForm["Glu", 3],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm], 
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "2"}],
                  SequenceForm["Glu", 2],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm]}]]}], ")"}], " ", 
           SubsuperscriptBox["g", "s", "2"]}], "-", 
          RowBox[{"\[ImaginaryI]", " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "1"}],
                SequenceForm["Lor", 1],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "3"}],
                SequenceForm["Lor", 3],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "2"}],
                SequenceForm["Lor", 2],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "7"}],
                SequenceForm["Lor", 7],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]], " ", 
           RowBox[{"(", 
            RowBox[{
             SubscriptBox["f", 
              RowBox[{
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "1"}],
                  SequenceForm["Glu", 1],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm], 
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "2"}],
                  SequenceForm["Glu", 2],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm], 
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "3"}],
                  SequenceForm["Glu", 3],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm], 
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "6"}],
                  SequenceForm["Glu", 6],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm]}]], "+", 
             SubscriptBox["f", 
              RowBox[{
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "1"}],
                  SequenceForm["Glu", 1],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm], 
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "6"}],
                  SequenceForm["Glu", 6],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm], 
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "3"}],
                  SequenceForm["Glu", 3],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm], 
               FormBox[
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "2"}],
                  SequenceForm["Glu", 2],
                  Editable->False],
                 TraditionalForm],
                TraditionalForm]}]]}], ")"}], " ", 
           SubsuperscriptBox["g", "s", "2"]}]}], ")"}]}],
       TraditionalForm], ")"}], ",", 
     RowBox[{"\[Integral]", 
      RowBox[{
       StyleBox[
        RowBox[{
         SuperscriptBox["\[DifferentialD]", "D"], 
         FormBox[
          RowBox[{"GraphID", "(", 
           RowBox[{
            RowBox[{"Topology", "\[LongEqual]", "1"}], ",", 
            RowBox[{"Generic", "\[LongEqual]", "1"}], ",", 
            RowBox[{"Classes", "\[LongEqual]", "1"}], ",", 
            RowBox[{"Number", "\[LongEqual]", "11"}]}], ")"}],
          TraditionalForm]}],
        ZeroWidthTimes->True], "\[Integral]", 
       RowBox[{
        SuperscriptBox["\[DifferentialD]", "D"], 
        FormBox[
         RowBox[{"Integral", "[", "]"}],
         TraditionalForm]}]}], "(", 
      FormBox[
       RowBox[{"\[ImaginaryI]", " ", 
        SubsuperscriptBox["g", "s", "3"], " ", 
        RowBox[{"(", 
         RowBox[{
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                RowBox[{"-", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "1"}],
                    SequenceForm["p", 1],
                    Editable->False],
                   TraditionalForm], ")"}]}], "+", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "2"}],
                  SequenceForm["p", 2],
                  Editable->False],
                 TraditionalForm]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "6"}],
               SequenceForm["Lor", 6],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "1"}],
                SequenceForm["Lor", 1],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "2"}],
                SequenceForm["Lor", 2],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}], "+", 
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "1"}],
                  SequenceForm["p", 1],
                  Editable->False],
                 TraditionalForm], "-", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "3"}],
                  SequenceForm["p", 3],
                  Editable->False],
                 TraditionalForm], "-", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "4"}],
                  SequenceForm["p", 4],
                  Editable->False],
                 TraditionalForm], "-", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "5"}],
                  SequenceForm["p", 5],
                  Editable->False],
                 TraditionalForm]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "2"}],
               SequenceForm["Lor", 2],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "1"}],
                SequenceForm["Lor", 1],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "6"}],
                SequenceForm["Lor", 6],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}], "+", 
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                RowBox[{"-", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "2"}],
                    SequenceForm["p", 2],
                    Editable->False],
                   TraditionalForm], ")"}]}], "+", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "3"}],
                  SequenceForm["p", 3],
                  Editable->False],
                 TraditionalForm], "+", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "4"}],
                  SequenceForm["p", 4],
                  Editable->False],
                 TraditionalForm], "+", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "5"}],
                  SequenceForm["p", 5],
                  Editable->False],
                 TraditionalForm]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "1"}],
               SequenceForm["Lor", 1],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "2"}],
                SequenceForm["Lor", 2],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "6"}],
                SequenceForm["Lor", 6],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}]}], ")"}], " ", 
        RowBox[{"(", 
         RowBox[{
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                RowBox[{"-", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "3"}],
                    SequenceForm["p", 3],
                    Editable->False],
                   TraditionalForm], ")"}]}], "+", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "4"}],
                  SequenceForm["p", 4],
                  Editable->False],
                 TraditionalForm]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "8"}],
               SequenceForm["Lor", 8],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "3"}],
                SequenceForm["Lor", 3],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "4"}],
                SequenceForm["Lor", 4],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}], "+", 
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                RowBox[{"2", " ", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "3"}],
                    SequenceForm["p", 3],
                    Editable->False],
                   TraditionalForm], ")"}]}], "+", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "4"}],
                  SequenceForm["p", 4],
                  Editable->False],
                 TraditionalForm]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "4"}],
               SequenceForm["Lor", 4],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "3"}],
                SequenceForm["Lor", 3],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "8"}],
                SequenceForm["Lor", 8],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}], "+", 
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                RowBox[{"-", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "3"}],
                    SequenceForm["p", 3],
                    Editable->False],
                   TraditionalForm], ")"}]}], "-", 
                RowBox[{"2", " ", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "4"}],
                    SequenceForm["p", 4],
                    Editable->False],
                   TraditionalForm], ")"}]}]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "3"}],
               SequenceForm["Lor", 3],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "4"}],
                SequenceForm["Lor", 4],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "8"}],
                SequenceForm["Lor", 8],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}]}], ")"}], " ", 
        SuperscriptBox["g", 
         RowBox[{
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "6"}],
             SequenceForm["Lor", 6],
             Editable->False],
            TraditionalForm],
           TraditionalForm], 
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "7"}],
             SequenceForm["Lor", 7],
             Editable->False],
            TraditionalForm],
           TraditionalForm]}]], " ", 
        RowBox[{"(", 
         RowBox[{
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                RowBox[{"-", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "3"}],
                    SequenceForm["p", 3],
                    Editable->False],
                   TraditionalForm], ")"}]}], "-", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "4"}],
                  SequenceForm["p", 4],
                  Editable->False],
                 TraditionalForm], "-", 
                RowBox[{"2", " ", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "5"}],
                    SequenceForm["p", 5],
                    Editable->False],
                   TraditionalForm], ")"}]}]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "9"}],
               SequenceForm["Lor", 9],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "5"}],
                SequenceForm["Lor", 5],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "7"}],
                SequenceForm["Lor", 7],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}], "+", 
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                RowBox[{"-", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "3"}],
                    SequenceForm["p", 3],
                    Editable->False],
                   TraditionalForm], ")"}]}], "-", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "4"}],
                  SequenceForm["p", 4],
                  Editable->False],
                 TraditionalForm], "+", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "5"}],
                  SequenceForm["p", 5],
                  Editable->False],
                 TraditionalForm]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "7"}],
               SequenceForm["Lor", 7],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "5"}],
                SequenceForm["Lor", 5],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "9"}],
                SequenceForm["Lor", 9],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}], "+", 
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                RowBox[{"2", " ", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "3"}],
                    SequenceForm["p", 3],
                    Editable->False],
                   TraditionalForm], ")"}]}], "+", 
                RowBox[{"2", " ", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "4"}],
                    SequenceForm["p", 4],
                    Editable->False],
                   TraditionalForm], ")"}]}], "+", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "5"}],
                  SequenceForm["p", 5],
                  Editable->False],
                 TraditionalForm]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "5"}],
               SequenceForm["Lor", 5],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "7"}],
                SequenceForm["Lor", 7],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "9"}],
                SequenceForm["Lor", 9],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}]}], ")"}], " ", 
        SuperscriptBox["g", 
         RowBox[{
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "8"}],
             SequenceForm["Lor", 8],
             Editable->False],
            TraditionalForm],
           TraditionalForm], 
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "9"}],
             SequenceForm["Lor", 9],
             Editable->False],
            TraditionalForm],
           TraditionalForm]}]], " ", 
        RowBox[{
         FormBox["\<\"ep\"\>",
          TraditionalForm], "(", 
         RowBox[{
          RowBox[{"V", "(", 
           RowBox[{"5", ",", 
            RowBox[{"{", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "1"}],
               SequenceForm["Glu", 1],
               Editable->False],
              TraditionalForm], "}"}]}], ")"}], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "1"}],
            SequenceForm["p", 1],
            Editable->False],
           TraditionalForm], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "1"}],
            SequenceForm["Lor", 1],
            Editable->False],
           TraditionalForm]}], ")"}], " ", 
        RowBox[{
         FormBox["\<\"ep\"\>",
          TraditionalForm], "(", 
         RowBox[{
          RowBox[{"V", "(", 
           RowBox[{"5", ",", 
            RowBox[{"{", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "2"}],
               SequenceForm["Glu", 2],
               Editable->False],
              TraditionalForm], "}"}]}], ")"}], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "2"}],
            SequenceForm["p", 2],
            Editable->False],
           TraditionalForm], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "2"}],
            SequenceForm["Lor", 2],
            Editable->False],
           TraditionalForm]}], ")"}], " ", 
        RowBox[{
         FormBox["\<\"ep\"\>",
          TraditionalForm], "(", 
         RowBox[{
          RowBox[{"V", "(", 
           RowBox[{"5", ",", 
            RowBox[{"{", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "3"}],
               SequenceForm["Glu", 3],
               Editable->False],
              TraditionalForm], "}"}]}], ")"}], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "3"}],
            SequenceForm["p", 3],
            Editable->False],
           TraditionalForm], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "3"}],
            SequenceForm["Lor", 3],
            Editable->False],
           TraditionalForm]}], ")"}], " ", 
        RowBox[{
         FormBox["\<\"ep\"\>",
          TraditionalForm], "(", 
         RowBox[{
          RowBox[{"V", "(", 
           RowBox[{"5", ",", 
            RowBox[{"{", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "4"}],
               SequenceForm["Glu", 4],
               Editable->False],
              TraditionalForm], "}"}]}], ")"}], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "4"}],
            SequenceForm["p", 4],
            Editable->False],
           TraditionalForm], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "4"}],
            SequenceForm["Lor", 4],
            Editable->False],
           TraditionalForm]}], ")"}], " ", 
        RowBox[{
         FormBox["\<\"ep\"\>",
          TraditionalForm], "(", 
         RowBox[{
          RowBox[{"V", "(", 
           RowBox[{"5", ",", 
            RowBox[{"{", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "5"}],
               SequenceForm["Glu", 5],
               Editable->False],
              TraditionalForm], "}"}]}], ")"}], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "5"}],
            SequenceForm["p", 5],
            Editable->False],
           TraditionalForm], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "5"}],
            SequenceForm["Lor", 5],
            Editable->False],
           TraditionalForm]}], ")"}], " ", 
        FormBox[
         FractionBox["1", 
          SuperscriptBox[
           RowBox[{"(", 
            RowBox[{
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "3"}],
               SequenceForm["p", 3],
               Editable->False],
              TraditionalForm], "+", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "4"}],
               SequenceForm["p", 4],
               Editable->False],
              TraditionalForm]}], ")"}], "2"]],
         TraditionalForm], " ", 
        FormBox[
         FractionBox["1", 
          SuperscriptBox[
           RowBox[{"(", 
            RowBox[{
             RowBox[{"-", 
              RowBox[{"(", 
               FormBox[
                InterpretationBox[
                 RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "3"}],
                 SequenceForm["p", 3],
                 Editable->False],
                TraditionalForm], ")"}]}], "-", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "4"}],
               SequenceForm["p", 4],
               Editable->False],
              TraditionalForm], "-", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "5"}],
               SequenceForm["p", 5],
               Editable->False],
              TraditionalForm]}], ")"}], "2"]],
         TraditionalForm], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "6"}],
            SequenceForm["Glu", 6],
            Editable->False],
           TraditionalForm], ",", "8"}], ")"}], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "7"}],
            SequenceForm["Glu", 7],
            Editable->False],
           TraditionalForm], ",", "8"}], ")"}], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "1"}],
            SequenceForm["Glu", 1],
            Editable->False],
           TraditionalForm], ",", "8", ",", "External"}], ")"}], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "2"}],
            SequenceForm["Glu", 2],
            Editable->False],
           TraditionalForm], ",", "8", ",", "External"}], ")"}], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "3"}],
            SequenceForm["Glu", 3],
            Editable->False],
           TraditionalForm], ",", "8", ",", "External"}], ")"}], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "4"}],
            SequenceForm["Glu", 4],
            Editable->False],
           TraditionalForm], ",", "8", ",", "External"}], ")"}], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "5"}],
            SequenceForm["Glu", 5],
            Editable->False],
           TraditionalForm], ",", "8", ",", "External"}], ")"}], " ", 
        SubscriptBox["f", 
         RowBox[{
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "1"}],
             SequenceForm["Glu", 1],
             Editable->False],
            TraditionalForm],
           TraditionalForm], 
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "2"}],
             SequenceForm["Glu", 2],
             Editable->False],
            TraditionalForm],
           TraditionalForm], 
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "6"}],
             SequenceForm["Glu", 6],
             Editable->False],
            TraditionalForm],
           TraditionalForm]}]], " ", 
        SubscriptBox["f", 
         RowBox[{
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "3"}],
             SequenceForm["Glu", 3],
             Editable->False],
            TraditionalForm],
           TraditionalForm], 
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "4"}],
             SequenceForm["Glu", 4],
             Editable->False],
            TraditionalForm],
           TraditionalForm], 
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "7"}],
             SequenceForm["Glu", 7],
             Editable->False],
            TraditionalForm],
           TraditionalForm]}]], " ", 
        SubscriptBox["f", 
         RowBox[{
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "5"}],
             SequenceForm["Glu", 5],
             Editable->False],
            TraditionalForm],
           TraditionalForm], 
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "6"}],
             SequenceForm["Glu", 6],
             Editable->False],
            TraditionalForm],
           TraditionalForm], 
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "7"}],
             SequenceForm["Glu", 7],
             Editable->False],
            TraditionalForm],
           TraditionalForm]}]]}],
       TraditionalForm], ")"}], ",", 
     RowBox[{"\[Integral]", 
      RowBox[{
       StyleBox[
        RowBox[{
         SuperscriptBox["\[DifferentialD]", "D"], 
         FormBox[
          RowBox[{"GraphID", "(", 
           RowBox[{
            RowBox[{"Topology", "\[LongEqual]", "1"}], ",", 
            RowBox[{"Generic", "\[LongEqual]", "1"}], ",", 
            RowBox[{"Classes", "\[LongEqual]", "1"}], ",", 
            RowBox[{"Number", "\[LongEqual]", "12"}]}], ")"}],
          TraditionalForm]}],
        ZeroWidthTimes->True], "\[Integral]", 
       RowBox[{
        SuperscriptBox["\[DifferentialD]", "D"], 
        FormBox[
         RowBox[{"Integral", "[", "]"}],
         TraditionalForm]}]}], "(", 
      FormBox[
       RowBox[{"\[ImaginaryI]", " ", 
        SubsuperscriptBox["g", "s", "3"], " ", 
        RowBox[{"(", 
         RowBox[{
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                RowBox[{"-", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "1"}],
                    SequenceForm["p", 1],
                    Editable->False],
                   TraditionalForm], ")"}]}], "+", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "2"}],
                  SequenceForm["p", 2],
                  Editable->False],
                 TraditionalForm]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "6"}],
               SequenceForm["Lor", 6],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "1"}],
                SequenceForm["Lor", 1],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "2"}],
                SequenceForm["Lor", 2],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}], "+", 
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "1"}],
                  SequenceForm["p", 1],
                  Editable->False],
                 TraditionalForm], "-", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "3"}],
                  SequenceForm["p", 3],
                  Editable->False],
                 TraditionalForm], "-", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "4"}],
                  SequenceForm["p", 4],
                  Editable->False],
                 TraditionalForm], "-", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "5"}],
                  SequenceForm["p", 5],
                  Editable->False],
                 TraditionalForm]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "2"}],
               SequenceForm["Lor", 2],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "1"}],
                SequenceForm["Lor", 1],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "6"}],
                SequenceForm["Lor", 6],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}], "+", 
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                RowBox[{"-", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "2"}],
                    SequenceForm["p", 2],
                    Editable->False],
                   TraditionalForm], ")"}]}], "+", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "3"}],
                  SequenceForm["p", 3],
                  Editable->False],
                 TraditionalForm], "+", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "4"}],
                  SequenceForm["p", 4],
                  Editable->False],
                 TraditionalForm], "+", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "5"}],
                  SequenceForm["p", 5],
                  Editable->False],
                 TraditionalForm]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "1"}],
               SequenceForm["Lor", 1],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "2"}],
                SequenceForm["Lor", 2],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "6"}],
                SequenceForm["Lor", 6],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}]}], ")"}], " ", 
        RowBox[{"(", 
         RowBox[{
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                RowBox[{"-", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "3"}],
                    SequenceForm["p", 3],
                    Editable->False],
                   TraditionalForm], ")"}]}], "+", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "5"}],
                  SequenceForm["p", 5],
                  Editable->False],
                 TraditionalForm]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "8"}],
               SequenceForm["Lor", 8],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "3"}],
                SequenceForm["Lor", 3],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "5"}],
                SequenceForm["Lor", 5],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}], "+", 
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                RowBox[{"2", " ", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "3"}],
                    SequenceForm["p", 3],
                    Editable->False],
                   TraditionalForm], ")"}]}], "+", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "5"}],
                  SequenceForm["p", 5],
                  Editable->False],
                 TraditionalForm]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "5"}],
               SequenceForm["Lor", 5],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "3"}],
                SequenceForm["Lor", 3],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "8"}],
                SequenceForm["Lor", 8],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}], "+", 
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                RowBox[{"-", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "3"}],
                    SequenceForm["p", 3],
                    Editable->False],
                   TraditionalForm], ")"}]}], "-", 
                RowBox[{"2", " ", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "5"}],
                    SequenceForm["p", 5],
                    Editable->False],
                   TraditionalForm], ")"}]}]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "3"}],
               SequenceForm["Lor", 3],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "5"}],
                SequenceForm["Lor", 5],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "8"}],
                SequenceForm["Lor", 8],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}]}], ")"}], " ", 
        SuperscriptBox["g", 
         RowBox[{
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "6"}],
             SequenceForm["Lor", 6],
             Editable->False],
            TraditionalForm],
           TraditionalForm], 
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "7"}],
             SequenceForm["Lor", 7],
             Editable->False],
            TraditionalForm],
           TraditionalForm]}]], " ", 
        RowBox[{"(", 
         RowBox[{
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                RowBox[{"-", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "3"}],
                    SequenceForm["p", 3],
                    Editable->False],
                   TraditionalForm], ")"}]}], "-", 
                RowBox[{"2", " ", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "4"}],
                    SequenceForm["p", 4],
                    Editable->False],
                   TraditionalForm], ")"}]}], "-", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "5"}],
                  SequenceForm["p", 5],
                  Editable->False],
                 TraditionalForm]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "9"}],
               SequenceForm["Lor", 9],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "4"}],
                SequenceForm["Lor", 4],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "7"}],
                SequenceForm["Lor", 7],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}], "+", 
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                RowBox[{"-", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "3"}],
                    SequenceForm["p", 3],
                    Editable->False],
                   TraditionalForm], ")"}]}], "+", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "4"}],
                  SequenceForm["p", 4],
                  Editable->False],
                 TraditionalForm], "-", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "5"}],
                  SequenceForm["p", 5],
                  Editable->False],
                 TraditionalForm]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "7"}],
               SequenceForm["Lor", 7],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "4"}],
                SequenceForm["Lor", 4],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "9"}],
                SequenceForm["Lor", 9],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}], "+", 
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                RowBox[{"2", " ", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "3"}],
                    SequenceForm["p", 3],
                    Editable->False],
                   TraditionalForm], ")"}]}], "+", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "4"}],
                  SequenceForm["p", 4],
                  Editable->False],
                 TraditionalForm], "+", 
                RowBox[{"2", " ", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "5"}],
                    SequenceForm["p", 5],
                    Editable->False],
                   TraditionalForm], ")"}]}]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "4"}],
               SequenceForm["Lor", 4],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "7"}],
                SequenceForm["Lor", 7],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "9"}],
                SequenceForm["Lor", 9],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}]}], ")"}], " ", 
        SuperscriptBox["g", 
         RowBox[{
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "8"}],
             SequenceForm["Lor", 8],
             Editable->False],
            TraditionalForm],
           TraditionalForm], 
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "9"}],
             SequenceForm["Lor", 9],
             Editable->False],
            TraditionalForm],
           TraditionalForm]}]], " ", 
        RowBox[{
         FormBox["\<\"ep\"\>",
          TraditionalForm], "(", 
         RowBox[{
          RowBox[{"V", "(", 
           RowBox[{"5", ",", 
            RowBox[{"{", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "1"}],
               SequenceForm["Glu", 1],
               Editable->False],
              TraditionalForm], "}"}]}], ")"}], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "1"}],
            SequenceForm["p", 1],
            Editable->False],
           TraditionalForm], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "1"}],
            SequenceForm["Lor", 1],
            Editable->False],
           TraditionalForm]}], ")"}], " ", 
        RowBox[{
         FormBox["\<\"ep\"\>",
          TraditionalForm], "(", 
         RowBox[{
          RowBox[{"V", "(", 
           RowBox[{"5", ",", 
            RowBox[{"{", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "2"}],
               SequenceForm["Glu", 2],
               Editable->False],
              TraditionalForm], "}"}]}], ")"}], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "2"}],
            SequenceForm["p", 2],
            Editable->False],
           TraditionalForm], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "2"}],
            SequenceForm["Lor", 2],
            Editable->False],
           TraditionalForm]}], ")"}], " ", 
        RowBox[{
         FormBox["\<\"ep\"\>",
          TraditionalForm], "(", 
         RowBox[{
          RowBox[{"V", "(", 
           RowBox[{"5", ",", 
            RowBox[{"{", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "3"}],
               SequenceForm["Glu", 3],
               Editable->False],
              TraditionalForm], "}"}]}], ")"}], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "3"}],
            SequenceForm["p", 3],
            Editable->False],
           TraditionalForm], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "3"}],
            SequenceForm["Lor", 3],
            Editable->False],
           TraditionalForm]}], ")"}], " ", 
        RowBox[{
         FormBox["\<\"ep\"\>",
          TraditionalForm], "(", 
         RowBox[{
          RowBox[{"V", "(", 
           RowBox[{"5", ",", 
            RowBox[{"{", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "4"}],
               SequenceForm["Glu", 4],
               Editable->False],
              TraditionalForm], "}"}]}], ")"}], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "4"}],
            SequenceForm["p", 4],
            Editable->False],
           TraditionalForm], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "4"}],
            SequenceForm["Lor", 4],
            Editable->False],
           TraditionalForm]}], ")"}], " ", 
        RowBox[{
         FormBox["\<\"ep\"\>",
          TraditionalForm], "(", 
         RowBox[{
          RowBox[{"V", "(", 
           RowBox[{"5", ",", 
            RowBox[{"{", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "5"}],
               SequenceForm["Glu", 5],
               Editable->False],
              TraditionalForm], "}"}]}], ")"}], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "5"}],
            SequenceForm["p", 5],
            Editable->False],
           TraditionalForm], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "5"}],
            SequenceForm["Lor", 5],
            Editable->False],
           TraditionalForm]}], ")"}], " ", 
        FormBox[
         FractionBox["1", 
          SuperscriptBox[
           RowBox[{"(", 
            RowBox[{
             RowBox[{"-", 
              RowBox[{"(", 
               FormBox[
                InterpretationBox[
                 RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "3"}],
                 SequenceForm["p", 3],
                 Editable->False],
                TraditionalForm], ")"}]}], "-", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "4"}],
               SequenceForm["p", 4],
               Editable->False],
              TraditionalForm], "-", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "5"}],
               SequenceForm["p", 5],
               Editable->False],
              TraditionalForm]}], ")"}], "2"]],
         TraditionalForm], " ", 
        FormBox[
         FractionBox["1", 
          SuperscriptBox[
           RowBox[{"(", 
            RowBox[{
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "3"}],
               SequenceForm["p", 3],
               Editable->False],
              TraditionalForm], "+", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "5"}],
               SequenceForm["p", 5],
               Editable->False],
              TraditionalForm]}], ")"}], "2"]],
         TraditionalForm], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "6"}],
            SequenceForm["Glu", 6],
            Editable->False],
           TraditionalForm], ",", "8"}], ")"}], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "7"}],
            SequenceForm["Glu", 7],
            Editable->False],
           TraditionalForm], ",", "8"}], ")"}], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "1"}],
            SequenceForm["Glu", 1],
            Editable->False],
           TraditionalForm], ",", "8", ",", "External"}], ")"}], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "2"}],
            SequenceForm["Glu", 2],
            Editable->False],
           TraditionalForm], ",", "8", ",", "External"}], ")"}], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "3"}],
            SequenceForm["Glu", 3],
            Editable->False],
           TraditionalForm], ",", "8", ",", "External"}], ")"}], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "4"}],
            SequenceForm["Glu", 4],
            Editable->False],
           TraditionalForm], ",", "8", ",", "External"}], ")"}], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "5"}],
            SequenceForm["Glu", 5],
            Editable->False],
           TraditionalForm], ",", "8", ",", "External"}], ")"}], " ", 
        SubscriptBox["f", 
         RowBox[{
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "1"}],
             SequenceForm["Glu", 1],
             Editable->False],
            TraditionalForm],
           TraditionalForm], 
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "2"}],
             SequenceForm["Glu", 2],
             Editable->False],
            TraditionalForm],
           TraditionalForm], 
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "6"}],
             SequenceForm["Glu", 6],
             Editable->False],
            TraditionalForm],
           TraditionalForm]}]], " ", 
        SubscriptBox["f", 
         RowBox[{
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "3"}],
             SequenceForm["Glu", 3],
             Editable->False],
            TraditionalForm],
           TraditionalForm], 
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "5"}],
             SequenceForm["Glu", 5],
             Editable->False],
            TraditionalForm],
           TraditionalForm], 
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "7"}],
             SequenceForm["Glu", 7],
             Editable->False],
            TraditionalForm],
           TraditionalForm]}]], " ", 
        SubscriptBox["f", 
         RowBox[{
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "4"}],
             SequenceForm["Glu", 4],
             Editable->False],
            TraditionalForm],
           TraditionalForm], 
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "6"}],
             SequenceForm["Glu", 6],
             Editable->False],
            TraditionalForm],
           TraditionalForm], 
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "7"}],
             SequenceForm["Glu", 7],
             Editable->False],
            TraditionalForm],
           TraditionalForm]}]]}],
       TraditionalForm], ")"}], ",", 
     RowBox[{"\[Integral]", 
      RowBox[{
       StyleBox[
        RowBox[{
         SuperscriptBox["\[DifferentialD]", "D"], 
         FormBox[
          RowBox[{"GraphID", "(", 
           RowBox[{
            RowBox[{"Topology", "\[LongEqual]", "1"}], ",", 
            RowBox[{"Generic", "\[LongEqual]", "1"}], ",", 
            RowBox[{"Classes", "\[LongEqual]", "1"}], ",", 
            RowBox[{"Number", "\[LongEqual]", "13"}]}], ")"}],
          TraditionalForm]}],
        ZeroWidthTimes->True], "\[Integral]", 
       RowBox[{
        SuperscriptBox["\[DifferentialD]", "D"], 
        FormBox[
         RowBox[{"Integral", "[", "]"}],
         TraditionalForm]}]}], "(", 
      FormBox[
       RowBox[{"\[ImaginaryI]", " ", 
        SubsuperscriptBox["g", "s", "3"], " ", 
        RowBox[{"(", 
         RowBox[{
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                RowBox[{"-", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "1"}],
                    SequenceForm["p", 1],
                    Editable->False],
                   TraditionalForm], ")"}]}], "+", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "2"}],
                  SequenceForm["p", 2],
                  Editable->False],
                 TraditionalForm]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "6"}],
               SequenceForm["Lor", 6],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "1"}],
                SequenceForm["Lor", 1],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "2"}],
                SequenceForm["Lor", 2],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}], "+", 
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "1"}],
                  SequenceForm["p", 1],
                  Editable->False],
                 TraditionalForm], "-", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "3"}],
                  SequenceForm["p", 3],
                  Editable->False],
                 TraditionalForm], "-", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "4"}],
                  SequenceForm["p", 4],
                  Editable->False],
                 TraditionalForm], "-", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "5"}],
                  SequenceForm["p", 5],
                  Editable->False],
                 TraditionalForm]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "2"}],
               SequenceForm["Lor", 2],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "1"}],
                SequenceForm["Lor", 1],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "6"}],
                SequenceForm["Lor", 6],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}], "+", 
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                RowBox[{"-", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "2"}],
                    SequenceForm["p", 2],
                    Editable->False],
                   TraditionalForm], ")"}]}], "+", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "3"}],
                  SequenceForm["p", 3],
                  Editable->False],
                 TraditionalForm], "+", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "4"}],
                  SequenceForm["p", 4],
                  Editable->False],
                 TraditionalForm], "+", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "5"}],
                  SequenceForm["p", 5],
                  Editable->False],
                 TraditionalForm]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "1"}],
               SequenceForm["Lor", 1],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "2"}],
                SequenceForm["Lor", 2],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "6"}],
                SequenceForm["Lor", 6],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}]}], ")"}], " ", 
        RowBox[{"(", 
         RowBox[{
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                RowBox[{"-", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "4"}],
                    SequenceForm["p", 4],
                    Editable->False],
                   TraditionalForm], ")"}]}], "+", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "5"}],
                  SequenceForm["p", 5],
                  Editable->False],
                 TraditionalForm]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "9"}],
               SequenceForm["Lor", 9],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "4"}],
                SequenceForm["Lor", 4],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "5"}],
                SequenceForm["Lor", 5],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}], "+", 
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                RowBox[{"2", " ", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "4"}],
                    SequenceForm["p", 4],
                    Editable->False],
                   TraditionalForm], ")"}]}], "+", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "5"}],
                  SequenceForm["p", 5],
                  Editable->False],
                 TraditionalForm]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "5"}],
               SequenceForm["Lor", 5],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "4"}],
                SequenceForm["Lor", 4],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "9"}],
                SequenceForm["Lor", 9],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}], "+", 
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                RowBox[{"-", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "4"}],
                    SequenceForm["p", 4],
                    Editable->False],
                   TraditionalForm], ")"}]}], "-", 
                RowBox[{"2", " ", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "5"}],
                    SequenceForm["p", 5],
                    Editable->False],
                   TraditionalForm], ")"}]}]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "4"}],
               SequenceForm["Lor", 4],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "5"}],
                SequenceForm["Lor", 5],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "9"}],
                SequenceForm["Lor", 9],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}]}], ")"}], " ", 
        SuperscriptBox["g", 
         RowBox[{
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "6"}],
             SequenceForm["Lor", 6],
             Editable->False],
            TraditionalForm],
           TraditionalForm], 
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "7"}],
             SequenceForm["Lor", 7],
             Editable->False],
            TraditionalForm],
           TraditionalForm]}]], " ", 
        RowBox[{"(", 
         RowBox[{
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                RowBox[{
                 RowBox[{"-", "2"}], " ", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "3"}],
                    SequenceForm["p", 3],
                    Editable->False],
                   TraditionalForm], ")"}]}], "-", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "4"}],
                  SequenceForm["p", 4],
                  Editable->False],
                 TraditionalForm], "-", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "5"}],
                  SequenceForm["p", 5],
                  Editable->False],
                 TraditionalForm]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "8"}],
               SequenceForm["Lor", 8],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "3"}],
                SequenceForm["Lor", 3],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "7"}],
                SequenceForm["Lor", 7],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}], "+", 
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "3"}],
                  SequenceForm["p", 3],
                  Editable->False],
                 TraditionalForm], "-", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "4"}],
                  SequenceForm["p", 4],
                  Editable->False],
                 TraditionalForm], "-", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "5"}],
                  SequenceForm["p", 5],
                  Editable->False],
                 TraditionalForm]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "7"}],
               SequenceForm["Lor", 7],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "3"}],
                SequenceForm["Lor", 3],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "8"}],
                SequenceForm["Lor", 8],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}], "+", 
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "3"}],
                  SequenceForm["p", 3],
                  Editable->False],
                 TraditionalForm], "+", 
                RowBox[{"2", " ", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "4"}],
                    SequenceForm["p", 4],
                    Editable->False],
                   TraditionalForm], ")"}]}], "+", 
                RowBox[{"2", " ", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "5"}],
                    SequenceForm["p", 5],
                    Editable->False],
                   TraditionalForm], ")"}]}]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "3"}],
               SequenceForm["Lor", 3],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "7"}],
                SequenceForm["Lor", 7],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "8"}],
                SequenceForm["Lor", 8],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}]}], ")"}], " ", 
        SuperscriptBox["g", 
         RowBox[{
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "8"}],
             SequenceForm["Lor", 8],
             Editable->False],
            TraditionalForm],
           TraditionalForm], 
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "9"}],
             SequenceForm["Lor", 9],
             Editable->False],
            TraditionalForm],
           TraditionalForm]}]], " ", 
        RowBox[{
         FormBox["\<\"ep\"\>",
          TraditionalForm], "(", 
         RowBox[{
          RowBox[{"V", "(", 
           RowBox[{"5", ",", 
            RowBox[{"{", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "1"}],
               SequenceForm["Glu", 1],
               Editable->False],
              TraditionalForm], "}"}]}], ")"}], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "1"}],
            SequenceForm["p", 1],
            Editable->False],
           TraditionalForm], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "1"}],
            SequenceForm["Lor", 1],
            Editable->False],
           TraditionalForm]}], ")"}], " ", 
        RowBox[{
         FormBox["\<\"ep\"\>",
          TraditionalForm], "(", 
         RowBox[{
          RowBox[{"V", "(", 
           RowBox[{"5", ",", 
            RowBox[{"{", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "2"}],
               SequenceForm["Glu", 2],
               Editable->False],
              TraditionalForm], "}"}]}], ")"}], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "2"}],
            SequenceForm["p", 2],
            Editable->False],
           TraditionalForm], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "2"}],
            SequenceForm["Lor", 2],
            Editable->False],
           TraditionalForm]}], ")"}], " ", 
        RowBox[{
         FormBox["\<\"ep\"\>",
          TraditionalForm], "(", 
         RowBox[{
          RowBox[{"V", "(", 
           RowBox[{"5", ",", 
            RowBox[{"{", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "3"}],
               SequenceForm["Glu", 3],
               Editable->False],
              TraditionalForm], "}"}]}], ")"}], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "3"}],
            SequenceForm["p", 3],
            Editable->False],
           TraditionalForm], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "3"}],
            SequenceForm["Lor", 3],
            Editable->False],
           TraditionalForm]}], ")"}], " ", 
        RowBox[{
         FormBox["\<\"ep\"\>",
          TraditionalForm], "(", 
         RowBox[{
          RowBox[{"V", "(", 
           RowBox[{"5", ",", 
            RowBox[{"{", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "4"}],
               SequenceForm["Glu", 4],
               Editable->False],
              TraditionalForm], "}"}]}], ")"}], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "4"}],
            SequenceForm["p", 4],
            Editable->False],
           TraditionalForm], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "4"}],
            SequenceForm["Lor", 4],
            Editable->False],
           TraditionalForm]}], ")"}], " ", 
        RowBox[{
         FormBox["\<\"ep\"\>",
          TraditionalForm], "(", 
         RowBox[{
          RowBox[{"V", "(", 
           RowBox[{"5", ",", 
            RowBox[{"{", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "5"}],
               SequenceForm["Glu", 5],
               Editable->False],
              TraditionalForm], "}"}]}], ")"}], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "5"}],
            SequenceForm["p", 5],
            Editable->False],
           TraditionalForm], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "5"}],
            SequenceForm["Lor", 5],
            Editable->False],
           TraditionalForm]}], ")"}], " ", 
        FormBox[
         FractionBox["1", 
          SuperscriptBox[
           RowBox[{"(", 
            RowBox[{
             RowBox[{"-", 
              RowBox[{"(", 
               FormBox[
                InterpretationBox[
                 RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "4"}],
                 SequenceForm["p", 4],
                 Editable->False],
                TraditionalForm], ")"}]}], "-", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "5"}],
               SequenceForm["p", 5],
               Editable->False],
              TraditionalForm]}], ")"}], "2"]],
         TraditionalForm], " ", 
        FormBox[
         FractionBox["1", 
          SuperscriptBox[
           RowBox[{"(", 
            RowBox[{
             RowBox[{"-", 
              RowBox[{"(", 
               FormBox[
                InterpretationBox[
                 RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "3"}],
                 SequenceForm["p", 3],
                 Editable->False],
                TraditionalForm], ")"}]}], "-", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "4"}],
               SequenceForm["p", 4],
               Editable->False],
              TraditionalForm], "-", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "5"}],
               SequenceForm["p", 5],
               Editable->False],
              TraditionalForm]}], ")"}], "2"]],
         TraditionalForm], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "6"}],
            SequenceForm["Glu", 6],
            Editable->False],
           TraditionalForm], ",", "8"}], ")"}], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "7"}],
            SequenceForm["Glu", 7],
            Editable->False],
           TraditionalForm], ",", "8"}], ")"}], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "1"}],
            SequenceForm["Glu", 1],
            Editable->False],
           TraditionalForm], ",", "8", ",", "External"}], ")"}], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "2"}],
            SequenceForm["Glu", 2],
            Editable->False],
           TraditionalForm], ",", "8", ",", "External"}], ")"}], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "3"}],
            SequenceForm["Glu", 3],
            Editable->False],
           TraditionalForm], ",", "8", ",", "External"}], ")"}], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "4"}],
            SequenceForm["Glu", 4],
            Editable->False],
           TraditionalForm], ",", "8", ",", "External"}], ")"}], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "5"}],
            SequenceForm["Glu", 5],
            Editable->False],
           TraditionalForm], ",", "8", ",", "External"}], ")"}], " ", 
        SubscriptBox["f", 
         RowBox[{
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "1"}],
             SequenceForm["Glu", 1],
             Editable->False],
            TraditionalForm],
           TraditionalForm], 
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "2"}],
             SequenceForm["Glu", 2],
             Editable->False],
            TraditionalForm],
           TraditionalForm], 
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "6"}],
             SequenceForm["Glu", 6],
             Editable->False],
            TraditionalForm],
           TraditionalForm]}]], " ", 
        SubscriptBox["f", 
         RowBox[{
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "3"}],
             SequenceForm["Glu", 3],
             Editable->False],
            TraditionalForm],
           TraditionalForm], 
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "6"}],
             SequenceForm["Glu", 6],
             Editable->False],
            TraditionalForm],
           TraditionalForm], 
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "7"}],
             SequenceForm["Glu", 7],
             Editable->False],
            TraditionalForm],
           TraditionalForm]}]], " ", 
        SubscriptBox["f", 
         RowBox[{
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "4"}],
             SequenceForm["Glu", 4],
             Editable->False],
            TraditionalForm],
           TraditionalForm], 
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "5"}],
             SequenceForm["Glu", 5],
             Editable->False],
            TraditionalForm],
           TraditionalForm], 
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "7"}],
             SequenceForm["Glu", 7],
             Editable->False],
            TraditionalForm],
           TraditionalForm]}]]}],
       TraditionalForm], ")"}], ",", 
     RowBox[{"\[Integral]", 
      RowBox[{
       StyleBox[
        RowBox[{
         SuperscriptBox["\[DifferentialD]", "D"], 
         FormBox[
          RowBox[{"GraphID", "(", 
           RowBox[{
            RowBox[{"Topology", "\[LongEqual]", "1"}], ",", 
            RowBox[{"Generic", "\[LongEqual]", "1"}], ",", 
            RowBox[{"Classes", "\[LongEqual]", "1"}], ",", 
            RowBox[{"Number", "\[LongEqual]", "14"}]}], ")"}],
          TraditionalForm]}],
        ZeroWidthTimes->True], "\[Integral]", 
       RowBox[{
        SuperscriptBox["\[DifferentialD]", "D"], 
        FormBox[
         RowBox[{"Integral", "[", "]"}],
         TraditionalForm]}]}], "(", 
      FormBox[
       RowBox[{"\[ImaginaryI]", " ", 
        SubsuperscriptBox["g", "s", "3"], " ", 
        RowBox[{"(", 
         RowBox[{
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                RowBox[{"-", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "1"}],
                    SequenceForm["p", 1],
                    Editable->False],
                   TraditionalForm], ")"}]}], "+", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "3"}],
                  SequenceForm["p", 3],
                  Editable->False],
                 TraditionalForm]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "6"}],
               SequenceForm["Lor", 6],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "1"}],
                SequenceForm["Lor", 1],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "3"}],
                SequenceForm["Lor", 3],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}], "+", 
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "1"}],
                  SequenceForm["p", 1],
                  Editable->False],
                 TraditionalForm], "-", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "2"}],
                  SequenceForm["p", 2],
                  Editable->False],
                 TraditionalForm], "-", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "4"}],
                  SequenceForm["p", 4],
                  Editable->False],
                 TraditionalForm], "-", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "5"}],
                  SequenceForm["p", 5],
                  Editable->False],
                 TraditionalForm]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "3"}],
               SequenceForm["Lor", 3],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "1"}],
                SequenceForm["Lor", 1],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "6"}],
                SequenceForm["Lor", 6],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}], "+", 
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "2"}],
                  SequenceForm["p", 2],
                  Editable->False],
                 TraditionalForm], "-", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "3"}],
                  SequenceForm["p", 3],
                  Editable->False],
                 TraditionalForm], "+", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "4"}],
                  SequenceForm["p", 4],
                  Editable->False],
                 TraditionalForm], "+", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "5"}],
                  SequenceForm["p", 5],
                  Editable->False],
                 TraditionalForm]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "1"}],
               SequenceForm["Lor", 1],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "3"}],
                SequenceForm["Lor", 3],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "6"}],
                SequenceForm["Lor", 6],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}]}], ")"}], " ", 
        RowBox[{"(", 
         RowBox[{
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                RowBox[{"-", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "2"}],
                    SequenceForm["p", 2],
                    Editable->False],
                   TraditionalForm], ")"}]}], "+", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "4"}],
                  SequenceForm["p", 4],
                  Editable->False],
                 TraditionalForm]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "8"}],
               SequenceForm["Lor", 8],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "2"}],
                SequenceForm["Lor", 2],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "4"}],
                SequenceForm["Lor", 4],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}], "+", 
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                RowBox[{"2", " ", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "2"}],
                    SequenceForm["p", 2],
                    Editable->False],
                   TraditionalForm], ")"}]}], "+", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "4"}],
                  SequenceForm["p", 4],
                  Editable->False],
                 TraditionalForm]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "4"}],
               SequenceForm["Lor", 4],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "2"}],
                SequenceForm["Lor", 2],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "8"}],
                SequenceForm["Lor", 8],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}], "+", 
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                RowBox[{"-", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "2"}],
                    SequenceForm["p", 2],
                    Editable->False],
                   TraditionalForm], ")"}]}], "-", 
                RowBox[{"2", " ", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "4"}],
                    SequenceForm["p", 4],
                    Editable->False],
                   TraditionalForm], ")"}]}]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "2"}],
               SequenceForm["Lor", 2],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "4"}],
                SequenceForm["Lor", 4],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "8"}],
                SequenceForm["Lor", 8],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}]}], ")"}], " ", 
        SuperscriptBox["g", 
         RowBox[{
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "6"}],
             SequenceForm["Lor", 6],
             Editable->False],
            TraditionalForm],
           TraditionalForm], 
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "7"}],
             SequenceForm["Lor", 7],
             Editable->False],
            TraditionalForm],
           TraditionalForm]}]], " ", 
        RowBox[{"(", 
         RowBox[{
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                RowBox[{"-", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "2"}],
                    SequenceForm["p", 2],
                    Editable->False],
                   TraditionalForm], ")"}]}], "-", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "4"}],
                  SequenceForm["p", 4],
                  Editable->False],
                 TraditionalForm], "-", 
                RowBox[{"2", " ", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "5"}],
                    SequenceForm["p", 5],
                    Editable->False],
                   TraditionalForm], ")"}]}]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "9"}],
               SequenceForm["Lor", 9],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "5"}],
                SequenceForm["Lor", 5],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "7"}],
                SequenceForm["Lor", 7],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}], "+", 
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                RowBox[{"-", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "2"}],
                    SequenceForm["p", 2],
                    Editable->False],
                   TraditionalForm], ")"}]}], "-", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "4"}],
                  SequenceForm["p", 4],
                  Editable->False],
                 TraditionalForm], "+", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "5"}],
                  SequenceForm["p", 5],
                  Editable->False],
                 TraditionalForm]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "7"}],
               SequenceForm["Lor", 7],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "5"}],
                SequenceForm["Lor", 5],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "9"}],
                SequenceForm["Lor", 9],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}], "+", 
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                RowBox[{"2", " ", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "2"}],
                    SequenceForm["p", 2],
                    Editable->False],
                   TraditionalForm], ")"}]}], "+", 
                RowBox[{"2", " ", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "4"}],
                    SequenceForm["p", 4],
                    Editable->False],
                   TraditionalForm], ")"}]}], "+", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "5"}],
                  SequenceForm["p", 5],
                  Editable->False],
                 TraditionalForm]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "5"}],
               SequenceForm["Lor", 5],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "7"}],
                SequenceForm["Lor", 7],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "9"}],
                SequenceForm["Lor", 9],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}]}], ")"}], " ", 
        SuperscriptBox["g", 
         RowBox[{
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "8"}],
             SequenceForm["Lor", 8],
             Editable->False],
            TraditionalForm],
           TraditionalForm], 
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "9"}],
             SequenceForm["Lor", 9],
             Editable->False],
            TraditionalForm],
           TraditionalForm]}]], " ", 
        RowBox[{
         FormBox["\<\"ep\"\>",
          TraditionalForm], "(", 
         RowBox[{
          RowBox[{"V", "(", 
           RowBox[{"5", ",", 
            RowBox[{"{", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "1"}],
               SequenceForm["Glu", 1],
               Editable->False],
              TraditionalForm], "}"}]}], ")"}], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "1"}],
            SequenceForm["p", 1],
            Editable->False],
           TraditionalForm], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "1"}],
            SequenceForm["Lor", 1],
            Editable->False],
           TraditionalForm]}], ")"}], " ", 
        RowBox[{
         FormBox["\<\"ep\"\>",
          TraditionalForm], "(", 
         RowBox[{
          RowBox[{"V", "(", 
           RowBox[{"5", ",", 
            RowBox[{"{", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "2"}],
               SequenceForm["Glu", 2],
               Editable->False],
              TraditionalForm], "}"}]}], ")"}], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "2"}],
            SequenceForm["p", 2],
            Editable->False],
           TraditionalForm], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "2"}],
            SequenceForm["Lor", 2],
            Editable->False],
           TraditionalForm]}], ")"}], " ", 
        RowBox[{
         FormBox["\<\"ep\"\>",
          TraditionalForm], "(", 
         RowBox[{
          RowBox[{"V", "(", 
           RowBox[{"5", ",", 
            RowBox[{"{", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "3"}],
               SequenceForm["Glu", 3],
               Editable->False],
              TraditionalForm], "}"}]}], ")"}], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "3"}],
            SequenceForm["p", 3],
            Editable->False],
           TraditionalForm], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "3"}],
            SequenceForm["Lor", 3],
            Editable->False],
           TraditionalForm]}], ")"}], " ", 
        RowBox[{
         FormBox["\<\"ep\"\>",
          TraditionalForm], "(", 
         RowBox[{
          RowBox[{"V", "(", 
           RowBox[{"5", ",", 
            RowBox[{"{", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "4"}],
               SequenceForm["Glu", 4],
               Editable->False],
              TraditionalForm], "}"}]}], ")"}], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "4"}],
            SequenceForm["p", 4],
            Editable->False],
           TraditionalForm], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "4"}],
            SequenceForm["Lor", 4],
            Editable->False],
           TraditionalForm]}], ")"}], " ", 
        RowBox[{
         FormBox["\<\"ep\"\>",
          TraditionalForm], "(", 
         RowBox[{
          RowBox[{"V", "(", 
           RowBox[{"5", ",", 
            RowBox[{"{", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "5"}],
               SequenceForm["Glu", 5],
               Editable->False],
              TraditionalForm], "}"}]}], ")"}], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "5"}],
            SequenceForm["p", 5],
            Editable->False],
           TraditionalForm], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "5"}],
            SequenceForm["Lor", 5],
            Editable->False],
           TraditionalForm]}], ")"}], " ", 
        FormBox[
         FractionBox["1", 
          SuperscriptBox[
           RowBox[{"(", 
            RowBox[{
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "2"}],
               SequenceForm["p", 2],
               Editable->False],
              TraditionalForm], "+", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "4"}],
               SequenceForm["p", 4],
               Editable->False],
              TraditionalForm]}], ")"}], "2"]],
         TraditionalForm], " ", 
        FormBox[
         FractionBox["1", 
          SuperscriptBox[
           RowBox[{"(", 
            RowBox[{
             RowBox[{"-", 
              RowBox[{"(", 
               FormBox[
                InterpretationBox[
                 RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "2"}],
                 SequenceForm["p", 2],
                 Editable->False],
                TraditionalForm], ")"}]}], "-", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "4"}],
               SequenceForm["p", 4],
               Editable->False],
              TraditionalForm], "-", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "5"}],
               SequenceForm["p", 5],
               Editable->False],
              TraditionalForm]}], ")"}], "2"]],
         TraditionalForm], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "6"}],
            SequenceForm["Glu", 6],
            Editable->False],
           TraditionalForm], ",", "8"}], ")"}], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "7"}],
            SequenceForm["Glu", 7],
            Editable->False],
           TraditionalForm], ",", "8"}], ")"}], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "1"}],
            SequenceForm["Glu", 1],
            Editable->False],
           TraditionalForm], ",", "8", ",", "External"}], ")"}], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "2"}],
            SequenceForm["Glu", 2],
            Editable->False],
           TraditionalForm], ",", "8", ",", "External"}], ")"}], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "3"}],
            SequenceForm["Glu", 3],
            Editable->False],
           TraditionalForm], ",", "8", ",", "External"}], ")"}], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "4"}],
            SequenceForm["Glu", 4],
            Editable->False],
           TraditionalForm], ",", "8", ",", "External"}], ")"}], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "5"}],
            SequenceForm["Glu", 5],
            Editable->False],
           TraditionalForm], ",", "8", ",", "External"}], ")"}], " ", 
        SubscriptBox["f", 
         RowBox[{
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "1"}],
             SequenceForm["Glu", 1],
             Editable->False],
            TraditionalForm],
           TraditionalForm], 
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "3"}],
             SequenceForm["Glu", 3],
             Editable->False],
            TraditionalForm],
           TraditionalForm], 
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "6"}],
             SequenceForm["Glu", 6],
             Editable->False],
            TraditionalForm],
           TraditionalForm]}]], " ", 
        SubscriptBox["f", 
         RowBox[{
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "2"}],
             SequenceForm["Glu", 2],
             Editable->False],
            TraditionalForm],
           TraditionalForm], 
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "4"}],
             SequenceForm["Glu", 4],
             Editable->False],
            TraditionalForm],
           TraditionalForm], 
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "7"}],
             SequenceForm["Glu", 7],
             Editable->False],
            TraditionalForm],
           TraditionalForm]}]], " ", 
        SubscriptBox["f", 
         RowBox[{
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "5"}],
             SequenceForm["Glu", 5],
             Editable->False],
            TraditionalForm],
           TraditionalForm], 
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "6"}],
             SequenceForm["Glu", 6],
             Editable->False],
            TraditionalForm],
           TraditionalForm], 
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "7"}],
             SequenceForm["Glu", 7],
             Editable->False],
            TraditionalForm],
           TraditionalForm]}]]}],
       TraditionalForm], ")"}], ",", 
     RowBox[{"\[Integral]", 
      RowBox[{
       StyleBox[
        RowBox[{
         SuperscriptBox["\[DifferentialD]", "D"], 
         FormBox[
          RowBox[{"GraphID", "(", 
           RowBox[{
            RowBox[{"Topology", "\[LongEqual]", "1"}], ",", 
            RowBox[{"Generic", "\[LongEqual]", "1"}], ",", 
            RowBox[{"Classes", "\[LongEqual]", "1"}], ",", 
            RowBox[{"Number", "\[LongEqual]", "15"}]}], ")"}],
          TraditionalForm]}],
        ZeroWidthTimes->True], "\[Integral]", 
       RowBox[{
        SuperscriptBox["\[DifferentialD]", "D"], 
        FormBox[
         RowBox[{"Integral", "[", "]"}],
         TraditionalForm]}]}], "(", 
      FormBox[
       RowBox[{"\[ImaginaryI]", " ", 
        SubsuperscriptBox["g", "s", "3"], " ", 
        RowBox[{"(", 
         RowBox[{
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                RowBox[{"-", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "1"}],
                    SequenceForm["p", 1],
                    Editable->False],
                   TraditionalForm], ")"}]}], "+", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "3"}],
                  SequenceForm["p", 3],
                  Editable->False],
                 TraditionalForm]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "6"}],
               SequenceForm["Lor", 6],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "1"}],
                SequenceForm["Lor", 1],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "3"}],
                SequenceForm["Lor", 3],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}], "+", 
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "1"}],
                  SequenceForm["p", 1],
                  Editable->False],
                 TraditionalForm], "-", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "2"}],
                  SequenceForm["p", 2],
                  Editable->False],
                 TraditionalForm], "-", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "4"}],
                  SequenceForm["p", 4],
                  Editable->False],
                 TraditionalForm], "-", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "5"}],
                  SequenceForm["p", 5],
                  Editable->False],
                 TraditionalForm]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "3"}],
               SequenceForm["Lor", 3],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "1"}],
                SequenceForm["Lor", 1],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "6"}],
                SequenceForm["Lor", 6],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}], "+", 
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "2"}],
                  SequenceForm["p", 2],
                  Editable->False],
                 TraditionalForm], "-", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "3"}],
                  SequenceForm["p", 3],
                  Editable->False],
                 TraditionalForm], "+", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "4"}],
                  SequenceForm["p", 4],
                  Editable->False],
                 TraditionalForm], "+", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "5"}],
                  SequenceForm["p", 5],
                  Editable->False],
                 TraditionalForm]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "1"}],
               SequenceForm["Lor", 1],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "3"}],
                SequenceForm["Lor", 3],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "6"}],
                SequenceForm["Lor", 6],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}]}], ")"}], " ", 
        RowBox[{"(", 
         RowBox[{
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                RowBox[{"-", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "2"}],
                    SequenceForm["p", 2],
                    Editable->False],
                   TraditionalForm], ")"}]}], "+", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "5"}],
                  SequenceForm["p", 5],
                  Editable->False],
                 TraditionalForm]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "8"}],
               SequenceForm["Lor", 8],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "2"}],
                SequenceForm["Lor", 2],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "5"}],
                SequenceForm["Lor", 5],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}], "+", 
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                RowBox[{"2", " ", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "2"}],
                    SequenceForm["p", 2],
                    Editable->False],
                   TraditionalForm], ")"}]}], "+", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "5"}],
                  SequenceForm["p", 5],
                  Editable->False],
                 TraditionalForm]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "5"}],
               SequenceForm["Lor", 5],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "2"}],
                SequenceForm["Lor", 2],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "8"}],
                SequenceForm["Lor", 8],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}], "+", 
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                RowBox[{"-", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "2"}],
                    SequenceForm["p", 2],
                    Editable->False],
                   TraditionalForm], ")"}]}], "-", 
                RowBox[{"2", " ", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "5"}],
                    SequenceForm["p", 5],
                    Editable->False],
                   TraditionalForm], ")"}]}]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "2"}],
               SequenceForm["Lor", 2],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "5"}],
                SequenceForm["Lor", 5],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "8"}],
                SequenceForm["Lor", 8],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}]}], ")"}], " ", 
        SuperscriptBox["g", 
         RowBox[{
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "6"}],
             SequenceForm["Lor", 6],
             Editable->False],
            TraditionalForm],
           TraditionalForm], 
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "7"}],
             SequenceForm["Lor", 7],
             Editable->False],
            TraditionalForm],
           TraditionalForm]}]], " ", 
        RowBox[{"(", 
         RowBox[{
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                RowBox[{"-", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "2"}],
                    SequenceForm["p", 2],
                    Editable->False],
                   TraditionalForm], ")"}]}], "-", 
                RowBox[{"2", " ", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "4"}],
                    SequenceForm["p", 4],
                    Editable->False],
                   TraditionalForm], ")"}]}], "-", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "5"}],
                  SequenceForm["p", 5],
                  Editable->False],
                 TraditionalForm]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "9"}],
               SequenceForm["Lor", 9],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "4"}],
                SequenceForm["Lor", 4],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "7"}],
                SequenceForm["Lor", 7],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}], "+", 
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                RowBox[{"-", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "2"}],
                    SequenceForm["p", 2],
                    Editable->False],
                   TraditionalForm], ")"}]}], "+", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "4"}],
                  SequenceForm["p", 4],
                  Editable->False],
                 TraditionalForm], "-", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "5"}],
                  SequenceForm["p", 5],
                  Editable->False],
                 TraditionalForm]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "7"}],
               SequenceForm["Lor", 7],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "4"}],
                SequenceForm["Lor", 4],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "9"}],
                SequenceForm["Lor", 9],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}], "+", 
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                RowBox[{"2", " ", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "2"}],
                    SequenceForm["p", 2],
                    Editable->False],
                   TraditionalForm], ")"}]}], "+", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "4"}],
                  SequenceForm["p", 4],
                  Editable->False],
                 TraditionalForm], "+", 
                RowBox[{"2", " ", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "5"}],
                    SequenceForm["p", 5],
                    Editable->False],
                   TraditionalForm], ")"}]}]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "4"}],
               SequenceForm["Lor", 4],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "7"}],
                SequenceForm["Lor", 7],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "9"}],
                SequenceForm["Lor", 9],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}]}], ")"}], " ", 
        SuperscriptBox["g", 
         RowBox[{
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "8"}],
             SequenceForm["Lor", 8],
             Editable->False],
            TraditionalForm],
           TraditionalForm], 
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "9"}],
             SequenceForm["Lor", 9],
             Editable->False],
            TraditionalForm],
           TraditionalForm]}]], " ", 
        RowBox[{
         FormBox["\<\"ep\"\>",
          TraditionalForm], "(", 
         RowBox[{
          RowBox[{"V", "(", 
           RowBox[{"5", ",", 
            RowBox[{"{", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "1"}],
               SequenceForm["Glu", 1],
               Editable->False],
              TraditionalForm], "}"}]}], ")"}], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "1"}],
            SequenceForm["p", 1],
            Editable->False],
           TraditionalForm], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "1"}],
            SequenceForm["Lor", 1],
            Editable->False],
           TraditionalForm]}], ")"}], " ", 
        RowBox[{
         FormBox["\<\"ep\"\>",
          TraditionalForm], "(", 
         RowBox[{
          RowBox[{"V", "(", 
           RowBox[{"5", ",", 
            RowBox[{"{", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "2"}],
               SequenceForm["Glu", 2],
               Editable->False],
              TraditionalForm], "}"}]}], ")"}], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "2"}],
            SequenceForm["p", 2],
            Editable->False],
           TraditionalForm], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "2"}],
            SequenceForm["Lor", 2],
            Editable->False],
           TraditionalForm]}], ")"}], " ", 
        RowBox[{
         FormBox["\<\"ep\"\>",
          TraditionalForm], "(", 
         RowBox[{
          RowBox[{"V", "(", 
           RowBox[{"5", ",", 
            RowBox[{"{", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "3"}],
               SequenceForm["Glu", 3],
               Editable->False],
              TraditionalForm], "}"}]}], ")"}], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "3"}],
            SequenceForm["p", 3],
            Editable->False],
           TraditionalForm], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "3"}],
            SequenceForm["Lor", 3],
            Editable->False],
           TraditionalForm]}], ")"}], " ", 
        RowBox[{
         FormBox["\<\"ep\"\>",
          TraditionalForm], "(", 
         RowBox[{
          RowBox[{"V", "(", 
           RowBox[{"5", ",", 
            RowBox[{"{", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "4"}],
               SequenceForm["Glu", 4],
               Editable->False],
              TraditionalForm], "}"}]}], ")"}], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "4"}],
            SequenceForm["p", 4],
            Editable->False],
           TraditionalForm], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "4"}],
            SequenceForm["Lor", 4],
            Editable->False],
           TraditionalForm]}], ")"}], " ", 
        RowBox[{
         FormBox["\<\"ep\"\>",
          TraditionalForm], "(", 
         RowBox[{
          RowBox[{"V", "(", 
           RowBox[{"5", ",", 
            RowBox[{"{", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "5"}],
               SequenceForm["Glu", 5],
               Editable->False],
              TraditionalForm], "}"}]}], ")"}], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "5"}],
            SequenceForm["p", 5],
            Editable->False],
           TraditionalForm], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "5"}],
            SequenceForm["Lor", 5],
            Editable->False],
           TraditionalForm]}], ")"}], " ", 
        FormBox[
         FractionBox["1", 
          SuperscriptBox[
           RowBox[{"(", 
            RowBox[{
             RowBox[{"-", 
              RowBox[{"(", 
               FormBox[
                InterpretationBox[
                 RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "2"}],
                 SequenceForm["p", 2],
                 Editable->False],
                TraditionalForm], ")"}]}], "-", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "4"}],
               SequenceForm["p", 4],
               Editable->False],
              TraditionalForm], "-", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "5"}],
               SequenceForm["p", 5],
               Editable->False],
              TraditionalForm]}], ")"}], "2"]],
         TraditionalForm], " ", 
        FormBox[
         FractionBox["1", 
          SuperscriptBox[
           RowBox[{"(", 
            RowBox[{
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "2"}],
               SequenceForm["p", 2],
               Editable->False],
              TraditionalForm], "+", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "5"}],
               SequenceForm["p", 5],
               Editable->False],
              TraditionalForm]}], ")"}], "2"]],
         TraditionalForm], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "6"}],
            SequenceForm["Glu", 6],
            Editable->False],
           TraditionalForm], ",", "8"}], ")"}], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "7"}],
            SequenceForm["Glu", 7],
            Editable->False],
           TraditionalForm], ",", "8"}], ")"}], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "1"}],
            SequenceForm["Glu", 1],
            Editable->False],
           TraditionalForm], ",", "8", ",", "External"}], ")"}], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "2"}],
            SequenceForm["Glu", 2],
            Editable->False],
           TraditionalForm], ",", "8", ",", "External"}], ")"}], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "3"}],
            SequenceForm["Glu", 3],
            Editable->False],
           TraditionalForm], ",", "8", ",", "External"}], ")"}], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "4"}],
            SequenceForm["Glu", 4],
            Editable->False],
           TraditionalForm], ",", "8", ",", "External"}], ")"}], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "5"}],
            SequenceForm["Glu", 5],
            Editable->False],
           TraditionalForm], ",", "8", ",", "External"}], ")"}], " ", 
        SubscriptBox["f", 
         RowBox[{
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "1"}],
             SequenceForm["Glu", 1],
             Editable->False],
            TraditionalForm],
           TraditionalForm], 
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "3"}],
             SequenceForm["Glu", 3],
             Editable->False],
            TraditionalForm],
           TraditionalForm], 
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "6"}],
             SequenceForm["Glu", 6],
             Editable->False],
            TraditionalForm],
           TraditionalForm]}]], " ", 
        SubscriptBox["f", 
         RowBox[{
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "2"}],
             SequenceForm["Glu", 2],
             Editable->False],
            TraditionalForm],
           TraditionalForm], 
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "5"}],
             SequenceForm["Glu", 5],
             Editable->False],
            TraditionalForm],
           TraditionalForm], 
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "7"}],
             SequenceForm["Glu", 7],
             Editable->False],
            TraditionalForm],
           TraditionalForm]}]], " ", 
        SubscriptBox["f", 
         RowBox[{
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "4"}],
             SequenceForm["Glu", 4],
             Editable->False],
            TraditionalForm],
           TraditionalForm], 
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "6"}],
             SequenceForm["Glu", 6],
             Editable->False],
            TraditionalForm],
           TraditionalForm], 
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "7"}],
             SequenceForm["Glu", 7],
             Editable->False],
            TraditionalForm],
           TraditionalForm]}]]}],
       TraditionalForm], ")"}], ",", 
     RowBox[{"\[Integral]", 
      RowBox[{
       StyleBox[
        RowBox[{
         SuperscriptBox["\[DifferentialD]", "D"], 
         FormBox[
          RowBox[{"GraphID", "(", 
           RowBox[{
            RowBox[{"Topology", "\[LongEqual]", "1"}], ",", 
            RowBox[{"Generic", "\[LongEqual]", "1"}], ",", 
            RowBox[{"Classes", "\[LongEqual]", "1"}], ",", 
            RowBox[{"Number", "\[LongEqual]", "16"}]}], ")"}],
          TraditionalForm]}],
        ZeroWidthTimes->True], "\[Integral]", 
       RowBox[{
        SuperscriptBox["\[DifferentialD]", "D"], 
        FormBox[
         RowBox[{"Integral", "[", "]"}],
         TraditionalForm]}]}], "(", 
      FormBox[
       RowBox[{"\[ImaginaryI]", " ", 
        SubsuperscriptBox["g", "s", "3"], " ", 
        RowBox[{"(", 
         RowBox[{
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                RowBox[{"-", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "1"}],
                    SequenceForm["p", 1],
                    Editable->False],
                   TraditionalForm], ")"}]}], "+", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "3"}],
                  SequenceForm["p", 3],
                  Editable->False],
                 TraditionalForm]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "6"}],
               SequenceForm["Lor", 6],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "1"}],
                SequenceForm["Lor", 1],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "3"}],
                SequenceForm["Lor", 3],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}], "+", 
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "1"}],
                  SequenceForm["p", 1],
                  Editable->False],
                 TraditionalForm], "-", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "2"}],
                  SequenceForm["p", 2],
                  Editable->False],
                 TraditionalForm], "-", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "4"}],
                  SequenceForm["p", 4],
                  Editable->False],
                 TraditionalForm], "-", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "5"}],
                  SequenceForm["p", 5],
                  Editable->False],
                 TraditionalForm]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "3"}],
               SequenceForm["Lor", 3],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "1"}],
                SequenceForm["Lor", 1],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "6"}],
                SequenceForm["Lor", 6],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}], "+", 
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "2"}],
                  SequenceForm["p", 2],
                  Editable->False],
                 TraditionalForm], "-", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "3"}],
                  SequenceForm["p", 3],
                  Editable->False],
                 TraditionalForm], "+", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "4"}],
                  SequenceForm["p", 4],
                  Editable->False],
                 TraditionalForm], "+", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "5"}],
                  SequenceForm["p", 5],
                  Editable->False],
                 TraditionalForm]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "1"}],
               SequenceForm["Lor", 1],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "3"}],
                SequenceForm["Lor", 3],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "6"}],
                SequenceForm["Lor", 6],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}]}], ")"}], " ", 
        RowBox[{"(", 
         RowBox[{
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                RowBox[{"-", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "4"}],
                    SequenceForm["p", 4],
                    Editable->False],
                   TraditionalForm], ")"}]}], "+", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "5"}],
                  SequenceForm["p", 5],
                  Editable->False],
                 TraditionalForm]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "9"}],
               SequenceForm["Lor", 9],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "4"}],
                SequenceForm["Lor", 4],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "5"}],
                SequenceForm["Lor", 5],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}], "+", 
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                RowBox[{"2", " ", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "4"}],
                    SequenceForm["p", 4],
                    Editable->False],
                   TraditionalForm], ")"}]}], "+", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "5"}],
                  SequenceForm["p", 5],
                  Editable->False],
                 TraditionalForm]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "5"}],
               SequenceForm["Lor", 5],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "4"}],
                SequenceForm["Lor", 4],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "9"}],
                SequenceForm["Lor", 9],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}], "+", 
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                RowBox[{"-", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "4"}],
                    SequenceForm["p", 4],
                    Editable->False],
                   TraditionalForm], ")"}]}], "-", 
                RowBox[{"2", " ", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "5"}],
                    SequenceForm["p", 5],
                    Editable->False],
                   TraditionalForm], ")"}]}]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "4"}],
               SequenceForm["Lor", 4],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "5"}],
                SequenceForm["Lor", 5],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "9"}],
                SequenceForm["Lor", 9],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}]}], ")"}], " ", 
        SuperscriptBox["g", 
         RowBox[{
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "6"}],
             SequenceForm["Lor", 6],
             Editable->False],
            TraditionalForm],
           TraditionalForm], 
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "7"}],
             SequenceForm["Lor", 7],
             Editable->False],
            TraditionalForm],
           TraditionalForm]}]], " ", 
        RowBox[{"(", 
         RowBox[{
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                RowBox[{
                 RowBox[{"-", "2"}], " ", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "2"}],
                    SequenceForm["p", 2],
                    Editable->False],
                   TraditionalForm], ")"}]}], "-", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "4"}],
                  SequenceForm["p", 4],
                  Editable->False],
                 TraditionalForm], "-", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "5"}],
                  SequenceForm["p", 5],
                  Editable->False],
                 TraditionalForm]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "8"}],
               SequenceForm["Lor", 8],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "2"}],
                SequenceForm["Lor", 2],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "7"}],
                SequenceForm["Lor", 7],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}], "+", 
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "2"}],
                  SequenceForm["p", 2],
                  Editable->False],
                 TraditionalForm], "-", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "4"}],
                  SequenceForm["p", 4],
                  Editable->False],
                 TraditionalForm], "-", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "5"}],
                  SequenceForm["p", 5],
                  Editable->False],
                 TraditionalForm]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "7"}],
               SequenceForm["Lor", 7],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "2"}],
                SequenceForm["Lor", 2],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "8"}],
                SequenceForm["Lor", 8],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}], "+", 
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "2"}],
                  SequenceForm["p", 2],
                  Editable->False],
                 TraditionalForm], "+", 
                RowBox[{"2", " ", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "4"}],
                    SequenceForm["p", 4],
                    Editable->False],
                   TraditionalForm], ")"}]}], "+", 
                RowBox[{"2", " ", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "5"}],
                    SequenceForm["p", 5],
                    Editable->False],
                   TraditionalForm], ")"}]}]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "2"}],
               SequenceForm["Lor", 2],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "7"}],
                SequenceForm["Lor", 7],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "8"}],
                SequenceForm["Lor", 8],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}]}], ")"}], " ", 
        SuperscriptBox["g", 
         RowBox[{
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "8"}],
             SequenceForm["Lor", 8],
             Editable->False],
            TraditionalForm],
           TraditionalForm], 
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "9"}],
             SequenceForm["Lor", 9],
             Editable->False],
            TraditionalForm],
           TraditionalForm]}]], " ", 
        RowBox[{
         FormBox["\<\"ep\"\>",
          TraditionalForm], "(", 
         RowBox[{
          RowBox[{"V", "(", 
           RowBox[{"5", ",", 
            RowBox[{"{", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "1"}],
               SequenceForm["Glu", 1],
               Editable->False],
              TraditionalForm], "}"}]}], ")"}], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "1"}],
            SequenceForm["p", 1],
            Editable->False],
           TraditionalForm], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "1"}],
            SequenceForm["Lor", 1],
            Editable->False],
           TraditionalForm]}], ")"}], " ", 
        RowBox[{
         FormBox["\<\"ep\"\>",
          TraditionalForm], "(", 
         RowBox[{
          RowBox[{"V", "(", 
           RowBox[{"5", ",", 
            RowBox[{"{", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "2"}],
               SequenceForm["Glu", 2],
               Editable->False],
              TraditionalForm], "}"}]}], ")"}], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "2"}],
            SequenceForm["p", 2],
            Editable->False],
           TraditionalForm], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "2"}],
            SequenceForm["Lor", 2],
            Editable->False],
           TraditionalForm]}], ")"}], " ", 
        RowBox[{
         FormBox["\<\"ep\"\>",
          TraditionalForm], "(", 
         RowBox[{
          RowBox[{"V", "(", 
           RowBox[{"5", ",", 
            RowBox[{"{", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "3"}],
               SequenceForm["Glu", 3],
               Editable->False],
              TraditionalForm], "}"}]}], ")"}], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "3"}],
            SequenceForm["p", 3],
            Editable->False],
           TraditionalForm], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "3"}],
            SequenceForm["Lor", 3],
            Editable->False],
           TraditionalForm]}], ")"}], " ", 
        RowBox[{
         FormBox["\<\"ep\"\>",
          TraditionalForm], "(", 
         RowBox[{
          RowBox[{"V", "(", 
           RowBox[{"5", ",", 
            RowBox[{"{", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "4"}],
               SequenceForm["Glu", 4],
               Editable->False],
              TraditionalForm], "}"}]}], ")"}], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "4"}],
            SequenceForm["p", 4],
            Editable->False],
           TraditionalForm], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "4"}],
            SequenceForm["Lor", 4],
            Editable->False],
           TraditionalForm]}], ")"}], " ", 
        RowBox[{
         FormBox["\<\"ep\"\>",
          TraditionalForm], "(", 
         RowBox[{
          RowBox[{"V", "(", 
           RowBox[{"5", ",", 
            RowBox[{"{", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "5"}],
               SequenceForm["Glu", 5],
               Editable->False],
              TraditionalForm], "}"}]}], ")"}], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "5"}],
            SequenceForm["p", 5],
            Editable->False],
           TraditionalForm], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "5"}],
            SequenceForm["Lor", 5],
            Editable->False],
           TraditionalForm]}], ")"}], " ", 
        FormBox[
         FractionBox["1", 
          SuperscriptBox[
           RowBox[{"(", 
            RowBox[{
             RowBox[{"-", 
              RowBox[{"(", 
               FormBox[
                InterpretationBox[
                 RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "4"}],
                 SequenceForm["p", 4],
                 Editable->False],
                TraditionalForm], ")"}]}], "-", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "5"}],
               SequenceForm["p", 5],
               Editable->False],
              TraditionalForm]}], ")"}], "2"]],
         TraditionalForm], " ", 
        FormBox[
         FractionBox["1", 
          SuperscriptBox[
           RowBox[{"(", 
            RowBox[{
             RowBox[{"-", 
              RowBox[{"(", 
               FormBox[
                InterpretationBox[
                 RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "2"}],
                 SequenceForm["p", 2],
                 Editable->False],
                TraditionalForm], ")"}]}], "-", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "4"}],
               SequenceForm["p", 4],
               Editable->False],
              TraditionalForm], "-", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "5"}],
               SequenceForm["p", 5],
               Editable->False],
              TraditionalForm]}], ")"}], "2"]],
         TraditionalForm], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "6"}],
            SequenceForm["Glu", 6],
            Editable->False],
           TraditionalForm], ",", "8"}], ")"}], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "7"}],
            SequenceForm["Glu", 7],
            Editable->False],
           TraditionalForm], ",", "8"}], ")"}], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "1"}],
            SequenceForm["Glu", 1],
            Editable->False],
           TraditionalForm], ",", "8", ",", "External"}], ")"}], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "2"}],
            SequenceForm["Glu", 2],
            Editable->False],
           TraditionalForm], ",", "8", ",", "External"}], ")"}], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "3"}],
            SequenceForm["Glu", 3],
            Editable->False],
           TraditionalForm], ",", "8", ",", "External"}], ")"}], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "4"}],
            SequenceForm["Glu", 4],
            Editable->False],
           TraditionalForm], ",", "8", ",", "External"}], ")"}], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "5"}],
            SequenceForm["Glu", 5],
            Editable->False],
           TraditionalForm], ",", "8", ",", "External"}], ")"}], " ", 
        SubscriptBox["f", 
         RowBox[{
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "1"}],
             SequenceForm["Glu", 1],
             Editable->False],
            TraditionalForm],
           TraditionalForm], 
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "3"}],
             SequenceForm["Glu", 3],
             Editable->False],
            TraditionalForm],
           TraditionalForm], 
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "6"}],
             SequenceForm["Glu", 6],
             Editable->False],
            TraditionalForm],
           TraditionalForm]}]], " ", 
        SubscriptBox["f", 
         RowBox[{
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "2"}],
             SequenceForm["Glu", 2],
             Editable->False],
            TraditionalForm],
           TraditionalForm], 
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "6"}],
             SequenceForm["Glu", 6],
             Editable->False],
            TraditionalForm],
           TraditionalForm], 
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "7"}],
             SequenceForm["Glu", 7],
             Editable->False],
            TraditionalForm],
           TraditionalForm]}]], " ", 
        SubscriptBox["f", 
         RowBox[{
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "4"}],
             SequenceForm["Glu", 4],
             Editable->False],
            TraditionalForm],
           TraditionalForm], 
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "5"}],
             SequenceForm["Glu", 5],
             Editable->False],
            TraditionalForm],
           TraditionalForm], 
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "7"}],
             SequenceForm["Glu", 7],
             Editable->False],
            TraditionalForm],
           TraditionalForm]}]]}],
       TraditionalForm], ")"}], ",", 
     RowBox[{"\[Integral]", 
      RowBox[{
       StyleBox[
        RowBox[{
         SuperscriptBox["\[DifferentialD]", "D"], 
         FormBox[
          RowBox[{"GraphID", "(", 
           RowBox[{
            RowBox[{"Topology", "\[LongEqual]", "1"}], ",", 
            RowBox[{"Generic", "\[LongEqual]", "1"}], ",", 
            RowBox[{"Classes", "\[LongEqual]", "1"}], ",", 
            RowBox[{"Number", "\[LongEqual]", "17"}]}], ")"}],
          TraditionalForm]}],
        ZeroWidthTimes->True], "\[Integral]", 
       RowBox[{
        SuperscriptBox["\[DifferentialD]", "D"], 
        FormBox[
         RowBox[{"Integral", "[", "]"}],
         TraditionalForm]}]}], "(", 
      FormBox[
       RowBox[{"\[ImaginaryI]", " ", 
        SubsuperscriptBox["g", "s", "3"], " ", 
        RowBox[{"(", 
         RowBox[{
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                RowBox[{"-", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "2"}],
                    SequenceForm["p", 2],
                    Editable->False],
                   TraditionalForm], ")"}]}], "+", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "3"}],
                  SequenceForm["p", 3],
                  Editable->False],
                 TraditionalForm]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "8"}],
               SequenceForm["Lor", 8],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "2"}],
                SequenceForm["Lor", 2],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "3"}],
                SequenceForm["Lor", 3],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}], "+", 
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                RowBox[{"2", " ", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "2"}],
                    SequenceForm["p", 2],
                    Editable->False],
                   TraditionalForm], ")"}]}], "+", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "3"}],
                  SequenceForm["p", 3],
                  Editable->False],
                 TraditionalForm]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "3"}],
               SequenceForm["Lor", 3],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "2"}],
                SequenceForm["Lor", 2],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "8"}],
                SequenceForm["Lor", 8],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}], "+", 
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                RowBox[{"-", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "2"}],
                    SequenceForm["p", 2],
                    Editable->False],
                   TraditionalForm], ")"}]}], "-", 
                RowBox[{"2", " ", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "3"}],
                    SequenceForm["p", 3],
                    Editable->False],
                   TraditionalForm], ")"}]}]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "2"}],
               SequenceForm["Lor", 2],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "3"}],
                SequenceForm["Lor", 3],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "8"}],
                SequenceForm["Lor", 8],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}]}], ")"}], " ", 
        RowBox[{"(", 
         RowBox[{
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                RowBox[{"-", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "1"}],
                    SequenceForm["p", 1],
                    Editable->False],
                   TraditionalForm], ")"}]}], "+", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "4"}],
                  SequenceForm["p", 4],
                  Editable->False],
                 TraditionalForm]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "6"}],
               SequenceForm["Lor", 6],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "1"}],
                SequenceForm["Lor", 1],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "4"}],
                SequenceForm["Lor", 4],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}], "+", 
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "1"}],
                  SequenceForm["p", 1],
                  Editable->False],
                 TraditionalForm], "-", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "2"}],
                  SequenceForm["p", 2],
                  Editable->False],
                 TraditionalForm], "-", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "3"}],
                  SequenceForm["p", 3],
                  Editable->False],
                 TraditionalForm], "-", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "5"}],
                  SequenceForm["p", 5],
                  Editable->False],
                 TraditionalForm]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "4"}],
               SequenceForm["Lor", 4],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "1"}],
                SequenceForm["Lor", 1],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "6"}],
                SequenceForm["Lor", 6],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}], "+", 
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "2"}],
                  SequenceForm["p", 2],
                  Editable->False],
                 TraditionalForm], "+", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "3"}],
                  SequenceForm["p", 3],
                  Editable->False],
                 TraditionalForm], "-", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "4"}],
                  SequenceForm["p", 4],
                  Editable->False],
                 TraditionalForm], "+", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "5"}],
                  SequenceForm["p", 5],
                  Editable->False],
                 TraditionalForm]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "1"}],
               SequenceForm["Lor", 1],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "4"}],
                SequenceForm["Lor", 4],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "6"}],
                SequenceForm["Lor", 6],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}]}], ")"}], " ", 
        SuperscriptBox["g", 
         RowBox[{
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "6"}],
             SequenceForm["Lor", 6],
             Editable->False],
            TraditionalForm],
           TraditionalForm], 
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "7"}],
             SequenceForm["Lor", 7],
             Editable->False],
            TraditionalForm],
           TraditionalForm]}]], " ", 
        RowBox[{"(", 
         RowBox[{
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                RowBox[{"-", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "2"}],
                    SequenceForm["p", 2],
                    Editable->False],
                   TraditionalForm], ")"}]}], "-", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "3"}],
                  SequenceForm["p", 3],
                  Editable->False],
                 TraditionalForm], "-", 
                RowBox[{"2", " ", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "5"}],
                    SequenceForm["p", 5],
                    Editable->False],
                   TraditionalForm], ")"}]}]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "9"}],
               SequenceForm["Lor", 9],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "5"}],
                SequenceForm["Lor", 5],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "7"}],
                SequenceForm["Lor", 7],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}], "+", 
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                RowBox[{"-", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "2"}],
                    SequenceForm["p", 2],
                    Editable->False],
                   TraditionalForm], ")"}]}], "-", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "3"}],
                  SequenceForm["p", 3],
                  Editable->False],
                 TraditionalForm], "+", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "5"}],
                  SequenceForm["p", 5],
                  Editable->False],
                 TraditionalForm]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "7"}],
               SequenceForm["Lor", 7],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "5"}],
                SequenceForm["Lor", 5],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "9"}],
                SequenceForm["Lor", 9],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}], "+", 
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                RowBox[{"2", " ", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "2"}],
                    SequenceForm["p", 2],
                    Editable->False],
                   TraditionalForm], ")"}]}], "+", 
                RowBox[{"2", " ", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "3"}],
                    SequenceForm["p", 3],
                    Editable->False],
                   TraditionalForm], ")"}]}], "+", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "5"}],
                  SequenceForm["p", 5],
                  Editable->False],
                 TraditionalForm]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "5"}],
               SequenceForm["Lor", 5],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "7"}],
                SequenceForm["Lor", 7],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "9"}],
                SequenceForm["Lor", 9],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}]}], ")"}], " ", 
        SuperscriptBox["g", 
         RowBox[{
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "8"}],
             SequenceForm["Lor", 8],
             Editable->False],
            TraditionalForm],
           TraditionalForm], 
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "9"}],
             SequenceForm["Lor", 9],
             Editable->False],
            TraditionalForm],
           TraditionalForm]}]], " ", 
        RowBox[{
         FormBox["\<\"ep\"\>",
          TraditionalForm], "(", 
         RowBox[{
          RowBox[{"V", "(", 
           RowBox[{"5", ",", 
            RowBox[{"{", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "1"}],
               SequenceForm["Glu", 1],
               Editable->False],
              TraditionalForm], "}"}]}], ")"}], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "1"}],
            SequenceForm["p", 1],
            Editable->False],
           TraditionalForm], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "1"}],
            SequenceForm["Lor", 1],
            Editable->False],
           TraditionalForm]}], ")"}], " ", 
        RowBox[{
         FormBox["\<\"ep\"\>",
          TraditionalForm], "(", 
         RowBox[{
          RowBox[{"V", "(", 
           RowBox[{"5", ",", 
            RowBox[{"{", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "2"}],
               SequenceForm["Glu", 2],
               Editable->False],
              TraditionalForm], "}"}]}], ")"}], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "2"}],
            SequenceForm["p", 2],
            Editable->False],
           TraditionalForm], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "2"}],
            SequenceForm["Lor", 2],
            Editable->False],
           TraditionalForm]}], ")"}], " ", 
        RowBox[{
         FormBox["\<\"ep\"\>",
          TraditionalForm], "(", 
         RowBox[{
          RowBox[{"V", "(", 
           RowBox[{"5", ",", 
            RowBox[{"{", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "3"}],
               SequenceForm["Glu", 3],
               Editable->False],
              TraditionalForm], "}"}]}], ")"}], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "3"}],
            SequenceForm["p", 3],
            Editable->False],
           TraditionalForm], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "3"}],
            SequenceForm["Lor", 3],
            Editable->False],
           TraditionalForm]}], ")"}], " ", 
        RowBox[{
         FormBox["\<\"ep\"\>",
          TraditionalForm], "(", 
         RowBox[{
          RowBox[{"V", "(", 
           RowBox[{"5", ",", 
            RowBox[{"{", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "4"}],
               SequenceForm["Glu", 4],
               Editable->False],
              TraditionalForm], "}"}]}], ")"}], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "4"}],
            SequenceForm["p", 4],
            Editable->False],
           TraditionalForm], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "4"}],
            SequenceForm["Lor", 4],
            Editable->False],
           TraditionalForm]}], ")"}], " ", 
        RowBox[{
         FormBox["\<\"ep\"\>",
          TraditionalForm], "(", 
         RowBox[{
          RowBox[{"V", "(", 
           RowBox[{"5", ",", 
            RowBox[{"{", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "5"}],
               SequenceForm["Glu", 5],
               Editable->False],
              TraditionalForm], "}"}]}], ")"}], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "5"}],
            SequenceForm["p", 5],
            Editable->False],
           TraditionalForm], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "5"}],
            SequenceForm["Lor", 5],
            Editable->False],
           TraditionalForm]}], ")"}], " ", 
        FormBox[
         FractionBox["1", 
          SuperscriptBox[
           RowBox[{"(", 
            RowBox[{
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "2"}],
               SequenceForm["p", 2],
               Editable->False],
              TraditionalForm], "+", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "3"}],
               SequenceForm["p", 3],
               Editable->False],
              TraditionalForm]}], ")"}], "2"]],
         TraditionalForm], " ", 
        FormBox[
         FractionBox["1", 
          SuperscriptBox[
           RowBox[{"(", 
            RowBox[{
             RowBox[{"-", 
              RowBox[{"(", 
               FormBox[
                InterpretationBox[
                 RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "2"}],
                 SequenceForm["p", 2],
                 Editable->False],
                TraditionalForm], ")"}]}], "-", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "3"}],
               SequenceForm["p", 3],
               Editable->False],
              TraditionalForm], "-", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "5"}],
               SequenceForm["p", 5],
               Editable->False],
              TraditionalForm]}], ")"}], "2"]],
         TraditionalForm], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "6"}],
            SequenceForm["Glu", 6],
            Editable->False],
           TraditionalForm], ",", "8"}], ")"}], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "7"}],
            SequenceForm["Glu", 7],
            Editable->False],
           TraditionalForm], ",", "8"}], ")"}], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "1"}],
            SequenceForm["Glu", 1],
            Editable->False],
           TraditionalForm], ",", "8", ",", "External"}], ")"}], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "2"}],
            SequenceForm["Glu", 2],
            Editable->False],
           TraditionalForm], ",", "8", ",", "External"}], ")"}], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "3"}],
            SequenceForm["Glu", 3],
            Editable->False],
           TraditionalForm], ",", "8", ",", "External"}], ")"}], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "4"}],
            SequenceForm["Glu", 4],
            Editable->False],
           TraditionalForm], ",", "8", ",", "External"}], ")"}], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "5"}],
            SequenceForm["Glu", 5],
            Editable->False],
           TraditionalForm], ",", "8", ",", "External"}], ")"}], " ", 
        SubscriptBox["f", 
         RowBox[{
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "1"}],
             SequenceForm["Glu", 1],
             Editable->False],
            TraditionalForm],
           TraditionalForm], 
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "4"}],
             SequenceForm["Glu", 4],
             Editable->False],
            TraditionalForm],
           TraditionalForm], 
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "6"}],
             SequenceForm["Glu", 6],
             Editable->False],
            TraditionalForm],
           TraditionalForm]}]], " ", 
        SubscriptBox["f", 
         RowBox[{
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "2"}],
             SequenceForm["Glu", 2],
             Editable->False],
            TraditionalForm],
           TraditionalForm], 
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "3"}],
             SequenceForm["Glu", 3],
             Editable->False],
            TraditionalForm],
           TraditionalForm], 
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "7"}],
             SequenceForm["Glu", 7],
             Editable->False],
            TraditionalForm],
           TraditionalForm]}]], " ", 
        SubscriptBox["f", 
         RowBox[{
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "5"}],
             SequenceForm["Glu", 5],
             Editable->False],
            TraditionalForm],
           TraditionalForm], 
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "6"}],
             SequenceForm["Glu", 6],
             Editable->False],
            TraditionalForm],
           TraditionalForm], 
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "7"}],
             SequenceForm["Glu", 7],
             Editable->False],
            TraditionalForm],
           TraditionalForm]}]]}],
       TraditionalForm], ")"}], ",", 
     RowBox[{"\[Integral]", 
      RowBox[{
       StyleBox[
        RowBox[{
         SuperscriptBox["\[DifferentialD]", "D"], 
         FormBox[
          RowBox[{"GraphID", "(", 
           RowBox[{
            RowBox[{"Topology", "\[LongEqual]", "1"}], ",", 
            RowBox[{"Generic", "\[LongEqual]", "1"}], ",", 
            RowBox[{"Classes", "\[LongEqual]", "1"}], ",", 
            RowBox[{"Number", "\[LongEqual]", "18"}]}], ")"}],
          TraditionalForm]}],
        ZeroWidthTimes->True], "\[Integral]", 
       RowBox[{
        SuperscriptBox["\[DifferentialD]", "D"], 
        FormBox[
         RowBox[{"Integral", "[", "]"}],
         TraditionalForm]}]}], "(", 
      FormBox[
       RowBox[{"\[ImaginaryI]", " ", 
        SubsuperscriptBox["g", "s", "3"], " ", 
        RowBox[{"(", 
         RowBox[{
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                RowBox[{"-", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "2"}],
                    SequenceForm["p", 2],
                    Editable->False],
                   TraditionalForm], ")"}]}], "+", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "3"}],
                  SequenceForm["p", 3],
                  Editable->False],
                 TraditionalForm]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "8"}],
               SequenceForm["Lor", 8],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "2"}],
                SequenceForm["Lor", 2],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "3"}],
                SequenceForm["Lor", 3],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}], "+", 
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                RowBox[{"2", " ", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "2"}],
                    SequenceForm["p", 2],
                    Editable->False],
                   TraditionalForm], ")"}]}], "+", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "3"}],
                  SequenceForm["p", 3],
                  Editable->False],
                 TraditionalForm]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "3"}],
               SequenceForm["Lor", 3],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "2"}],
                SequenceForm["Lor", 2],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "8"}],
                SequenceForm["Lor", 8],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}], "+", 
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                RowBox[{"-", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "2"}],
                    SequenceForm["p", 2],
                    Editable->False],
                   TraditionalForm], ")"}]}], "-", 
                RowBox[{"2", " ", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "3"}],
                    SequenceForm["p", 3],
                    Editable->False],
                   TraditionalForm], ")"}]}]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "2"}],
               SequenceForm["Lor", 2],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "3"}],
                SequenceForm["Lor", 3],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "8"}],
                SequenceForm["Lor", 8],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}]}], ")"}], " ", 
        RowBox[{"(", 
         RowBox[{
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                RowBox[{"-", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "1"}],
                    SequenceForm["p", 1],
                    Editable->False],
                   TraditionalForm], ")"}]}], "+", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "5"}],
                  SequenceForm["p", 5],
                  Editable->False],
                 TraditionalForm]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "6"}],
               SequenceForm["Lor", 6],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "1"}],
                SequenceForm["Lor", 1],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "5"}],
                SequenceForm["Lor", 5],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}], "+", 
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "1"}],
                  SequenceForm["p", 1],
                  Editable->False],
                 TraditionalForm], "-", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "2"}],
                  SequenceForm["p", 2],
                  Editable->False],
                 TraditionalForm], "-", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "3"}],
                  SequenceForm["p", 3],
                  Editable->False],
                 TraditionalForm], "-", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "4"}],
                  SequenceForm["p", 4],
                  Editable->False],
                 TraditionalForm]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "5"}],
               SequenceForm["Lor", 5],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "1"}],
                SequenceForm["Lor", 1],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "6"}],
                SequenceForm["Lor", 6],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}], "+", 
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "2"}],
                  SequenceForm["p", 2],
                  Editable->False],
                 TraditionalForm], "+", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "3"}],
                  SequenceForm["p", 3],
                  Editable->False],
                 TraditionalForm], "+", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "4"}],
                  SequenceForm["p", 4],
                  Editable->False],
                 TraditionalForm], "-", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "5"}],
                  SequenceForm["p", 5],
                  Editable->False],
                 TraditionalForm]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "1"}],
               SequenceForm["Lor", 1],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "5"}],
                SequenceForm["Lor", 5],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "6"}],
                SequenceForm["Lor", 6],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}]}], ")"}], " ", 
        SuperscriptBox["g", 
         RowBox[{
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "6"}],
             SequenceForm["Lor", 6],
             Editable->False],
            TraditionalForm],
           TraditionalForm], 
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "7"}],
             SequenceForm["Lor", 7],
             Editable->False],
            TraditionalForm],
           TraditionalForm]}]], " ", 
        RowBox[{"(", 
         RowBox[{
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                RowBox[{"-", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "2"}],
                    SequenceForm["p", 2],
                    Editable->False],
                   TraditionalForm], ")"}]}], "-", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "3"}],
                  SequenceForm["p", 3],
                  Editable->False],
                 TraditionalForm], "-", 
                RowBox[{"2", " ", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "4"}],
                    SequenceForm["p", 4],
                    Editable->False],
                   TraditionalForm], ")"}]}]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "9"}],
               SequenceForm["Lor", 9],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "4"}],
                SequenceForm["Lor", 4],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "7"}],
                SequenceForm["Lor", 7],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}], "+", 
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                RowBox[{"-", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "2"}],
                    SequenceForm["p", 2],
                    Editable->False],
                   TraditionalForm], ")"}]}], "-", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "3"}],
                  SequenceForm["p", 3],
                  Editable->False],
                 TraditionalForm], "+", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "4"}],
                  SequenceForm["p", 4],
                  Editable->False],
                 TraditionalForm]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "7"}],
               SequenceForm["Lor", 7],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "4"}],
                SequenceForm["Lor", 4],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "9"}],
                SequenceForm["Lor", 9],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}], "+", 
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                RowBox[{"2", " ", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "2"}],
                    SequenceForm["p", 2],
                    Editable->False],
                   TraditionalForm], ")"}]}], "+", 
                RowBox[{"2", " ", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "3"}],
                    SequenceForm["p", 3],
                    Editable->False],
                   TraditionalForm], ")"}]}], "+", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "4"}],
                  SequenceForm["p", 4],
                  Editable->False],
                 TraditionalForm]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "4"}],
               SequenceForm["Lor", 4],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "7"}],
                SequenceForm["Lor", 7],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "9"}],
                SequenceForm["Lor", 9],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}]}], ")"}], " ", 
        SuperscriptBox["g", 
         RowBox[{
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "8"}],
             SequenceForm["Lor", 8],
             Editable->False],
            TraditionalForm],
           TraditionalForm], 
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "9"}],
             SequenceForm["Lor", 9],
             Editable->False],
            TraditionalForm],
           TraditionalForm]}]], " ", 
        RowBox[{
         FormBox["\<\"ep\"\>",
          TraditionalForm], "(", 
         RowBox[{
          RowBox[{"V", "(", 
           RowBox[{"5", ",", 
            RowBox[{"{", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "1"}],
               SequenceForm["Glu", 1],
               Editable->False],
              TraditionalForm], "}"}]}], ")"}], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "1"}],
            SequenceForm["p", 1],
            Editable->False],
           TraditionalForm], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "1"}],
            SequenceForm["Lor", 1],
            Editable->False],
           TraditionalForm]}], ")"}], " ", 
        RowBox[{
         FormBox["\<\"ep\"\>",
          TraditionalForm], "(", 
         RowBox[{
          RowBox[{"V", "(", 
           RowBox[{"5", ",", 
            RowBox[{"{", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "2"}],
               SequenceForm["Glu", 2],
               Editable->False],
              TraditionalForm], "}"}]}], ")"}], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "2"}],
            SequenceForm["p", 2],
            Editable->False],
           TraditionalForm], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "2"}],
            SequenceForm["Lor", 2],
            Editable->False],
           TraditionalForm]}], ")"}], " ", 
        RowBox[{
         FormBox["\<\"ep\"\>",
          TraditionalForm], "(", 
         RowBox[{
          RowBox[{"V", "(", 
           RowBox[{"5", ",", 
            RowBox[{"{", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "3"}],
               SequenceForm["Glu", 3],
               Editable->False],
              TraditionalForm], "}"}]}], ")"}], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "3"}],
            SequenceForm["p", 3],
            Editable->False],
           TraditionalForm], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "3"}],
            SequenceForm["Lor", 3],
            Editable->False],
           TraditionalForm]}], ")"}], " ", 
        RowBox[{
         FormBox["\<\"ep\"\>",
          TraditionalForm], "(", 
         RowBox[{
          RowBox[{"V", "(", 
           RowBox[{"5", ",", 
            RowBox[{"{", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "4"}],
               SequenceForm["Glu", 4],
               Editable->False],
              TraditionalForm], "}"}]}], ")"}], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "4"}],
            SequenceForm["p", 4],
            Editable->False],
           TraditionalForm], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "4"}],
            SequenceForm["Lor", 4],
            Editable->False],
           TraditionalForm]}], ")"}], " ", 
        RowBox[{
         FormBox["\<\"ep\"\>",
          TraditionalForm], "(", 
         RowBox[{
          RowBox[{"V", "(", 
           RowBox[{"5", ",", 
            RowBox[{"{", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "5"}],
               SequenceForm["Glu", 5],
               Editable->False],
              TraditionalForm], "}"}]}], ")"}], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "5"}],
            SequenceForm["p", 5],
            Editable->False],
           TraditionalForm], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "5"}],
            SequenceForm["Lor", 5],
            Editable->False],
           TraditionalForm]}], ")"}], " ", 
        FormBox[
         FractionBox["1", 
          SuperscriptBox[
           RowBox[{"(", 
            RowBox[{
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "2"}],
               SequenceForm["p", 2],
               Editable->False],
              TraditionalForm], "+", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "3"}],
               SequenceForm["p", 3],
               Editable->False],
              TraditionalForm]}], ")"}], "2"]],
         TraditionalForm], " ", 
        FormBox[
         FractionBox["1", 
          SuperscriptBox[
           RowBox[{"(", 
            RowBox[{
             RowBox[{"-", 
              RowBox[{"(", 
               FormBox[
                InterpretationBox[
                 RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "2"}],
                 SequenceForm["p", 2],
                 Editable->False],
                TraditionalForm], ")"}]}], "-", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "3"}],
               SequenceForm["p", 3],
               Editable->False],
              TraditionalForm], "-", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "4"}],
               SequenceForm["p", 4],
               Editable->False],
              TraditionalForm]}], ")"}], "2"]],
         TraditionalForm], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "6"}],
            SequenceForm["Glu", 6],
            Editable->False],
           TraditionalForm], ",", "8"}], ")"}], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "7"}],
            SequenceForm["Glu", 7],
            Editable->False],
           TraditionalForm], ",", "8"}], ")"}], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "1"}],
            SequenceForm["Glu", 1],
            Editable->False],
           TraditionalForm], ",", "8", ",", "External"}], ")"}], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "2"}],
            SequenceForm["Glu", 2],
            Editable->False],
           TraditionalForm], ",", "8", ",", "External"}], ")"}], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "3"}],
            SequenceForm["Glu", 3],
            Editable->False],
           TraditionalForm], ",", "8", ",", "External"}], ")"}], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "4"}],
            SequenceForm["Glu", 4],
            Editable->False],
           TraditionalForm], ",", "8", ",", "External"}], ")"}], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "5"}],
            SequenceForm["Glu", 5],
            Editable->False],
           TraditionalForm], ",", "8", ",", "External"}], ")"}], " ", 
        SubscriptBox["f", 
         RowBox[{
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "1"}],
             SequenceForm["Glu", 1],
             Editable->False],
            TraditionalForm],
           TraditionalForm], 
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "5"}],
             SequenceForm["Glu", 5],
             Editable->False],
            TraditionalForm],
           TraditionalForm], 
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "6"}],
             SequenceForm["Glu", 6],
             Editable->False],
            TraditionalForm],
           TraditionalForm]}]], " ", 
        SubscriptBox["f", 
         RowBox[{
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "2"}],
             SequenceForm["Glu", 2],
             Editable->False],
            TraditionalForm],
           TraditionalForm], 
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "3"}],
             SequenceForm["Glu", 3],
             Editable->False],
            TraditionalForm],
           TraditionalForm], 
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "7"}],
             SequenceForm["Glu", 7],
             Editable->False],
            TraditionalForm],
           TraditionalForm]}]], " ", 
        SubscriptBox["f", 
         RowBox[{
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "4"}],
             SequenceForm["Glu", 4],
             Editable->False],
            TraditionalForm],
           TraditionalForm], 
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "6"}],
             SequenceForm["Glu", 6],
             Editable->False],
            TraditionalForm],
           TraditionalForm], 
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "7"}],
             SequenceForm["Glu", 7],
             Editable->False],
            TraditionalForm],
           TraditionalForm]}]]}],
       TraditionalForm], ")"}], ",", 
     RowBox[{"\[Integral]", 
      RowBox[{
       StyleBox[
        RowBox[{
         SuperscriptBox["\[DifferentialD]", "D"], 
         FormBox[
          RowBox[{"GraphID", "(", 
           RowBox[{
            RowBox[{"Topology", "\[LongEqual]", "1"}], ",", 
            RowBox[{"Generic", "\[LongEqual]", "1"}], ",", 
            RowBox[{"Classes", "\[LongEqual]", "1"}], ",", 
            RowBox[{"Number", "\[LongEqual]", "19"}]}], ")"}],
          TraditionalForm]}],
        ZeroWidthTimes->True], "\[Integral]", 
       RowBox[{
        SuperscriptBox["\[DifferentialD]", "D"], 
        FormBox[
         RowBox[{"Integral", "[", "]"}],
         TraditionalForm]}]}], "(", 
      FormBox[
       RowBox[{"\[ImaginaryI]", " ", 
        SubsuperscriptBox["g", "s", "3"], " ", 
        RowBox[{"(", 
         RowBox[{
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                RowBox[{"-", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "2"}],
                    SequenceForm["p", 2],
                    Editable->False],
                   TraditionalForm], ")"}]}], "+", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "3"}],
                  SequenceForm["p", 3],
                  Editable->False],
                 TraditionalForm]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "7"}],
               SequenceForm["Lor", 7],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "2"}],
                SequenceForm["Lor", 2],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "3"}],
                SequenceForm["Lor", 3],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}], "+", 
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                RowBox[{"2", " ", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "2"}],
                    SequenceForm["p", 2],
                    Editable->False],
                   TraditionalForm], ")"}]}], "+", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "3"}],
                  SequenceForm["p", 3],
                  Editable->False],
                 TraditionalForm]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "3"}],
               SequenceForm["Lor", 3],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "2"}],
                SequenceForm["Lor", 2],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "7"}],
                SequenceForm["Lor", 7],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}], "+", 
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                RowBox[{"-", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "2"}],
                    SequenceForm["p", 2],
                    Editable->False],
                   TraditionalForm], ")"}]}], "-", 
                RowBox[{"2", " ", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "3"}],
                    SequenceForm["p", 3],
                    Editable->False],
                   TraditionalForm], ")"}]}]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "2"}],
               SequenceForm["Lor", 2],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "3"}],
                SequenceForm["Lor", 3],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "7"}],
                SequenceForm["Lor", 7],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}]}], ")"}], " ", 
        RowBox[{"(", 
         RowBox[{
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                RowBox[{"-", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "4"}],
                    SequenceForm["p", 4],
                    Editable->False],
                   TraditionalForm], ")"}]}], "+", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "5"}],
                  SequenceForm["p", 5],
                  Editable->False],
                 TraditionalForm]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "9"}],
               SequenceForm["Lor", 9],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "4"}],
                SequenceForm["Lor", 4],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "5"}],
                SequenceForm["Lor", 5],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}], "+", 
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                RowBox[{"2", " ", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "4"}],
                    SequenceForm["p", 4],
                    Editable->False],
                   TraditionalForm], ")"}]}], "+", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "5"}],
                  SequenceForm["p", 5],
                  Editable->False],
                 TraditionalForm]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "5"}],
               SequenceForm["Lor", 5],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "4"}],
                SequenceForm["Lor", 4],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "9"}],
                SequenceForm["Lor", 9],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}], "+", 
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                RowBox[{"-", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "4"}],
                    SequenceForm["p", 4],
                    Editable->False],
                   TraditionalForm], ")"}]}], "-", 
                RowBox[{"2", " ", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "5"}],
                    SequenceForm["p", 5],
                    Editable->False],
                   TraditionalForm], ")"}]}]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "4"}],
               SequenceForm["Lor", 4],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "5"}],
                SequenceForm["Lor", 5],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "9"}],
                SequenceForm["Lor", 9],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}]}], ")"}], " ", 
        SuperscriptBox["g", 
         RowBox[{
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "6"}],
             SequenceForm["Lor", 6],
             Editable->False],
            TraditionalForm],
           TraditionalForm], 
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "7"}],
             SequenceForm["Lor", 7],
             Editable->False],
            TraditionalForm],
           TraditionalForm]}]], " ", 
        RowBox[{"(", 
         RowBox[{
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                RowBox[{"-", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "1"}],
                    SequenceForm["p", 1],
                    Editable->False],
                   TraditionalForm], ")"}]}], "+", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "2"}],
                  SequenceForm["p", 2],
                  Editable->False],
                 TraditionalForm], "+", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "3"}],
                  SequenceForm["p", 3],
                  Editable->False],
                 TraditionalForm]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "8"}],
               SequenceForm["Lor", 8],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "1"}],
                SequenceForm["Lor", 1],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "6"}],
                SequenceForm["Lor", 6],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}], "+", 
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "1"}],
                  SequenceForm["p", 1],
                  Editable->False],
                 TraditionalForm], "-", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "4"}],
                  SequenceForm["p", 4],
                  Editable->False],
                 TraditionalForm], "-", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "5"}],
                  SequenceForm["p", 5],
                  Editable->False],
                 TraditionalForm]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "6"}],
               SequenceForm["Lor", 6],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "1"}],
                SequenceForm["Lor", 1],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "8"}],
                SequenceForm["Lor", 8],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}], "+", 
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                RowBox[{"-", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "2"}],
                    SequenceForm["p", 2],
                    Editable->False],
                   TraditionalForm], ")"}]}], "-", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "3"}],
                  SequenceForm["p", 3],
                  Editable->False],
                 TraditionalForm], "+", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "4"}],
                  SequenceForm["p", 4],
                  Editable->False],
                 TraditionalForm], "+", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "5"}],
                  SequenceForm["p", 5],
                  Editable->False],
                 TraditionalForm]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "1"}],
               SequenceForm["Lor", 1],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "6"}],
                SequenceForm["Lor", 6],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "8"}],
                SequenceForm["Lor", 8],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}]}], ")"}], " ", 
        SuperscriptBox["g", 
         RowBox[{
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "8"}],
             SequenceForm["Lor", 8],
             Editable->False],
            TraditionalForm],
           TraditionalForm], 
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "9"}],
             SequenceForm["Lor", 9],
             Editable->False],
            TraditionalForm],
           TraditionalForm]}]], " ", 
        RowBox[{
         FormBox["\<\"ep\"\>",
          TraditionalForm], "(", 
         RowBox[{
          RowBox[{"V", "(", 
           RowBox[{"5", ",", 
            RowBox[{"{", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "1"}],
               SequenceForm["Glu", 1],
               Editable->False],
              TraditionalForm], "}"}]}], ")"}], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "1"}],
            SequenceForm["p", 1],
            Editable->False],
           TraditionalForm], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "1"}],
            SequenceForm["Lor", 1],
            Editable->False],
           TraditionalForm]}], ")"}], " ", 
        RowBox[{
         FormBox["\<\"ep\"\>",
          TraditionalForm], "(", 
         RowBox[{
          RowBox[{"V", "(", 
           RowBox[{"5", ",", 
            RowBox[{"{", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "2"}],
               SequenceForm["Glu", 2],
               Editable->False],
              TraditionalForm], "}"}]}], ")"}], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "2"}],
            SequenceForm["p", 2],
            Editable->False],
           TraditionalForm], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "2"}],
            SequenceForm["Lor", 2],
            Editable->False],
           TraditionalForm]}], ")"}], " ", 
        RowBox[{
         FormBox["\<\"ep\"\>",
          TraditionalForm], "(", 
         RowBox[{
          RowBox[{"V", "(", 
           RowBox[{"5", ",", 
            RowBox[{"{", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "3"}],
               SequenceForm["Glu", 3],
               Editable->False],
              TraditionalForm], "}"}]}], ")"}], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "3"}],
            SequenceForm["p", 3],
            Editable->False],
           TraditionalForm], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "3"}],
            SequenceForm["Lor", 3],
            Editable->False],
           TraditionalForm]}], ")"}], " ", 
        RowBox[{
         FormBox["\<\"ep\"\>",
          TraditionalForm], "(", 
         RowBox[{
          RowBox[{"V", "(", 
           RowBox[{"5", ",", 
            RowBox[{"{", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "4"}],
               SequenceForm["Glu", 4],
               Editable->False],
              TraditionalForm], "}"}]}], ")"}], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "4"}],
            SequenceForm["p", 4],
            Editable->False],
           TraditionalForm], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "4"}],
            SequenceForm["Lor", 4],
            Editable->False],
           TraditionalForm]}], ")"}], " ", 
        RowBox[{
         FormBox["\<\"ep\"\>",
          TraditionalForm], "(", 
         RowBox[{
          RowBox[{"V", "(", 
           RowBox[{"5", ",", 
            RowBox[{"{", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "5"}],
               SequenceForm["Glu", 5],
               Editable->False],
              TraditionalForm], "}"}]}], ")"}], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "5"}],
            SequenceForm["p", 5],
            Editable->False],
           TraditionalForm], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "5"}],
            SequenceForm["Lor", 5],
            Editable->False],
           TraditionalForm]}], ")"}], " ", 
        FormBox[
         FractionBox["1", 
          SuperscriptBox[
           RowBox[{"(", 
            RowBox[{
             RowBox[{"-", 
              RowBox[{"(", 
               FormBox[
                InterpretationBox[
                 RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "2"}],
                 SequenceForm["p", 2],
                 Editable->False],
                TraditionalForm], ")"}]}], "-", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "3"}],
               SequenceForm["p", 3],
               Editable->False],
              TraditionalForm]}], ")"}], "2"]],
         TraditionalForm], " ", 
        FormBox[
         FractionBox["1", 
          SuperscriptBox[
           RowBox[{"(", 
            RowBox[{
             RowBox[{"-", 
              RowBox[{"(", 
               FormBox[
                InterpretationBox[
                 RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "4"}],
                 SequenceForm["p", 4],
                 Editable->False],
                TraditionalForm], ")"}]}], "-", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "5"}],
               SequenceForm["p", 5],
               Editable->False],
              TraditionalForm]}], ")"}], "2"]],
         TraditionalForm], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "6"}],
            SequenceForm["Glu", 6],
            Editable->False],
           TraditionalForm], ",", "8"}], ")"}], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "7"}],
            SequenceForm["Glu", 7],
            Editable->False],
           TraditionalForm], ",", "8"}], ")"}], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "1"}],
            SequenceForm["Glu", 1],
            Editable->False],
           TraditionalForm], ",", "8", ",", "External"}], ")"}], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "2"}],
            SequenceForm["Glu", 2],
            Editable->False],
           TraditionalForm], ",", "8", ",", "External"}], ")"}], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "3"}],
            SequenceForm["Glu", 3],
            Editable->False],
           TraditionalForm], ",", "8", ",", "External"}], ")"}], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "4"}],
            SequenceForm["Glu", 4],
            Editable->False],
           TraditionalForm], ",", "8", ",", "External"}], ")"}], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "5"}],
            SequenceForm["Glu", 5],
            Editable->False],
           TraditionalForm], ",", "8", ",", "External"}], ")"}], " ", 
        SubscriptBox["f", 
         RowBox[{
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "1"}],
             SequenceForm["Glu", 1],
             Editable->False],
            TraditionalForm],
           TraditionalForm], 
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "6"}],
             SequenceForm["Glu", 6],
             Editable->False],
            TraditionalForm],
           TraditionalForm], 
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "7"}],
             SequenceForm["Glu", 7],
             Editable->False],
            TraditionalForm],
           TraditionalForm]}]], " ", 
        SubscriptBox["f", 
         RowBox[{
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "2"}],
             SequenceForm["Glu", 2],
             Editable->False],
            TraditionalForm],
           TraditionalForm], 
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "3"}],
             SequenceForm["Glu", 3],
             Editable->False],
            TraditionalForm],
           TraditionalForm], 
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "6"}],
             SequenceForm["Glu", 6],
             Editable->False],
            TraditionalForm],
           TraditionalForm]}]], " ", 
        SubscriptBox["f", 
         RowBox[{
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "4"}],
             SequenceForm["Glu", 4],
             Editable->False],
            TraditionalForm],
           TraditionalForm], 
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "5"}],
             SequenceForm["Glu", 5],
             Editable->False],
            TraditionalForm],
           TraditionalForm], 
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "7"}],
             SequenceForm["Glu", 7],
             Editable->False],
            TraditionalForm],
           TraditionalForm]}]]}],
       TraditionalForm], ")"}], ",", 
     RowBox[{"\[Integral]", 
      RowBox[{
       StyleBox[
        RowBox[{
         SuperscriptBox["\[DifferentialD]", "D"], 
         FormBox[
          RowBox[{"GraphID", "(", 
           RowBox[{
            RowBox[{"Topology", "\[LongEqual]", "1"}], ",", 
            RowBox[{"Generic", "\[LongEqual]", "1"}], ",", 
            RowBox[{"Classes", "\[LongEqual]", "1"}], ",", 
            RowBox[{"Number", "\[LongEqual]", "20"}]}], ")"}],
          TraditionalForm]}],
        ZeroWidthTimes->True], "\[Integral]", 
       RowBox[{
        SuperscriptBox["\[DifferentialD]", "D"], 
        FormBox[
         RowBox[{"Integral", "[", "]"}],
         TraditionalForm]}]}], "(", 
      FormBox[
       RowBox[{"\[ImaginaryI]", " ", 
        SubsuperscriptBox["g", "s", "3"], " ", 
        RowBox[{"(", 
         RowBox[{
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                RowBox[{"-", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "1"}],
                    SequenceForm["p", 1],
                    Editable->False],
                   TraditionalForm], ")"}]}], "+", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "4"}],
                  SequenceForm["p", 4],
                  Editable->False],
                 TraditionalForm]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "6"}],
               SequenceForm["Lor", 6],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "1"}],
                SequenceForm["Lor", 1],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "4"}],
                SequenceForm["Lor", 4],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}], "+", 
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "1"}],
                  SequenceForm["p", 1],
                  Editable->False],
                 TraditionalForm], "-", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "2"}],
                  SequenceForm["p", 2],
                  Editable->False],
                 TraditionalForm], "-", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "3"}],
                  SequenceForm["p", 3],
                  Editable->False],
                 TraditionalForm], "-", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "5"}],
                  SequenceForm["p", 5],
                  Editable->False],
                 TraditionalForm]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "4"}],
               SequenceForm["Lor", 4],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "1"}],
                SequenceForm["Lor", 1],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "6"}],
                SequenceForm["Lor", 6],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}], "+", 
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "2"}],
                  SequenceForm["p", 2],
                  Editable->False],
                 TraditionalForm], "+", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "3"}],
                  SequenceForm["p", 3],
                  Editable->False],
                 TraditionalForm], "-", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "4"}],
                  SequenceForm["p", 4],
                  Editable->False],
                 TraditionalForm], "+", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "5"}],
                  SequenceForm["p", 5],
                  Editable->False],
                 TraditionalForm]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "1"}],
               SequenceForm["Lor", 1],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "4"}],
                SequenceForm["Lor", 4],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "6"}],
                SequenceForm["Lor", 6],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}]}], ")"}], " ", 
        RowBox[{"(", 
         RowBox[{
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                RowBox[{"-", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "2"}],
                    SequenceForm["p", 2],
                    Editable->False],
                   TraditionalForm], ")"}]}], "+", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "5"}],
                  SequenceForm["p", 5],
                  Editable->False],
                 TraditionalForm]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "8"}],
               SequenceForm["Lor", 8],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "2"}],
                SequenceForm["Lor", 2],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "5"}],
                SequenceForm["Lor", 5],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}], "+", 
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                RowBox[{"2", " ", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "2"}],
                    SequenceForm["p", 2],
                    Editable->False],
                   TraditionalForm], ")"}]}], "+", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "5"}],
                  SequenceForm["p", 5],
                  Editable->False],
                 TraditionalForm]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "5"}],
               SequenceForm["Lor", 5],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "2"}],
                SequenceForm["Lor", 2],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "8"}],
                SequenceForm["Lor", 8],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}], "+", 
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                RowBox[{"-", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "2"}],
                    SequenceForm["p", 2],
                    Editable->False],
                   TraditionalForm], ")"}]}], "-", 
                RowBox[{"2", " ", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "5"}],
                    SequenceForm["p", 5],
                    Editable->False],
                   TraditionalForm], ")"}]}]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "2"}],
               SequenceForm["Lor", 2],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "5"}],
                SequenceForm["Lor", 5],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "8"}],
                SequenceForm["Lor", 8],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}]}], ")"}], " ", 
        SuperscriptBox["g", 
         RowBox[{
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "6"}],
             SequenceForm["Lor", 6],
             Editable->False],
            TraditionalForm],
           TraditionalForm], 
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "7"}],
             SequenceForm["Lor", 7],
             Editable->False],
            TraditionalForm],
           TraditionalForm]}]], " ", 
        RowBox[{"(", 
         RowBox[{
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                RowBox[{"-", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "2"}],
                    SequenceForm["p", 2],
                    Editable->False],
                   TraditionalForm], ")"}]}], "-", 
                RowBox[{"2", " ", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "3"}],
                    SequenceForm["p", 3],
                    Editable->False],
                   TraditionalForm], ")"}]}], "-", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "5"}],
                  SequenceForm["p", 5],
                  Editable->False],
                 TraditionalForm]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "9"}],
               SequenceForm["Lor", 9],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "3"}],
                SequenceForm["Lor", 3],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "7"}],
                SequenceForm["Lor", 7],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}], "+", 
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                RowBox[{"-", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "2"}],
                    SequenceForm["p", 2],
                    Editable->False],
                   TraditionalForm], ")"}]}], "+", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "3"}],
                  SequenceForm["p", 3],
                  Editable->False],
                 TraditionalForm], "-", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "5"}],
                  SequenceForm["p", 5],
                  Editable->False],
                 TraditionalForm]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "7"}],
               SequenceForm["Lor", 7],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "3"}],
                SequenceForm["Lor", 3],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "9"}],
                SequenceForm["Lor", 9],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}], "+", 
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                RowBox[{"2", " ", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "2"}],
                    SequenceForm["p", 2],
                    Editable->False],
                   TraditionalForm], ")"}]}], "+", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "3"}],
                  SequenceForm["p", 3],
                  Editable->False],
                 TraditionalForm], "+", 
                RowBox[{"2", " ", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "5"}],
                    SequenceForm["p", 5],
                    Editable->False],
                   TraditionalForm], ")"}]}]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "3"}],
               SequenceForm["Lor", 3],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "7"}],
                SequenceForm["Lor", 7],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "9"}],
                SequenceForm["Lor", 9],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}]}], ")"}], " ", 
        SuperscriptBox["g", 
         RowBox[{
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "8"}],
             SequenceForm["Lor", 8],
             Editable->False],
            TraditionalForm],
           TraditionalForm], 
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "9"}],
             SequenceForm["Lor", 9],
             Editable->False],
            TraditionalForm],
           TraditionalForm]}]], " ", 
        RowBox[{
         FormBox["\<\"ep\"\>",
          TraditionalForm], "(", 
         RowBox[{
          RowBox[{"V", "(", 
           RowBox[{"5", ",", 
            RowBox[{"{", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "1"}],
               SequenceForm["Glu", 1],
               Editable->False],
              TraditionalForm], "}"}]}], ")"}], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "1"}],
            SequenceForm["p", 1],
            Editable->False],
           TraditionalForm], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "1"}],
            SequenceForm["Lor", 1],
            Editable->False],
           TraditionalForm]}], ")"}], " ", 
        RowBox[{
         FormBox["\<\"ep\"\>",
          TraditionalForm], "(", 
         RowBox[{
          RowBox[{"V", "(", 
           RowBox[{"5", ",", 
            RowBox[{"{", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "2"}],
               SequenceForm["Glu", 2],
               Editable->False],
              TraditionalForm], "}"}]}], ")"}], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "2"}],
            SequenceForm["p", 2],
            Editable->False],
           TraditionalForm], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "2"}],
            SequenceForm["Lor", 2],
            Editable->False],
           TraditionalForm]}], ")"}], " ", 
        RowBox[{
         FormBox["\<\"ep\"\>",
          TraditionalForm], "(", 
         RowBox[{
          RowBox[{"V", "(", 
           RowBox[{"5", ",", 
            RowBox[{"{", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "3"}],
               SequenceForm["Glu", 3],
               Editable->False],
              TraditionalForm], "}"}]}], ")"}], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "3"}],
            SequenceForm["p", 3],
            Editable->False],
           TraditionalForm], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "3"}],
            SequenceForm["Lor", 3],
            Editable->False],
           TraditionalForm]}], ")"}], " ", 
        RowBox[{
         FormBox["\<\"ep\"\>",
          TraditionalForm], "(", 
         RowBox[{
          RowBox[{"V", "(", 
           RowBox[{"5", ",", 
            RowBox[{"{", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "4"}],
               SequenceForm["Glu", 4],
               Editable->False],
              TraditionalForm], "}"}]}], ")"}], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "4"}],
            SequenceForm["p", 4],
            Editable->False],
           TraditionalForm], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "4"}],
            SequenceForm["Lor", 4],
            Editable->False],
           TraditionalForm]}], ")"}], " ", 
        RowBox[{
         FormBox["\<\"ep\"\>",
          TraditionalForm], "(", 
         RowBox[{
          RowBox[{"V", "(", 
           RowBox[{"5", ",", 
            RowBox[{"{", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "5"}],
               SequenceForm["Glu", 5],
               Editable->False],
              TraditionalForm], "}"}]}], ")"}], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "5"}],
            SequenceForm["p", 5],
            Editable->False],
           TraditionalForm], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "5"}],
            SequenceForm["Lor", 5],
            Editable->False],
           TraditionalForm]}], ")"}], " ", 
        FormBox[
         FractionBox["1", 
          SuperscriptBox[
           RowBox[{"(", 
            RowBox[{
             RowBox[{"-", 
              RowBox[{"(", 
               FormBox[
                InterpretationBox[
                 RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "2"}],
                 SequenceForm["p", 2],
                 Editable->False],
                TraditionalForm], ")"}]}], "-", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "3"}],
               SequenceForm["p", 3],
               Editable->False],
              TraditionalForm], "-", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "5"}],
               SequenceForm["p", 5],
               Editable->False],
              TraditionalForm]}], ")"}], "2"]],
         TraditionalForm], " ", 
        FormBox[
         FractionBox["1", 
          SuperscriptBox[
           RowBox[{"(", 
            RowBox[{
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "2"}],
               SequenceForm["p", 2],
               Editable->False],
              TraditionalForm], "+", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "5"}],
               SequenceForm["p", 5],
               Editable->False],
              TraditionalForm]}], ")"}], "2"]],
         TraditionalForm], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "6"}],
            SequenceForm["Glu", 6],
            Editable->False],
           TraditionalForm], ",", "8"}], ")"}], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "7"}],
            SequenceForm["Glu", 7],
            Editable->False],
           TraditionalForm], ",", "8"}], ")"}], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "1"}],
            SequenceForm["Glu", 1],
            Editable->False],
           TraditionalForm], ",", "8", ",", "External"}], ")"}], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "2"}],
            SequenceForm["Glu", 2],
            Editable->False],
           TraditionalForm], ",", "8", ",", "External"}], ")"}], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "3"}],
            SequenceForm["Glu", 3],
            Editable->False],
           TraditionalForm], ",", "8", ",", "External"}], ")"}], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "4"}],
            SequenceForm["Glu", 4],
            Editable->False],
           TraditionalForm], ",", "8", ",", "External"}], ")"}], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "5"}],
            SequenceForm["Glu", 5],
            Editable->False],
           TraditionalForm], ",", "8", ",", "External"}], ")"}], " ", 
        SubscriptBox["f", 
         RowBox[{
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "1"}],
             SequenceForm["Glu", 1],
             Editable->False],
            TraditionalForm],
           TraditionalForm], 
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "4"}],
             SequenceForm["Glu", 4],
             Editable->False],
            TraditionalForm],
           TraditionalForm], 
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "6"}],
             SequenceForm["Glu", 6],
             Editable->False],
            TraditionalForm],
           TraditionalForm]}]], " ", 
        SubscriptBox["f", 
         RowBox[{
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "2"}],
             SequenceForm["Glu", 2],
             Editable->False],
            TraditionalForm],
           TraditionalForm], 
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "5"}],
             SequenceForm["Glu", 5],
             Editable->False],
            TraditionalForm],
           TraditionalForm], 
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "7"}],
             SequenceForm["Glu", 7],
             Editable->False],
            TraditionalForm],
           TraditionalForm]}]], " ", 
        SubscriptBox["f", 
         RowBox[{
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "3"}],
             SequenceForm["Glu", 3],
             Editable->False],
            TraditionalForm],
           TraditionalForm], 
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "6"}],
             SequenceForm["Glu", 6],
             Editable->False],
            TraditionalForm],
           TraditionalForm], 
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "7"}],
             SequenceForm["Glu", 7],
             Editable->False],
            TraditionalForm],
           TraditionalForm]}]]}],
       TraditionalForm], ")"}], ",", 
     RowBox[{"\[Integral]", 
      RowBox[{
       StyleBox[
        RowBox[{
         SuperscriptBox["\[DifferentialD]", "D"], 
         FormBox[
          RowBox[{"GraphID", "(", 
           RowBox[{
            RowBox[{"Topology", "\[LongEqual]", "1"}], ",", 
            RowBox[{"Generic", "\[LongEqual]", "1"}], ",", 
            RowBox[{"Classes", "\[LongEqual]", "1"}], ",", 
            RowBox[{"Number", "\[LongEqual]", "21"}]}], ")"}],
          TraditionalForm]}],
        ZeroWidthTimes->True], "\[Integral]", 
       RowBox[{
        SuperscriptBox["\[DifferentialD]", "D"], 
        FormBox[
         RowBox[{"Integral", "[", "]"}],
         TraditionalForm]}]}], "(", 
      FormBox[
       RowBox[{"\[ImaginaryI]", " ", 
        SubsuperscriptBox["g", "s", "3"], " ", 
        RowBox[{"(", 
         RowBox[{
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                RowBox[{"-", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "1"}],
                    SequenceForm["p", 1],
                    Editable->False],
                   TraditionalForm], ")"}]}], "+", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "4"}],
                  SequenceForm["p", 4],
                  Editable->False],
                 TraditionalForm]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "6"}],
               SequenceForm["Lor", 6],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "1"}],
                SequenceForm["Lor", 1],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "4"}],
                SequenceForm["Lor", 4],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}], "+", 
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "1"}],
                  SequenceForm["p", 1],
                  Editable->False],
                 TraditionalForm], "-", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "2"}],
                  SequenceForm["p", 2],
                  Editable->False],
                 TraditionalForm], "-", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "3"}],
                  SequenceForm["p", 3],
                  Editable->False],
                 TraditionalForm], "-", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "5"}],
                  SequenceForm["p", 5],
                  Editable->False],
                 TraditionalForm]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "4"}],
               SequenceForm["Lor", 4],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "1"}],
                SequenceForm["Lor", 1],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "6"}],
                SequenceForm["Lor", 6],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}], "+", 
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "2"}],
                  SequenceForm["p", 2],
                  Editable->False],
                 TraditionalForm], "+", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "3"}],
                  SequenceForm["p", 3],
                  Editable->False],
                 TraditionalForm], "-", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "4"}],
                  SequenceForm["p", 4],
                  Editable->False],
                 TraditionalForm], "+", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "5"}],
                  SequenceForm["p", 5],
                  Editable->False],
                 TraditionalForm]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "1"}],
               SequenceForm["Lor", 1],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "4"}],
                SequenceForm["Lor", 4],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "6"}],
                SequenceForm["Lor", 6],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}]}], ")"}], " ", 
        RowBox[{"(", 
         RowBox[{
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                RowBox[{"-", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "3"}],
                    SequenceForm["p", 3],
                    Editable->False],
                   TraditionalForm], ")"}]}], "+", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "5"}],
                  SequenceForm["p", 5],
                  Editable->False],
                 TraditionalForm]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "9"}],
               SequenceForm["Lor", 9],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "3"}],
                SequenceForm["Lor", 3],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "5"}],
                SequenceForm["Lor", 5],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}], "+", 
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                RowBox[{"2", " ", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "3"}],
                    SequenceForm["p", 3],
                    Editable->False],
                   TraditionalForm], ")"}]}], "+", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "5"}],
                  SequenceForm["p", 5],
                  Editable->False],
                 TraditionalForm]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "5"}],
               SequenceForm["Lor", 5],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "3"}],
                SequenceForm["Lor", 3],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "9"}],
                SequenceForm["Lor", 9],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}], "+", 
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                RowBox[{"-", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "3"}],
                    SequenceForm["p", 3],
                    Editable->False],
                   TraditionalForm], ")"}]}], "-", 
                RowBox[{"2", " ", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "5"}],
                    SequenceForm["p", 5],
                    Editable->False],
                   TraditionalForm], ")"}]}]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "3"}],
               SequenceForm["Lor", 3],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "5"}],
                SequenceForm["Lor", 5],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "9"}],
                SequenceForm["Lor", 9],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}]}], ")"}], " ", 
        SuperscriptBox["g", 
         RowBox[{
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "6"}],
             SequenceForm["Lor", 6],
             Editable->False],
            TraditionalForm],
           TraditionalForm], 
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "7"}],
             SequenceForm["Lor", 7],
             Editable->False],
            TraditionalForm],
           TraditionalForm]}]], " ", 
        RowBox[{"(", 
         RowBox[{
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                RowBox[{
                 RowBox[{"-", "2"}], " ", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "2"}],
                    SequenceForm["p", 2],
                    Editable->False],
                   TraditionalForm], ")"}]}], "-", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "3"}],
                  SequenceForm["p", 3],
                  Editable->False],
                 TraditionalForm], "-", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "5"}],
                  SequenceForm["p", 5],
                  Editable->False],
                 TraditionalForm]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "8"}],
               SequenceForm["Lor", 8],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "2"}],
                SequenceForm["Lor", 2],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "7"}],
                SequenceForm["Lor", 7],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}], "+", 
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "2"}],
                  SequenceForm["p", 2],
                  Editable->False],
                 TraditionalForm], "-", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "3"}],
                  SequenceForm["p", 3],
                  Editable->False],
                 TraditionalForm], "-", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "5"}],
                  SequenceForm["p", 5],
                  Editable->False],
                 TraditionalForm]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "7"}],
               SequenceForm["Lor", 7],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "2"}],
                SequenceForm["Lor", 2],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "8"}],
                SequenceForm["Lor", 8],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}], "+", 
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "2"}],
                  SequenceForm["p", 2],
                  Editable->False],
                 TraditionalForm], "+", 
                RowBox[{"2", " ", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "3"}],
                    SequenceForm["p", 3],
                    Editable->False],
                   TraditionalForm], ")"}]}], "+", 
                RowBox[{"2", " ", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "5"}],
                    SequenceForm["p", 5],
                    Editable->False],
                   TraditionalForm], ")"}]}]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "2"}],
               SequenceForm["Lor", 2],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "7"}],
                SequenceForm["Lor", 7],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "8"}],
                SequenceForm["Lor", 8],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}]}], ")"}], " ", 
        SuperscriptBox["g", 
         RowBox[{
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "8"}],
             SequenceForm["Lor", 8],
             Editable->False],
            TraditionalForm],
           TraditionalForm], 
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "9"}],
             SequenceForm["Lor", 9],
             Editable->False],
            TraditionalForm],
           TraditionalForm]}]], " ", 
        RowBox[{
         FormBox["\<\"ep\"\>",
          TraditionalForm], "(", 
         RowBox[{
          RowBox[{"V", "(", 
           RowBox[{"5", ",", 
            RowBox[{"{", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "1"}],
               SequenceForm["Glu", 1],
               Editable->False],
              TraditionalForm], "}"}]}], ")"}], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "1"}],
            SequenceForm["p", 1],
            Editable->False],
           TraditionalForm], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "1"}],
            SequenceForm["Lor", 1],
            Editable->False],
           TraditionalForm]}], ")"}], " ", 
        RowBox[{
         FormBox["\<\"ep\"\>",
          TraditionalForm], "(", 
         RowBox[{
          RowBox[{"V", "(", 
           RowBox[{"5", ",", 
            RowBox[{"{", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "2"}],
               SequenceForm["Glu", 2],
               Editable->False],
              TraditionalForm], "}"}]}], ")"}], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "2"}],
            SequenceForm["p", 2],
            Editable->False],
           TraditionalForm], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "2"}],
            SequenceForm["Lor", 2],
            Editable->False],
           TraditionalForm]}], ")"}], " ", 
        RowBox[{
         FormBox["\<\"ep\"\>",
          TraditionalForm], "(", 
         RowBox[{
          RowBox[{"V", "(", 
           RowBox[{"5", ",", 
            RowBox[{"{", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "3"}],
               SequenceForm["Glu", 3],
               Editable->False],
              TraditionalForm], "}"}]}], ")"}], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "3"}],
            SequenceForm["p", 3],
            Editable->False],
           TraditionalForm], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "3"}],
            SequenceForm["Lor", 3],
            Editable->False],
           TraditionalForm]}], ")"}], " ", 
        RowBox[{
         FormBox["\<\"ep\"\>",
          TraditionalForm], "(", 
         RowBox[{
          RowBox[{"V", "(", 
           RowBox[{"5", ",", 
            RowBox[{"{", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "4"}],
               SequenceForm["Glu", 4],
               Editable->False],
              TraditionalForm], "}"}]}], ")"}], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "4"}],
            SequenceForm["p", 4],
            Editable->False],
           TraditionalForm], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "4"}],
            SequenceForm["Lor", 4],
            Editable->False],
           TraditionalForm]}], ")"}], " ", 
        RowBox[{
         FormBox["\<\"ep\"\>",
          TraditionalForm], "(", 
         RowBox[{
          RowBox[{"V", "(", 
           RowBox[{"5", ",", 
            RowBox[{"{", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "5"}],
               SequenceForm["Glu", 5],
               Editable->False],
              TraditionalForm], "}"}]}], ")"}], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "5"}],
            SequenceForm["p", 5],
            Editable->False],
           TraditionalForm], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "5"}],
            SequenceForm["Lor", 5],
            Editable->False],
           TraditionalForm]}], ")"}], " ", 
        FormBox[
         FractionBox["1", 
          SuperscriptBox[
           RowBox[{"(", 
            RowBox[{
             RowBox[{"-", 
              RowBox[{"(", 
               FormBox[
                InterpretationBox[
                 RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "3"}],
                 SequenceForm["p", 3],
                 Editable->False],
                TraditionalForm], ")"}]}], "-", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "5"}],
               SequenceForm["p", 5],
               Editable->False],
              TraditionalForm]}], ")"}], "2"]],
         TraditionalForm], " ", 
        FormBox[
         FractionBox["1", 
          SuperscriptBox[
           RowBox[{"(", 
            RowBox[{
             RowBox[{"-", 
              RowBox[{"(", 
               FormBox[
                InterpretationBox[
                 RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "2"}],
                 SequenceForm["p", 2],
                 Editable->False],
                TraditionalForm], ")"}]}], "-", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "3"}],
               SequenceForm["p", 3],
               Editable->False],
              TraditionalForm], "-", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "5"}],
               SequenceForm["p", 5],
               Editable->False],
              TraditionalForm]}], ")"}], "2"]],
         TraditionalForm], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "6"}],
            SequenceForm["Glu", 6],
            Editable->False],
           TraditionalForm], ",", "8"}], ")"}], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "7"}],
            SequenceForm["Glu", 7],
            Editable->False],
           TraditionalForm], ",", "8"}], ")"}], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "1"}],
            SequenceForm["Glu", 1],
            Editable->False],
           TraditionalForm], ",", "8", ",", "External"}], ")"}], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "2"}],
            SequenceForm["Glu", 2],
            Editable->False],
           TraditionalForm], ",", "8", ",", "External"}], ")"}], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "3"}],
            SequenceForm["Glu", 3],
            Editable->False],
           TraditionalForm], ",", "8", ",", "External"}], ")"}], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "4"}],
            SequenceForm["Glu", 4],
            Editable->False],
           TraditionalForm], ",", "8", ",", "External"}], ")"}], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "5"}],
            SequenceForm["Glu", 5],
            Editable->False],
           TraditionalForm], ",", "8", ",", "External"}], ")"}], " ", 
        SubscriptBox["f", 
         RowBox[{
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "1"}],
             SequenceForm["Glu", 1],
             Editable->False],
            TraditionalForm],
           TraditionalForm], 
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "4"}],
             SequenceForm["Glu", 4],
             Editable->False],
            TraditionalForm],
           TraditionalForm], 
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "6"}],
             SequenceForm["Glu", 6],
             Editable->False],
            TraditionalForm],
           TraditionalForm]}]], " ", 
        SubscriptBox["f", 
         RowBox[{
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "2"}],
             SequenceForm["Glu", 2],
             Editable->False],
            TraditionalForm],
           TraditionalForm], 
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "6"}],
             SequenceForm["Glu", 6],
             Editable->False],
            TraditionalForm],
           TraditionalForm], 
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "7"}],
             SequenceForm["Glu", 7],
             Editable->False],
            TraditionalForm],
           TraditionalForm]}]], " ", 
        SubscriptBox["f", 
         RowBox[{
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "3"}],
             SequenceForm["Glu", 3],
             Editable->False],
            TraditionalForm],
           TraditionalForm], 
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "5"}],
             SequenceForm["Glu", 5],
             Editable->False],
            TraditionalForm],
           TraditionalForm], 
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "7"}],
             SequenceForm["Glu", 7],
             Editable->False],
            TraditionalForm],
           TraditionalForm]}]]}],
       TraditionalForm], ")"}], ",", 
     RowBox[{"\[Integral]", 
      RowBox[{
       StyleBox[
        RowBox[{
         SuperscriptBox["\[DifferentialD]", "D"], 
         FormBox[
          RowBox[{"GraphID", "(", 
           RowBox[{
            RowBox[{"Topology", "\[LongEqual]", "1"}], ",", 
            RowBox[{"Generic", "\[LongEqual]", "1"}], ",", 
            RowBox[{"Classes", "\[LongEqual]", "1"}], ",", 
            RowBox[{"Number", "\[LongEqual]", "22"}]}], ")"}],
          TraditionalForm]}],
        ZeroWidthTimes->True], "\[Integral]", 
       RowBox[{
        SuperscriptBox["\[DifferentialD]", "D"], 
        FormBox[
         RowBox[{"Integral", "[", "]"}],
         TraditionalForm]}]}], "(", 
      FormBox[
       RowBox[{"\[ImaginaryI]", " ", 
        SubsuperscriptBox["g", "s", "3"], " ", 
        RowBox[{"(", 
         RowBox[{
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                RowBox[{"-", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "2"}],
                    SequenceForm["p", 2],
                    Editable->False],
                   TraditionalForm], ")"}]}], "+", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "4"}],
                  SequenceForm["p", 4],
                  Editable->False],
                 TraditionalForm]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "8"}],
               SequenceForm["Lor", 8],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "2"}],
                SequenceForm["Lor", 2],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "4"}],
                SequenceForm["Lor", 4],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}], "+", 
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                RowBox[{"2", " ", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "2"}],
                    SequenceForm["p", 2],
                    Editable->False],
                   TraditionalForm], ")"}]}], "+", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "4"}],
                  SequenceForm["p", 4],
                  Editable->False],
                 TraditionalForm]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "4"}],
               SequenceForm["Lor", 4],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "2"}],
                SequenceForm["Lor", 2],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "8"}],
                SequenceForm["Lor", 8],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}], "+", 
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                RowBox[{"-", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "2"}],
                    SequenceForm["p", 2],
                    Editable->False],
                   TraditionalForm], ")"}]}], "-", 
                RowBox[{"2", " ", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "4"}],
                    SequenceForm["p", 4],
                    Editable->False],
                   TraditionalForm], ")"}]}]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "2"}],
               SequenceForm["Lor", 2],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "4"}],
                SequenceForm["Lor", 4],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "8"}],
                SequenceForm["Lor", 8],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}]}], ")"}], " ", 
        RowBox[{"(", 
         RowBox[{
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                RowBox[{"-", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "1"}],
                    SequenceForm["p", 1],
                    Editable->False],
                   TraditionalForm], ")"}]}], "+", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "5"}],
                  SequenceForm["p", 5],
                  Editable->False],
                 TraditionalForm]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "6"}],
               SequenceForm["Lor", 6],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "1"}],
                SequenceForm["Lor", 1],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "5"}],
                SequenceForm["Lor", 5],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}], "+", 
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "1"}],
                  SequenceForm["p", 1],
                  Editable->False],
                 TraditionalForm], "-", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "2"}],
                  SequenceForm["p", 2],
                  Editable->False],
                 TraditionalForm], "-", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "3"}],
                  SequenceForm["p", 3],
                  Editable->False],
                 TraditionalForm], "-", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "4"}],
                  SequenceForm["p", 4],
                  Editable->False],
                 TraditionalForm]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "5"}],
               SequenceForm["Lor", 5],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "1"}],
                SequenceForm["Lor", 1],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "6"}],
                SequenceForm["Lor", 6],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}], "+", 
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "2"}],
                  SequenceForm["p", 2],
                  Editable->False],
                 TraditionalForm], "+", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "3"}],
                  SequenceForm["p", 3],
                  Editable->False],
                 TraditionalForm], "+", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "4"}],
                  SequenceForm["p", 4],
                  Editable->False],
                 TraditionalForm], "-", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "5"}],
                  SequenceForm["p", 5],
                  Editable->False],
                 TraditionalForm]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "1"}],
               SequenceForm["Lor", 1],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "5"}],
                SequenceForm["Lor", 5],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "6"}],
                SequenceForm["Lor", 6],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}]}], ")"}], " ", 
        SuperscriptBox["g", 
         RowBox[{
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "6"}],
             SequenceForm["Lor", 6],
             Editable->False],
            TraditionalForm],
           TraditionalForm], 
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "7"}],
             SequenceForm["Lor", 7],
             Editable->False],
            TraditionalForm],
           TraditionalForm]}]], " ", 
        RowBox[{"(", 
         RowBox[{
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                RowBox[{"-", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "2"}],
                    SequenceForm["p", 2],
                    Editable->False],
                   TraditionalForm], ")"}]}], "-", 
                RowBox[{"2", " ", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "3"}],
                    SequenceForm["p", 3],
                    Editable->False],
                   TraditionalForm], ")"}]}], "-", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "4"}],
                  SequenceForm["p", 4],
                  Editable->False],
                 TraditionalForm]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "9"}],
               SequenceForm["Lor", 9],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "3"}],
                SequenceForm["Lor", 3],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "7"}],
                SequenceForm["Lor", 7],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}], "+", 
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                RowBox[{"-", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "2"}],
                    SequenceForm["p", 2],
                    Editable->False],
                   TraditionalForm], ")"}]}], "+", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "3"}],
                  SequenceForm["p", 3],
                  Editable->False],
                 TraditionalForm], "-", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "4"}],
                  SequenceForm["p", 4],
                  Editable->False],
                 TraditionalForm]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "7"}],
               SequenceForm["Lor", 7],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "3"}],
                SequenceForm["Lor", 3],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "9"}],
                SequenceForm["Lor", 9],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}], "+", 
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                RowBox[{"2", " ", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "2"}],
                    SequenceForm["p", 2],
                    Editable->False],
                   TraditionalForm], ")"}]}], "+", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "3"}],
                  SequenceForm["p", 3],
                  Editable->False],
                 TraditionalForm], "+", 
                RowBox[{"2", " ", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "4"}],
                    SequenceForm["p", 4],
                    Editable->False],
                   TraditionalForm], ")"}]}]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "3"}],
               SequenceForm["Lor", 3],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "7"}],
                SequenceForm["Lor", 7],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "9"}],
                SequenceForm["Lor", 9],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}]}], ")"}], " ", 
        SuperscriptBox["g", 
         RowBox[{
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "8"}],
             SequenceForm["Lor", 8],
             Editable->False],
            TraditionalForm],
           TraditionalForm], 
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "9"}],
             SequenceForm["Lor", 9],
             Editable->False],
            TraditionalForm],
           TraditionalForm]}]], " ", 
        RowBox[{
         FormBox["\<\"ep\"\>",
          TraditionalForm], "(", 
         RowBox[{
          RowBox[{"V", "(", 
           RowBox[{"5", ",", 
            RowBox[{"{", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "1"}],
               SequenceForm["Glu", 1],
               Editable->False],
              TraditionalForm], "}"}]}], ")"}], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "1"}],
            SequenceForm["p", 1],
            Editable->False],
           TraditionalForm], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "1"}],
            SequenceForm["Lor", 1],
            Editable->False],
           TraditionalForm]}], ")"}], " ", 
        RowBox[{
         FormBox["\<\"ep\"\>",
          TraditionalForm], "(", 
         RowBox[{
          RowBox[{"V", "(", 
           RowBox[{"5", ",", 
            RowBox[{"{", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "2"}],
               SequenceForm["Glu", 2],
               Editable->False],
              TraditionalForm], "}"}]}], ")"}], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "2"}],
            SequenceForm["p", 2],
            Editable->False],
           TraditionalForm], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "2"}],
            SequenceForm["Lor", 2],
            Editable->False],
           TraditionalForm]}], ")"}], " ", 
        RowBox[{
         FormBox["\<\"ep\"\>",
          TraditionalForm], "(", 
         RowBox[{
          RowBox[{"V", "(", 
           RowBox[{"5", ",", 
            RowBox[{"{", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "3"}],
               SequenceForm["Glu", 3],
               Editable->False],
              TraditionalForm], "}"}]}], ")"}], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "3"}],
            SequenceForm["p", 3],
            Editable->False],
           TraditionalForm], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "3"}],
            SequenceForm["Lor", 3],
            Editable->False],
           TraditionalForm]}], ")"}], " ", 
        RowBox[{
         FormBox["\<\"ep\"\>",
          TraditionalForm], "(", 
         RowBox[{
          RowBox[{"V", "(", 
           RowBox[{"5", ",", 
            RowBox[{"{", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "4"}],
               SequenceForm["Glu", 4],
               Editable->False],
              TraditionalForm], "}"}]}], ")"}], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "4"}],
            SequenceForm["p", 4],
            Editable->False],
           TraditionalForm], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "4"}],
            SequenceForm["Lor", 4],
            Editable->False],
           TraditionalForm]}], ")"}], " ", 
        RowBox[{
         FormBox["\<\"ep\"\>",
          TraditionalForm], "(", 
         RowBox[{
          RowBox[{"V", "(", 
           RowBox[{"5", ",", 
            RowBox[{"{", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "5"}],
               SequenceForm["Glu", 5],
               Editable->False],
              TraditionalForm], "}"}]}], ")"}], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "5"}],
            SequenceForm["p", 5],
            Editable->False],
           TraditionalForm], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "5"}],
            SequenceForm["Lor", 5],
            Editable->False],
           TraditionalForm]}], ")"}], " ", 
        FormBox[
         FractionBox["1", 
          SuperscriptBox[
           RowBox[{"(", 
            RowBox[{
             RowBox[{"-", 
              RowBox[{"(", 
               FormBox[
                InterpretationBox[
                 RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "2"}],
                 SequenceForm["p", 2],
                 Editable->False],
                TraditionalForm], ")"}]}], "-", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "3"}],
               SequenceForm["p", 3],
               Editable->False],
              TraditionalForm], "-", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "4"}],
               SequenceForm["p", 4],
               Editable->False],
              TraditionalForm]}], ")"}], "2"]],
         TraditionalForm], " ", 
        FormBox[
         FractionBox["1", 
          SuperscriptBox[
           RowBox[{"(", 
            RowBox[{
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "2"}],
               SequenceForm["p", 2],
               Editable->False],
              TraditionalForm], "+", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "4"}],
               SequenceForm["p", 4],
               Editable->False],
              TraditionalForm]}], ")"}], "2"]],
         TraditionalForm], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "6"}],
            SequenceForm["Glu", 6],
            Editable->False],
           TraditionalForm], ",", "8"}], ")"}], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "7"}],
            SequenceForm["Glu", 7],
            Editable->False],
           TraditionalForm], ",", "8"}], ")"}], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "1"}],
            SequenceForm["Glu", 1],
            Editable->False],
           TraditionalForm], ",", "8", ",", "External"}], ")"}], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "2"}],
            SequenceForm["Glu", 2],
            Editable->False],
           TraditionalForm], ",", "8", ",", "External"}], ")"}], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "3"}],
            SequenceForm["Glu", 3],
            Editable->False],
           TraditionalForm], ",", "8", ",", "External"}], ")"}], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "4"}],
            SequenceForm["Glu", 4],
            Editable->False],
           TraditionalForm], ",", "8", ",", "External"}], ")"}], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "5"}],
            SequenceForm["Glu", 5],
            Editable->False],
           TraditionalForm], ",", "8", ",", "External"}], ")"}], " ", 
        SubscriptBox["f", 
         RowBox[{
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "1"}],
             SequenceForm["Glu", 1],
             Editable->False],
            TraditionalForm],
           TraditionalForm], 
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "5"}],
             SequenceForm["Glu", 5],
             Editable->False],
            TraditionalForm],
           TraditionalForm], 
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "6"}],
             SequenceForm["Glu", 6],
             Editable->False],
            TraditionalForm],
           TraditionalForm]}]], " ", 
        SubscriptBox["f", 
         RowBox[{
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "2"}],
             SequenceForm["Glu", 2],
             Editable->False],
            TraditionalForm],
           TraditionalForm], 
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "4"}],
             SequenceForm["Glu", 4],
             Editable->False],
            TraditionalForm],
           TraditionalForm], 
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "7"}],
             SequenceForm["Glu", 7],
             Editable->False],
            TraditionalForm],
           TraditionalForm]}]], " ", 
        SubscriptBox["f", 
         RowBox[{
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "3"}],
             SequenceForm["Glu", 3],
             Editable->False],
            TraditionalForm],
           TraditionalForm], 
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "6"}],
             SequenceForm["Glu", 6],
             Editable->False],
            TraditionalForm],
           TraditionalForm], 
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "7"}],
             SequenceForm["Glu", 7],
             Editable->False],
            TraditionalForm],
           TraditionalForm]}]]}],
       TraditionalForm], ")"}], ",", 
     RowBox[{"\[Integral]", 
      RowBox[{
       StyleBox[
        RowBox[{
         SuperscriptBox["\[DifferentialD]", "D"], 
         FormBox[
          RowBox[{"GraphID", "(", 
           RowBox[{
            RowBox[{"Topology", "\[LongEqual]", "1"}], ",", 
            RowBox[{"Generic", "\[LongEqual]", "1"}], ",", 
            RowBox[{"Classes", "\[LongEqual]", "1"}], ",", 
            RowBox[{"Number", "\[LongEqual]", "23"}]}], ")"}],
          TraditionalForm]}],
        ZeroWidthTimes->True], "\[Integral]", 
       RowBox[{
        SuperscriptBox["\[DifferentialD]", "D"], 
        FormBox[
         RowBox[{"Integral", "[", "]"}],
         TraditionalForm]}]}], "(", 
      FormBox[
       RowBox[{"\[ImaginaryI]", " ", 
        SubsuperscriptBox["g", "s", "3"], " ", 
        RowBox[{"(", 
         RowBox[{
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                RowBox[{"-", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "2"}],
                    SequenceForm["p", 2],
                    Editable->False],
                   TraditionalForm], ")"}]}], "+", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "4"}],
                  SequenceForm["p", 4],
                  Editable->False],
                 TraditionalForm]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "7"}],
               SequenceForm["Lor", 7],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "2"}],
                SequenceForm["Lor", 2],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "4"}],
                SequenceForm["Lor", 4],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}], "+", 
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                RowBox[{"2", " ", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "2"}],
                    SequenceForm["p", 2],
                    Editable->False],
                   TraditionalForm], ")"}]}], "+", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "4"}],
                  SequenceForm["p", 4],
                  Editable->False],
                 TraditionalForm]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "4"}],
               SequenceForm["Lor", 4],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "2"}],
                SequenceForm["Lor", 2],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "7"}],
                SequenceForm["Lor", 7],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}], "+", 
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                RowBox[{"-", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "2"}],
                    SequenceForm["p", 2],
                    Editable->False],
                   TraditionalForm], ")"}]}], "-", 
                RowBox[{"2", " ", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "4"}],
                    SequenceForm["p", 4],
                    Editable->False],
                   TraditionalForm], ")"}]}]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "2"}],
               SequenceForm["Lor", 2],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "4"}],
                SequenceForm["Lor", 4],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "7"}],
                SequenceForm["Lor", 7],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}]}], ")"}], " ", 
        RowBox[{"(", 
         RowBox[{
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                RowBox[{"-", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "3"}],
                    SequenceForm["p", 3],
                    Editable->False],
                   TraditionalForm], ")"}]}], "+", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "5"}],
                  SequenceForm["p", 5],
                  Editable->False],
                 TraditionalForm]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "9"}],
               SequenceForm["Lor", 9],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "3"}],
                SequenceForm["Lor", 3],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "5"}],
                SequenceForm["Lor", 5],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}], "+", 
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                RowBox[{"2", " ", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "3"}],
                    SequenceForm["p", 3],
                    Editable->False],
                   TraditionalForm], ")"}]}], "+", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "5"}],
                  SequenceForm["p", 5],
                  Editable->False],
                 TraditionalForm]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "5"}],
               SequenceForm["Lor", 5],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "3"}],
                SequenceForm["Lor", 3],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "9"}],
                SequenceForm["Lor", 9],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}], "+", 
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                RowBox[{"-", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "3"}],
                    SequenceForm["p", 3],
                    Editable->False],
                   TraditionalForm], ")"}]}], "-", 
                RowBox[{"2", " ", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "5"}],
                    SequenceForm["p", 5],
                    Editable->False],
                   TraditionalForm], ")"}]}]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "3"}],
               SequenceForm["Lor", 3],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "5"}],
                SequenceForm["Lor", 5],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "9"}],
                SequenceForm["Lor", 9],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}]}], ")"}], " ", 
        SuperscriptBox["g", 
         RowBox[{
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "6"}],
             SequenceForm["Lor", 6],
             Editable->False],
            TraditionalForm],
           TraditionalForm], 
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "7"}],
             SequenceForm["Lor", 7],
             Editable->False],
            TraditionalForm],
           TraditionalForm]}]], " ", 
        RowBox[{"(", 
         RowBox[{
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                RowBox[{"-", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "1"}],
                    SequenceForm["p", 1],
                    Editable->False],
                   TraditionalForm], ")"}]}], "+", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "2"}],
                  SequenceForm["p", 2],
                  Editable->False],
                 TraditionalForm], "+", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "4"}],
                  SequenceForm["p", 4],
                  Editable->False],
                 TraditionalForm]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "8"}],
               SequenceForm["Lor", 8],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "1"}],
                SequenceForm["Lor", 1],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "6"}],
                SequenceForm["Lor", 6],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}], "+", 
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "1"}],
                  SequenceForm["p", 1],
                  Editable->False],
                 TraditionalForm], "-", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "3"}],
                  SequenceForm["p", 3],
                  Editable->False],
                 TraditionalForm], "-", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "5"}],
                  SequenceForm["p", 5],
                  Editable->False],
                 TraditionalForm]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "6"}],
               SequenceForm["Lor", 6],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "1"}],
                SequenceForm["Lor", 1],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "8"}],
                SequenceForm["Lor", 8],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}], "+", 
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                RowBox[{"-", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "2"}],
                    SequenceForm["p", 2],
                    Editable->False],
                   TraditionalForm], ")"}]}], "+", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "3"}],
                  SequenceForm["p", 3],
                  Editable->False],
                 TraditionalForm], "-", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "4"}],
                  SequenceForm["p", 4],
                  Editable->False],
                 TraditionalForm], "+", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "5"}],
                  SequenceForm["p", 5],
                  Editable->False],
                 TraditionalForm]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "1"}],
               SequenceForm["Lor", 1],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "6"}],
                SequenceForm["Lor", 6],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "8"}],
                SequenceForm["Lor", 8],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}]}], ")"}], " ", 
        SuperscriptBox["g", 
         RowBox[{
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "8"}],
             SequenceForm["Lor", 8],
             Editable->False],
            TraditionalForm],
           TraditionalForm], 
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "9"}],
             SequenceForm["Lor", 9],
             Editable->False],
            TraditionalForm],
           TraditionalForm]}]], " ", 
        RowBox[{
         FormBox["\<\"ep\"\>",
          TraditionalForm], "(", 
         RowBox[{
          RowBox[{"V", "(", 
           RowBox[{"5", ",", 
            RowBox[{"{", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "1"}],
               SequenceForm["Glu", 1],
               Editable->False],
              TraditionalForm], "}"}]}], ")"}], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "1"}],
            SequenceForm["p", 1],
            Editable->False],
           TraditionalForm], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "1"}],
            SequenceForm["Lor", 1],
            Editable->False],
           TraditionalForm]}], ")"}], " ", 
        RowBox[{
         FormBox["\<\"ep\"\>",
          TraditionalForm], "(", 
         RowBox[{
          RowBox[{"V", "(", 
           RowBox[{"5", ",", 
            RowBox[{"{", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "2"}],
               SequenceForm["Glu", 2],
               Editable->False],
              TraditionalForm], "}"}]}], ")"}], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "2"}],
            SequenceForm["p", 2],
            Editable->False],
           TraditionalForm], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "2"}],
            SequenceForm["Lor", 2],
            Editable->False],
           TraditionalForm]}], ")"}], " ", 
        RowBox[{
         FormBox["\<\"ep\"\>",
          TraditionalForm], "(", 
         RowBox[{
          RowBox[{"V", "(", 
           RowBox[{"5", ",", 
            RowBox[{"{", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "3"}],
               SequenceForm["Glu", 3],
               Editable->False],
              TraditionalForm], "}"}]}], ")"}], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "3"}],
            SequenceForm["p", 3],
            Editable->False],
           TraditionalForm], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "3"}],
            SequenceForm["Lor", 3],
            Editable->False],
           TraditionalForm]}], ")"}], " ", 
        RowBox[{
         FormBox["\<\"ep\"\>",
          TraditionalForm], "(", 
         RowBox[{
          RowBox[{"V", "(", 
           RowBox[{"5", ",", 
            RowBox[{"{", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "4"}],
               SequenceForm["Glu", 4],
               Editable->False],
              TraditionalForm], "}"}]}], ")"}], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "4"}],
            SequenceForm["p", 4],
            Editable->False],
           TraditionalForm], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "4"}],
            SequenceForm["Lor", 4],
            Editable->False],
           TraditionalForm]}], ")"}], " ", 
        RowBox[{
         FormBox["\<\"ep\"\>",
          TraditionalForm], "(", 
         RowBox[{
          RowBox[{"V", "(", 
           RowBox[{"5", ",", 
            RowBox[{"{", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "5"}],
               SequenceForm["Glu", 5],
               Editable->False],
              TraditionalForm], "}"}]}], ")"}], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "5"}],
            SequenceForm["p", 5],
            Editable->False],
           TraditionalForm], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "5"}],
            SequenceForm["Lor", 5],
            Editable->False],
           TraditionalForm]}], ")"}], " ", 
        FormBox[
         FractionBox["1", 
          SuperscriptBox[
           RowBox[{"(", 
            RowBox[{
             RowBox[{"-", 
              RowBox[{"(", 
               FormBox[
                InterpretationBox[
                 RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "2"}],
                 SequenceForm["p", 2],
                 Editable->False],
                TraditionalForm], ")"}]}], "-", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "4"}],
               SequenceForm["p", 4],
               Editable->False],
              TraditionalForm]}], ")"}], "2"]],
         TraditionalForm], " ", 
        FormBox[
         FractionBox["1", 
          SuperscriptBox[
           RowBox[{"(", 
            RowBox[{
             RowBox[{"-", 
              RowBox[{"(", 
               FormBox[
                InterpretationBox[
                 RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "3"}],
                 SequenceForm["p", 3],
                 Editable->False],
                TraditionalForm], ")"}]}], "-", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "5"}],
               SequenceForm["p", 5],
               Editable->False],
              TraditionalForm]}], ")"}], "2"]],
         TraditionalForm], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "6"}],
            SequenceForm["Glu", 6],
            Editable->False],
           TraditionalForm], ",", "8"}], ")"}], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "7"}],
            SequenceForm["Glu", 7],
            Editable->False],
           TraditionalForm], ",", "8"}], ")"}], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "1"}],
            SequenceForm["Glu", 1],
            Editable->False],
           TraditionalForm], ",", "8", ",", "External"}], ")"}], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "2"}],
            SequenceForm["Glu", 2],
            Editable->False],
           TraditionalForm], ",", "8", ",", "External"}], ")"}], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "3"}],
            SequenceForm["Glu", 3],
            Editable->False],
           TraditionalForm], ",", "8", ",", "External"}], ")"}], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "4"}],
            SequenceForm["Glu", 4],
            Editable->False],
           TraditionalForm], ",", "8", ",", "External"}], ")"}], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "5"}],
            SequenceForm["Glu", 5],
            Editable->False],
           TraditionalForm], ",", "8", ",", "External"}], ")"}], " ", 
        SubscriptBox["f", 
         RowBox[{
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "1"}],
             SequenceForm["Glu", 1],
             Editable->False],
            TraditionalForm],
           TraditionalForm], 
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "6"}],
             SequenceForm["Glu", 6],
             Editable->False],
            TraditionalForm],
           TraditionalForm], 
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "7"}],
             SequenceForm["Glu", 7],
             Editable->False],
            TraditionalForm],
           TraditionalForm]}]], " ", 
        SubscriptBox["f", 
         RowBox[{
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "2"}],
             SequenceForm["Glu", 2],
             Editable->False],
            TraditionalForm],
           TraditionalForm], 
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "4"}],
             SequenceForm["Glu", 4],
             Editable->False],
            TraditionalForm],
           TraditionalForm], 
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "6"}],
             SequenceForm["Glu", 6],
             Editable->False],
            TraditionalForm],
           TraditionalForm]}]], " ", 
        SubscriptBox["f", 
         RowBox[{
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "3"}],
             SequenceForm["Glu", 3],
             Editable->False],
            TraditionalForm],
           TraditionalForm], 
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "5"}],
             SequenceForm["Glu", 5],
             Editable->False],
            TraditionalForm],
           TraditionalForm], 
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "7"}],
             SequenceForm["Glu", 7],
             Editable->False],
            TraditionalForm],
           TraditionalForm]}]]}],
       TraditionalForm], ")"}], ",", 
     RowBox[{"\[Integral]", 
      RowBox[{
       StyleBox[
        RowBox[{
         SuperscriptBox["\[DifferentialD]", "D"], 
         FormBox[
          RowBox[{"GraphID", "(", 
           RowBox[{
            RowBox[{"Topology", "\[LongEqual]", "1"}], ",", 
            RowBox[{"Generic", "\[LongEqual]", "1"}], ",", 
            RowBox[{"Classes", "\[LongEqual]", "1"}], ",", 
            RowBox[{"Number", "\[LongEqual]", "24"}]}], ")"}],
          TraditionalForm]}],
        ZeroWidthTimes->True], "\[Integral]", 
       RowBox[{
        SuperscriptBox["\[DifferentialD]", "D"], 
        FormBox[
         RowBox[{"Integral", "[", "]"}],
         TraditionalForm]}]}], "(", 
      FormBox[
       RowBox[{"\[ImaginaryI]", " ", 
        SubsuperscriptBox["g", "s", "3"], " ", 
        RowBox[{"(", 
         RowBox[{
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                RowBox[{"-", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "3"}],
                    SequenceForm["p", 3],
                    Editable->False],
                   TraditionalForm], ")"}]}], "+", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "4"}],
                  SequenceForm["p", 4],
                  Editable->False],
                 TraditionalForm]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "9"}],
               SequenceForm["Lor", 9],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "3"}],
                SequenceForm["Lor", 3],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "4"}],
                SequenceForm["Lor", 4],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}], "+", 
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                RowBox[{"2", " ", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "3"}],
                    SequenceForm["p", 3],
                    Editable->False],
                   TraditionalForm], ")"}]}], "+", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "4"}],
                  SequenceForm["p", 4],
                  Editable->False],
                 TraditionalForm]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "4"}],
               SequenceForm["Lor", 4],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "3"}],
                SequenceForm["Lor", 3],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "9"}],
                SequenceForm["Lor", 9],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}], "+", 
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                RowBox[{"-", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "3"}],
                    SequenceForm["p", 3],
                    Editable->False],
                   TraditionalForm], ")"}]}], "-", 
                RowBox[{"2", " ", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "4"}],
                    SequenceForm["p", 4],
                    Editable->False],
                   TraditionalForm], ")"}]}]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "3"}],
               SequenceForm["Lor", 3],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "4"}],
                SequenceForm["Lor", 4],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "9"}],
                SequenceForm["Lor", 9],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}]}], ")"}], " ", 
        RowBox[{"(", 
         RowBox[{
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                RowBox[{"-", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "1"}],
                    SequenceForm["p", 1],
                    Editable->False],
                   TraditionalForm], ")"}]}], "+", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "5"}],
                  SequenceForm["p", 5],
                  Editable->False],
                 TraditionalForm]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "6"}],
               SequenceForm["Lor", 6],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "1"}],
                SequenceForm["Lor", 1],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "5"}],
                SequenceForm["Lor", 5],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}], "+", 
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "1"}],
                  SequenceForm["p", 1],
                  Editable->False],
                 TraditionalForm], "-", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "2"}],
                  SequenceForm["p", 2],
                  Editable->False],
                 TraditionalForm], "-", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "3"}],
                  SequenceForm["p", 3],
                  Editable->False],
                 TraditionalForm], "-", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "4"}],
                  SequenceForm["p", 4],
                  Editable->False],
                 TraditionalForm]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "5"}],
               SequenceForm["Lor", 5],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "1"}],
                SequenceForm["Lor", 1],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "6"}],
                SequenceForm["Lor", 6],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}], "+", 
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "2"}],
                  SequenceForm["p", 2],
                  Editable->False],
                 TraditionalForm], "+", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "3"}],
                  SequenceForm["p", 3],
                  Editable->False],
                 TraditionalForm], "+", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "4"}],
                  SequenceForm["p", 4],
                  Editable->False],
                 TraditionalForm], "-", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "5"}],
                  SequenceForm["p", 5],
                  Editable->False],
                 TraditionalForm]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "1"}],
               SequenceForm["Lor", 1],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "5"}],
                SequenceForm["Lor", 5],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "6"}],
                SequenceForm["Lor", 6],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}]}], ")"}], " ", 
        SuperscriptBox["g", 
         RowBox[{
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "6"}],
             SequenceForm["Lor", 6],
             Editable->False],
            TraditionalForm],
           TraditionalForm], 
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "7"}],
             SequenceForm["Lor", 7],
             Editable->False],
            TraditionalForm],
           TraditionalForm]}]], " ", 
        RowBox[{"(", 
         RowBox[{
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                RowBox[{
                 RowBox[{"-", "2"}], " ", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "2"}],
                    SequenceForm["p", 2],
                    Editable->False],
                   TraditionalForm], ")"}]}], "-", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "3"}],
                  SequenceForm["p", 3],
                  Editable->False],
                 TraditionalForm], "-", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "4"}],
                  SequenceForm["p", 4],
                  Editable->False],
                 TraditionalForm]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "8"}],
               SequenceForm["Lor", 8],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "2"}],
                SequenceForm["Lor", 2],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "7"}],
                SequenceForm["Lor", 7],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}], "+", 
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "2"}],
                  SequenceForm["p", 2],
                  Editable->False],
                 TraditionalForm], "-", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "3"}],
                  SequenceForm["p", 3],
                  Editable->False],
                 TraditionalForm], "-", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "4"}],
                  SequenceForm["p", 4],
                  Editable->False],
                 TraditionalForm]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "7"}],
               SequenceForm["Lor", 7],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "2"}],
                SequenceForm["Lor", 2],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "8"}],
                SequenceForm["Lor", 8],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}], "+", 
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "2"}],
                  SequenceForm["p", 2],
                  Editable->False],
                 TraditionalForm], "+", 
                RowBox[{"2", " ", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "3"}],
                    SequenceForm["p", 3],
                    Editable->False],
                   TraditionalForm], ")"}]}], "+", 
                RowBox[{"2", " ", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "4"}],
                    SequenceForm["p", 4],
                    Editable->False],
                   TraditionalForm], ")"}]}]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "2"}],
               SequenceForm["Lor", 2],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "7"}],
                SequenceForm["Lor", 7],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "8"}],
                SequenceForm["Lor", 8],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}]}], ")"}], " ", 
        SuperscriptBox["g", 
         RowBox[{
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "8"}],
             SequenceForm["Lor", 8],
             Editable->False],
            TraditionalForm],
           TraditionalForm], 
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "9"}],
             SequenceForm["Lor", 9],
             Editable->False],
            TraditionalForm],
           TraditionalForm]}]], " ", 
        RowBox[{
         FormBox["\<\"ep\"\>",
          TraditionalForm], "(", 
         RowBox[{
          RowBox[{"V", "(", 
           RowBox[{"5", ",", 
            RowBox[{"{", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "1"}],
               SequenceForm["Glu", 1],
               Editable->False],
              TraditionalForm], "}"}]}], ")"}], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "1"}],
            SequenceForm["p", 1],
            Editable->False],
           TraditionalForm], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "1"}],
            SequenceForm["Lor", 1],
            Editable->False],
           TraditionalForm]}], ")"}], " ", 
        RowBox[{
         FormBox["\<\"ep\"\>",
          TraditionalForm], "(", 
         RowBox[{
          RowBox[{"V", "(", 
           RowBox[{"5", ",", 
            RowBox[{"{", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "2"}],
               SequenceForm["Glu", 2],
               Editable->False],
              TraditionalForm], "}"}]}], ")"}], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "2"}],
            SequenceForm["p", 2],
            Editable->False],
           TraditionalForm], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "2"}],
            SequenceForm["Lor", 2],
            Editable->False],
           TraditionalForm]}], ")"}], " ", 
        RowBox[{
         FormBox["\<\"ep\"\>",
          TraditionalForm], "(", 
         RowBox[{
          RowBox[{"V", "(", 
           RowBox[{"5", ",", 
            RowBox[{"{", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "3"}],
               SequenceForm["Glu", 3],
               Editable->False],
              TraditionalForm], "}"}]}], ")"}], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "3"}],
            SequenceForm["p", 3],
            Editable->False],
           TraditionalForm], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "3"}],
            SequenceForm["Lor", 3],
            Editable->False],
           TraditionalForm]}], ")"}], " ", 
        RowBox[{
         FormBox["\<\"ep\"\>",
          TraditionalForm], "(", 
         RowBox[{
          RowBox[{"V", "(", 
           RowBox[{"5", ",", 
            RowBox[{"{", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "4"}],
               SequenceForm["Glu", 4],
               Editable->False],
              TraditionalForm], "}"}]}], ")"}], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "4"}],
            SequenceForm["p", 4],
            Editable->False],
           TraditionalForm], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "4"}],
            SequenceForm["Lor", 4],
            Editable->False],
           TraditionalForm]}], ")"}], " ", 
        RowBox[{
         FormBox["\<\"ep\"\>",
          TraditionalForm], "(", 
         RowBox[{
          RowBox[{"V", "(", 
           RowBox[{"5", ",", 
            RowBox[{"{", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "5"}],
               SequenceForm["Glu", 5],
               Editable->False],
              TraditionalForm], "}"}]}], ")"}], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "5"}],
            SequenceForm["p", 5],
            Editable->False],
           TraditionalForm], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "5"}],
            SequenceForm["Lor", 5],
            Editable->False],
           TraditionalForm]}], ")"}], " ", 
        FormBox[
         FractionBox["1", 
          SuperscriptBox[
           RowBox[{"(", 
            RowBox[{
             RowBox[{"-", 
              RowBox[{"(", 
               FormBox[
                InterpretationBox[
                 RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "3"}],
                 SequenceForm["p", 3],
                 Editable->False],
                TraditionalForm], ")"}]}], "-", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "4"}],
               SequenceForm["p", 4],
               Editable->False],
              TraditionalForm]}], ")"}], "2"]],
         TraditionalForm], " ", 
        FormBox[
         FractionBox["1", 
          SuperscriptBox[
           RowBox[{"(", 
            RowBox[{
             RowBox[{"-", 
              RowBox[{"(", 
               FormBox[
                InterpretationBox[
                 RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "2"}],
                 SequenceForm["p", 2],
                 Editable->False],
                TraditionalForm], ")"}]}], "-", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "3"}],
               SequenceForm["p", 3],
               Editable->False],
              TraditionalForm], "-", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "4"}],
               SequenceForm["p", 4],
               Editable->False],
              TraditionalForm]}], ")"}], "2"]],
         TraditionalForm], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "6"}],
            SequenceForm["Glu", 6],
            Editable->False],
           TraditionalForm], ",", "8"}], ")"}], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "7"}],
            SequenceForm["Glu", 7],
            Editable->False],
           TraditionalForm], ",", "8"}], ")"}], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "1"}],
            SequenceForm["Glu", 1],
            Editable->False],
           TraditionalForm], ",", "8", ",", "External"}], ")"}], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "2"}],
            SequenceForm["Glu", 2],
            Editable->False],
           TraditionalForm], ",", "8", ",", "External"}], ")"}], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "3"}],
            SequenceForm["Glu", 3],
            Editable->False],
           TraditionalForm], ",", "8", ",", "External"}], ")"}], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "4"}],
            SequenceForm["Glu", 4],
            Editable->False],
           TraditionalForm], ",", "8", ",", "External"}], ")"}], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "5"}],
            SequenceForm["Glu", 5],
            Editable->False],
           TraditionalForm], ",", "8", ",", "External"}], ")"}], " ", 
        SubscriptBox["f", 
         RowBox[{
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "1"}],
             SequenceForm["Glu", 1],
             Editable->False],
            TraditionalForm],
           TraditionalForm], 
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "5"}],
             SequenceForm["Glu", 5],
             Editable->False],
            TraditionalForm],
           TraditionalForm], 
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "6"}],
             SequenceForm["Glu", 6],
             Editable->False],
            TraditionalForm],
           TraditionalForm]}]], " ", 
        SubscriptBox["f", 
         RowBox[{
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "2"}],
             SequenceForm["Glu", 2],
             Editable->False],
            TraditionalForm],
           TraditionalForm], 
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "6"}],
             SequenceForm["Glu", 6],
             Editable->False],
            TraditionalForm],
           TraditionalForm], 
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "7"}],
             SequenceForm["Glu", 7],
             Editable->False],
            TraditionalForm],
           TraditionalForm]}]], " ", 
        SubscriptBox["f", 
         RowBox[{
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "3"}],
             SequenceForm["Glu", 3],
             Editable->False],
            TraditionalForm],
           TraditionalForm], 
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "4"}],
             SequenceForm["Glu", 4],
             Editable->False],
            TraditionalForm],
           TraditionalForm], 
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "7"}],
             SequenceForm["Glu", 7],
             Editable->False],
            TraditionalForm],
           TraditionalForm]}]]}],
       TraditionalForm], ")"}], ",", 
     RowBox[{"\[Integral]", 
      RowBox[{
       StyleBox[
        RowBox[{
         SuperscriptBox["\[DifferentialD]", "D"], 
         FormBox[
          RowBox[{"GraphID", "(", 
           RowBox[{
            RowBox[{"Topology", "\[LongEqual]", "1"}], ",", 
            RowBox[{"Generic", "\[LongEqual]", "1"}], ",", 
            RowBox[{"Classes", "\[LongEqual]", "1"}], ",", 
            RowBox[{"Number", "\[LongEqual]", "25"}]}], ")"}],
          TraditionalForm]}],
        ZeroWidthTimes->True], "\[Integral]", 
       RowBox[{
        SuperscriptBox["\[DifferentialD]", "D"], 
        FormBox[
         RowBox[{"Integral", "[", "]"}],
         TraditionalForm]}]}], "(", 
      FormBox[
       RowBox[{"\[ImaginaryI]", " ", 
        SubsuperscriptBox["g", "s", "3"], " ", 
        RowBox[{"(", 
         RowBox[{
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                RowBox[{"-", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "3"}],
                    SequenceForm["p", 3],
                    Editable->False],
                   TraditionalForm], ")"}]}], "+", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "4"}],
                  SequenceForm["p", 4],
                  Editable->False],
                 TraditionalForm]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "9"}],
               SequenceForm["Lor", 9],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "3"}],
                SequenceForm["Lor", 3],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "4"}],
                SequenceForm["Lor", 4],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}], "+", 
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                RowBox[{"2", " ", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "3"}],
                    SequenceForm["p", 3],
                    Editable->False],
                   TraditionalForm], ")"}]}], "+", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "4"}],
                  SequenceForm["p", 4],
                  Editable->False],
                 TraditionalForm]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "4"}],
               SequenceForm["Lor", 4],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "3"}],
                SequenceForm["Lor", 3],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "9"}],
                SequenceForm["Lor", 9],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}], "+", 
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                RowBox[{"-", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "3"}],
                    SequenceForm["p", 3],
                    Editable->False],
                   TraditionalForm], ")"}]}], "-", 
                RowBox[{"2", " ", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "4"}],
                    SequenceForm["p", 4],
                    Editable->False],
                   TraditionalForm], ")"}]}]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "3"}],
               SequenceForm["Lor", 3],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "4"}],
                SequenceForm["Lor", 4],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "9"}],
                SequenceForm["Lor", 9],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}]}], ")"}], " ", 
        RowBox[{"(", 
         RowBox[{
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                RowBox[{"-", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "2"}],
                    SequenceForm["p", 2],
                    Editable->False],
                   TraditionalForm], ")"}]}], "+", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "5"}],
                  SequenceForm["p", 5],
                  Editable->False],
                 TraditionalForm]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "7"}],
               SequenceForm["Lor", 7],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "2"}],
                SequenceForm["Lor", 2],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "5"}],
                SequenceForm["Lor", 5],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}], "+", 
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                RowBox[{"2", " ", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "2"}],
                    SequenceForm["p", 2],
                    Editable->False],
                   TraditionalForm], ")"}]}], "+", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "5"}],
                  SequenceForm["p", 5],
                  Editable->False],
                 TraditionalForm]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "5"}],
               SequenceForm["Lor", 5],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "2"}],
                SequenceForm["Lor", 2],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "7"}],
                SequenceForm["Lor", 7],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}], "+", 
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                RowBox[{"-", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "2"}],
                    SequenceForm["p", 2],
                    Editable->False],
                   TraditionalForm], ")"}]}], "-", 
                RowBox[{"2", " ", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "5"}],
                    SequenceForm["p", 5],
                    Editable->False],
                   TraditionalForm], ")"}]}]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "2"}],
               SequenceForm["Lor", 2],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "5"}],
                SequenceForm["Lor", 5],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "7"}],
                SequenceForm["Lor", 7],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}]}], ")"}], " ", 
        SuperscriptBox["g", 
         RowBox[{
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "6"}],
             SequenceForm["Lor", 6],
             Editable->False],
            TraditionalForm],
           TraditionalForm], 
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "7"}],
             SequenceForm["Lor", 7],
             Editable->False],
            TraditionalForm],
           TraditionalForm]}]], " ", 
        RowBox[{"(", 
         RowBox[{
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                RowBox[{"-", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "1"}],
                    SequenceForm["p", 1],
                    Editable->False],
                   TraditionalForm], ")"}]}], "+", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "2"}],
                  SequenceForm["p", 2],
                  Editable->False],
                 TraditionalForm], "+", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "5"}],
                  SequenceForm["p", 5],
                  Editable->False],
                 TraditionalForm]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "8"}],
               SequenceForm["Lor", 8],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "1"}],
                SequenceForm["Lor", 1],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "6"}],
                SequenceForm["Lor", 6],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}], "+", 
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "1"}],
                  SequenceForm["p", 1],
                  Editable->False],
                 TraditionalForm], "-", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "3"}],
                  SequenceForm["p", 3],
                  Editable->False],
                 TraditionalForm], "-", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "4"}],
                  SequenceForm["p", 4],
                  Editable->False],
                 TraditionalForm]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "6"}],
               SequenceForm["Lor", 6],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "1"}],
                SequenceForm["Lor", 1],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "8"}],
                SequenceForm["Lor", 8],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}], "+", 
          RowBox[{
           SubscriptBox[
            RowBox[{"(", 
             FormBox[
              TagBox[
               RowBox[{
                RowBox[{"-", 
                 RowBox[{"(", 
                  FormBox[
                   InterpretationBox[
                    RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "2"}],
                    SequenceForm["p", 2],
                    Editable->False],
                   TraditionalForm], ")"}]}], "+", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "3"}],
                  SequenceForm["p", 3],
                  Editable->False],
                 TraditionalForm], "+", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "4"}],
                  SequenceForm["p", 4],
                  Editable->False],
                 TraditionalForm], "-", 
                FormBox[
                 InterpretationBox[
                  RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "5"}],
                  SequenceForm["p", 5],
                  Editable->False],
                 TraditionalForm]}],
               HoldForm],
              TraditionalForm], ")"}], 
            FormBox[
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "1"}],
               SequenceForm["Lor", 1],
               Editable->False],
              TraditionalForm],
             TraditionalForm]], " ", 
           SuperscriptBox["g", 
            RowBox[{
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "6"}],
                SequenceForm["Lor", 6],
                Editable->False],
               TraditionalForm],
              TraditionalForm], 
             FormBox[
              FormBox[
               InterpretationBox[
                RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "8"}],
                SequenceForm["Lor", 8],
                Editable->False],
               TraditionalForm],
              TraditionalForm]}]]}]}], ")"}], " ", 
        SuperscriptBox["g", 
         RowBox[{
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "8"}],
             SequenceForm["Lor", 8],
             Editable->False],
            TraditionalForm],
           TraditionalForm], 
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "9"}],
             SequenceForm["Lor", 9],
             Editable->False],
            TraditionalForm],
           TraditionalForm]}]], " ", 
        RowBox[{
         FormBox["\<\"ep\"\>",
          TraditionalForm], "(", 
         RowBox[{
          RowBox[{"V", "(", 
           RowBox[{"5", ",", 
            RowBox[{"{", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "1"}],
               SequenceForm["Glu", 1],
               Editable->False],
              TraditionalForm], "}"}]}], ")"}], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "1"}],
            SequenceForm["p", 1],
            Editable->False],
           TraditionalForm], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "1"}],
            SequenceForm["Lor", 1],
            Editable->False],
           TraditionalForm]}], ")"}], " ", 
        RowBox[{
         FormBox["\<\"ep\"\>",
          TraditionalForm], "(", 
         RowBox[{
          RowBox[{"V", "(", 
           RowBox[{"5", ",", 
            RowBox[{"{", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "2"}],
               SequenceForm["Glu", 2],
               Editable->False],
              TraditionalForm], "}"}]}], ")"}], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "2"}],
            SequenceForm["p", 2],
            Editable->False],
           TraditionalForm], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "2"}],
            SequenceForm["Lor", 2],
            Editable->False],
           TraditionalForm]}], ")"}], " ", 
        RowBox[{
         FormBox["\<\"ep\"\>",
          TraditionalForm], "(", 
         RowBox[{
          RowBox[{"V", "(", 
           RowBox[{"5", ",", 
            RowBox[{"{", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "3"}],
               SequenceForm["Glu", 3],
               Editable->False],
              TraditionalForm], "}"}]}], ")"}], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "3"}],
            SequenceForm["p", 3],
            Editable->False],
           TraditionalForm], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "3"}],
            SequenceForm["Lor", 3],
            Editable->False],
           TraditionalForm]}], ")"}], " ", 
        RowBox[{
         FormBox["\<\"ep\"\>",
          TraditionalForm], "(", 
         RowBox[{
          RowBox[{"V", "(", 
           RowBox[{"5", ",", 
            RowBox[{"{", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "4"}],
               SequenceForm["Glu", 4],
               Editable->False],
              TraditionalForm], "}"}]}], ")"}], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "4"}],
            SequenceForm["p", 4],
            Editable->False],
           TraditionalForm], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "4"}],
            SequenceForm["Lor", 4],
            Editable->False],
           TraditionalForm]}], ")"}], " ", 
        RowBox[{
         FormBox["\<\"ep\"\>",
          TraditionalForm], "(", 
         RowBox[{
          RowBox[{"V", "(", 
           RowBox[{"5", ",", 
            RowBox[{"{", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "5"}],
               SequenceForm["Glu", 5],
               Editable->False],
              TraditionalForm], "}"}]}], ")"}], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "5"}],
            SequenceForm["p", 5],
            Editable->False],
           TraditionalForm], ",", 
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Lor\"\>", "\[InvisibleSpace]", "5"}],
            SequenceForm["Lor", 5],
            Editable->False],
           TraditionalForm]}], ")"}], " ", 
        FormBox[
         FractionBox["1", 
          SuperscriptBox[
           RowBox[{"(", 
            RowBox[{
             RowBox[{"-", 
              RowBox[{"(", 
               FormBox[
                InterpretationBox[
                 RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "3"}],
                 SequenceForm["p", 3],
                 Editable->False],
                TraditionalForm], ")"}]}], "-", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "4"}],
               SequenceForm["p", 4],
               Editable->False],
              TraditionalForm]}], ")"}], "2"]],
         TraditionalForm], " ", 
        FormBox[
         FractionBox["1", 
          SuperscriptBox[
           RowBox[{"(", 
            RowBox[{
             RowBox[{"-", 
              RowBox[{"(", 
               FormBox[
                InterpretationBox[
                 RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "2"}],
                 SequenceForm["p", 2],
                 Editable->False],
                TraditionalForm], ")"}]}], "-", 
             FormBox[
              InterpretationBox[
               RowBox[{"\<\"p\"\>", "\[InvisibleSpace]", "5"}],
               SequenceForm["p", 5],
               Editable->False],
              TraditionalForm]}], ")"}], "2"]],
         TraditionalForm], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "6"}],
            SequenceForm["Glu", 6],
            Editable->False],
           TraditionalForm], ",", "8"}], ")"}], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "7"}],
            SequenceForm["Glu", 7],
            Editable->False],
           TraditionalForm], ",", "8"}], ")"}], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "1"}],
            SequenceForm["Glu", 1],
            Editable->False],
           TraditionalForm], ",", "8", ",", "External"}], ")"}], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "2"}],
            SequenceForm["Glu", 2],
            Editable->False],
           TraditionalForm], ",", "8", ",", "External"}], ")"}], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "3"}],
            SequenceForm["Glu", 3],
            Editable->False],
           TraditionalForm], ",", "8", ",", "External"}], ")"}], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "4"}],
            SequenceForm["Glu", 4],
            Editable->False],
           TraditionalForm], ",", "8", ",", "External"}], ")"}], " ", 
        RowBox[{"SumOver", "(", 
         RowBox[{
          FormBox[
           InterpretationBox[
            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "5"}],
            SequenceForm["Glu", 5],
            Editable->False],
           TraditionalForm], ",", "8", ",", "External"}], ")"}], " ", 
        SubscriptBox["f", 
         RowBox[{
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "1"}],
             SequenceForm["Glu", 1],
             Editable->False],
            TraditionalForm],
           TraditionalForm], 
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "6"}],
             SequenceForm["Glu", 6],
             Editable->False],
            TraditionalForm],
           TraditionalForm], 
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "7"}],
             SequenceForm["Glu", 7],
             Editable->False],
            TraditionalForm],
           TraditionalForm]}]], " ", 
        SubscriptBox["f", 
         RowBox[{
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "2"}],
             SequenceForm["Glu", 2],
             Editable->False],
            TraditionalForm],
           TraditionalForm], 
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "5"}],
             SequenceForm["Glu", 5],
             Editable->False],
            TraditionalForm],
           TraditionalForm], 
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "6"}],
             SequenceForm["Glu", 6],
             Editable->False],
            TraditionalForm],
           TraditionalForm]}]], " ", 
        SubscriptBox["f", 
         RowBox[{
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "3"}],
             SequenceForm["Glu", 3],
             Editable->False],
            TraditionalForm],
           TraditionalForm], 
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "4"}],
             SequenceForm["Glu", 4],
             Editable->False],
            TraditionalForm],
           TraditionalForm], 
          FormBox[
           FormBox[
            InterpretationBox[
             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "7"}],
             SequenceForm["Glu", 7],
             Editable->False],
            TraditionalForm],
           TraditionalForm]}]]}],
       TraditionalForm], ")"}]}], ")"}]}], TraditionalForm]], "Output",
 CellChangeTimes->{
  3.543120494510881*^9, {3.5431217623262444`*^9, 3.5431217867304*^9}}]
}, Open  ]]
},
WindowSize->{614, 855},
WindowMargins->{{Automatic, -1105}, {Automatic, -1}},
FrontEndVersion->"8.0 for Linux x86 (64-bit) (February 23, 2011)",
StyleDefinitions->"Default.nb"
]
(* End of Notebook Content *)

(* Internal cache information *)
(*CellTagsOutline
CellTagsIndex->{}
*)
(*CellTagsIndex
CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
Cell[557, 20, 137, 2, 30, "Input"],
Cell[697, 24, 150, 2, 17, "Text"],
Cell[850, 28, 678, 22, 36, "Text"],
Cell[1531, 52, 371, 12, 17, "Text"],
Cell[1905, 66, 196, 4, 17, "Text"],
Cell[CellGroupData[{
Cell[2126, 74, 121, 2, 30, "Input"],
Cell[CellGroupData[{
Cell[2272, 80, 104, 2, 24, "Print"],
Cell[2379, 84, 116, 2, 24, "Print"],
Cell[2498, 88, 152, 3, 24, "Print"],
Cell[2653, 93, 125, 2, 24, "Print"],
Cell[2781, 97, 172, 3, 24, "Print"]
}, Open  ]]
}, Open  ]],
Cell[2980, 104, 306, 7, 30, "Input"],
Cell[CellGroupData[{
Cell[3311, 115, 822, 19, 50, "Input"],
Cell[4136, 136, 6582, 173, 178, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[10755, 314, 216, 5, 30, "Input"],
Cell[CellGroupData[{
Cell[10996, 323, 463496, 8419, 395, 410234, 7544, "CachedBoxData", "BoxData", \
"Print"],
Cell[474495, 8744, 312468, 5637, 395, 274974, 5020, "CachedBoxData", \
"BoxData", "Print"]
}, Open  ]],
Cell[786978, 14384, 9227, 252, 194, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[796242, 14641, 181, 3, 30, "Input"],
Cell[796426, 14646, 710192, 20136, 9551, "Output"]
}, Open  ]]
}
]
*)

(* End of internal cache information *)